Re: U1-8 Switches: Similar to *LDA ?

["Jim Franz" <jfranz@xxxxxxxxxxxx>]

if you are setting the switches in a screen or clp, then submitting
the job (sbmjob, tfrjob, etc, the new job starts with the job switches
initialized to the value in the job description(usually all off)
see the clip below from the sbmjob cmd. many parms for the new job
may not be the current settings in the job doing the submit. All you need to
do to fix this is  RTVJOBA SWS(&SWS)     (&sws is 8 char)
and do submit like SBMJOB CMD(CALL PGM(XXX)) SWS(&SWS)

                               Submit Job (SBMJOB)

 Type choices, press Enter.

 System library list  . . . . . .   *CURRENT      *CURRENT, *SYSVAL
 Current library  . . . . . . . .   *CURRENT      Name, *CURRENT, *USRPRF...
 Initial library list . . . . . .   *CURRENT      Name, *CURRENT, *JOBD...
                + for more values
 Message logging:
   Level  . . . . . . . . . . . .   *JOBD         0-4, *JOBD
   Severity . . . . . . . . . . .   *JOBD         0-99, *JOBD
   Text . . . . . . . . . . . . .   *JOBD         *JOBD, *MSG, *SECLVL,
*NOLIS
 Log CL program commands  . . . .   *JOBD         *JOBD, *NO, *YES
 Inquiry message reply  . . . . .   *JOBD         *JOBD, *RQD, *DFT,
*SYSRPYL
 Hold on job queue  . . . . . . .   *JOBD         *JOBD, *NO, *YES
 Schedule date  . . . . . . . . .   *CURRENT      Date, *CURRENT,
*MONTHSTR...
 Schedule time  . . . . . . . . .   *CURRENT      Time, *CURRENT
 Job date . . . . . . . . . . . .   *JOBD         Date, *JOBD, *SYSVAL
 Job switches . . . . . . . . . .   *JOBD         Character value, *JOBD
 Allow display by WRKSBMJOB . . .   *YES          *YES, *NO

jim
----- Original Message -----
From: <STEVEN.J.RYAN@denso.com.au>
To: <RPG400-L@midrange.com>
Sent: Wednesday, April 11, 2001 10:35 PM
Subject: Re: U1-8 Switches: Similar to *LDA ?


>
>
> I have never had a problem calling RPG from RPG and passing U1-8.
>
> What sort of problem did you have?
>
>
>
>
> "VIJI SETHURAMAN" <VIJI.SETHURAMAN@dfs.com> on 12/04/2001 10:01:54
>
> Please respond to RPG400-L@midrange.com
>
> To:   RPG400-L@midrange.com
> cc:    (bcc: STEVEN J RYAN/DIAU)
>
> Subject:  U1-8 Switches: Similar to *LDA ?
>
>
>
>
>
>
> Folks:
>
> From the *LDA update problem being discussed here, I have a comparable one
using
> the Job switches...
>
> I needed to set on U1...U8, depending on data/user selection  in an RPG
pgm and
> call another RPG which will behave depending on how these indicators are
set.
>
> (The RPG will open files based on options chosen).
>
> I had to write a small CLP to ensure that the switch setting is done
properly
> before calling the second RPG.
>  Any other ways this can be done without a CL call?
>
> TIA,
>
> viji
>
>
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---
>
>
>
>
>
>
> +---
> | This is the RPG/400 Mailing List!
> | To submit a new message, send your mail to RPG400-L@midrange.com.
> | To subscribe to this list send email to RPG400-L-SUB@midrange.com.
> | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
david@midrange.com
> +---

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---