{||Lines:=16 {||ROUT("",58.1),; RROUT(SUBSTR(DTOC(MCHQDATE),1,1)),; RROUT("",1.1),; RROUT(SUBSTR(DTOC(MCHQDATE),2,1)),; RROUT("",1.3),; RROUT(SUBSTR(DTOC(MCHQDATE),4,1)),; RROUT("",1.5,,_compress),; RROUT(SUBSTR(DTOC(MCHQDATE),5,1)),; RROUT("",1.5),; RROUT(SUBSTR(DTOC4(MCHQDATE),7,1)),; RROUT("",1.3),; RROUT(SUBSTR(DTOC4(MCHQDATE),8,1)),; RROUT("",1.3),; RROUT(SUBSTR(DTOC4(MCHQDATE),9,1)),; RROUT("",1.5,,_COMPRESS),; RROUT(SUBSTR(DTOC4(MCHQDATE),10,1))} {||ROUT("")} {||ROut(" ",10),; RROut(mPayee,PageWidth()-5,_LEFT)} {||rout ("")} {||ROut(" ",13),; RROut(STRTRAN(Alltrim(mAmtInWords),"-"," ")+" Only",PageWidth(),_LEFT,iif(Len(mAmtInWords)>60,_COMPRESS,_NORMAL) )} {||ROUT("")} {||ROUT("",60),; RROut(Tran(ABS(mChqAmount),"999999999.99 "),12,,{"Arial bold"})} {||rout ("")} {||ROUT("")} {||ROUT("")} {||ROUT("")} {||ROut("===============",PageWidth(),_CENTER,_DS)} {||ROut(" Ac/Payee Only ",PageWidth(),_CENTER,_DS)} {||ROut("===============",PageWidth(),_CENTER,_DS)} {||ROUT("")} {||ROUT("")}