Filter
Top Products
PDF417 Installation Guide
NeoMedia Technologies, Inc. Page 20
The XSAMPLEC member in the NEOMEDIA.PDF417.RSCLIB PDS executes the SAMPLEC
executable created above. This program generates an output file via the NMPDFFNT DD card.
NOTE: The very first step in the XSAMPLEC has been commented out because there is
nothing to be deleted during the first run of this program. If you decided to re-execute this
program, then the DELETE step would be needed.
For successful execution, there will be no screen output but one file will be generated as output
via the NMPDFFNT DD card defined in the JCL. The file that is created from this test program is
a font character file which contains a PDF417 symbol with the following encoded:
This is a test of the NeoMedia Technologies PDF417 Encoder. The error
correction will encode at level 3 with ECC padding.
View this file and confirm that it contains the appropriate font characters. If it does not, you will
have to print the file with the appropriate font definition file loaded. Printing the symbol files is
beyond the scope of this document.
The following JCL demonstrates how to link the PDF417 encoder with a C program and the C
run-time SCEELKED library. If one observes the expansion of this EDCPL, then the
SCEELKED library will be noted.
//jobcard here
//*
//LINK EXEC EDCPL,LPARM='MAP,LIST,AMODE=31,RMODE=ANY'
//PLKED.STEPLIB DD DSN=SYS1.SCEERUN,DISP=SHR
//PLKED.SYSIN DD DSN=NEOMEDIA.PDF417.OBJLIB(YOURPROG),DISP=SHR
// DD DSN=NEOMEDIA.PDF417.OBJLIB(PDF417EN),DISP=SHR
//LKED.SYSLMOD DD DSN=YOUR.LOADLIB,DISP=SHR
//LKED.SYSIN DD *
ENTRY CEESTART
NAME YOUREXEC(R)
//
Depending on your system configuration you may not even need the
above PLKED.STEPLIB override.
This JCL demonstrates how to execute a program that uses the encoder in an AFP printing
environment. If your environment is properly configured, the C run-time libraries (e.g.,
SCEERUN) will be found via the concatenation list:
//jobcard here
//AFP OUTPUT FORMDEF=PDF417,PAGEDEF=PDF417,
// PRMODE=PAGE,DATACK=UNBLOCK
//STEP1 EXEC PGM=YOURNAME
//STEPLIB DD DSN=YOUR.LOADLIB,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=(F,,71)
//OUTFILE DD DSN=YOUR.PDFOUT.DATA,DISP=SHR,
// UNIT=SYSDA,SPACE=(TRK,(5,5),RLSE),
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=23408)
//ERRFILE DD DSN=YOUR.PDFOUT.ERR,DISP=SHR,
// UNIT=SYSDA,SPACE=(TRK,(5,5),RLSE),
// DCB=(RECFM=FBA,LRECL=133,BLKSIZE=23408)
//*
//STEP2 EXEC PGM=IEBGENER
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*