! 0 100 1050 <|TICKETQTY(tmp_qty)|>

JUSTIFY CENTER

U C25 (4,5,0) 500 10 <|DAILYCODE(ctod(tmp_date))|>

U C80 (3,5,0) 500 75 <|upper(substr(CMONTH(ctod(tmp_date)),1,3))

+' '+alltrim(str(day(ctod(tmp_date)),3,0))

+' '+substr(alltrim(str(year(ctod(tmp_date)),4,0)),3,2)|>

U C40 (6,5,0) 500 190 <|alltrim(tmp_dept)+'/'+alltrim(tmp_Item)|>

U A25 (2,5,0) 500 235 <|IF(EMPTY(tmp_spct), ' ', alltrim(tmp_spct))|>

U A25 (2,5,0) 500 326 <|time()+' '+alltrim(tmp_spct)+' '+alltrim(str(tmp_disc,9,2))|>

U A25 (2,5,0) 500 352 <|alltrim(tmp_oper)+' '+dtoc(date())+' '+alltrim(FOP())

+' '+alltrim(str(tmp_ext/tmp_qty,9,2))|>

BT 18X23 (0,5)

BR code39(3:7) 710 500 70 <|if(empty(tmp_date),'*A'+'XX', '*A'+encrypt_date(tmp_date))+encrypt_number(tmp_access)+'*'|>

END