exactly what I needed !

thanks a  lot

René Lambelet
Nestec S.A. / Informatique du Centre 
55, av. Nestlé  CH-1800 Vevey (Switzerland) 
*+41'21'924'35'43  7+41'21'924'28'88  * K4-117
email rene.lambelet AT nestle DOT com
Visit our site: http://www.nestle.com

        This message is intended only for the use of the addressee and 
        may contain information that is privileged and confidential.



> -----Original Message-----
> From: Bill Colwell [SMTP:bcolwell AT DRAPER DOT COM]
> Sent: Friday, August 03, 2001 11:12 PM
> To:   ADSM-L AT VM.MARIST DOT EDU
> Subject:      Re: Help please, how to format log and db with adsm 3.1
> under OS/390
> 
> Rene,
> 
> Use the indirect list-of-names method as in the sample below.
> 
> Hope this help,
> 
> 
> -- 
> --------------------------
> Bill Colwell
> C. S. Draper Lab
> Cambridge, Ma.
> bcolwell AT draper DOT com
> --------------------------
> 
> --- begin sample ---
> // --- job card --                             
> //*- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> 
> 
> //*
> 
> //* FORMAT THE LOG PRIOR TO A LOADDB JOB.
> 
> //*
> 
> //*- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> 
> 
> //SERVER   EXEC PGM=ANRSERV,
> 
> // PARM='/FORMAT 1 FILE:DD:LN 16 FILE:DD:DN',
> 
> // DYNAMNBR=300
> 
> //* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> 
> //* FOR TSM 3.7.40
> 
> //* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> 
> //STEPLIB  DD  DSN=ADSM.V3R7M40.LINKLIB,DISP=SHR
> 
> //IMAGES   DD  DSN=ADSM.V3R7M40.SANRIMG(ADSMSERV),DISP=SHR
> 
> //DSMAMENG DD  DSN=ADSM.V3R7M40.SANRMSG(ANRMENU),DISP=SHR
> 
> //HLPAMENG DD  DSN=ADSM.V3R7M40.SANRHLP(ANRHENU),DISP=SHR
> 
> //* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> 
> //* PERMANENT FILES
> 
> //* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
> 
> //OPT      DD  DSN=ADSM.V3R7.PROD.OLDSERVR.OPTIONS,DISP=SHR,FREE=CLOSE
> 
> //DSK      DD  DSN=ADSM.PRODGA.DISKLOG3,DISP=SHR
> 
> //SYSPRINT DD  SYSOUT=*
> 
> //SYSTERM  DD  SYSOUT=*
> 
> //LN       DD *
> 
> ADSM.PROD.RLA.AL100F
> 
> //DN       DD *
> 
> ADSM.PROD.DB.AD101F
> 
> ADSM.PROD.DB.AD102F
> 
> ADSM.PROD.DB.AD103F
> 
> ADSM.PROD.DB.AD104F
> 
> ADSM.PROD.DB.AD105F
> 
> ADSM.PROD.DB.AD106F
> 
> ADSM.PROD.DB.AD107F
> 
> ADSM.PROD.DB.AD108F
> 
> ADSM.PROD.DB.AD121F
> 
> ADSM.PROD.DB.AD122F
> 
> ADSM.PROD.DB.AD123F
> 
> ADSM.PROD.DB.AD124F
> 
> ADSM.PROD.DB.AD125F
> 
> ADSM.PROD.DB.AD126F
> 
> ADSM.PROD.DB.AD127F
> 
> ADSM.PROD.DB.AD128F
> 
> 
> --- end sample ---
> 
> In <535B280C27E1D2119A79000024C8B4BA04D2A936 AT vevics14.nestec DOT ch>, on
> 08/03/01 
>    at 05:11 PM, "Lambelet,Rene,VEVEY,GL-IS/CIS" <Rene.Lambelet AT NESTLE DOT 
> COM>
> said:
> 
> >Hello,
> >under OS/390, I have to format 1 log data set and 10 db data sets. The
> total
> >length of all these names is more than 100 caracters. How can I give such
> a
> >long string of caracters on the EXEC card, the OS/390 refuses it  when
> >exceeding 100 car.?
> 
> >FORMAT 1 ADSM.RCVRYLO1 10 ADSM.DB1 ADSM.DB2 ..... ADSM.DB10'
> 
> >Is it possible to extend this limit or use a DD card ?
> 
> >Thanks for any help
> 
> >René Lambelet
> >Nestec S.A. / Informatique du Centre 
> >55, av. Nestlé  CH-1800 Vevey (Switzerland) 
> >*+41'21'924'35'43  7+41'21'924'28'88  * K4-117
> >email rene.lambelet AT nestle DOT com
> >Visit our site: http://www.nestle.com
> 
> >        This message is intended only for the use of the addressee and 
> >        may contain information that is privileged and confidential.