!ArialP%winspoolGeneric / Text OnlyLPT1: 6Generic / Text Only@f x@MSUDGeneric / Text OnlydDRIVER=winspool DEVICE=Generic / Text Only OUTPUT=LPT1: PAPERSIZE=258 DEFAULTSOURCE=260 PRINTQUALITY=120 YRESOLUTION=6 TTOPTION=1 ac_descDATE() Roman 12cpi Roman 12cpi"Date" g_ledger.DATE  Roman 12cpi!empty(g_ledger.DATE) Roman 12cpi "Doc. No."g_ledger.ref_no1  Roman 12cpi Roman 12cpi "Particulars" Roman 12cpi"Cr."g_ledger.CRAMOUNT  Roman 12cpi!empty(g_ledger.CRAMOUNT)"@Z" Roman 12cpi"Closing Balance"g_ledger.DRAMOUNT  Roman 12cpi!empty(g_ledger.DRAMOUNT)"@Z" Roman 12cpi"Dr." Roman 12cpi "Chq No."g_ledger.chq_no  Roman 12cpiCl_Bal  Roman 12cpi cl_bal > 0allt(Company.comp_name)  Roman 10cpiKallt(_desc) + " From " + Allt(DTOC(vFrom_Dt)) + " To " + Allt(DTOC(vTo_Dt))  Roman 12cpi allt(ac_desc)  Roman 12cpi"Opening Balance"  Roman 12cpi _print_op = 0 and !empty(op_bal)aallt(g_ledger.REF_DESC) + iif(!empty(g_ledger.particular),chr(10) + allt(g_ledger.particular),"")  Roman 12cpi`"----------------------------------------------------------------------------------------------"  Roman 12cpi`"----------------------------------------------------------------------------------------------"  Roman 12cpiallt(g_ledger.bal_amt)  Roman 12cpi!"==============================="  Roman 12cpi"Page " + ALLTRIM(STR(_PAGENO)) Roman 12cpi!iif(Op_Bal > 0,round(Op_Bal,2),0)  Roman 12cpi_print_op = 0 and op_bal > 0$iif(Op_Bal < 0,round(Op_Bal*-1,2),0)  Roman 12cpi_print_op = 0 and op_bal < 0vFrom_Dt  Roman 12cpi _print_op = 0 and !empty(op_bal)vTo_Dt  Roman 12cpiEround(iif(Op_Bal<0,Op_Bal*-1,0) + _cr_amt + iif(Cl_Bal>0,Cl_Bal,0),2)  Roman 12cpiEround(iif(Op_Bal>0,Op_Bal,0) + _dr_amt + iif(Cl_Bal<0,Cl_Bal*-1,0),2)  Roman 12cpiround(Cl_Bal * -1,2)  Roman 12cpi cl_bal < 0!"==============================="  Roman 12cpi_dr_amtg_ledger.dramount0_cr_amtg_ledger.cramount0 _print_op10Arial Roman 12cpi Roman 12cpi Roman 10cpi Roman 12cpidataenvironmentJLeft = 1 Top = 220 Width = 520 Height = 200 Name = "Dataenvironment"