Answer / ashl

Use the return-code variable and set to the desird value

move 16 to return-code

Answer / nishanthini

MOVE VALUE TO RETURN-CODE register

Answer / vivek

Move a value to RETURN-CODE register. RETURN-CODE should
not be declared in your program.

Ex: MOVE 4 TO RETURN-CODE

Answer / hari

move value to retun-code it should not declared in working -storage section.
by using internalreader we can pass the data from cobol to jcl
//sysout dd sysout=(*,intrdr)

Answer / prasanna

thnks!!!

I have a Flat file in which certain records are present in a tabular format. I need to extract some of the records on some basis from it and copy them into a flat file...how it can be done ??

2 Answers   HCL,

A LESS 1200 IF B GREATER 25 MOVE 47 TOC ELSE MOVE 57 TO C IF A GREATER 249 MOVE 67 TO C ELSE NEXT SENTENCE ELSE IF B LESS 67 MOVE 27 TO C What will be the value of C, when A is 137 and b is 25

3 Answers   TCS,

Is this allowed? 01 WS-TABLE. 03 FILLER-X PIC X(5) VALUE 'AAAAA'. 03 WS-EX REDEFINES FILLER-X OCCURS 5 TIMES PIC X(1). can redefines clause be used with occurs clause?

4 Answers  

Difference between next and continue clause

4 Answers   Kanbay,

What is the default value of DISP parameter?

3 Answers   IBM,

Where the Plan is located in CICS-DB2

2 Answers   IBM,

how many maximum no of variables can be declared in linkage section ?

2 Answers   HCL,

In my table having 3000 Records. How can I delete the 500th row? (we don't know what is data inside the table)

3 Answers   Keane India Ltd,

i have a variable block which is used in my cobol program as input file having records of 4080 after compilation while runing the program im getiing file attribut mismatch and it is saying tht the record length of the file is 4084 can any one knw the answer how to reslove it ?

2 Answers  

IF I mention stop run in CICS what happens?

0 Answers   IBM,

How does IDMS communicate with CICS?

1 Answers   Covansys, Satyam,

What is length is cobol?

0 Answers