Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...

we can use set true for condition names..
similarly can we code set to false in cobol pgm?
will it work?

Answer Posted / shakilaashwin

you can use 'SET condition-name TO FALSE' but with little
change in the data item declaration

Example is below :

01 WS-EOF-FLAG PIC X(1)VALUE 'N'.
88 WS-EOF-FLAG-N VALUE 'N' WHEN SET FALSE 'Y'.

PROCEDURE DIVISON.
100-MAIN-PARA.
DISPLAY 'PROG STARTS'.
DISPLAY 'FLG VALUE AFTER - ' WS-EOF-FLAG.
SET WS-EOF-FLAG-N TO FALSE.
DISPLAY 'FLG VALUE BEFORE- ' WS-EOFFLAG.
STOP RUN.

Is This Answer Correct ?    8 Yes 9 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

how do you reference the ksds vsam file formats from cobol programs

1122


How do you define a variable of comp-1 and comp-2?

1135


How to remove 2 duplicate records and copy only one using job control language?

1168


Name some of the examples of COBOl 11?

3082


Describe the cobol database components?

1125


i made it to stage 3 of an interview process wednessday they will quiz my knowledge again face to face for an analyst role recruiter said it will be based on Business requirements system is cobol and good ideas what they might ask etc

2532


How many bytes S(8) comp field occupy and its maximum value?

2084


What is amode(24)?

1186


How are the next sentence and continue different from each other?

1224


What rules are to be followed while using the corresponding options?

1016


What is a scope terminator give example?

1049


input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?

2253


How to traceback if I am getting SOC7 or SOC4 abend? List down the steps

5313


how to access the file from prodution from changeman tool and to submit a file to production

7438


what is amode(24), amode(31), rmode(24) and rmode(any)?

1090