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 |
in rpg could u please tell me errors types and meanings like 3030 that ....
What is the Record Address file. How can we use it in RPG program?
If there are 1000 member(PGM type) in a SRC file. How can we compile in a CL program? ( It need to be done in a loop)?
RPG/400 faqs?
How to declare the dynamic(run time) array in rpgle? can you please give example
How can we know running job is batch or interactive?
There is a excel sheet having details of Old account number and new account number. I need to update these details in my AS400 files. i.e. all the records having old account number should be replaced with new account number. There can be 100 or 200 or 300 PFs...no fix files known. how can we do this?Solution should be performance oriented
Difference between creating a report using Printer file and WRKQRY(Query Report) ?
Write a program to display prime numbers between 1 to 100 using RPGLE.
Please tell me how to read the records from a file with load an array of size with error conditions(The logic answer for this question is ARR is array of 99 elements Z-ADD 0 IDX *LOVAL SETLL FILE READ FILE 99 *IN99 DOWEQ *OFF IDX ANDLT 99 ADD 1 IDX MOVE FIELD ARR,IDX READ FILE 99 ENDDO).So,Please give me the complete of this code.
I have some doubts on subfile----------- -----I wrote a prog on subfile to display the records. Every thing is clear but i defined a field called "opt" as input field in subfile record format from that input field i wish to enter into new screen called "EDIT" which i created it as a separate RCD in display file. i gave opt as 2 for edit just like in WRKMBRPDM screen please telll me the code and how can i code for it in RPG.
can anybody help me to solve this problem. the program that i m checking display error message saying "Record format for file AJDSPFFD does not match model file and decimal error. how to solve this problem. The AJDSPFFD is snapshot the AJTLOG that is the audit trail list.