Interested to Buy Any Domain ? << Click Here >> for more details...
I am Submitting one job in batch that job calls three
progams(PGMA, PGMB, PGMC). PGMB should be called after
sucessfully completion of PGMA as like for PGMC also. So
Can you please tell me how can we do that (without using
data area)
- 2 Answers
- 8986 Views
- CTS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / naveen chandra joshi
Suppose CL program is executing all the programs.
First PGMA gets executed, before the *INLR, we populate the value in Data Area (with value, say "Y"). when control comes back to CL program, we read the data area and check the flag value if its 'Y", we execute PGMB and same applies to PGMC...
Other possible scenarios would be to retrieve the return value from PGMA... check that value in your CL program which is calling PGMA, PGMB &PGMC and based on that return value process your execution...
| Is This Answer Correct ? | 14 Yes | 1 No |
Answer / henry
I am assuming your "One job" refers a CL program. If thats
correct then CL pgms will be submitted in Batch. inside teh
CL pgms the pgms are called sequencily...one by one. So you
no need to do anything
| Is This Answer Correct ? | 4 Yes | 4 No |
Hi,Please give me complete code with this logic. The question is how to read the records from a file with load an array of size with error condition? (The logic is Z-Add 0 IDX *LOVAL SETLL FILE READ FILE 99 *IN9 DOWEQ *OFF IDX ANDLT 99 ADD 1 IDX MOVE FIELD ARR,IDX READ FILE 99 ENDDO)please give me complete code with explanation?
I need to generate outfile for object of all the user lib. in the sysmte using cmd DSPOBJD. But this cmd is correcpted in my server,Any body tell me is there any alternative...?
Can we possible to key with the date field?
Job is in MSGW while reading the input file and writing a new record / updating a reacod due to Duplicate data error. What action would you take ( C D I R )...?
1.Load an runtime array of length 99 from the pf and you want to handle all the possible errors?
1) How to define keyed file in CL pgm. 2) How can i read particular records in CL pgm from database file.
ESCAPE message sent by child program can be handled by parent program using which keyword?
suppose there are 100 records and i want to read records between 60-70 how we can read this 10 records in rpg
Please help me, I have created window subfile,I have created Footer with same lengh and postion of window SFL. When I call the pgm, first is shows only Footer and then it shows subfile records.This time Footer is not showsing ..plz hel me how can i do it...? Sameple DDS and RPG: A R WIN1 SFL A*%%TS SD 20090130 165346 MUNSHIJ REL-V4R2M0 5769- PW1 A FLD001 1Y 0B 4 3EDTCDE (Z) A ATFILE R O 4 7REFFLD (QWHFDBAS/ATFILE LIB/LIBF- A ILE) A R WINCTL SFLCTL (WIN1) A*%%TS SD 20090202 123459 MUNSHIJ REL-V4R2M0 5769- PW1 A ALTNAME ('y') A SFLSIZ (0004) A SFLPAG (0004) A WINDOW (FOOTER) A ROLLUP (27) A ROLLDOWN (28) A CF12 (12 'Cancel') A 50 SFLDSP A N51 SFLDSPCTL A 51 SFLCLR A 1 2'Select Option,Press enter' A 2 3'1= Select' A R FOOTER A* A WINDOW(8 31 9 43) A 8 4'F12 = Cancel' A R DUMMY ASSUME A 24 10' ' in RPG: Dow *IN12 = *Off Write Footer Fxfmt WInCTL
what r drawbacks of OPM? Why do we go for ILE RPG?
how to retrieve particular field records from a physical file,say i have a physical file called 'employee' in it i have to retrieve the records of a field 'admin' present in pf 'employee' using rpg,but i should not use logical file or openquery file.
how do I declare a table or array in rpg iv?
RPG400 
