Credit Control on Days (Free Source Code)

Discussion in 'Free Source Codes' started by Maulik Patel, Dec 5, 2013.

    
  1. Maulik Patel

    Maulik Patel Active Member


    ;; Sri Ganeshji : Sri Balaji : Sri Pitreshwarji : Sri Durgaji : Sri Venkateshwara


    [#Field: EI Consignee]

    Control : CtrlCreditDays : @@ChkCreditDays>0 and $$InCreateMode and $$IsSales:##SVVoucherType

    [Collection: Credit PartyPending Bills]

    Type : Bills
    Child of : #EIConsignee
    Unique : $$Name
    Format : @@DateDiff
    Format : $BillDate, 8 : Universal Date
    Format : $$Name, 10
    Format : $BaseClosing,-30 : "AllSymbols, DrCr"
    Format : @@DueDate
    Format : ##SVCurrentDate
    Filter : FltrCreditDays, FltrCrAmt

    [System : Formula]

    CtrlCreditDays : if @@ChkCreditDays = 1 then "The Customer has " + $$NewLine + $$String:mad:@ChkCreditDays + $$NewLine + " Bill OverDue." else "The Customer has " + $$NewLine + $$String:mad:@ChkCreditDays + $$NewLine + " Bills OverDue."
    ChkCreditDays : $$Numitems:CreditPartyPendingBills
    FltrCreditDays : $$Number:mad:@DateDiff>=1
    DueDate : $$Date:$$String:$BillCreditPeriod:UniversalDate
    DateDiff : ##SVCurrentDate - @@DueDate
    FltrCrAmt : $$IsDr:$BaseClosing

    ;;---------------------------------------------------------------------------------------------------
    [#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.
     
    khushbu and Gagan Jyoti like this.


  2. laxman

    laxman Member


    not working..
     


  3. nagaraju

    nagaraju New Member


    this code is not working
     


  4. Maulik Patel

    Maulik Patel Active Member


    It must work,
    what is the problem in this code?
     



  5. not showing the due date in date format
     


  6. nagaraju

    nagaraju New Member


    this code is not working the sales inc is accepting
     


  7. Maulik Patel

    Maulik Patel Active Member


    Dear Experts,

    I don't know why it is not working to your computers, It is working fine in my computer and in my client's computers. Still if you think there is any problem in code then, please revise the code and upload over here.
    I have uploaded the code, if you think it is not working then make changes and upload it.

    Try to resolve the problem instead of finding a problem.

    I thought that experts should get acknowledgement for such kind of idea as many clients ask for it. That's why I post this code on this forum.
     


  8. laxman

    laxman Member


    Mr.Maulik Patel
    Error on this tdl in many users. but fine working you and your clients please share screen shots if possible .
     


  9. Maulik Patel

    Maulik Patel Active Member


    Mr. Laxman,

    As per your requirements, I an attaching screenshot.
     

    Attached Files:



  10. Maulik Patel

    Maulik Patel Active Member


    Dear Experts,

    At my view, there may be following things to be confirmed to use this TDL.

    1. Maintain Balances bill-by-bill is set Yes for that ledger
    2. Outstanding report for ledger shows any unpaid bills till invoice date. You can find this report in Display --> Statements of Accounts --> Outstanding --> Ledger. For Eg. you are generating Invoice in 01-Dec-2013 then there must be atleast one overdue sales invoice for that customer which is due on 01-Dec-2013(or less than 01-Dec-2013) to restrict that invoice. You can compare overdue days by due date in that report.
    3. User may not have restrated tally after configuring the code.

    Still if you find any thing wrong for this then code is uploaded, solve the error by your self.

    If you are a developer then you can solve it. Why to depended on other person?
     
    khushbu, priya, Sunder and 2 others like this.


  11. HVPatel

    HVPatel Active Member


    Agree with Maulik Patel,
    Solve the error by your self. and gather experience, to be a good TDL Developer.
     


  12. G Vijay

    G Vijay Member


    HI,
    This code is not giving any control over due bills....
     


  13. NaraSimhulu Devalam

    NaraSimhulu Devalam New Member


    Dear Experts,

    Try This Credit Control

    GateWayofTally --> Accounts Info ---> Ledger-->Credit Limt

    ;; Sri Ganeshji : Sri Balaji : Sri Pitreshwarji : Sri Durgaji : Sri Venkateshwara

    [#Field: EI Consignee]
    Option: EIS Consignees: @@IsSales

    [!Field: EIS Consignees]
    ;;Control: CtrlCreditDays: (@@ChkCreditDays > 0 OR @@CLimit) and $$InCreateMode AND NOT $$IsCmpOwner
    Control: CtrlCreditDays: (@@ChkCreditDays > 0 ) and $$InCreateMode AND NOT $$IsCmpOwner AND (NOT $IsOptional)


    [#Form: Sales Color]
    Control: CtrlCreditDays: (@@ChkCreditDays > 0 ) and $$InCreateMode AND NOT $$IsCmpOwner AND (NOT $IsOptional)


    [Collection: Credit PartyPending Bills]

    Type : Bills
    Child of : #EIConsignee
    Unique : $$Name
    Compute: DueDates: $BillDate + $BillCreditPeriod ;;$BillDate ;;- $ClearedOn)
    Compute: CurDates: ##SVCurrentDate - $DueDates
    ;$BillCreditPeriod ;;$ClearedOn - ($BillDate + $BillCreditPeriod)
    Format: @@DateDiff
    Format : $BillDate, 8 : Universal Date
    Format : $$Name, 10
    Format : $BaseClosing,-30 : "AllSymbols, DrCr"
    Format: @@DueDate
    Format: ##SVCurrentDate
    Format: $DueDates
    Format: $CurDates
    Filter: FltrCreditDays, FltrCrAmt

    [System: Formula]

    CtrlCreditDays: if @@ChkCreditDays = 1 then "The Customer has " + $$NewLine + $$String:mad:@ChkCreditDays + $$NewLine + " Bill OverDue." else "The Customer has " + $$NewLine + $$String:mad:@ChkCreditDays + $$NewLine + " Bills OverDue" + $$NewLine + "OR" + + $$NewLine + "Exceed Limit"
    ChkCreditDays: $$Numitems:CreditPartyPendingBills
    FltrCreditDays: $$Number:mad:@DateDiff>=1
    DueDate: $$Date:$$String:$BillCreditPeriod:UniversalDate
    DateDiff: ##SVCurrentDate - ($BillDate + $BillCreditPeriod)
    FltrCrAmt: $$IsDr:$BaseClosing
    CLimit: NOT $$IsEmpty:mad:@CLimitMst AND $ClosingBalance:Ledger:#EIConsignee > $CreditLimit:Ledger:#EIConsignee
    CLimitMst: $CreditLimit:Ledger:#EIConsignee
    ;;---------------------------------------------------------------------------------------------------
    [#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.
     


  14. Hiren Soni

    Hiren Soni New Member


    is it possible to admin give him permission when customer cross his limit
     


  15. Maulik Patel

    Maulik Patel Active Member


    Yes,

    It is possible, you can add one more condition for admin user by using $$IsCmpOwner function.
     


  16. priya

    priya Member


    Excellent work Mr. Maulik Patel. One should carefully read your instructions and do as told. I too did not get the report, in the first instance; but after reading your instructions thoroughly and did as told, I was able to get this report. Such wonderful work explain the sincerity and love for the task. Thank you for opening up the possibilities; BYE and THANKS AGAIN. IT IS WORKING EXCELLENT.
     


  17. Hiren Soni

    Hiren Soni New Member


    Thank You :)
     


  18. khushbu

    khushbu New Member


    It is working properly.
     


  19. Bikash Shaw

    Bikash Shaw Member


    i am getting the warning only but it is not restricting the entry in sales order, i have done all the measures also
     


  20. Maulik Patel

    Maulik Patel Active Member


    Dear Bikash Shaw,

    Please read the code carefully, there is condition in OPTION for Sales Vouchers only, so it will work only for Sales Voucher not for Sales Order.
     


  21. Bikash Shaw

    Bikash Shaw Member


    Dear Sir,
    I have changed the voucher type to sale order but still its not working.
    please suggest.
     



  22. thanks it's usefully ../
     


  23. mahgs

    mahgs Member


    Dear Experts:

    The Party(sundry Debtors) Who Exceeds the credit days the billing
    Should not happen ,but it is billing in optional,it is Posible . Any one give the Solution
     


  24. Systecg

    Systecg Member



    sir not working in tally 6.3 can u post a new code

    thank you
     


  25. Systecg

    Systecg Member



    sir not working in tally 6.3 can u post a new code

    thank you
     


Share This Page