Answer / 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.

I have files that contains both duplicates files(occur more than twice) and non-duplicate files.The file is already sorted by a key.I want to determine those records that are duplicate and will be move to a duplicate file and non- duplicate files to be move to a valid file.thank you.help please

2 Answers  

---

if a=b how the flow will complete??? perform test through test-exit. perform activa through activa-exit. test. if a=b then next sentence else move a to c. test-exit. exit. activa. -- -- activa-exit. exit.

1 Answers   IBM,

---

using redefine can you redefine lower variable size to higher variable size?

3 Answers   Patni,

---

suppose a cobol programme A calling programme B,C and D. If C undergoes some change what if A,B,C,D need to be recompiled or only C nee to be recompliled.

2 Answers   IBM,

---

The maximum number of dimensions that an array can have in COBOL-85 is ?

11 Answers  

---

What will happen if we move SPACES to numeric field and ZEROES to alphabetic field?

7 Answers   T systems,

---

describe 805 error

6 Answers   DELL,

---

wht is the use of evalute verb ? how do u declare recfm in cobol and jcl ?

2 Answers   EDS,

---

What is cobol?

0 Answers  

---

what happens of we dont give time stamp in precompilation process

2 Answers  

---

88 level entry is used for (a) data items in WORKING-STORAGE SECTION (b) items with RENAMES clause (c) condition-names (d) None of the above

5 Answers   TCS,

---

What is link edit in cobol?

0 Answers  

---