How do you code Cobol to access a parameter that has been
defined in JCL?
Answers were Sorted based on User's Feedback
Answer / shan
Ff it is SYSIN input in JCL,
ACCEPT <VARIABLE> FROM SYSIN
If it parameter is give through PARM, then COBOL program
should recieve through LINKAGE SECTION
| Is This Answer Correct ? | 7 Yes | 0 No |
Answer / lynn ertell
Apparently you cannot use the ACCEPT verb against the
LINKAGE parameters if you are already using SYSIN.
It's either one or the other but not both.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / harish
environemnt division
file1 assign to ddname
file2 assign to ddname
for this in JCL //DDNAME DD DSN.......
LINKAGE SECTION
01 LN-LEN PIC S9(4) COMP.
01 X PIC X
01 Y PIC X
IN JCL THROUGH PARM (MAX 1 TO 100 CHAR)
procedure division.
ACCEPT X
ACCEPT Y.
IN JCL THROUGH SYSIN DD*
pls correct me if anything wrong
HARISH POOMGAME SHIVAPPA(hassan,karnataka)
NIIT TECHNOLOGY
KOLKATA
| Is This Answer Correct ? | 2 Yes | 4 No |
What is the utilization of copybook in cobol? Could we utilize a similar copybook?
How will 128 be saved in s9 (3) comp-3 How will 12 be saved in s9 (2) comp
What is amode(24)?
I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?
What are ISOLATION LEVELS? Where do we need to specify them in compiling JCL (Exactly which statement and what is syntax for it)?
Suppose a program has the following code. What will be the output? MAIN-PARA. DISPLAY 'MAIN-PARA' PERFORM SECTION-A. STOP RUN. SECTION-A. PARA-A1. DISPLAY 'SECTION A PARA A1'. PARA-A2. DISPLAY 'SECTION A PARA A2'.
How do you do in-line PERFORM?
how will you define vsam file in select clause?
What are 77 levels used for?
i declare a Table as OCCURS 2000 TIMES.If the input file has more than 2000 records will the COBOL program fail?
if a file has 1000 recods how copy the records from 1 to 100 records using sort