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
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.
which are the relational operators in rpg?
is their a difference in cobol400 for the release 5.2 and 6.1 at the as400.
what keyword must be used with protect keyword ?
Apart from opening of a file do we have any other use of USROPN?
In Which Specs Arrays, Tables & Constants Are Defined?
Difference between NOPASS & OMIT?
explain the difference between defining subfile and message-subfile?
what is the command to know key fields of file?
can anybody give the interview questions list of RLU. plz mail me: dinesh_sati07@yahoo.com
how you get the relative record in a subfile in which cursor is located?
how will you find a string using pdm?
what does defn do?
Hello, I have created a CMD type object. In one of the fields in Display file , I would like to see All the Source files present by pass the name of Library. Tried using CHoice(Keyword) and Choicepgm on PARM , but doesn't seems to be working. Any help please..
if dspatr(pc) and csrloc were specified for a format, which keyword would have priority?