Finally Completed .. Auto Email From Voucher, Sales Register and Outstanding from Tally

Discussion in 'Free Source Codes' started by ROHIT JAISWAR, Jul 16, 2021.

    
  1. ROHIT JAISWAR

    ROHIT JAISWAR Member



  2. scuba

    scuba Member


    can u share code please
     


  3. N vinoth

    N vinoth Guest



  4. ROHIT JAISWAR

    ROHIT JAISWAR Member



  5. ROHIT JAISWAR

    ROHIT JAISWAR Member


    Sorry i Cant share it if Required help you but not share the Code. Share your Contact details will show you demo
     


  6. Ria

    Ria Member


    Sir, did you do this using TDL only?
     


  7. ROHIT JAISWAR

    ROHIT JAISWAR Member


    I Can't Understand What exactly want to Say

    This is Purely from TDL only. No External DLL used for this
     


  8. FreeLance-Tech

    FreeLance-Tech New Member


    MULTIPLE INVOCE EXPORT TO PDF/PRINT/SEND TO MAIL

    LEDGERREPORT.jpg Sales RGST.jpg WhatsApp Image 2021-07-30 at 2.16.27 PM.jpeg WhatsApp Image 2021-07-30 at 2.16.39 PM.jpeg WhatsApp Image 2021-07-30 at 2.17.08 PM.jpeg WhatsApp Image 2021-07-30 at 2.17.08 PM (1).jpeg
     


  9. Jenny

    Jenny Active Member


    Code:
    
    ;;F11-F6 Configurations
    
    [#Part    : CMP TallyShopFeatures Left]
        Line    : TlyTrng EmailFeatures OS
       
    [Line    : TlyTrng EmailFeatures OS]
        Fields        : Medium Prompt, TlyTrng EmailFeatures OS
        Local        : Field : Medium Prompt : Info    : "Enable Email Feature ?"
        Space Top    : 0.3
       
    [Field    : TlyTrng EmailFeatures OS]
        Use            : Logical Field
        Storage        : TlyTrng Email Features OS
        Sub Form    : TlyTrng EmailConfigurations OS    : $$Value
       
    [Report    : TlyTrng EmailConfigurations OS]
        Title        : "E-Mail Configurations"
        Form        : TlyTrng EmailConfigurations OS
        Full Screen    : No
       
        Set        : SVAccounts    : No
        Set        : SVInventory   : No
        Set        : SVStatutory   : No
        Set        : SVTallyShop    : Yes
        Set     : SVTaxAudit     : No
        Set     : SVTallyNet    : No
    
    [Form    : TlyTrng EmailConfigurations OS]
        Parts        : Form SubTitle, MPaySlip MailInfo Config
        Full Width  : No
        Height        : 60% Screen
        Space Right : 2
        Space Left  : 2
        No Confirm  : Yes
        Background  : @@SV_CMPCONFIG
        Option      : Small Size Form
    
        Local        : Line    : Default                        : NoCursor    : Yes
        Local        : Part    : MPaySlip MailInfo Config        : Delete    : Border
        Local        : Part    : DSP ExcelExportDetails        : Delete    : Line    : DSP ExportSheetName,
        Local        : Part    : MPaySlip MailInfo Config        : Delete    : Line    : MPaySlip MailExportFormat
        Local        : Line    : Form SubTitle                    : Space Top    : 0.25
        Local        : Field    : Form SubTitle                    : Info        : $$LocaleString:"E-Mail Configuration"
        Local        : Line    : DSP ExcelExportWithFormatting    : Local        : Field    : Short Prompt        : Width        : 30
        Local        : Line    : DSP ExcelExportWithColour        : Local        : Field    : Short Prompt        : Width        : 30
    
        Local    : Field    : DSP Mail ServerName            : Storage    : TlyTrng Email MailServerName OS
        Local    : Field    : DSP Mail Server                : Storage    : TlyTrng Email MailServer OS
        Local    : Field    : DSP Mail UseSsl                : Storage    : TlyTrng Email MailUseSsl OS
        Local    : Field    : DSP Mail UseSSLOnStdPort        : Storage    : TlyTrng Email Mail UseSSLOnStdPort OS
        Local    : Field    : DSP MailFromAddress            : Storage    : TlyTrng Email MailFromAddress OS
        Local    : Field    : DSP MailAuthUserName            : Storage    : TlyTrng Email MailAuthUserName OS
        Local    : Field    : DSP MailAuthPassword            : Storage    : TlyTrng Email MailAuthPassword OS
       
        Local    : Field    : DSP MailAuthPassword            : Delete    : Inactive
    
        Local    : Line    : DSP MailAuthUNInfo            : Invisible    : Yes
        Local    : Line    : DSP MailFromName                : Invisible    : Yes
           
        Local    : Line    : DSP MailFromAddress            : Space Top    : 2
    
    
    
       
    
    [System    : Formulae]
        TlyTrng Email Features OS            : $TlyTrngEmailFeaturesOS:Company:##SVCurrentCompany
        TlyTrng Email MailServerNameOS        : $TlyTrngEmailMailServerNameOS:Company:##SVCurrentCompany
        TlyTrng Email MailServerOS            : $TlyTrngEmailMailServerOS:Company:##SVCurrentCompany
        TlyTrng Email MailUseSslOS            : $TlyTrngEmailMailUseSslOS:Company:##SVCurrentCompany
        TlyTrng Email Mail UseSSLOnStdPortOS: $TlyTrngEmailMailUseSSLOnStdPortOS:Company:##SVCurrentCompany
        TlyTrng Email MailFromAddressOS        : $TlyTrngEmailMailFromAddressOS:Company:##SVCurrentCompany
        TlyTrng Email MailAuthUserNameOS    : $TlyTrngEmailMailAuthUserNameOS:Company:##SVCurrentCompany
        TlyTrng Email MailAuthPasswordOS    : $TlyTrngEmailMailAuthPasswordOS:Company:##SVCurrentCompany
    
    
    [System    : UDF]
        TlyTrng Email Features OS            : Logical    : 3023
        TlyTrng Email MailServerName OS        : String    : 3024
        TlyTrng Email MailServer OS            : String    : 3025
        TlyTrng Email MailUseSsl OS            : Logical    : 3026
        TlyTrng Email Mail UseSSLOnStdPortOS: Logical    : 3027
        TlyTrng Email MailFromAddress OS    : String    : 3028
        TlyTrng Email MailAuthUserName OS    : String    : 3029
        TlyTrng Email MailAuthPassword OS    : String    : 3030
    
    
    
    /*Ledger Statement & Billwise Statement*/
    
    [#Form    : Group Outstandings]
        Add    : Button    : TlyTrng LedState, TlyTrng LedStateXL, TlyTrng OSStat, TlyTrng OSStatXL
        Add    : Bottom ToolBar Button    : BottomToolBarBtn12
       
    [#Form    : NRM GrpSummary]
        Add    : Button    : TlyTrng LedState, TlyTrng LedStateXL, TlyTrng OSStat, TlyTrng OSStatXL
        Add    : Bottom ToolBar Button    : BottomToolBarBtn12
    
    [Button    : TlyTrng LedState]   
        Title        : "Led Statement Email (PDF)"
        Key            : CTRL + L
        Action        : Call    : TlyTrng OSStat    : "Yes"    : "No"
        Inactive    : NOT @@TlyTrngEmailFeaturesOS
    
    [Button    : TlyTrng LedStateXL]   
        Title        : "Led Statement Email (Excel)"
        Key            : ALT + L
        Action        : Call    : TlyTrng OSStat    : "Yes"    : "Yes"
        Inactive    : NOT @@TlyTrngEmailFeaturesOS
    
    [Button    : TlyTrng OSStat]
        Title        : "O/s Email (PDF)"
        Key            : CTRL + O
        Action        : Call    : TlyTrng OSStat    : "No" : "No"
        Inactive    : NOT @@TlyTrngEmailFeaturesOS
    
    [Button    : TlyTrng OSStatXL]
        Title        : "O/s Email (Excel)"
        Key            : CTRL + E
        Action        : Call    : TlyTrng OSStat    : "No" : "Yes"
        Inactive    : NOT @@TlyTrngEmailFeaturesOS
    
    
    [Function    : TlyTrng OSStat]
        Parameter    : TlyTrng IsLedStat    : Logical
        Parameter    : TlyTrng IsExcel    : Logical
        Variable    : LedgerName        : String
       
        0000    : If    : $$IsEmptyCollection:TlyTrngAutoEmail
        0010    :    Msg Box    : "info"    : "Please Select & Try again!!"
       
        0020    : Else
       
        0030    : Query Box    : "Send Mail" : Yes:No
        0040    : If : NOT $$LastResult   
        0050    :    Continue
        0060    : End If
    
        0070    : Walk Collection    : TlyTrng AutoEmail
       
        0080    : Set    : LedgerName    : $Name
       
        0090    : Log    : "Ledger Name : "    + $NAME
        0100    : Log    : "Email Id : " + ($EMAIL:LEDGER:##LedgerName)
        0110    : Log    : "----------------------------------------"
    
        0120    : Call    : TlyTrng PartyOSEmail
    
        0130    : End Walk
       
        0140    : End If
    
    
    
    [Collection    : TlyTrng AutoEmail]
        Data Source    : Report    : Selected
        Fetch        : NAME
    
    
    [Function    : TlyTrng PartyOSEmail]
        Variable    : TlyTrng ToEmail        : String    : $EMAIL:LEDGER:##LedgerName
        Variable    : TlyTrng EmailSubject    : String    : (IF ##TlyTrngIsLedStat THEN "LedgerStatement : " ELSE "BillsOutstanding : ") + ##LedgerName
    
    
        0000    : If    : NOT $$IsEmpty:##TlyTrngToEmail
       
        0010    : Set    : SVMailEmbedImage            : Yes
        0020    : Set    : SVExportFormatVar            : IF ##TlyTrngIsExcel THEN $$SysName:EXCEL ELSE $$SysName:PDF
        0030    : Set    : SVExportFormat            : IF ##TlyTrngIsExcel THEN $$SysName:EXCEL ELSE $$SysName:PDF
        0040    : Do If    : (NOT ##TlyTrngIsExcel)    : Set    : SVBrowserWidth    : 210
        0050    : Do If    : (NOT ##TlyTrngIsExcel)    : Set    : SVBrowserHeight    : 297
        0060    : Do If    : (##TlyTrngIsExcel)        : Set    : ExcelSheetName    : "Sheet 1"
    
        0070    : Set    : SVMailAttachFileName    : (IF ##TlyTrngIsLedStat THEN "LedgerStatement" ELSE "BillsOutstanding") + (IF ##TlyTrngIsExcel THEN ".xlsx" ELSE ".pdf")
       
        Local Formula    : EMailText        : "Dear Customer, \n Please find the attachment. \n\n Warm Regards,\n" + @@CmpMultiAddressMailName
    
        0080    : Set    : SVPrintFileName        : $$MakeMailName:##TlyTrngToEmail:@@TlyTrngEmailMailServerOS:@@TlyTrngEmailMailFromAddressOS:@@TlyTrngEmailMailFromAddressOS:##TlyTrngEmailSubject:@@TlyTrngEmailMailAuthUserNameOS:@@TlyTrngEmailMailAuthPasswordOS:@@TlyTrngEmailMailUseSslOS:@@TlyTrngEmailMailUseSSLOnStdPortOS
               
        0090    : Set    : SVMailText            : $$LocaleString:@EMailText
    
        0100    : Do If    : (##TlyTrngIsLedStat)        : Mail    : Ledger Vouchers        : True
        0110    : Do If    : (NOT ##TlyTrngIsLedStat)    : Mail    : Ledger Outstandings    : True
       
        0120    : End If
    
     
    Binod Singh, Santosh, Jeetu and 2 others like this.


  10. Ria

    Ria Member


    Yes sir that's what I wanted to know, thank you
     


  11. Rajsrisrimal

    Rajsrisrimal Member



  12. ROHIT JAISWAR

    ROHIT JAISWAR Member


    Thank you Jenny Ji
     


  13. ROHIT JAISWAR

    ROHIT JAISWAR Member


    For CC you Can Change

    Code:
    Variable : TlyTrng ToEmailCC        : String : $EMailCC:LEDGER:##LedgerName
    Code:
    0080 : Set : SVPrintFileName : $$MakeMailName:##TlyTrngToEmail:@@TlyTrngEmailMailServerOS:##TlyTrng ToEmailCC:@@TlyTrngEmailMailFromAddressOS:##TlyTrngEmailSubject:@@TlyTrngEmailMailAuthUserNameOS:@@TlyTrngEmailMailAuthPasswordOS:@@TlyTrngEmailMailUseSslOS:@@TlyTrngEmailMailUseSSLOnStdPortOS
     
    Jenny likes this.


  14. Mahesh Sethi

    Mahesh Sethi Member


    ITS SHOW ME ERRE WHEN I GO TO DISPLAY>ACCOUNT BOOKS > GROUP SUMMERY & SELECT THE DEBTOR FOR SEND MAIL.
    BUT IF I AM GO WITH TALLY'S MAIL OPTION ITS DONE .
    PLS HELP ME THAT MISTAKE .

    THANKS & REGARDS,

    SCREEN SHOOT ATT.

    ERRER AUTO EMAIL.png ERRER AUTO EMAIL.png ERRER AUTO EMAIL.png ERRER AUTO EMAIL.png
     


  15. ROHIT JAISWAR

    ROHIT JAISWAR Member



  16. Mahesh Sethi

    Mahesh Sethi Member



  17. ROHIT JAISWAR

    ROHIT JAISWAR Member

    Attached Files:



  18. Chandan Somani

    Chandan Somani New Member


    Can't find the Options to email
    i have
    Loaded your TDL successfully
    Activated Addon Feature
    upload_2021-9-20_22-42-41.png
     


  19. Jeetu

    Jeetu New Member


    Thanks alot #Jenny
     


  20. jagdish tiwari

    jagdish tiwari New Member


    code is working but account statement not corrected send only receipt vch send in statement.
     


  21. udaya

    udaya Active Member


    Great Jenny .......... Thanks lot..........
     
    Jenny likes this.


  22. Mohan.S

    Mohan.S Member


    But that is send CC to from mail id. I don't need CC to me. what is the solution
     




  23. rajiv jaiswal

    rajiv jaiswal Member


    great work
     
    Jenny likes this.


  24. Rajsrisrimal

    Rajsrisrimal Member


    Is it possible in same way we can send Invoice too ?
    or we can send mail of invoice at the time of saving voucher ?
     


Share This Page