<|alltrim("<RR><RC45,1075><F6><HW1,1>")+ DAILYCODE(ctod(tmp_date))|>

<|alltrim("<RR><RC50,1020><F3><HW1,1>")+ 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)|>

<|alltrim("<RR><RC50,980><F3><HW1,1>")+ alltrim(tmp_dept)+'/'+alltrim(tmp_Item))|>

<|alltrim("<RR><RC50,925><F3><HW1,1>")+time()+' '+alltrim(tmp_spct)+'/'+alltrim(str(tmp_disc,9,2))|>

<|alltrim("<RR><RC50,830><F3><HW1,1>")+ alltrim(tmp_oper)+' '+dtoc(date())+' '+alltrim(FOP())+' '+alltrim(str(tmp_ext/tmp_qty,9,2))|>

<|alltrim("<RC50,575><X2><NXL12>")+if(empty(tmp_edate),'*AXX','*A' +encrypt_date(tmp_edate))+encrypt_number(tmp_access)+alltrim("*")|>

<|alltrim("<RR><RC150,475><F1><HW3,2>")+'A'+alltrim(str(tmp_access))|>

<|alltrim("<p>")|>