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 |
which program rpg or cl is efficent to update a transaction onto a database file and why ?
How to declare the pull button in AS/400..
Explain mdt?
Im traying to get out put of this below mention simple logic code.But im geting out of different.(im trying with my laptop trhough my company server. DCL &FIELD1 *CHAR 10 VALUE('TCS AS/400') DCL &FIELD2 *CHAR 10 CHGVAR(%SST(&FIELD2 1 10))(%SST(&FIELD1 10 1) Can you tell me the value of field2 after excuted of CHGVAR command.
Suppose my file has 10 fields and I want to make the 2nd field zeros in all records. And assume I have millions of records and I dont want to read each record and update the desired field with 0. Any other way to do this in one step operation?
Can a indexed file be accessed in arrival sequence in RPG?
If record-format name in an externally-described file has already been defined as a file-name.how to solve this?
How can we access Interactive job LDA in Batch Job?. and How we can access a file in interactive QTEMP lib in Batch job?.
how can I tell when to replace the array?
1.How to read a subfile in out put mode? 2.what are the keywords used to share same file? 3.using composite key which rpg code used?
WHAT IS MENT BY RECORD LEVEL IDENTIFIER ? WHAT IS THE PURPOSE OF THIS?
1.find most occurrences of a character. for exm: input:aaabbbbdddddyyy output: d 5 times how can i get that?