Answer / vinod babu bachina

when PROGA made a call to PROGB, if it is first time then
the execution in PROGB start from workign storage
section.suppose progA calls again PROGB then the execution
will start from procedure division only .So when we made a
second call to anu subprogram we have to intialize the
working storage section variables.otherwise second call
retains the values of first call.

Answer / rajagopalan

The variables in the working-storage section of prog-b will
be initialized only if prog-a has given a CANCEL statement
after CALL statement. Othrwise the WS variables of prog-B
will retain the latest contents of the previous call.

Answer / s.rajagopalan

none of the above answer is correct.
In static call the working storage varibales is not
initialised when the sub program is called. It retains the
latest values of ws variables in the subrpogram.

In case of dynamic call if you use "cancel" stament then
the ws variables of the sub program are initialised.
if you dont use cancel statement and call the subprogram
then the latest values are retained for the WS vriables.

Answer / vivek

Rajagopalan's answer is the correct one.

Refer the IBM documentation.

http://publib.boulder.ibm.com/infocenter/pdthelp/v1r1/index.
jsp?topic=/com.ibm.entcobol.doc_3.4/tpsub04.htm

Answer / nagesh

Well, it depends on the type of call u r making, if it's
dynamic call working storage variable will be initialized
every time automatically.
But if it's static call u can use either 'cancel' or
'is initial' .

Answer / ab

I think Nagesh's answer is correct.

Answer / ramanujam

Everything will be cleared in Program B.
once it returns

What divisions, sections and paragraphs are mandatory for a COBOL program?

8 Answers   Arigo Infotech,

I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?

0 Answers   HCL,

write a program to eliminate duplicate records in a input file and send them to output file.

2 Answers   IBM,

Can a REDEFINES clause be used along with an OCCURS clause? if yes, 01 WS-TABLE. 03 WS-TABLE-EL OCCURS 5 TIMES PIC X(1) VALUE 'A'. 03 WS-EX REDEFINES WS-TABLE-EL PIC X(5). What can you expect? if no,why?

6 Answers  

) how do u code after getting data?

0 Answers   IBM,

Will the variable POS in the following code have a value of 2 or not? 01 POS PIC S9(4) COMP VALUE 2. 01 FIRST-NAME PIC X(10) VALUE 'ABC'. 01 LAST-NAME PIC X(10) VALUE 'XYZ'. 01 NAME PIC X(20) VALUE SPACES. STRING FIRST-NAME DELIMITED BY SPACES ' ' DELIMITED BY SIZE LAST-NAME DELIMITED BY SPACES INTO NAME WITH POINTER POS

2 Answers  

77 I pic 99 value 5 Perorm para-A I times. Para -A. move 10 to I. How many times the para-A will be executed.?

9 Answers   TCS,

select TURE Statement(s) aboUt eject statemenet in cobol? a)The eject statememnt must be the only statement on the line b.It causes the program to edit abnormally c. eject statement can be written in either area A or area B d. specifies that the next source statement is to be printed at Top of the next page e.The EJECTstatement has no effect on the compilation of the source program itself

2 Answers  

In a program, variables are used but no DB2 involved in it. Can you call it as host variables??

4 Answers   EDS,

How do u initialize an array?

2 Answers   CTS,

how do u link sub pgm to main pgm ?

2 Answers   TCS,

How to remove the spaces at the end of each record in the output file of variable length, via cobol program?

0 Answers