Re: library list variables

[MWalter@xxxxxxxxxxxxxxx]

Brooks,

Try something like this:
             DCL        VAR(&libl) TYPE(*CHAR) LEN(275)
             DCL        VAR(&command) TYPE(*CHAR) LEN(300)
             RTVJOBA    USRLIBL(&libl)
             CHGLIBL       LIBL(some libraries...)

             do some stuff here...

             CHGVAR     VAR(&command) VALUE('CHGLIBL LIBL(' +
                         || &libl |< ')')
             CALL       PGM(QCMDEXC) PARM(&command 300)

Hope this helps,

Mark




Mark Walter
Sr. Programmer/Analyst
Hanover Wire Cloth a div of CCX, Inc.
mwalter@hanoverwire.com
http://www.hanoverwire.com
717.637.3795 Ext.3040


                                                                                
                                    
                    "Brooks Roach"                                              
                                    
                    <bar@KOCHLLC.COM>          To:     
<MIDRANGE-L@midrange.com>                                    
                    Sent by:                   cc:                              
                                    
                    owner-midrange-l@mi        Subject:     library list 
variables                                  
                    drange.com                                                  
                                    
                                                                                
                                    
                                                                                
                                    
                    05/02/01 09:10 AM                                           
                                    
                    Please respond to                                           
                                    
                    MIDRANGE-L                                                  
                                    
                                                                                
                                    
                                                                                
                                    




Anyone know of a way to save the current library list, change it for an
application and then restore the original list?  I've tried saving to a 250
*char variable and then using CHGLIBL after the application, but the
command doesn't understand the variable.

I think I've seen this done a few years ago in DCMS, a package written by
Kurt Salmon Associates in Atlanta, but I'm not certain now.

Thanks,
Brooks Roach


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




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