CREATE CURSOR EXCEL_INITFILE(XDATE C(12),REFERENCE C(10),REFNO C(10),DESP C(60),SOURCE C(4),JOB C(4),DEBITAMT N(17,2),CREDITAMT N(17,2),BALANCE N(17,2),REM_BL C(1),REM_HD C(1),REM_BF C(1))
EXCEL_GLPRLIST()
EXCEL_TITLE_NAME_1=IIF(OPT="2","DEBTOR LEDGER",IIF(OPT="3","CREDITOR LEDGER","GENERAL LEDGER"))
EXCEL_TITLE_NAME_2=INITFILE.DESP
EXCEL_TITLE_NAME_3=INITFILE.DESP2
EXCEL_SUB_TITLE_1=LGS("Date")
EXCEL_SUB_TITLE_2=LGS("Ref.(1)")
EXCEL_SUB_TITLE_3=LGS("Ref.(2)")
EXCEL_SUB_TITLE_4=LGS("Description")
EXCEL_SUB_TITLE_5=LGS("Project")
EXCEL_SUB_TITLE_6=LGS("Job")
EXCEL_SUB_TITLE_7=LGS("Debit")
EXCEL_SUB_TITLE_8=LGS("Credit")
EXCEL_SUB_TITLE_9=LGS("Balance")
EXCEL_COMMAND_AMOUNT(7,9)
EXCEL_COMMAND_51=[OEX.COLUMNS("G:H").SELECT]
EXCEL_COMMAND_52=[OEX.SELECTION.NUMBERFORMAT = '_(* #,##0.00_);_(* -#,##0.00;_(* """"??_);_(@_)']
EXCEL_COMMAND_53=[OEX.Columns("J:L").Select]
EXCEL_COMMAND_54=[OEX.Selection.EntireColumn.Hidden = .T.]