how many subpgms we can use in a main pgm ?
how do u link sub pgm to main pgm ?
how can i use the parameters declared in main pgm to sub pgm ?
Answers were Sorted based on User's Feedback
Answer / kiran
There is no limit.... we can write n number of sub programs
in main pgm.
by using linkage section in data division in sub program
by using IS GLOBAL keyword
ex 01 name pic x(10) IS Global
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / sen
Same as kiran said
But to get the parameters used in tha main program can be used by {procedure division using var-1,var-2} in the sub program
Eg if ur var name is ws-1 and ws-2
Then we can get values by
Procedure division using ws-1,ws-2.
| Is This Answer Correct ? | 0 Yes | 0 No |
Differentiate cobol and cobol-ii. (Most of our programs are written in cobolii, so, it is good to know, how, this is different from cobol)?
How to delete a front spaces in a data-name/variable in cobol Example:- 01 data-name-1 PIC x(20) value " cobol language". 01 data-name-2 PIC x(20). MOVE data-name-1 to data-name-2. would like the value of data-name-2 is "cobol language".
I hv ten records in ps file and i hv say some 15 records in vsam file .i hv empno and age in ps file n empno,empname,dept n desig in vsam file. i hv 2 read the ps file n check wid matching empno in vsam file and then insert all fields from ps and vsam into db2 table....plz help in writin the procedure division
input:- 12233344445555566666... output:- 1=1,2=4,3=9... Here firstno i.e 1 should be displayed and after that the alikeno.s should be added n displayed.i.e 2+2=4 like tat it goeson.
i declare a Table as OCCURS 2000 TIMES.If the input file has more than 2000 records will the COBOL program fail?
What is the difference beetween Arrays and Tables in Cobol? please dont give the answer that arrays in cobol terminology is called tables......
what is scope terminator
How do you do in-line PERFORM?
Can we use redefine clause in occurs clause?
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?
Can we move X(9) to 9(9). If yes what are the ways for doing this?
what is the use of keep and pass in disp