× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: U1-8 Switches: Similar to *LDA ?
  • From: "Jim Franz" <jfranz@xxxxxxxxxxxx>
  • Date: Wed, 11 Apr 2001 23:28:16 -0400

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
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.