|
|
Passing Reply through CL to COBOL program
I have a CL that runs multiple COBOL programs. One of the programs
takes in files and if a you take in a file with the same name, which
is normal for some clients, it asks if you want to continue and
processing.
The problem is, some clients would rather not have to monitor the CL
and if they have already verified the files before processing, they
already know it is a different file.
Is it possible to send the Reply back to the COBOL program via the CL,
rather than having to have the Operator monitor the job and manually
Reply?
Here is an example of how the COBOL program is RUN in the CL.
RUN PGM(ACCTPROGS/PROCTRANS) +
OPTIONS('FILE=ABC123')
|
|
0
|
|
|
|
Reply
|
67cougarxr7 (1)
|
11/13/2009 12:14:19 AM |
|
CougarXR7 wrote:
> I have a CL that runs multiple COBOL programs. One of the
> programs takes in files and if a you take in a file with the same
> name, which is normal for some clients, it asks if you want to
> continue and processing.
"take in"? Passed as a parameter, and an OPEN is performed
against the named file?
"it"? One of the COBOL programs?
"asks"? In what manner? QMHSNDxx to send an inquiry?
"continue and processing"? Presumably, continue processing?
Does a CLP call a CBL program that calls another CBL, or are
there successive calls of CBL programs in the CLP? What do the
programs do to the files, and what are the messages and the means
for /asking/ and manually replying [e.g. a user display file
prompts, or a\which system interface prompts]?
> The problem is, some clients would rather not have to monitor the
> CL and if they have already verified the files before processing,
> they already know it is a different file.
"monitor" as in MONMSG, or as in remaining at an interactive
terminal awaiting prompting for the /reply/?
"CL" as in CL command in the CLP, or the running CLP?
> Is it possible to send the Reply back to the COBOL program via
> the CL, rather than having to have the Operator monitor the job
> and manually Reply?
SNDRPY would be a manner to reply to an *inquiry* message, but
not from within the program which is the caller of a called program
that is prompting for & awaiting a response\reply. If the reply is
by some other means than the OS message handling, that processing
needs to be described for worthwhile comment. If within a program
where the [first or later] callee sends an inquiry message & then
awaits a reply, the INQMSGRPY() [inquiry message reply] handling for
the job plus the assigned reply value would determine how to reply
to a MSGTYPE(*INQ) [e.g. parameter specification for /inquiry
message/ as seen on SNDPGMMSG CL command].
> Here is an example of how the COBOL program is RUN in the CL.
>
> RUN PGM(ACCTPROGS/PROCTRANS) OPTIONS('FILE=ABC123')
>
There is no OS "RUN" CL command. Any worthwhile response will
likely require knowing what the RUN command is doing. There seems
little specific details about what transpires in the scenario, as
described in the quoted text. Perhaps a spooled joblog with CL
command logging [LOGCLPGM(*YES)] might contain something that better
describes the scenario, rather than just descriptive text.
Regards, Chuck
|
|
0
|
|
|
|
Reply
|
CRPence
|
11/13/2009 2:52:40 AM
|
|
|
1 Replies
245 Views
(page loaded in 0.045 seconds)
Similiar Articles: Develop ispf panel using Rexx program - comp.lang.rexxI have one program in Cobol. I need to pass some parameters through this panel and need to call the cobol ... Do not reply to spamtrap@library.lspace.org AS400/i5 Series PDF Software - comp.text.pdf(ie, It was more about passing data to/from a series of ... But the real telling fact is that IBM's software endeavors ... Reply through CL to COBOL program - comp.sys.ibm ... IBM COBOL Migration to Windows COBOL - comp.lang.cobol... My organization wants to move its IBM z/OS COBOL programs off ... The interface to these objects is through the same ... I hope that helps you to do this. Cl=E1udio ... Help passing many commands to one command window from with rexx ...Can some on tell me how to pass many ... tso command parameter passing through ... Can anyone help ... Rexx program - comp.lang.rexx I have one program in Cobol. I need to pass ... IS NUMERIC check for SPACES - comp.lang.cobol... could have written, compiled, and tested a program ... not a numeric digit. Numeric digits are 0 through 9. ... tex IS NUMERIC check for SPACES - comp.lang.cobol Would SPACES pass ... const member functions in classes derived from templates. - comp ...... cl /EHsc test_const.cpp * Microsoft (R) 32-bit C/C++ ... arguments) as shown in the simplified example > program ... attempted to call a non-const member function through a ... When Knuth and I were young - Part 5 - comp.lang.asm.x86 ...... learning the IBM architecture, and how to program it in RPG, COBOL ... more about the SHARE group, I've seen other passing ... Can't send email through VPN - comp.dcom.sys.cisco ... Uninitialized variables, why do they equal their name? - comp.lang ...(ie, It was more about passing data to/from a series of "external programs" in order to ... paying for the REXX compiler or COBOL, it ... Reply to domain Patriot dot net user ... error make_rtw and rtw_c - comp.soft-sys.matlab### Initial pass through model to cache user defined code ..... ... Andhika\sim_andhika_new_rtwin>set MSVCDir=c:\program ... Reply: Search in *.rex files - comp.lang.rexxExample: I know I have used %2F before in a program ... DIR *.rex /B > myDir.txt' Then you could loop through ... lang.rexx Search in *.rex files - comp.lang.rexx Cobol ... Passing Reply through CL to COBOL program - AS/400 - Mofeel GroupsAS/400, Passing Reply through CL to COBOL program . comp.sys.ibm.as400.misc - IBM AS/400 miscellaneous topics. How to REXX procedure pass back the variable to the CL program ...Integrat all SQL + CL + SQL Variable in one program - AS/400. 4. Passing Reply through CL to COBOL program I have a CL that runs multiple COBOL programs. 7/29/2012 10:50:27 AM
|
|
|
|
|
|
|
|
|