You are here: Available Utilities > A > AFP2MVS > Example 1

AFP2MVS Example 1

This example demonstrates running the AFP2MVS utility on a print stream:

In this example, the AFP2MVS utility reads the print stream associated with the INPUT DD statement (FSI.V112.RPEX1.GENPRINT.PRTBAT1.FROMPC), separates the print stream into records, then writes the new print stream to the file associated with the OUTPUT DD statement (FSI.V112.RPEX1.GENPRINT.PRTBAT1).

Since the file associated with the INPUT DD statement is a Sequential Data Set and not a Partitioned Data Set (PDS), the /I parameter is not necessary.

//AFP2MVSD EXEC PGM=IEFBR14

//OUTPUT DD DSN=FSI.V112.RPEX1.GENPRINT.PRTBAT1,

// DISP=(MOD,DELETE),SPACE=(TRK,0),UNIT=SYSDA

//*

//AFP2MVS EXEC PGM=AFP2MVS

//STEPLIB DD DSN=FSI.V112..LINKLIB,DISP=SHR

// DD DSN=SYS1.SCEERUN,DISP=SHR

//SYSPRINT DD SYSOUT=*

//INPUT DD DSN=FSI.V112.RPEX1.GENPRINT.PRTBAT1.FROMPC,DISP=SHR

//OUTPUT DD DSN=FSI.V112.RPEX1.GENPRINT.PRTBAT1,

// UNIT=SYSDA,SPACE=(CYL,(1,1)),DISP=(,CATLG),

// DCB=(RECFM=VBM,LRECL=8209,BLKSIZE=23500)