Error in upload Qr Invoice in whatsApp Message

Discussion in 'Tally Developer' started by narayane88, Nov 14, 2022.

    
  1. narayane88

    narayane88 Active Member


    Plase Help Me when run following code E-Invoice generate bill not upload

    Code:
    [system : Formula]
    BizflashServer:"https://sms.bizflash.in/api/" 
          BizflashToken:"?secret=" + @@LoginPassword
    WaId                :$BizWaDeviceId:Company:##SVCurrentCompany
    LogMobileNo             : "+91"+ $LedgerMobile:Ledger:@@FirstAllLedName
        queryReply:". If any query call us on  "+@@CmpMobile
    MsgWtsApppdf:@@BizflashServer+"send/whatsapp"+@@BizflashToken+ "&account="+@@WaId +"&recipient="+@@LogMobileNo+"&message="+##WtsTextMessage+"&type=document"+"&document_file="
    WtsTextMessage1:"Dear customer  " +" , +"your Inv NO " + " " + $$String:$VoucherNumber + "Rs. "+$$String:$amount  + " on Date "+$$String:##VARVchDate+" has been Generated. 
       
       
    [Function: VchWtsApp]
    ;00:Action:Export:Printed Invoice   
    
        Variable    : FILENAME     : String   
        Variable    : LoginID     : String
        Variable    : Password     : String
        Variable    : MobileNo     : String
        Variable    : PLedger    : String
        Variable    : VoucherID    : String
       
        Variable    : Message     : String
        Variable: SVHttpUrl:String
        Variable:WtsTextMessage:String
       
       
        00010 : SET    : PLedger            : @@FirstAllLedName
        00020 : SET    : FILENAME             : $$StringFindAndReplace:$VoucherTypeName:" ":"_"
        00040 : SET    : FILENAME             : $$StringFindAndReplace:##FILENAME:"&":"_"
        00050 : SET    : FILENAME             : $$StringFindAndReplace:##FILENAME:"/":""
        00100 : SET    : FILENAME             : ##FILENAME + "-"+ $VoucherNumber +".pdf"
         00400 : SET    : MobileNo             : "91"+ $LedgerMobile:Ledger:##PLedger 
        00450 : Set    :SALogoPath:""
        10500 :    SET    : SV ExportFormat    : $$SysName:PDF;  (Portable Document Format)"
        10600 :    SET    : SVBrowserWidth     : 210
        10700 :    SET    : SVBrowserHeight    : 297
        10800 :    SET    : SVIsPortrait        : Yes
        10810 : SET    : VoucherID            : "ID:"+$$String:$MasterID
       
          
      
        10885: Set:WtsTextMessage:@@WtsTextMessage
        
       
        
        10901:Set    :SVHttpUrl:@@MsgWtsApppdf+##FILENAME
        11000 : SET    : SVPrintFileName    : ($$MakeHTTPName:##SVHttpUrl:No:"":"":##SVCurrentCompany);($$MakeFTPName:##SVFtpServer:##SVFtpUser:##SVFtpPassword:##FILENAME)
        ;11009: Log:##SVPrintFileName
        11010 : IF    : $$IsSales:$VoucherTypeName 
        11030 :    Upload Report: . :Yes
       11050 : END IF
     


Share This Page