Re: Switches

Troy,

I think you read James message wrong.  James was NOT saying you were
asking a stupid question, he was saying HE was about to ask a stupid question!

His stupid question being "Does program MSG7AECL use ..."
Then he said he had another stupid question: (Notice he says MY -real- stupid 
question.
So here is my -real- stupid question: Does MSG7AECL perform a RTVJOBA to 
determine the switch settings?

The column (:) means something like, here it is, or it follows, so what James 
is saying
is:
stupid question: (and here's the stupid question) Does program MSG7AECL use...

I think you should apologize, Troy.

Regards,

Jim Langston

Me transmitte sursum, Caledoni!

Troy.C.Dills@blum.com wrote:
> 
> James
> 
> First just to clarify my switch, Its declared as a char string of 8 and set 
>to a value of '00000000' which means off.
> What does the name of the program have to do with anything (no I'm not 
>calling a CL Program I just got a little
> finger happy when I was typing?  We have our own naming conventions here and 
>It shouldn't matter to you what
> those program names are.  I posted this in hope of finding out how the switch 
>controlled my program.  Due to some
> other nice programmers that were willing to help, I got my answer, instead of 
>them telling me what a stupid question
> that was, that is what this forum is all about.  I never worked with switches 
>before and I didn't know that it used
> U1 -8 indicators in the program.  That answered my question. Next time try to 
>understand that this is a forum
> where people could ask for answers, even if they are dumb questions. Some of 
>us started out using RPGIII
> and just don't get some things that we find in 10 year old programs.  I only 
>ask that you have a little more work
> ethic when people ask a question. Some of us haven't been programming for ten 
>or twenty years or however
> long you've been programming.  Lets please keep this forum clean so no one 
>(no matter how stupid it may seem
> to you) won't be afraid to ask a question and get replies like this one.
> 
> Thanks
> Troy C. Dills
> 
> 
>                     "James W.
>                     Kilgore"                 To:     RPG400-L@midrange.com
>                     <qappdsn@attgloba        cc:
>                     l.net>                   Subject:     Re: Switches
>                     Sent by:
>                     owner-rpg400-l@mi
>                     drange.com
> 
> 
>                     07/10/2001 01:09
>                     PM
>                     Please respond to
>                     RPG400-L
> 
> 
> 
> Troy,
> 
> Stupid question:  Does program MSG7AECL use ... wait a minute, at first I was 
>going to ask if your RPG program used the Ux
> indicators to test switches, but since this program name ends with "CL" I 
>have to think that it is a CL program.  So here is my
> -real- stupid question: Does MSG7AECL perform a RTVJOBA to determine the 
>switch settings?
> 
> OK, I get it that the program starts with "MSG" and must be a message type of 
>program, but what the heck is "7AE"? Version 7
> American English?  I can understand that, but why, oh why, have it end with 
>"CL"?  What if you changed the function into a different
> language?  Do you really want to revisit each and every program that uses 
>this just to change the program name to "MSG7AEJV"?  What
> is wrong with "MSG7AE"?
> 
> Troy.C.Dills@blum.com wrote:
> 
> > 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)
> >
+---
| 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
+---