EXCEL_COMMAND1="B.FPERIOD,B.DATE,B.ACCNO,B.reference,B.DESP,B.DEBITAMT,B.CREDITAMT"
EXCEL_COMMAND2="A.BATCHNO=B.BATCHNO AND A.TRANNO=B.TRANNO"
SELECT &EXCEL_COMMAND1 FROM INITFILE A INNER JOIN GLPOST B ON &EXCEL_COMMAND2 INTO CURSOR EXCEL_INITFILE
EXCEL_TITLE_NAME_1=lgS("Zero-Rated Purchase")
EXCEL_SUB_TITLE_1=LGS("Period")
EXCEL_SUB_TITLE_2=LGS("Date")
EXCEL_SUB_TITLE_3=LGS("A/C No.")
EXCEL_SUB_TITLE_4=LGS("Refno.")
EXCEL_SUB_TITLE_5=LGS("Desp.")
EXCEL_SUB_TITLE_6=LGS("Debit")
EXCEL_SUB_TITLE_7=LGS("Credit")
EXCEL_COMMAND_AMOUNT(6,7)
EXCEL_COMMAND_TOTAL("G")
EXCEL_COMMAND_71=[OEX.CELLS(EXCEL_TNROW+2,6).VALUE=tpurd]
EXCEL_COMMAND_72=[OEX.CELLS(EXCEL_TNROW+2,7).VALUE=TpurC]