/********************************************************************/ /* This program will read the SAS data sets that are in transport */ /* format. They have an extention of 'EXP'. These data sets can */ /* not be used in their present format. After they will go through */ /* a conversion process via PROC COPY, they will be useable. */ /********************************************************************/ /* 20 August 97 Mary Ann Keyes */ /* 1995 PUBLIC USE NPTS data sets */ DATA _NULL_ ; EXTM=DATETIME() ; LALA=DATE() ; PUT @1 LALA WEEKDATE9. EXTM DATETIME17. ' Program Began Execution' ; RUN ; /* This is where too put the final data sets. */ LIBNAME DATAOUT 'C:\SASSTUFF\NPTS95PU\SSDFLS' ; /* This is where the data set currently resides. */ LIBNAME IN1 XPORT 'C:\SASSTUFF\NPTS95PU\SSDFLS\HHOLD95.EXP' ; PROC COPY IN=IN1 OUT=DATAOUT ; RUN ; LIBNAME IN2 XPORT 'C:\SASSTUFF\NPTS95PU\SSDFLS\PERSON95.EXP' ; PROC COPY IN=IN2 OUT=DATAOUT ; RUN ; LIBNAME IN3 XPORT 'C:\SASSTUFF\NPTS95PU\SSDFLS\SEGTRP95.EXP' ; PROC COPY IN=IN3 OUT=DATAOUT ; RUN ; LIBNAME IN4 XPORT 'C:\SASSTUFF\NPTS95PU\SSDFLS\DAYTRP95.EXP' ; PROC COPY IN=IN4 OUT=DATAOUT ; RUN ; LIBNAME IN5 XPORT 'C:\SASSTUFF\NPTS95PU\SSDFLS\PERTRP95.EXP' ; PROC COPY IN=IN5 OUT=DATAOUT ; RUN ; LIBNAME IN6 XPORT 'C:\SASSTUFF\NPTS95PU\SSDFLS\VEHICL95.EXP' ; PROC COPY IN=IN6 OUT=DATAOUT ; RUN ; PROC CONTENTS DATA=DATAOUT._ALL_ POSITION ; RUN ; DATA _NULL_ ; EXTM=DATETIME() ; PUT @1 EXTM DATETIME17. ' Program Complete Execution' ; RUN ;