How to execute a set of JCL statements from a COBOL program?
- 2 Answers
- 13381 Views
- Patni, Syntel, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / vishal
we can declare a record in file section and can pass the
statementa to that record as shown..
E.D
fole_control.
select jclfile assign to jcldd
file section.
fd jclfile
01 jcl_record pic x(80).
P.D.
mainpara.
open output jcl_record
move "//job job1, notify=&sysuid" to jcl_record.
move "//step1 exec pgm=pgm1" to jcl_record.
.......
.......
close jcl_record.
then route the file to internal reader INTRDR in jcl
as shown..
//step1 exec pgm=pgm1
//dd3 dd dsn.......
//jcldd dd sysout=(*,INTRDR)
(here the job will get submitted automatically FROM COBOL)
| Is This Answer Correct ? | 7 Yes | 2 No |
Answer / anoop
You can execute JCL from cobol programs.
Write the jcl statements into a file and open it in out put
mode.
| Is This Answer Correct ? | 8 Yes | 12 No |
i have mainprogram and subgram...if i compile mainprogram without stop run..what will u get in compilation time?
what is ASRA, AEY9?
How many divisions we have in Cobol ?
whats the disadvantage of search all over search?
What is report-item in COBOL?
wht is the diff b/w if and evaluate stmts ?
What is the problem of ordered sequential files access?
I am getting S00F abend when i try to compare two variable of different pic class,one variable is of 9(09) and another is S9(09) comp-3. First i moved the data from S9(09) comp-3 to 9(09), but no luck. So i tried to move the data from S9(09) comp-3 to X (09) and move to 9(09). I am getting same error message, Please help me to find solution for this ptoblem. ERROR MESSAGE - "The system or user abend S00F R=NULL was issued."
how do you reference the rrds file formats from cobol programs
In CICS/VSAM every file that is accessed should be defined in FCT. we have CICS READ, WRITE, BROWSE commands for VSAM files. How does it work with DB2 tables. It know it has to do with the plan. Please expain with examples.
is it possible to declare index in cobol program? if it is not why its tell me pls
How is sign stored in a COMP field ?
COBOL 
