//APSWMRES JOB 'account #','name',MSGLEVEL=(1,1)
//*
//*-------------------------------------------------------------------*
//*     APSRMARK UTILITY TO MARK THE SYSTEM VERSION OF FONTS FOR USE  *
//*     AS RESIDENT FONTS FOR THOSE PRINTERS THAT SUPPORT EITHER      *
//*     RESIDENT FONTS OR REMOTE PRINTMANAGER.                        *
//*-------------------------------------------------------------------*
//*
//STEP1 EXEC PGM=APSRMARK
//*
//SYSPRINT DD SYSOUT=A
//IN1      DD UNIT=dasd,DISP=SHR,     <-- CHANGE TO PROPER UNIT
//            DSN=input.resource      <-- CHANGE TO YOUR DSN
//            VOL=SER=volser          <-- CHANGE TO PROPER VOLSER
//OUT1     DD UNIT=dasd,DISP=OLD,     <-- CHANGE TO PROPER UNIT
//            DSN=output.resource     <-- CHANGE TO YOUR DSN
//            VOL=SER=volser          <-- CHANGE TO PROPER VOLSER
//*
//*-------------------------------------------------------------------*
//*     CHANGE THE CHARSET TO THE DESIRED CHARACTER SET MEMBER NAME.  *
//*     CHANGE THE CODEPAGE TO THE DESIRED CODE PAGE MEMBER NAME.     *
//*     CHANGE THE RRDATE, RRTIME, AND RRID FIELDS AS DESCRIBED IN    *
//*     PSF/MVS SYSTEM PROGRAMMING GUIDE.                             *
//*-------------------------------------------------------------------*
//*
//SYSIN DD *
  INDD=IN1,OUTDD=OUT1,MEMBER=charset,REPLACE,PUBLIC,                   X
  RRDATE=?????,RRTIME=??????,RRID=????????
  INDD=IN1,OUTDD=OUT1,MEMBER=codepage,REPLACE,PUBLIC,                  X
  RRDATE=?????,RRTIME=??????,RRID=????????
/*