i need to print average payment performance by bill date and by due date in field of terms of delivery in sales invoice please help me with source code can any 1 let me know the source code ;;--------Other Sales Detail average payment in this number of days i need to add in formula how can i do that---------------- [#Part:Expinv Terms] Add:Lines: At End:Expinv SubTitle,LWTermPER,LWTermP,LWTermPP,LWTermPPP Local:Field:Expinv SubTitle:Info:"Other Sales Detail" Local:Field:Expinv SubTitle:Border:Thin Bottom [Line : LWTermPER] Field : Short Prompt, EXPSMP PrevBalPER Local : Field : Short prompt : Set as : "Average Payment." Invisible : $$IsGroup:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP PrevBalPER] Use : Amount Field Set as : $$AsDrAmt:#EXPSMPNetBal / $$ToValue:$Date:$DebitTotals:Ledger:$PartyLedgerName * 100 ;----------(no of days how can i do that) Style : Small Bold Color : Red Print FG : Red ;Set as : if $$IsEmpty:$Performance then "" else $$SPrintf@DaysFormat@PerformanceFormula ;TotalVal: $Performance:Group:##GroupName ;Set as : $$SPrintf@DaysFormatCalcDaysFormula ;CalcDays : ($$Total:LPPNumDays / #LPPTotalLines) ;CalcDaysFormula : $$StringCalcDays:"Decimals:2" [Line : LWTermP] Field : Short Prompt, EXPSMP PrevBal Local : Field : Short prompt : Set as : "Prev.Bal." Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP PrevBal] Use : Amount Field Set as : $$AsDrAmt:#EXPSMPNetBal - #EXPSMPBillAmt Format : "DrCr" Style : Small Bold Color : Red Print FG : Red [Line:LWTermPP] Field : Short Prompt, EXPSMP BillAmt Local : Field : Short prompt : Set as : "Bill Amt." Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP BillAmt] Use : Amount Field Set as : $Amount Border : Thin Bottom Format : "DrCr" Style : Small Bold Color : Dark Green Print FG : Dark Green [Line : LWTermPPP] Field : Short Prompt, EXPSMP NetBal Local : Field : Short prompt : Set as : "Net Bal." Space Bottom : 3 mms Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP NetBal] Use : Amount Field Set as : $$AsDrAmt:$$ToValue:$Date:$ClosingBalance:Ledger:$PartyLedgerName Border : Thin Bottom Format : "DrCr" Style : Small Bold ;Color : Red ;Print FG : Red ;;--------------------------------------------------- ;;-----------------------------NEEDD TO ADD AVERAGE PAYMENT PERFORMANCE OF LEDGER ----------------------
;;--------Other Sales Detail average payment---------------- [#Part:Expinv Terms] Add:Lines: At End:Expinv SubTitle,LWTermP,LWTermPP,LWTermPPP Local:Field:Expinv SubTitle:Info:"Other Sales Detail" Local:Field:Expinv SubTitle:Border:Thin Bottom [Line : LWTermPER] Field : Short Prompt, EXPSMP PrevBalPER Local : Field : Short prompt : Set as : "Average Pay Days." Invisible : $$IsGroup:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP PrevBalPER] Use : Amount Field Set as : $$AsDrAmt:#EXPSMPNetBal / $$ToValue:$Date:$DebitTotals:Ledger:$PartyLedgerName * ((@@DSPToDate - @@DSPFromDate) + 1) Style : Small Bold Color : Red Print FG : Red [Line : LWTermP] Field : Short Prompt, EXPSMP PrevBal Local : Field : Short prompt : Set as : "Prev.Bal." Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP PrevBal] Use : Amount Field Set as : $$AsDrAmt:#EXPSMPNetBal - #EXPSMPBillAmt Format : "DrCr" Style : Small Bold Color : Red Print FG : Red [Line:LWTermPP] Field : Short Prompt, EXPSMP BillAmt Local : Field : Short prompt : Set as : "Bill Amt." Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP BillAmt] Use : Amount Field Set as : $Amount Border : Thin Bottom Format : "DrCr" Style : Small Bold Color : Dark Green Print FG : Dark Green [Line : LWTermPPP] Field : Short Prompt, EXPSMP NetBal Local : Field : Short prompt : Set as : "Net Bal." Space Bottom : 3 mms Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP NetBal] Use : Amount Field Set as : $$AsDrAmt:$$ToValue:$Date:$ClosingBalance:Ledger:$PartyLedgerName Border : Thin Bottom Format : "DrCr" Style : Small Bold ;Color : Red ;Print FG : Red ;;---------------------------------------------------
VERY SMALL HELP NEEDED IN THIS IF PRINCIPAL IS NEGATIVE ITS SHOULD BE IN RED COLOUR AND PROSITIVE IT SHOULD BE IN GREEN COLOR PROVIDE SOURCE CODE how to get total sales (turnover) value of ledger [#Part:Expinv Terms] Add:Lines: At End:Expinv SubTitle,LWTermP,LWTermPP,LWTermPPP,LWTermPER Local:Field:Expinv SubTitle:Info:"Other Sales Detail" Local:Field:Expinv SubTitle:Border:Thin Bottom [Line : LWTermPER] Field : Short Prompt,EXPSMP PrevBalPER,grossprofit,principal Local : Field : Short prompt : Set as : "Average Pay Days." Invisible : $$IsGroup:$Parent:Ledger:$PartyLedgerName ;Explode : BILL Vouchers : $$InPixelMode AND ($$KeyExplode OR ##ExplodeFlag) [Field : grossprofit] Use : Amount Field Set as : $$AsDrAmt:10/100*#EXPSMPNetBal Invisible : Yes [Field : principal] Use : Amount Field Set as : $$AsDrAmt:#grossprofit-#EXPSMPNetBal Invisible : Yes [Field : EXPSMP PrevBalPER] Use : Amount Field Set as : $$AsDrAmt:#principal/#EXPSMPNetBal * 100 ;---------------NEGATIVE RED------ POSITIVE GREEN------ Style : Small Bold Color : Red Print FG : Red [Line : LWTermP] Field : Short Prompt, EXPSMP PrevBal Local : Field : Short prompt : Set as : "Prev.Bal." Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP PrevBal] Use : Amount Field Set as : $$AsDrAmt:#EXPSMPNetBal - #EXPSMPBillAmt Format : "DrCr" Style : Small Bold Color : Red Print FG : Red [Line:LWTermPP] Field : Short Prompt, EXPSMP BillAmt Local : Field : Short prompt : Set as : "Bill Amt." Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP BillAmt] Use : Amount Field Set as : $Amount Border : Thin Bottom Format : "DrCr" Style : Small Bold Color : Dark Green Print FG : Dark Green [Line : LWTermPPP] Field : Short Prompt, EXPSMP NetBal Local : Field : Short prompt : Set as : "Net Bal." Space Bottom : 3 mms Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName [Field : EXPSMP NetBal] Use : Amount Field Set as : $$AsDrAmt:$$ToValue:$Date:$ClosingBalance:Ledger:$PartyLedgerName Border : Thin Bottom Format : "DrCr" Style : Small Bold ;Color : Red ;Print FG : Red ;;---------------------------------------------------
Set condition if $$value > 0 then "green" else "red" For turnover ...make a collection of vouchers of that ledger ...filter it for Sales voucher and compute the total sales. For perfection filter for Sales voucher and Credit note.