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


This thread ...

Replies:

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

This mailing list archive is Copyright 1997-2019 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].