z/OS V1R6.0 DFSMS Access Method Services for Catalogs

PRINTThe PRINT command prints data records of the key-sequenced cluster,BRD.EXAMPLE.KSDS1. Its parameter INDATASET, names the data set to beprinted. Because neither FROMADDRESS, FROMKEY, SKIP, TOKEY, TOADDRESS,or COUNT is specified, access method services prints all the cluster’s data records.Because neither HEX nor CHAR was specified, access method services prints eachrecord in the DUMP format. An example of the printed record is shown inFigure 6.KEY OF RECORD - 00F0F0F0F0F1C9E240C4C1405CC6C90000 00F0F0F0 F0F1C9E2 40C4C140 5CC6C9D3 C549C8F0 C6F8F05C 40F5F040 D9C5C3D6 *.000011S DA *FILE 10380* 50 RECD*0020 D9C4E240 D6C640F6 F940C3C8 C1D9E240 E6C9E3C8 40D2C5E8 40C9D540 D7D6E240 *RDS OF 69 CHARS WITH KEY IN POS *0040 F160F1F1 4B000000 00000000 00000000 *1-11............Figure 6. Example of the Printed Record in DUMP FormatCopy Records from a Non-VSAM Data Set into anEntry-Sequenced VSAM Cluster, Then Print the Records:Example 4The first 15 records from a non-VSAM data set, EXAMPLE.NONVSAM, are copiedinto an entry-sequenced cluster, KRL.EXAMPLE.ESDS1. If the records are copiedcorrectly, the cluster’s records are printed in hexadecimal format. If the records arenot copied correctly, the non-VSAM data set’s first 15 records are printed incharacter format.//PRINT2 JOB ...//STEP1 EXEC PGM=IDCAMS//VSDSET2 DD DSNAME=KRL.EXAMPLE.ESDS1,DISP=OLD//SYSPRINT DD SYSOUT=A//SYSIN DD *REPRO -INDATASET(EXAMPLE.NONVSAM) -OUTFILE(VSDSET2) -COUNT(15)IF LASTCC = 0 -THEN -PRINT -INFILE(VSDSET2) -HEXPRINT -INDATASET(EXAMPLE.NONVSAM) -COUNT(15) -CHARACTER/*Job control language statement:vVSDSET2 DD identifies the entry-sequenced VSAM cluster,KRL.EXAMPLE.ESDS1, that the records are copied into.Hint: If the AMP=(BUFND=n) parameter were specified, performance wouldimprove when the data set’s records were accessed. In this example, the BUFNDdefault is taken because only 15 records are being processed.The REPRO command copies the first 15 records from the source data set,EXAMPLE.NONVSAM, into the target entry-sequenced cluster,KRL.EXAMPLE.ESDS1. Its parameters are:v INDATASET identifies the source data set, EXAMPLE.NONVSAM.vOUTFILE points to the VSDSET2 DD statement. The VSDSET2 DD statementidentifies the output data set, KRL.EXAMPLE.ESDS1.302 z/OS V1R6.0 DFSMS Access Method Services for Catalogs