{||Lines:=15 {||ROUT("",59),; RROUT(SUBSTR(DTOC(MCHQDATE),1,1)),; RROUT("",1),; RROUT(SUBSTR(DTOC(MCHQDATE),2,1)),; RROUT("",1),; RROUT(SUBSTR(DTOC(MCHQDATE),4,1)),; RROUT("",1),; RROUT(SUBSTR(DTOC(MCHQDATE),5,1)),; RROUT("",.9),; RROUT(SUBSTR(DTOC4(MCHQDATE),7,1)),; RROUT("",1),; RROUT(SUBSTR(DTOC4(MCHQDATE),8,1)),; RROUT("",1),; RROUT(SUBSTR(DTOC4(MCHQDATE),9,1)),; RROUT("",1),; RROUT(SUBSTR(DTOC4(MCHQDATE),10,1))} {||ROUT("")} {||ROut(" ",10),; 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 "))} ***RROut(Tran(mChqAmount," "),12)} {||rout ("")} {||ROUT("")} {||ROUT("")} {||ROUT("")} {||ROut("===============",PageWidth(),_CENTER,_DS)} {||ROut(" Ac/Payee Only ",PageWidth(),_CENTER,_DS)} {||ROut("===============",PageWidth(),_CENTER,_DS)} {||ROUT("")}