This code adds a New Report/Tool allowing a user to effectively do payment follow up Welcome to improvements Code: ;;bismillah ;;; created by MBA [#Menu:Outstandings] Add:Key Item:Before:@@locquit:Follow Up:F:Display:OSFollowup [Report:OSFollowup] Title:$$LocaleString:"OS Follow Up Status" Form:OSFollowup [Form:OSFollowup] Width:100 % Screen Height:100% Screen Part:CMPLine,OSFollowup Button:Refresh,Print Button, Export Button Bottom Button:filter button,Instructions Print:OSFollowup Full Height:Yes Full Width:Yes [Part:CMPLine] Line:CMPLine [Line:CMPLine] Left Field:CMPOSNAME Right Field:DSP MainDateTitle [Part:OSFollowup] Line:Title Line,Customerdetails, Bottom Line:customerdetailsTotals Repeat:customerdetails:GR SDC Groups Scroll:Vertical Common Border:Yes Total : ClosingBalance [Field:CMPOSNAME] Use:CMP Name Set as:$CMPMailName [Line:Titleline] use:customerdetails Border:thick top bottom Local : Field : Default : Type : String Local : Field : Default : Align : Left Local:Field:Customer Name:set as:"Customer Name" Local:Field:ClosingBalance:set as:"Closing Balance" Local:Field:ContactPerson:set as:"Contact Person" Local:Field:Contact No:set as:"Contact No" Local:Field:contact No.Alt:set as:"Alt. Contact No" Local:Field:AvgDay:set as:"Avg.Day to Pay" Local:Field:Remark1:set as:"Remarks" [line:customerdetails] Left Field: Customer Name,closingBalance,Contact Person Right Field:Contact No,Contact No.Alt,AvgDay,Remark1 [Field: Customer Name] Set as:$name Use:short name field Border:thin right Width:22% screen Quick Search:Yes Option : DD Name Field Led : $$IsLedger [!Field: DD Name Field Led] Variable : LedgerName Display : Ledger Outstandings [Field:closingBalance] Set as:$closingbalance Width : @@AmountWidth Max : @@MaxNumberWidth Style : Normal Bold Format : "No Zero, Symbol," + ##ShowForex Align : Right Border:thin right Display:ledger outstandings Type:Amount [Field:Contact Person] Set as:$LedgerContact Use:short name field Border:thin right [Field:Contact No] Set as:$LedgerMobile Use:short name field Border:thin right [Field:Contact No.Alt] Set as:$LedgerPhone Use:short name field Border:thin right [Field:AvgDay] Set as: if $$IsEmpty:$PerfByFormula then "" else $$SPrintf:@@DaysFormat:@@PerfByFormula TotalVal: If $$IsEmpty:$PerfByFormula:Group:##GroupName Then $$AsAmount:0 Else $PerfByFormula:Group:##GroupName Use:short name field Border:thin right [Field:Remark1] Use:short name field Border:thin right set as:$Remarksone Alter:Remark Full Width:Yes [Line: customerdetailsTotals] Use : customerdetails Local : Field : CustomerName : Align : Centre Local : Field : CustomerName : Set as: "TOTAL" Local : Field : ClosingBalance: Set as: $$Total:Closingbalance Border : Thin Top Bottom /*................for adding remarks.............*/ [Report:Remark] Form:Remark Object:Ledger [Form:Remark] Part:Remark1 [Part:Remark1] Line:Remarks [#Part: LEDNotes] Add:Line:At End:Remarks [Line:remarks] Field : Short Prompt, Remarks Invisible : NOT ##LEDNotes Local : Field: Short Prompt : Setas : $$LocaleString:"Remarks:" [Field: Remarks] Use : Short Name Field Use : First Upper Case Field Full Width : Yes Max : 250 Style : Small Bold Storage : RemarksOne Invisible : ##MVInMultiMode /*.........UDFs............*/ [System:UDF] Remark:Aggregate:1000 Remarksone:String:1001 Remarkstwo:String:1002 /*...........Collections.............*/ [Collection : GR SDC Groups] Type : Ledger Childof : $$GroupSundryDebtors Belongs To : Yes Filter:Mufasa [System:Formula] mufasa: not $closingbalance =0 /*...........Instructions.............*/ [Report:Instrucitons] Form:Instrucitons [Form:Instrucitons] Part:Instrucitons Height:17 % page Width:50% page [Part:Instrucitons] Line:Instrucitons1 [Line:Instrucitons1] Field:Instrucitons [Field:Instrucitons] Use:Name Field Set as:"Press Enter to See OS Statement of Account and + Press Ctrl + Enter to add/edit+ Remarks" Width: 50% page Align:Center Alignment:Center Line:3 /*.................for Buttons...................*/ [Button:Refresh] Key:CTRL+Z Action:Refresh TDL [Button:Instructions] Key:CTRL+C Action:Display:Instrucitons
sir, Your TDL is superb, can you add bill wise follow up and same remainder as on system date will be more useful. We thanks you for superb TDL
