RE: Sending / Displaying CL Variables

> Howard, 
> From an old interactive S/38 program...
> 
> DCL        &MESSAGE *CHAR 132
> CHGVAR     &MESSAGE +                                     
>           ('Now processing ' *CAT +                       
>            &MLFILE *TCAT '.' *CAT &MLLIB *TCAT +          
>            ', mbr ' *CAT &MLNAME)                         
> SNDPGMMSG  MSGID(CPF9898) MSGF(QCPFMSG) MSGDTA(&MESSAGE) +
>              TOPGMQ(*EXT) MSGTYPE(*STATUS)                
> 
> Be aware that each status message will slow the operation down.  An
> alternative may be to send a message for every 25 objects; "Now processing
> object 50" and so forth. I haven't tried sending a status message from a
> batch job to an interactive user, so I'm not sure how that would turn out.
> 
> 
> Buck Calabro
> Billing Concepts Albany, NY
> 
> -----Original Message-----
> From: Howard Weatherly 
> Sent: Monday, May 24, 1999 3:12 PM
> To:   Midrange List
> Subject:      Sending / Displaying CL Variables
> 
> Recently we decided to automate our reorganization of PF members and I
> came up with the following CL to accomplish the task, my question is
> what command or how could I send a message at the RGZPFM command to say
> "Reorganizing file LIB/FILE"? I can not figure out which command to use
> where I could either assign a variable to the values &ODLBNM and &ODOBNM
> and display the variable or for that matter include the variables any
> which way?
> 
> 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@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
+---