Hi Every One.. Here i share code of Credit Control Days at Sales Bill and Sales Order Level. ;;-------------------------------------------------------------- ;; Control at Sales Bill Level ;;-------------------------------------------------------------- [#Field: EI Consignee] Control : CDays : @@CCDays > 0 AND $$InCreateMode AND $$IsSales:##SVVoucherType AND NOT $$IsEmpty:$(Ledger,#EIConsignee).BillCreditPeriod Set Always : Yes ;;-------------------------------------------------------------- ;; Control at Sales Order Level ;;-------------------------------------------------------------- [#Field: EI OrderConsignee] Control : CDays : @@CCDays > 0 AND $$InCreateMode AND $$IsSalesOrder:##SVVoucherType AND NOT $$IsEmpty:$(Ledger,#EIConsignee).BillCreditPeriod Set Always : Yes ;;-------------------------------------------------------------- ;; C0llection for fetch Outstanding Details ;;-------------------------------------------------------------- [Collection: TSPLFFE Credit PartyPendingBills] Type : Bills Child of : #EIConsignee Filter : CD, CDCR [System : Formula] CDays : if @@CCDays = 1 then "The Customer has " + $$NewLine + $$String@CCDays + $$NewLine + " Bill OverDue." else "The Customer has " + $$NewLine + $$String@CCDays + $$NewLine + " Bills OverDue." CCDays : $$NumItems:TSPLFFECreditPartyPendingBills CD : $$Number@TSPLFFEDateDiff >= 1 TSPLFFEDueDate : $$DateRange$(Ledger,#EIConsignee).BillCreditPeriod):$BillDate:YES TSPLFFEDateDiff : ##SVCurrentDate - @@TSPLFFEDueDate CDCR : $$IsDr:$BaseClosing ;;-------------------------------------------------------------- ;; Control at Master Level ;;-------------------------------------------------------------- [#Menu: Ledgers] Delete : Item : @@locCreditLimits Delete : Item : BLANK Add : Item : @@locCreditLimits :Alter Collection :Multi Ledger Limit :$$NumLedgers> 0 AND $$Allow:Alter:AccountsMasters and $$IsCmpOwner Add : Item : BLANK ;;-------------------------------------------------------------- ;; E.O.F ;;--------------------------------------------------------------
