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

["York, Albert" <albert.york@xxxxxxxxxxxxxx>]

One use I have found for them is if you want to know which job description
was used to submit a job. You can use different switches for each job
description. There may be other ways but I found this one to be the easiest.

Albert York     


        -----Original Message-----
        From:   bmorris@ca.ibm.com [SMTP:bmorris@ca.ibm.com]
        Sent:   Thursday, April 12, 2001 7:49 AM
        To:     RPG400-L@midrange.com
        Subject:        Re: U1-8 Switches: Similar to *LDA ?


        >Date: Wed, 11 Apr 2001 23:01:13 -0400
        >From: booth@martinvt.com
        >
        >You've shocked me.  You can't SETON/SETOFF  U1-U8 in the RPG
program? They

        >should be settable just like 01-99, unless something has changed
in the
        >last 10 years or so....

        Booth, you can set them on and off, but the real switches aren't
changed
        until the program ends with LR on.

        Try this little RPG III program.  When you get the command line, do
        DSPJOB and check the switches - the first one will still be off.
             C                     SETON                     U1
             C                     CALL 'QCMD'
             C                     SETON                     LR

        Me, I think using the job switches or the *LDA are poor techniques
        compared to parameters.  You have to forever remember which programs
are
        using which switches or which sections of the *LDA.  Much easier
just to
        pass parameters directly, I reckon.

        Barbara Morris


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