Date:         Tue, 19 Jan 1999 17:32:34 -0000
Reply-To:     "Grant, Mike" <mike.grant@BT.COM>
Sender:       "SAS(r) Discussion" <SAS-L@UGA.CC.UGA.EDU>
From:         "Grant, Mike" <mike.grant@BT.COM>
Subject:      FW: SAS MVS & JCL
Content-Type: text/plain

> Dear SAS-l's
>
> I still haven't found a solution to the problem stated below. John's idea
> almost worked except that the array statement is not supported on the
> infile statement. Has anyone got any more suggestions.? To reiterate, I
> want to keep several JCL statements with DD names in the JCL and read the
> VSAM files sequentially without using macro's!
>
>
> Regards,
>
> Mike Grant
>
> -----Original Message-----
> From: McKown, John [SMTP:JMckown@Insurdata.com]
> Sent: 12 January 1999 16:06
> To:   'Grant, Mike'; 'SAS-L@VM.MARIST.EDU'
> Subject:      RE: SAS MVS & JCL
>
> I haven't tried this, so there may be a syntax error, but could you have
> the VSAM file allocated to ddnames such as:
> //VSAM01 DD
> //VSAM02 DD
> //VSAM03 DD
> and so on.
>
> Then in the SAS code, do something like:
>
> DATA _NULL_;
>          RETAIN VSAM 1;
>          ARRAY FILE{3} $ 8 VSAM01 VSAM02 VSAM03
> {'VSAM01','VSAM02','VSAM03'}
>          INFILE MYVSAM FILEVAR=FILE{VSAM} EOF=EOF
>     <PROCESSING>
>
> EOF: VSAM = VSAM + 1;
>          IF VSAM > 3 THEN STOP;
>
> I think that something like this should work
>
>
>       -----Original Message-----
> From:   Grant, Mike [SMTP:mike.grant@BT.COM]
> Sent:   Tuesday, January 12, 1999 9:46 AM
> To:     SAS-L@VM.MARIST.EDU
> Subject:        SAS MVS & JCL
>
>       Dear SAS-l's
>
>       We are an MVS site and use JCL to specify filenames. This is a site
> standard
> to ease renames of files etc.
> The problem is that I want to read several VSAM files sequentially (you
> can't concatenate them using one DD statement), Has anyone any suggestions
>
> for doing this without using a macro, as this can be difficult to
> debug/maintain?
>
>       > Regards,
> >
> > Mike Grant
>