In ProgramB there is a SBMJOB, which is a call to program C
.There is also a CALL to program D from B. How would you
check the program C has been executed in D?
Answers were Sorted based on User's Feedback
Can Use Data Area to solve above problem
CHGDTAARA DTAARA(xyz) WITH STATUS 'N'
CALL PGM (PGMC)
MONMSG MSGID(CPF0000) EXEC(GOTO CMDLBL(SNDM))
CHGDTAARA DTAARA(xyz) WITH STATUS 'Y'
SNDM : -------
Now you can check with status in Data Area wether PGMC
Executed or not
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / david lex
On submission of program C, collect the job information.
Pass it to program D/load it in a data file/etc, then have
program D check the status of that job using a CL command
or an API.
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / samul
Using SNDPGMMSG in SBMJOB using MSGTYPE(*COMP) and In PGMB
receive the msg from pgmq if it is *COMP then sbmjob
completed normally.
| Is This Answer Correct ? | 0 Yes | 1 No |
what is the necessary command needed before OPNQRYF and why?
Anyone help me for the below question:- If problem/error occur in *PSSR subroutine,how should I handel it in RPG program.
how do I preserve and clean the array?
1)how to do date validation in rpg? 2)how to delete dUPLICATE RECORDS?
wat is curser?? and its types???
what is use of sflnxtchg and use of MDT(modify data tag).both r same r not and can we use these on dspf and subfile.
3. Given the DOS Specification below and the following information: • Indicator 50 is off • No records have been written to the subfile What will be the result if the EXFMT operation code is performed on the record format CTLR? A R SUBFL A DESCRIP 101 6 1ODSPATR(UL) A DFT(’NOT FOUND’) A R CTLR SFLCTL(SUBFL) A N50 SFLDSP A SFLDSPCTL A SFLINZ A 67 SFIJEND A SFLSIZ(13) A SFLPAG(12) A ACCOUNTNO 100 S 10 a.) Only AccountNo will display b.) SUBFL will be initialized with 13 blank records c.) An I/O exception error will occur d.) The screen will display 12 records with ‘NOT FOUND’
How do you do indexing in a physical file?
Suppose we have one database file and it is used by 5 programs and in 3 program we have to add some records in datbase file s what is the impact on other program?
Can anybody tell me that why we use option(*nodebugio)in H- Spec?
How to write record if no field or the field are different in physical file in rpgle ?
1.I Have a physical file , i want to read the data from the each and every member of the File in the CL Program.How do you achieve this. 2.How do you do the same in RPG?. do think is it possible to read data from all the members in the RPG?