RE: JOBD...change initial Library List ( INLLIBL )

I am sorry, I am wrong, I didnt know that we can use QCMDEXC and use the
string to change the INLLIBL on CHGJOBD command.
Thanks again

Let me try that.


-----Original Message-----
From: Finucci Domenico [mailto:Domenico.Finucci@Fiditalia.it]
Sent: Thursday, September 26, 2002 9:10 AM
To: 'midrange-l@midrange.com'
Subject: R: JOBD...change initial Library List ( INLLIBL )


Why do you say 25 CHGOBJD ?
May be i'm wrong but you need to do something like:
if &FirstLib not equal space
        &LibList =  &LibList *CAT &FIRSTLIB
endif
if &SecondLib not equal space
        &LibList =  &LibList *CAT ' ' *cat &SecondLib
endif
and so on

and finally *CAT 'INLLIBL(' *CAT &liblist *cat ')'  in the final string.

Sincerely

Domenico Finucci
Fiditalia , Milano, 02- 4301-2494


-----Messaggio originale-----
Da: Srinivasan, Rajan [mailto:Rajan.Srinivasan@henryschein.com]
Inviato: giovedì 26 settembre 2002 14.51
A: 'midrange-l@midrange.com'
Oggetto: RE: JOBD...change initial Library List ( INLLIBL )


Thanks a lot for your quick reponse.
I can certainly build the strig or even as seperate variable. The
probability is 25 times. In other words, actuall list may vary from 1 to 25.

I need to have 25 different CHGJOBD command based on the above probabilty.

I was wondering if there a way I can avoid 25 different CHGJOBD command.

Thanks again

rAj



-----Original Message-----
From: Finucci Domenico [mailto:Domenico.Finucci@Fiditalia.it]
Sent: Thursday, September 26, 2002 8:50 AM
To: 'midrange-l@midrange.com'
Subject: R: JOBD...change initial Library List ( INLLIBL )


I suppose you will need to dynamically build a string such as:
CHGJOBD JOBD(Name) INLLIBL(&FirstLib &SecondLib &ThirdLib) stopping when
&xxxLib is blank
IN order to parse the library list, it's made simple by  considering that
you will parse with a 10-char step.

Sincerely

Domenico Finucci
Fiditalia , Milano, 02- 4301-2494


-----Messaggio originale-----
Da: Srinivasan, Rajan [mailto:Rajan.Srinivasan@henryschein.com]
Inviato: giovedì 26 settembre 2002 14.34
A: 'midrange-l@midrange.com.'
Oggetto: JOBD...change initial Library List ( INLLIBL )



Hello,
         We are in a situation to alter the  Libary list  in the  JOBD.  We
need to remove 3 to 4 libraries, and add 1 library to the library list (
INLLIBL ).

          We have to do for almost 5000 + jobd's. Instead of doing it
manually, I am looking for a way to change on the fly by writting a program.

           I can retrive the value of the JOBD's  library list, and I can
manipulate the string of  275 length, and change accordingly the string or
each bucket. But,  since the CHGJOBD  does not accept the string or one
variable ( also it does not also accept blank in the variable).

          If anybody give me some suggestion, on how to change the JOBD'S
Library list on the fly, it will be of very useful.

         Thanks a lot

rAj




The sender believes this E-mail was free of any virus or malicious code when
sent. By reading the message, the recipient accepts full responsibility for
taking protective action about viruses and other defects. The sender's
employer is not liable for any damage associated with receiving this E-Mail.
The information in this E-mail is Confidential and may be legally
privileged. Access to this E-Mail by other than addressee(s) is unauthorized
and may be unlawful.
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.



The sender believes this E-mail was free of any virus or malicious code when
sent. By reading the message, the recipient accepts full responsibility for
taking protective action about viruses and other defects. The sender's
employer is not liable for any damage associated with receiving this E-Mail.
The information in this E-mail is Confidential and may be legally
privileged. Access to this E-Mail by other than addressee(s) is unauthorized
and may be unlawful.
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.



The sender believes this E-mail was free of any virus or malicious code when
sent. By reading the message, the recipient accepts full responsibility for
taking protective action about viruses and other defects. The sender's
employer is not liable for any damage associated with receiving this E-Mail.
The information in this E-mail is Confidential and may be legally
privileged. Access to this E-Mail by other than addressee(s) is unauthorized
and may be unlawful.