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