SELECT CUSTNO,NAME,NAME2,AGE15,AGE14,AGE13,AGE12,AGE11,AGE10,CURRBALT,XPDC,XPAIDMTH,XSALES,XYSALES,PHONE,XLASTDATE,CRLIMIT,TERM 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("5 Mths+")
EXCEL_SUB_TITLE_5=LGS("4 Mths")
EXCEL_SUB_TITLE_6=LGS("3 Mths")
EXCEL_SUB_TITLE_7=LGS("2 Mths")
EXCEL_SUB_TITLE_8=LGS("1 Mth")
EXCEL_SUB_TITLE_9=LGS("Current")
EXCEL_SUB_TITLE_10=LGS("Balance")
EXCEL_SUB_TITLE_11=LGS("P.D.C")
EXCEL_SUB_TITLE_12=LGS("Mtd-Pay")
EXCEL_SUB_TITLE_13=LGS("Mtd-Sales")
EXCEL_SUB_TITLE_14=LGS("Ytd-Sales")
EXCEL_SUB_TITLE_15=LGS("Telephone")
EXCEL_SUB_TITLE_16=LGS("Last Pay")
EXCEL_SUB_TITLE_17=LGS("Cr-Limit")
EXCEL_SUB_TITLE_18=LGS("Term")
EXCEL_COMMAND_AMOUNT(4,14)
EXCEL_COMMAND_AMOUNT(17,17)
EXCEL_COMMAND_TOTAL("R")
EXCEL_COMMAND_71=[OEX.CELLS(EXCEL_TNROW+2,4).VALUE=AGET15*SIG]
EXCEL_COMMAND_72=[OEX.CELLS(EXCEL_TNROW+2,5).VALUE=AGET14*SIG]
EXCEL_COMMAND_73=[OEX.CELLS(EXCEL_TNROW+2,6).VALUE=AGET13*SIG]
EXCEL_COMMAND_74=[OEX.CELLS(EXCEL_TNROW+2,7).VALUE=AGET12*SIG]
EXCEL_COMMAND_75=[OEX.CELLS(EXCEL_TNROW+2,8).VALUE=AGET11*SIG]
EXCEL_COMMAND_76=[OEX.CELLS(EXCEL_TNROW+2,9).VALUE=AGET10*SIG]
EXCEL_COMMAND_77=[OEX.CELLS(EXCEL_TNROW+2,10).VALUE=CURRT*SIG]
EXCEL_COMMAND_78=[OEX.CELLS(EXCEL_TNROW+2,11).VALUE=PDCT*SIG]
EXCEL_COMMAND_79=[OEX.CELLS(EXCEL_TNROW+2,12).VALUE=PAIDMTHT*SIG]
EXCEL_COMMAND_80=[OEX.CELLS(EXCEL_TNROW+2,13).VALUE=SALEST*SIG]
EXCEL_COMMAND_81=[OEX.CELLS(EXCEL_TNROW+2,14).VALUE=YSALEST*SIG]