Interested to Buy Any Domain ? << Click Here >> for more details...
how you read control card into array?
- 3 Answers
- 12781 Views
- HCL, I also Faced
- E-Mail Answers
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 |
I have a seq file with different fields one field is address with pic x(50) as input in a cobol program. In address there is 'PUNE' at any different positions in the address field ( form 1 t0 50) . My requirement is select the fields with address 'PUNE' by using cobol. Please suggest
What is diff betn PS and ESDS file? What is the diffrent compiler options in cobol and there discription? What is retrive nth maximum salary from salary DB2 table. Can we redefine COM-3 variable with varchar variable?
record length in spool?
a. Can the OPTIONAL clause in COBOL only be coded for input files? b. If it is coded for files opened in OUTPUT, I-O or EXTEND mode, will it give a compilation error? c. If there are no compilation errors and if such files are not coded in the JCL, will the OPEN statement run fine when these files are opened? d. How will a WRITE statement work for the above files?
RENAME clause takes new SPACE in memory.TRUE or FALSE? a)TRUE 2)FALSE
why 02 level number can't be use as a separate level number like 01 or 77 ?
WT R TECHNICAL MAINFRAME QUESTION ASKED IIN ANJANASOFTEARE??
What are the situations u have used in ur project for Subcript and Index ? 1.if u use Subscript why not Index,why u choose Subscript only? 2.if u use Index why not Subscript,what abt Displacement?
How to read records from flat file in reverse order through COBOL program?
14 Answers Accenture, Broadridge, IBM, MAT, Polaris, SPIC, Syntel, TCS, Wipro,
What guidelines should be followed to write a structured Cobol program?
i need a program by giving input as a abcd in any randem order but i need a output as 1234 related to abcd. i.e,. a for 1,b=2,c.....etc..
I need to compare 3 variables(dates) and do some processing based on the earliest date. There could be more then 1 date record in any of the 3 fields. What is the best way to code this?
COBOL 
