Re: library list variables

[barsa@xxxxxxxxxxxxxxxxxxx]

Because of a change in V5R1, you should be coding your RTVJOBA command's
USRLIBL variable as 2750 bytes long.  IBM has told me this will work, but I
have not yet tested it.

In V5R1, IBM is increasing the size of the user portion of the library list
from 25 to 250 libraries.  My prediction (and I should note that IBM does
not agree with me) is this will break many customers.

Al

Al Barsa, Jr.
Barsa Consulting Group, LLC

400>390

914-251-1234
914-251-9406 fax

http://www.barsaconsulting.com
http://www.taatool.com





                                                                                
                                         
                    "Rolf Mittag"                                               
                                         
                    <rm@r-m-e-d-v.de>          To:     
<MIDRANGE-L@midrange.com>                                         
                    Sent by:                   cc:                              
                                         
                    owner-midrange-l@mi        Subject:     Re: library list 
variables                                   
                    drange.com                                                  
                                         
                                                                                
                                         
                                                                                
                                         
                    05/02/01 10:19 AM                                           
                                         
                    Please respond to                                           
                                         
                    MIDRANGE-L                                                  
                                         
                                                                                
                                         
                                                                                
                                         




 dcl  &USRLIBL   *char (   275    )

 dcl  &cmd       *char (   512    )
 dcl  &cmdLen    *dec  (    15 5  ) 512

 rtvJobA USRLIBL(&USRLIBL)

    processing starts here

 chgVar %sst(&cmd   1  13) 'chgLibL LibL('
 chgVar %sst(&§cmd  14 275) &UsrLibL
 chgVar %sst(&cmd 289   1) ')'
 call   qCaExec (&cmd &cmdLen)

---------------------------
Dipl.Inf.(FH) Rolf P Mittag
IBM Partner in Development
Leipziger Str. 50
D-69214 Eppelheim
Fon: +49 (6221) 76 78 60
Fax: +49 (6221) 76 80 26
eMl: rm@r-m-e-d-v.de

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