Lexmark T656 User Manual page 68

STEP 1. DISPLAY CURRENT FONT MARKING STATUS
To determine the marking status of your host fonts you can run the APSRMARK report utility. The
following is a sample of the JCL to run the font report listing.
Sample JCL to run font report listing to determine current font marking status:
//APSHORT JOB
// CLASS=A,
// MSGCLASS=A,
// MSGLEVEL=(1,1),
// NOTIFY=&SYSUID,
// TIME=1440
//*** NOTE: USE THIS JOB TO PRINT SHORT FONT STATUS MARKINGS ONLY ****
//*** NOTE: CHANGE DSN LINE 13 (IN1 STATEMENT) TO MATCH YOUR FONTLIB *
//********************************************************************
//STEP1 EXEC
//SYSPRINT DD SYSOUT=J
//*
//IN1 DD UNIT=3390,DSN=SYS1.FONTLIBB,DISP=SHR,VOL=SER=OS3R7A
//SYSIN DD *
INDD=IN1,MEMBER=ALL,REPORT,SHORT
/*
Note: Change report type to "LONG" for font detailed report (replace the "SHORT" option).
STEP 2. MARKING FONTS FOR CAPTURE
In order for printer to capture host fonts as resident printer fonts they must be marked "PUBLIC". The
following is a sample of the JCL commands to mark existing fonts as "PUBLIC".
Sample JCL to Mark Fonts "PUBLIC":
//APSMARK JOB
// CLASS=A,
// MSGCLASS=A,
// MSGLEVEL=(1,1),
// NOTIFY=&SYSUID,
// TIME=1440
//*********************************************************************
//* THIS JOB WILL MARK FONTS FOR CAPTURE FOR PRINTER FROM FONT LIB.
//* MARK THEM AS EITHER PUBLIC OR PRIVATE. TO MARK PUBLIC ENTER
//* "PUBLIC" KEYWORD ON LINE 18 INDD STATEMENT. FOR PRIVATE ENTER
//* "PRIVATE" KEYWORD ON LINE 18 INDD STATEMENT. THEN SUBMIT.
//* TO DISPLAY STATUS MARKING CHANGE RUN REPORT JOB "APSSHORT".
//*********************************************************************
//* NOTE: USE "REPLACE" IF MEMBER ALREADY EXIST: SEE FOLLOWING EXAMPLE*
//* NOTE: USE "REPLACE" IF MEMBER ALREADY EXIST: SEE FOLLOWING EXAMPLE*
//* INDD=IN1,OUTDD=OUT1,MEMBER=C0H20000,PUBLIC,REPLACE
//*********************************************************************
//* NOTE: BEFORE YOU RUN THIS JOB YOU MUST ALLOCATE NEW FONTLIB DSN
//* 1ST CREATE NEW LIB, THEN USE IEBGENER TO COPY FROM OLD LIB
//* I.E. SYS1.FONTLIBB TO NEW LIB SYS1.FONTPRIV OR SYS1.FONTPUB
//*********************************************************************
68
(),
PGM=APSRMARK
(),
*
*
*
*
*
*
*
*
*