how you read control card into array?

Answer Posted / shwetha

Consider the Controll Card(Sysin) as an infile to the
program.

JS010 EXEC PGM=pgm,
REGION=0M
STEPLIB DD DSN=Loadlib,
DISP=(SHR,KEEP,KEEP)

INFILE DD DSN=xxxx.xxxx.SYSIN(control card),
DISP=(SHR,KEEP,KEEP)
(Where xxxx.xxxx.SYSIN -Sysin PDS)

Read it as an infile and download it to the Table defined
in your Program.

Is This Answer Correct ?    2 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

If you are current on the owner of a set, what is the difference between obtain next and obtain first?

632


What the difference is between continue and next sentence?

648


Define static linking and dynamic linking.

650


Why do we code s9 (4) comp. Inspite of knowing comp-3 will occupy less space?

698


what is the use of outrecord?

1761






how do you define single dimensional array and multidimensional array in your cobol?

661


What is the difference between a binary search and a sequential search what are the pertinent cobol?

723


What is the difference between external and global variables in COBOL?

804


What is report-item in COBOL?

702


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 ?

1860


Program A (Normal COBBAT) calling a B Program (DB2COBOL, COBBATDB which is using a VSAM file. its a dynamic call. How we will handle VSAM file decleration in our from JCL from where we are running A PGM. And should we have PLAN for A pGM also. if possible can some one post a sample JCL. Thanks for help in advance.

5045


What are the different data types in cobol?

776


What are the pertinent COBOL commands?

2615


For rewrite, why is it mandatory that file needs to be opened?

613


i need a small 3d program using inline and outline.

1629