when i alter whatsapp no its not getting update in $whatsappmessage

Discussion in 'Tally Developer' started by gauravss, Jan 21, 2024.

    
  1. gauravss

    gauravss Member


    small help needed when i alter whatsapp number its not getting updated in $whatsappmessage but in voucher its getting updated and when i saved the voucher its getting updated how can i update message in below code

    [#Menu : Gate Way of Tally]
    Add :Key Item : At End : "Alter Transport Detail" : L :alter :detailAlterVC : $$IsAccountingOn:$$CurrentCompany

    [Report : detailAlterVC]
    ;Use : Dsp template
    Form :detailAlterVC
    Multi Objects : detailAlterVCcoll
    Title : "Multi Objects Sample"
    Variable : SVFromDate,SVToDate
    ;Set : "For the period from " + ##SVFromDate + " to " +##SVToDate
    Set : SVFromDate : $$MonthStart:##SVCurrentDate
    Set : SVToDate : $$MonthEnd:##SVCurrentDate
    ;Set : SVFromDate: ##SVCurrentDate
    ;Set : SVToDate : ##SVCurrentDate

    [Form : detailAlterVC]
    Add : Top Button : At Beginning : Website
    ;Use : Dsp template
    Height : 100% Page
    Width : 100% Page
    Parts : form SubTitle, detailAlterVC
    Local : Field : Form SUbtitle : Set As : "Modify Details and Press CTRL+A to Except"
    Background : @@SV_BALANCESHEET
    Button : Change Period


    [Part : detailAlterVC]
    ;Line : Empty
    ;QR Code : $PartyLedgerName
    ;Width : 11% screen
    ;Height : 22% screen
    Lines : LWAvtitleT, LWAvtitleD
    Repeat : LWAvtitleD : detailAlterVCcoll
    Scroll : Vertical
    Common Border : Yes



    [Line: LWAvtitleT]
    ;Use : LWAvtitleD
    fields : LWAvTitleD Date, LWAvtitleD No, LWAvtitleD Narration,LWAvtitleD type,LWAvtitleD Type2,LWAvtitleD whatsapp;,LWAvtitleD Amount;LWAvtitleD Type3,
    Local : Field: Default : Type : string
    Local : Field: Default : line : 0
    Local : Field: Default : align : center
    Local :Field : LWAvtitleD No :Info : "voucher No."
    Local :Field : LWAvtitleD Date : Info : "Date"
    Local :Field : LWAvtitleD Type :Info : "Dispatch Through"
    Local :Field : LWAvtitleD Type2 :Info : "Dispatch Doc No"
    Local :Field : LWAvtitleD Type3 :Info : "Packing Details"
    Local :Field : LWAvtitleD Narration : Info :"Ledger"
    Local :Field : LWAvtitleD Amount : Info : "Amount"
    Local :Field : LWAvtitleD whatsapp: Info: "Whatsapp number"
    Border :Column Titles
    ; Option : AlterOnEnter : $$IsVoucher



    [Line: LWAvtitleD]
    fields : LWAvTitleD Date, LWAvtitleD No, LWAvtitleD Narration,LWAvtitleD type,LWAvtitleD Type2,LWAvtitleD whatsapp,LWAvtitleD whatsappweb;,;LWAvtitleD Amount,LWAvtitleD Type3,


    [field : LWAvtitleD Date]
    use : short date field
    set as : $Date
    skip : yes

    [Field : LWAvtitleD No]

    Use : Name Field
    set as : $VoucherNumber
    Border : thin left right
    skip : yes
    Alter : Voucher


    [Field : LWAvtitleD Type]

    Use : Name field
    Storage : BasicShippedBy
    Border : thin right
    Width : 20
    Table: Transporter,EndOfList
    ShowTable: Always
    Key : Create Transporter4
    [Key: Create Transporter4]
    Key :Alt + C
    Action: CREATE: Ledger


    [Collection: Transporter]
    Title: $$LocaleString:"Transporter Name"
    Type: Ledger
    Child Of:"Transporter"

    [Field : LWAvtitleD Type2]

    Use : Name field
    Storage : BasicShipDocumentNo
    Border : thin right
    Width : 20

    ;skip : yes

    [Field : LWAvtitleD Type3]

    Use : Name field
    Storage : BasicOrderTerms
    Width : 20
    ;skip : yes
    Table : PackingCollection, not applicable
    Show Table: Always
    Alter: voucher
    ;Key : Create SalesmanName2

    ;[Key: Create SalesmanName2]
    ;Key :Alt + C
    ;Action: CREATE: Packing Name

    [Field : LWAvtitleD Narration]

    Use : Name field
    set as : $ledgerName
    Width : 40
    Border : Thin right
    skip : yes

    [Field : LWAvtitleD Amount]
    Use : Amount Field
    Set as : $Amount
    Border : Thin Left
    Skip :Yes
    [Field : LWAvtitleD whatsapp]
    Use : Name Field
    Storage : Consigneewhatsappno
    Border : Thin Left
    ;Skip :Yes

    [Field : LWAvtitleD whatsappweb]
    Use : Name Field
    Set as : $whatsappmessage;"https://api.whatsapp.com/send/?phone="+"91"+$$String:$Consigneewhatsappno+"&text="+"Dear%20Customer%20,"+"Your%20Invoice%20No:%20"+$$String:$VoucherNumber+",%20*Amount%20"+$$String:$amount+"%20Invoice-Date%20"+$$String:##VARVchDate+",*%20(Taxable%20"+$$String:mad:@JKTXABL+"%20)%20"+",%20Discount:%20"+$$String:mad:@JKDISCO+",%20IGST:%20"+$$String:mad:@JKIGST+",%20CGST:%20"+$$String:mad:@JKCGST+",%20SGST:%20"+$$String:mad:@JKSGST++",%20CESS:%20"+$$String:mad:@JKCESS+",%20has%20been%20Generated.%20"+"%20*Your%20Closing%20Balance%20Is%20"+$$String:mad:@Clbalance+"*%20"+"Goods%20Dispatch%20Through:%20"+$$String:$BasicShippedBy+",%20"+"Trace%20Goods:%20"+$$String:mad:@website+",%20"+"Total%20Bail:%20"+$$String:$BasicOrderRef+",%20"+"Document%20No:%20"+$$String:$BasicShipDocumentNo+",%20"+"Destination%20Booked:%20"+$$String:$BasicFinalDestination+",%20Regards%20"+$$String:mad:@CmpMailName:"%20"
    Full Width : yes
    Alter: voucher
    Border : Thin Left
    Skip:yes

    [Collection : detailAlterVCcoll]
    Type : Voucher
    Fetch : Date, VoucherNumber, VoucherTypeName,LedgerName,PartyLedgerName,VCHSalesmanName,GrossProfit,GROSSREVENUE,message,wesite,WHTLWD2, LedgerEntries.*
    Filter: salesvch


    [System: formula]
    salesvch : $$IsSales:$vouchertypeName
    trymessage2:#message
    website2 : #wesite2



    ;Add : Top Button : At Beginning : Website
    ;------------------------------

    [Button:Website]
    Key:Ctrl + W
    Action: Alter : MyWebsite
    Title : $$LocaleString:"Open Website"


    [Report : MyWebsite]

    Use : DSP Template
    Form : MyWebsite

    [Form : MyWebsite]
    Use : DSP Template
    Height : 5% Screen
    Width : 15% Screen
    BackGround : Lily White
    Parts :MyWebsiteReport
    SpaceRight : 0.05
    SpaceLeft : 0.05
    Space Top : 0.05
    Space Bottom: 0.05
    On : Form Accept: Yes : CALL : Website



    [Part :MyWebsiteReport]
    Line : MyWebsiteReport Line1

    [Line : MyWebsiteReport Line1]
    Field : MyWebsiteReport Field1

    [Field : MyWebsiteReport Field1]
    Use : Short Name Field
    Set Always : Yes
    Table : WebsiteName
    Width : 20
    Show Table:Always
    Color:blue



    [Collection:WebsiteName]
    Title : $$LocaleString:"Browse Website"

    List Name : $$LocaleString:"GST portal"
    List Name : $$LocaleString:"GST Login"
    List Name : $$LocaleString:"GSTSearch"
    List Name : $$LocaleString:"Courier&transport"
    List Name : $$LocaleString:"G-Mail-Login"
    List Name : $$LocaleString:"Income Tax Login"
    List Name : $$LocaleString:"Youtube"
    List Name : $$LocaleString:"Whatsapp-Login"
    Table Sort : Default

    [Function: Website]
    01:If:#MyWebsiteReportField1 = "Courier&transport"
    02 : Browse Url Ex : @@website;+@@DMKDS2
    05: End If
    06:If:#MyWebsiteReportField1 = "GST portal"
    07:Browse URL : "https://www.gst.gov.in"
    08: End If
    09:If:#MyWebsiteReportField1 = "GST Login"
    10:Browse URL : "https://services.gst.gov.in/services/login"
    11: End If
    12:If:#MyWebsiteReportField1 = "GSTSearch"
    13:Browse URL : "https://services.gst.gov.in/services/searchtp"
    14: End If
    15:If:#MyWebsiteReportField1 = "G-Mail-Login"
    16:Browse URL : "https://accounts.google.com/Service...flowName=GlifWebSignIn&flowEntry=ServiceLogin"
    17: End If
    18:If:#MyWebsiteReportField1 = "Income Tax Login"
    19:Browse URL : "https://eportal.incometax.gov.in/iec/foservices/#/login"
    20: End If
    21:If:#MyWebsiteReportField1 = "Youtube"
    22:Browse URL : "https://www.youtube.com"
    23: End If
    24:If:#MyWebsiteReportField1 = "Whatsapp-Login"
    25:Browse URL : "https://web.whatsapp.com"
    26: End If
     


  2. sivam

    sivam Active Member



    [Collection : detailAlterVCcoll]
    Type : Voucher
    Fetch : Date, VoucherNumber, Consigneewhatsappno, VoucherTypeName,LedgerName,PartyLedgerName,VCHSalesmanName,GrossProfit,GROSSREVENUE,message,wesite,WHTLWD2, LedgerEntries.*
    Filter: salesvch
     


Share This Page