Re: Switches

Hi Troy,

The job switches correspond to indicators U1 - U8 in RPG.  The old fashioned
way of having user-controlled open's for files in RPG was to specify one of
these indicators on the F-spec.

Also, the program can use these indicators to determine various actions just
like any other indicator, e.g. IF *INU1 = *OFF...

What kind of error are you getting?

hth,
Peter Dow
Dow Software Services, Inc.
909 425-0194 voice
909 425-0196 fax


----- Original Message -----
From: <Troy.C.Dills@blum.com>
To: <rpg400-l@midrange.com>
Sent: Tuesday, July 10, 2001 9:02 AM
Subject: Switches


> Hello all
>
> Could someone please help me understand how the switch is controlling the
program it is submitting, I understand the
> flipping of the switches to make them true or false (that is my case
anyway).  I have a display screen that has a simple
> yes or no question. If it is yes then it is true otherwise it is false. I
re-wrote the CL without using the switch and using the
> value of &WSALL as shown below, but that has blew up in my face. Could
some please help me with understanding
> the switch used in submitting the program; how it controls my program? Any
information would be greatly appreciated
>
>
>  IF         COND(&WSALL = 'Y') THEN(DO)
>  CHGVAR     VAR(&SWITCH) VALUE('10000000')
>  ENDDO
>
> SBMJOB     CMD(CALL PGM(*LIBL/MSG7AECL) PARM(&CPER +
>                        &VPER &INCAID &USER)) JOB(XFER2STC) +
>                        SWS(&SWITCH)
>
>
> Thanks
> Troy C. Dills
> Troy.C.Dills@Blum.com
> Julius Blum Inc.
> 704-827-1345 ext 269
>
> spammers  not  welcome !!!!!!!!!!!!!!!!!!!!!
>
>
> +---
> | 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
> +---


_________________________________________________________
Do You Yahoo!?
Get your free @yahoo.com address at http://mail.yahoo.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
+---