RE: Sending / Displaying CL Variables

Howard, 
>From an old 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)                

I gather that this is running in batch and you want to notify the user of
progress from there.  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.

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