Date:         Tue, 30 Mar 1999 15:07:36 -0500
Reply-To:     "Venturi, Sherrie" <Sherrie.Venturi@BCBSFL.COM>
Sender:       "SAS(r) Discussion" <SAS-L@UGA.CC.UGA.EDU>
From:         "Venturi, Sherrie" <Sherrie.Venturi@BCBSFL.COM>
Subject:      Re: Reading Multiple datasets in different SAS libraries with one
              DD name
Content-Type: multipart/alternative;

You could use a macro such as the following:
%MACRO MULTFILE;
    %DO &I=152 %TO 158;
      LIBNAME BILL&I "ICMSMODL.TEST.COMM&I.D.SASLIB" DISP=SHR;
      DATA B1;
               SET BILL&I..DEBTORS;
      PROC APPEND BASE=B DATA=B1;
    %END;
%MEND;
%MULTFILE;
Of course that is a bunch of typing too (unless you have lots of files) but
you can always reuse it!
Sherrie Venturi
(No lectures on the repo pls, it has been a long day)
 
 
> I'm trying to read in multple data sets that reside in different libraries
> in
> MVS/ESA .  I know that I could assign them each a different name and them
> set
> them all together but  I believe there has to be a better way.  Each data
> set
> is named "debtors".  The problem with the code below is I only get the
> first
> dataset read in.  The job does not create an error or a warning message.
> Any
> ideas or am I relegated to typing it all out?
>
> Thanks,
> Bob Fitzgerald
>
> //C744444F  JOB 'AMBDV000','ACB 96328122',CLASS=W,MSGCLASS=X,
> //          MSGLEVEL=(1,1),TIME=(60),NOTIFY=&SYSUID
> //*
> //SAS       EXEC SAS,REGION=120M,OPTIONS='ERRORABEND,MEMSIZE=120M'
> //*
> //WORK      DD UNIT=SYSDA,SPACE=(CYL,(900,200))
> //BILLCOMM  DD DSN=ICMSMODL.TEST.COMM152D.SASLIB,DISP=SHR
> //                      DD DSN=ICMSMODL.TEST.COMM153D.SASLIB,DISP=SHR
> //                      DD DSN=ICMSMODL.TEST.COMM154D.SASLIB,DISP=SHR
> //                      DD DSN=ICMSMODL.TEST.COMM155D.SASLIB,DISP=SHR
> //                      DD DSN=ICMSMODL.TEST.COMM156D.SASLIB,DISP=SHR
> //                      DD DSN=ICMSMODL.TEST.COMM157D.SASLIB,DISP=SHR
> //                      DD DSN=ICMSMODL.TEST.COMM158D.SASLIB,DISP=SHR
>
> //SYSIN     DD DATA,DLM=$$
>
>
> DATA B;
>   SET BILLCOMM.DEBTORS (KEEP=INVARGID);
> RUN;
>
>
>
 
"Blue Cross Blue Shield of Florida" made the following
 annotations on 03/30/99 15:06:54
------------------------------------------------------------------------------
 
[INFO] -- Content Manager:
CONTENT AND LIABILITY DISCLAIMER
 
Blue Cross Blue Shield of Florida, Inc., and its subsidiary and affiliate
 companies, (hereinafter collectively referred to as "BCBSF"), shall not be
 responsible for any errors or omissions contained in this e-mail message or
 similar transactions.  Personal comments made by the individual(s) sending this
 e-mail do not reflect the views and/or opinions of BCBSF and/or its management.
 
 
 
 =============================================================================
 
[text/html]