SELECT CUSTNO,NAME,NAME2,AGE21,AGE20,AGE19,AGE18,AGE17,AGE16,AGE15,AGE14,AGE13,AGE12,AGE11,AGE10,CURRBALT,XPDC,XPAIDMTH,XSALES,XYSALES FROM INITFILE INTO CURSOR EXCEL_INITFILE
EXCEL_TITLE_NAME_1=LGS(IIF(FT="AR","Debtors Aging Reports","Creditors Aging Reports"))
EXCEL_TITLE_NAME_2="{"+DTOC(RPTDATE)+"}"
EXCEL_SUB_TITLE_1=LGS(IIF(FT="AR","Cust.No.","Supp.No."))
EXCEL_SUB_TITLE_2=LGS("Name")
EXCEL_SUB_TITLE_3=LGS("Name (2)")
EXCEL_SUB_TITLE_4=LGS("11 Mths+")
EXCEL_SUB_TITLE_5=LGS("10 Mths")
EXCEL_SUB_TITLE_6=LGS("9 Mths")
EXCEL_SUB_TITLE_7=LGS("8 Mths")
EXCEL_SUB_TITLE_8=LGS("7 Mths")
EXCEL_SUB_TITLE_9=LGS("6 Mths")
EXCEL_SUB_TITLE_10=LGS("5 Mths")
EXCEL_SUB_TITLE_11=LGS("4 Mths")
EXCEL_SUB_TITLE_12=LGS("3 Mths")
EXCEL_SUB_TITLE_13=LGS("2 Mths")
EXCEL_SUB_TITLE_14=LGS("1 Mth")
EXCEL_SUB_TITLE_15=LGS("Current")
EXCEL_SUB_TITLE_16=LGS("Balance")
EXCEL_SUB_TITLE_17=LGS("P.D.C")
EXCEL_SUB_TITLE_18=LGS("Mtd-Pay")
EXCEL_SUB_TITLE_19=LGS("Mtd-Sales")
EXCEL_SUB_TITLE_20=LGS("Ytd-Sales")
EXCEL_COMMAND_AMOUNT(4,20)
EXCEL_COMMAND_TOTAL("T")

EXCEL_COMMAND_71=[OEX.CELLS(EXCEL_TNROW+2,4).VALUE=AGET21*SIG]
EXCEL_COMMAND_72=[OEX.CELLS(EXCEL_TNROW+2,5).VALUE=AGET20*SIG]
EXCEL_COMMAND_73=[OEX.CELLS(EXCEL_TNROW+2,6).VALUE=AGET19*SIG]
EXCEL_COMMAND_74=[OEX.CELLS(EXCEL_TNROW+2,7).VALUE=AGET18*SIG]
EXCEL_COMMAND_75=[OEX.CELLS(EXCEL_TNROW+2,8).VALUE=AGET17*SIG]
EXCEL_COMMAND_76=[OEX.CELLS(EXCEL_TNROW+2,9).VALUE=AGET16*SIG]
EXCEL_COMMAND_77=[OEX.CELLS(EXCEL_TNROW+2,10).VALUE=AGET15*SIG]
EXCEL_COMMAND_78=[OEX.CELLS(EXCEL_TNROW+2,11).VALUE=AGET14*SIG]
EXCEL_COMMAND_79=[OEX.CELLS(EXCEL_TNROW+2,12).VALUE=AGET13*SIG]
EXCEL_COMMAND_80=[OEX.CELLS(EXCEL_TNROW+2,13).VALUE=AGET12*SIG]
EXCEL_COMMAND_81=[OEX.CELLS(EXCEL_TNROW+2,14).VALUE=AGET11*SIG]
EXCEL_COMMAND_82=[OEX.CELLS(EXCEL_TNROW+2,15).VALUE=AGET10*SIG]
EXCEL_COMMAND_83=[OEX.CELLS(EXCEL_TNROW+2,16).VALUE=CURRT*SIG]
EXCEL_COMMAND_84=[OEX.CELLS(EXCEL_TNROW+2,17).VALUE=PDCT*SIG]
EXCEL_COMMAND_85=[OEX.CELLS(EXCEL_TNROW+2,18).VALUE=PAIDMTHT*SIG]
EXCEL_COMMAND_86=[OEX.CELLS(EXCEL_TNROW+2,19).VALUE=SALEST*SIG]
EXCEL_COMMAND_87=[OEX.CELLS(EXCEL_TNROW+2,20).VALUE=YSALEST*SIG]