Re: Determining job type (interactive or batch) in an RPG program

This is a multipart message in MIME format.
--
[ Picked text/plain from multipart/alternative ]
I went into Code/400 and had it automatically generate me a PSDS.  I don't
any field here which may be useful.  While the PSDS may be useful, it is
rather inflexible to change with the time.  For example what do you
suppose the following contains in a program made up of multiple source
modules?  The module containing the procedure you happen to be in when you
check these fields?
     D P_SRC_FILE            304    313      * Source file
     D P_SRC_LIB             314    323      * Source file lib
     D P_SRC_MBR             324    333      * Source file mbr
     D P_PROC_PGM            334    343      * Pgm Proc is in
     D P_PROC_MOD            344    353      * Mod Proc is in

Rob Berendt
--
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin




"Leland, David" <dleland@Harter.com>
Sent by: rpg400-l-admin@midrange.com
12/13/2002 02:38 PM
Please respond to rpg400-l

        To:     "'rpg400-l@midrange.com'" <rpg400-l@midrange.com>
        cc:
        Fax to:
        Subject:        Determining job type (interactive or batch) in an
RPG program


This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
Does anyone know if there's anything in the PSDS to help me determine if
my
RPG program is running in batch or interactive?  I know I can call an API
or
call a CL program and use the RTVJOBA command to find this info, but was
hoping there was a simple way by just looking at the PSDS.

Thanks,
Dave
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.