* CRTPRTF FILE(HZPROD/PROFAS9295) SRCFILE(HZPROD/QDDSSRC) SRCMBR(*FILE) * DEVTYPE(*AFPDS) OPTION(*EVENTF) PAGESIZE(25 58) OVRFLW(25) DRAWER(2) REPLACE(*YES) * DIN A6 landscape A R RECORD1 A ENDPAGE A PAGRTT(0) A BARCODE101 18 A POSITION(0.25 0.25) A BARCODE(DATAMATRIX - A (*WIDTH 0.200) - A (*DATAMATRIX *DFT *DFT)) A BARCODE102 18 A POSITION(0.20 5.30) A BARCODE(CODE3OF9 3 *VRT - A (*WIDTH 0.012) - A (*RATIO 2.00) - A X'01' )