This SAS code enables
you to read the first few lines of a transport file under the
z/OS operating environment.
Note: This program does not translate
the file to EBCDIC. It only interprets the first five records in the
file and writes them to the SAS log. The transport file remains unchanged.
Code That Interprets the Header of the Transport File
//PEEK JOB (,X101),'SMITH,B.',TIME=(,3)
/*JOBPARM FETCH
//STEP1 EXEC SAS
//transport-file DD
DSN=USERID.XPT6.FILE,DISP=SHR
//SYSIN DD *
data _null_;
infile tranfile obs=5;
input theline $ascii80.;
put theline;
run;
/*
Log output indicates
whether the XPORT engine or PROC CPORT was used to create the transport
file.
This SAS code shows
the first 40 characters of the transport file that the XPORT engine
creates.
HEADER RECORD*******LIBRARY HEADER RECORD!!!!!!!00
This SAS code shows
the first 40 characters of a transport file that PROC CPORT creates.
**COMPRESSED** **COMPRESSED** **COMPRESSED** **COM
Note: If you set the NOCOMPRESS
option in the CPORT procedure, compression is suppressed, which prevents
the display of the preceding text in a transport file.
For technical details
about the transport format that is used for a data set, see Technical
Support article TS-140, The Record Layout of a SAS Transport Data
Set.