• Subject: Re: How does a %SWITCH work in a CL program
  • From: ericadelong@xxxxxxxx
  • Date: Thu, 14 May 98 13:17:29 -0500


Ravi,

Switches in RPG are represented by special indicators U1-U8 (left to right). So,
%SWITCH(1XXXXXXX) is testing for U1 from your program.

hth
Eric A DeLong
ericadelong@pmsc.com

______________________________ Reply Separator _________________________________
Subject: How does a %SWITCH work in a CL program 
Author:  <MIDRANGE-L@midrange.com > at INTERNET
Date:    5/14/98 11:40 AM


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?
     
Any pointers would be appreciated. Thanks in advance.
     
     
Ravi Viswanthan
Systems Group, Inc
+---
| 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 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 ...


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 here. If you have questions about this, please contact [javascript protected email address].