Re: How does a %SWITCH work in a CL program

At 11:40 AM 5/14/1998 -0500, you wrote:
>Howdy folks,
>
>I am trying to debug a JDE CL program. In the CL a call is made to
>a RPG program.
>  CALL P98315 PARM(&PSPID &PSVERS &PSFILE &PSMBR &PSMSGQ)
>   IF COND(%SWITCH(1XXXXXXX)) THEN (DO)
>    GOTO EOJ
>   ENDDO
>
>I have never worked with %SWITCH so I am not sure how to debug this.
>Anyways, after the call to the RPG is made and control returns to
>the CL, the IF condition is true and the CL program terminates.
>What do I look for in the RPG that would change the %SWITCH status?
>How does the RPG communicate the changed status back to the CL?

Don't know if it'll help, but switches are an attribute of the job. You can
use RTVJOBA to see what they are.

As others have said, you probably need to debug the called program to see
what the values of the U-indicators are. Or add a RTVJOBA to the CL,
temporarily.

HTH

Vernon Hamberg
Systems Software Programmer
Old Republic National Title Insurance Company
400 Second Avenue South
Minneapolis, MN  55401-2499
(612) 371-1111 x480


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