| Date: | Tue, 22 Feb 2000 11:51:18 -0500 |
| Reply-To: | Steve Giblin <Steve_Giblin@VAPOWER.COM> |
| Sender: | "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU> |
|
| From: | Steve Giblin <Steve_Giblin@VAPOWER.COM> |
| Subject: | Re: MVS Batch Question and JCL |
|
| Content-type: | text/plain; charset=us-ascii |
|---|
MYRA,
IF YOU TAKE THE REFERENCE TO THE SAS LIBRARY OUT OF THE JCL
YOU CAN USE THE SAS LIBNAME AND LIBNAME CLEAR STATEMENTS
TO ACCOMPLISH WHAT YOU WANT.
HERE IS A SMALL JOB THAT CREATES A DATA SET FROM
A READ-ONLY LOCATION,
THEN IT CLEARS OUT THE LIBNAME
ESTABLISHES THE SAME LIBNAME AGAIN WITH DISP=OLD
WRITES A DATA SET TO THE LIBRARY
THEN DELETES THE DATA SET JUST WRITTEN FROM THE LIBREF.
// YOUR JCL ...
//WORK DD SPACE=(CYL,(1000,500),RLSE)
//SYSIN DD *
LIBNAME DB 'OOOEDE.ZZZ.RESIDESC' DISP=SHR;
DATA TEMP;
SET DB.VARDESC (KEEP=NAME);
RUN;
LIBNAME DB CLEAR;
LIBNAME DB 'OOOEDE.ZZZ.RESIDESC' DISP=OLD;
DATA DB.JUNKDATA;
SET TEMP;
PROC DATASETS NOLIST LIBRARY=DB;
DELETE JUNKDATA;
QUIT;
RUN;
****************************************************************
* HERE IS THE LOG FYI *
****************************************************************
2 LIBNAME DB 'OOOEDE.ZZZ.RESIDESC' DISP=SHR;
NOTE: LIBREF DB WAS SUCCESSFULLY ASSIGNED AS FOLLOWS:
ENGINE: V609
PHYSICAL NAME: OOOEDE.ZZZ.RESIDESC
3
4 DATA TEMP;
5 SET DB.VARDESC (KEEP=NAME);
6 RUN;
NOTE: THE DATA SET WORK.TEMP HAS 592 OBSERVATIONS AND 1 VARIABLES.
NOTE: THE DATA STATEMENT USED THE FOLLOWING RESOURCES: (SNIPPED)
NOTE: DATA SET OOOEDE.ZZZ.RESIDESC HAS BEEN DEALLOCATED.
7
8 LIBNAME DB CLEAR;
NOTE: LIBREF DB HAS BEEN DEASSIGNED.
9
10 LIBNAME DB 'OOOEDE.ZZZ.RESIDESC' DISP=OLD;
NOTE: LIBREF DB WAS SUCCESSFULLY ASSIGNED AS FOLLOWS:
ENGINE: V609
PHYSICAL NAME: OOOEDE.ZZZ.RESIDESC
11
12 DATA DB.JUNKDATA;
13 SET TEMP;
NOTE: THE DATA SET DB.JUNKDATA HAS 592 OBSERVATIONS AND 1 VARIABLES.
NOTE: THE DATA STATEMENT USED THE FOLLOWING RESOURCES: (SNIPPED)
15 PROC DATASETS NOLIST LIBRARY=DB;
16 DELETE JUNKDATA;
17 QUIT;
NOTE: DELETING DB.JUNKDATA (MEMTYPE=DATA).
NOTE: THE PROCEDURE DATASETS USED THE FOLLOWING RESOURCES: (SNIPPED)
18 RUN;
|