RE: Checking Library List

[rob@xxxxxxxxx]

And at this point I say stop trying to force CL into the wrong slot.  Use 
a HLL for this.

Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 





Vern Hamberg <vhamberg@xxxxxxxxxxxxxxxxxxxxxxxxx>
Sent by: midrange-l-bounces@xxxxxxxxxxxx
06/17/2003 07:51 AM
Please respond to Midrange Systems Technical Discussion
 
        To:     Midrange Systems Technical Discussion 
<midrange-l@xxxxxxxxxxxx>
        cc: 
        Fax to: 
        Subject:        RE: Checking Library List


Character search not needed. You could use QCLSCAN. But it's limited, at 
V5R1, to 999 characters in the string being searched. &USRLIBL could need 
to be 2750 on V5R1 and later. Guess you could break it up.

Or take the 10-char substrings (every 11 chars) and test for equality with 

candidate library.

Vern

At 04:49 PM 6/16/2003 -0500, you wrote:
>RTVJOBA USRLIBL(&USRLIBL) CURLIB(&CURLIB) SYSLIBL(&SYSLIBL)
>and character search each of these.  But by that time you'd be better off
>with the QUSRJOBI api and using a HLL to character search these values.
>
>http://publib.boulder.ibm.com/iseries/v5r2/ic2924/info/apis/qusrjobi.htm
>
>Rob Berendt
>--
>"They that can give up essential liberty to obtain a little temporary
>safety deserve neither liberty nor safety."
>Benjamin Franklin
>
>
>
>
>
>qsrvbas@xxxxxxxxxxxx (Tom Liotta)
>Sent by: midrange-l-bounces@xxxxxxxxxxxx
>06/16/2003 04:36 PM
>Please respond to Midrange Systems Technical Discussion
>
>         To:     midrange-l@xxxxxxxxxxxx
>         cc:
>         Fax to:
>         Subject:        RE: Checking Library List
>
>
>Be aware that ADDLIBLE only affects the user portion of the library list.
>If a library is set as the current library, for example, ADDLIBLE 
*REPLACE
>will still report the CPF2149 message even though the target library is
>"in the library list".
>
>Tom Liotta
>
>midrange-l-request@xxxxxxxxxxxx wrote:
>
> >suppose you want to check TestLib. in lib list
> >use the command as follows
> >ADDLIBLE LIB(TestLib) POSITION(*REPLACE TestLib)
> >
> >capture monmessage CPF2149(Library TestLib was not found in the user
>library
> >list).
> >and CPF2103(Library TestLib already exists in library list.)
> >
> >Both cases our command doesn't change the lib list.
> >
> >-----Original Message-----
> >
> >This may be a very easy question but i think my brain has  stopped.
> >I want to add a statement to CL program that checks the library list 
for
> >specific library whether it is in library list or not.How can i do 
this?
>
>--
>Tom Liotta
>The PowerTech Group, Inc.
>19426 68th Avenue South
>Kent, WA 98032
>Phone  253-872-7788 x313
>Fax    253-872-7904
>http://www.powertechgroup.com