please help on tdl for whatspp to selected ledger

Discussion in 'Free Source Codes' started by love, Dec 16, 2019.

    
  1. love

    love Member


    dear all experts ,
    i gathered some bits and bytes from the your postings and editedand have created a report of party debtors and creditors and want to send a specific ledger to be sent balance over whatsapp, but am unable to get ledger fetch ledger details from the selected ledger , please help
    Code:
    ;-- OUTSTANDING REPORT-----
    
    [#Menu: Gateway of Tally]
        Add: Option: love1:
    
    
    [!Menu:love1] 
      add : Key Item    :before:@@locQuit: @@locOUTST     : U : Display   :lovesal1    : $$IsAccountingOn:$$CurrentCompany
    
    
    [system : formula]
        
           locOUTST                      :$$LocaleString:"Party outstanding"
         
       
    [Report :lovesal1]
    Use  : Dsp template
    Form : myHATE OUTSTForm
      Title: $$LocaleString:"outstanding Details"
      
    ;;*******************************************
    
    [Form :myHATE OUTSTForm]
      Use  : Dsp template
      Height : 100% Page
      Width : 50% Page
      Parts : myHATEPrttitle,myHATEprtTPTDetails
      bottom parts : prtbottom1
      Delete:Page Break
      add:Page Break  : DSP ClPageBreak1, myDSPOpPageBreak1
    Button: WAPPAN1
    [Part : myDSPOpPageBreak1]
        parts :myHATEPrttitle
        vertical : yes
     
    
    [Part :myHATEPrttitle]
      Line : myHATElntitle
    
    
    
    
    [Line : myHATElntitle]
      fields : ODBMedium Prompt1
      Right fields : ODBAmt Field1
      local : field : default : type : string
      local : field : default : style : normal bold
    ;local : field : default : align : centre
      Local: Field: ODBMedium Prompt1: Set as: "Party name"
      Local: Field: ODBAmt Field1 : Set as: "Amount" 
      Border : Totals
    
    
    [Part :myHATEprtTPTDetails]
      Line : myHATETPTbodyln
      repeat :myHATETPTbodyln :LEDGERCollection
      scroll : vertical
      Total:ODBAmt Field1
    
    
    
    
    
    [Line : myHATETPTbodyln]
    
    Fields         : ODBMedium Prompt1
    RightFields    : ODBAmt Field1
    Local         : Field : ODBMedium Prompt1
    Local         : Field : ODBAmt Field1   
    Option        : DisplayOnEnter
    
    
    
    
      [Part : prtbottom1]
        Line :broktot1
    
    [Line : broktot1]
      fields : ODBMedium Prompt1,ODBAmt Field1
       Local: Field: ODBMedium Prompt1 : Set as: "Total"
      border : Totals
    
    [Collection: LEDGERCollection]
    Type: LEDGER
    Child of: $$GroupSundryDebtors
    Belongs To: Yes
    Filter:radhefilter
    
    
    [Field: ODBMedium Prompt1]
        Use: name field
        Set as     : $name
        Display : Ledger Vouchers : $$ISLedger
        Variable : LedgerName
        Modifies : LedgerName
        Alter : Ledger
        Width: 2 inch
        Style: small
        Quick Search: Yes
      
    [Field: ODBAmt Field1    ]
        Use: amount field
        Set as     : $CLOSINGBALANCE
        Width: 1.5 inch
        Style: small
          format : "NO zero,decimal:2,crdr"
    
    [System: Formula]
        radhefilter: $closingBalance > 0
    
    
    
    ;-------whatsapp button for messaging-----
    
    
    
    [Button: WAPPAN1]
    
        Key     : Alt+W
        Title   : "WHATSAPP"
        Action    : Browse URL     :   "http://web.whatsapp.com/send?Phone=" + @@mobileno1+ + "&text=" + @@Lluvlymsg4
        Scope: Selected Lines
      
    
    [System: Formula]
    Clbalance :$$String:@@clbs:"DrCr"
    Clbalance1 :$$String:@@clbs1:"DrCr"
    clbs:$Closingbalance:Ledger:$ledgername
    clbs1:$Closingbalance:Ledger:##ledgername
    Mobileno :$$String:"91" + $Ledgermobile:Ledger:$Ledgername
    Mobileno1 :$$String:"91" +$LedgerMobile:ledger:##Ledgername
    
    
    Lluvlymsg4 : "Dear%20"+$$String:#Ledgername+"%20 .%20"+"%20Your%20Closing%20Balance%20as%20on%20"+ $$String:$$Machinedate+"%20is%20"+$$String:@@Clbalance1+"%20                     %20"+"%20Regards%20"+$$String:@@CmpMailName
    
    
     

    Attached Files:



Share This Page