how you read control card into array?
Answers were Sorted based on User's Feedback
Answer / 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 |
Answer / kssb78
Yes Shweta is correct.
The alternate way to execute is to read the inputs in
control card DD statement SYSIN is using a ACCEPT statement
and move it into a working storage variable
Later using a subscript / index we can move the value into
an array.
Is This Answer Correct ? | 0 Yes | 1 No |
Answer / lu
I don't understand your question ???? give an example...
Array is a table using by subscript...
Is This Answer Correct ? | 0 Yes | 2 No |
What is the reference modification.
What are the differences between OS VS COBOL and VS COBOL II?
what is the difference between COBOL2 AND COBOL390?
if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need
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
why 02 level number can't be use as a separate level number like 01 or 77 ?
i have mainprogram and subgram...if i compile mainprogram without stop run..what will u get in compilation time?
consider two data items 77 W-A PIC 9(3)V99 VALUE 23.75 77 W-B PIC ZZ9V99 VLAUE 123.45 after the statement MOVE W-A TO W-B what will be W-B's value? a.123.75 b.b23.75 (where b indicates space) c.023.75 d.invalid move
What will happen if we try to create GDG (+2) generaton instead of (+1) generation?
how we separate the cobol cics statements from cobol&cics programming?
How would the number +1234 be stored if a PIC clause of PICTUREs9(4) comp-3 were used?
i want to enter the name 'pandu' into ur table how?