Q.How can more than two program be executed in batch mode
through SBMJOB in CL PGM but the condition is that program
must be executed one by one?Please wtite the senario?
2. IS it possibe more then two programs can be executed in
batch mode and HOw it will be executed in CL
program ,please write the senario?
Answer Posted / syam
Yes, You can any number of program execute in batch it will
process one by one. (You see WRKACTJOB then press F5 in top
under Qbatch )
PGM PROGRAM1
SBMJOB CMD(CALL JOB1)
SBMJOB CMD(CALL JOB2)
SBMJOB CMD(CALL JOB3)
SBMJOB CMD(CALL JOB4)
ENDPGM
SBMJOB PROGRAM1 = This all jobs send to Qbatch to execute
one by one (This is on the Que.
Important:If you program screen(SDA) for input do not use
SBMJOB.
| Is This Answer Correct ? | 3 Yes | 2 No |
Post New Answer View All Answers
how you get the relative record in a subfile in which cursor is located?
what are the different types of arrays available in rpg ?
what is the command to know key fields of file?
when would you prefer logical file than opnqryf?
what are the basic features of seu?
what is the command used to invoke rlu ?
what is rpg ?
an access path may be in which sequence?
I have created a command that display Source file and library. Now i want that when i enter library name and press f4 on Source file, pgm should display all the PF- SRC's in that Library. For F4 option i have used Choice program but since only limited paramters are passed in Choice pgm i am not able to paas library name and further can't call a pgm that will display list of Source files. Below is the Code snippet for CMD type object :- CMD PROMPT('Source Scan for HUB Standard') PARM KWD(SOURCE) TYPE(*CHAR) LEN(1) RSTD(*YES) + VALUES(N A) MIN(1) + CHOICE('N,A') PARM KWD(SRCFILE) TYPE(FILE) RSTD(*NO) + PROMPT('SOURCE FILE') FILE: QUAL TYPE(*NAME) LEN(10) RSTD(*NO) EXPR (*YES) + CHOICE(*PGM) + CHOICEPGM (XXXXXLIB/YYYPGM) QUAL TYPE(*NAME) LEN(10) DFT(*LIBL) + SPCVAL((*LIBL)) EXPR(*YES) PROMPT ('Library') Below is the Choice pgm:- PGM PARM(&PARM1 &PARM2) DCL VAR(&PARM1) TYPE(*CHAR) LEN (21) DCL VAR(&PARM2) TYPE(*CHAR) LEN (2000) IF COND(%SST(&PARM1 1 10) = 'CHOICE ' *AND + %SST(&PARM1 11 10) = 'SRCFILE ' *AND + (%SST(&PARM1 21 1) = 'C' *OR %SST (&PARM1 + 21 1) = 'P')) THEN (DO) /* (%SST(&PARM1 21 1) = 'C' *OR %SST (&PARM1 + */ CHGVAR VAR(&PARM2) VALUE('Name, F4 for List') ENDDO IF COND(%SST(&PARM1 1 10) = 'CHOICE ' *AND + %SST(&PARM1 11 10) = 'SRCFILE ' *AND + %SST(&PARM1 21 1) = 'P') THEN (DO) CHGVAR VAR(&PARM2) VALUE('Name, F4 for List') CALL PGM(GTSQL) PARM ('XXXXLIB') return ENDDO Thanks in Advance for looking into.
what is a physical file?
define the purpose/use for sflrna?
what is match field indicator?
What is dynslt?
what is *inzsr used for?
what are the different types of variables available in cl?