EMail Notification to Owner On Creation / Alteration of Stock Item Master

Discussion in 'Free Source Codes' started by Siddharth Agrawal, Aug 24, 2020.

    
  1. Siddharth Agrawal

    Siddharth Agrawal New Member


    I have written this code, but it is not working properly.

    It is not emailing to the Email ID hard coded here,but rather to the one to which previously some report/voucher had been mailed. Same is the case with the other values as well, except the email TEXT content

    Can someone please suggest the corrections.

    [#Form: Stock Item]
    On : Form Accept : Yes : Call : SendEmail : $StockItemName
    [Report: StkItemCnfReport]
    Form: StkItemCnfForm
    [Form: StkItemCnfForm]
    Part: StkItemCnfPart
    [Part: StkItemCnfPart]
    Line: StkItemCnfLine
    [Line: StkItemCnfLine]
    Field: StkItemCnfField
    [Field: StkItemCnfField]
    Set as: ""
    [Function: SendEmail]
    Parameter : SEStkItemName : String
    Variable : FullAddress : String
    Variable : MailFrom : String
    Variable : SEMailServerName : String
    Variable : SEMailServer : String
    Variable : SEMailFromName : String
    Variable : SEMailFromAddress : String
    Variable : SEMailAuthUserName : String
    Variable : SEMailAuthPasswd : String
    Variable : SEToMailId : String
    Variable : SEMailUseSSL : Logical
    Variable : SEMailUseSSLOnStdPort : Logical
    Variable : SEMailSubject : String

    007: Set : SVMailFormat : "ASCII (Comma Delimited)"
    014: Set : SVMailEmbedImage : @@AsEmbed

    001: Set : SEMailServerName : "Gmail"
    002: Set : SEMailServer : "smtp.gmail.com:465"
    003: Set : SEMailFromName : "New Company 123"
    004: Set : SEMailFromAddress : "company_email@GMAIL.COM"
    005: Set : SEMailAuthUserName : "company_email@GMAIL.COM"
    006: Set : SEMailAuthPasswd : "password"
    008: Set : SEToMailId : "owner_email@GMAIL.COM"
    009: Set : SEMailUseSSL : Yes
    010: Set : SEMailUseSSLOnStdPort : No
    011: Set : SEMailSubject : $$LocaleString:"ALERT : STOCK ITEM CREATED / ALTERED !!!"

    013: Set : SVMailText : $$LocaleString:"Stock Item has been created / altered. Please approve. ==> "+##SEStkItemName
    200: Set : FullAddress : '"' + ##SEMailFromName + '"<' + ##SEMailFromAddress + ">"
    190: Set : MailFrom : IF $$IsEmpty:##SEMailFromName THEN ##SEMailFromAddress ELSE ##FullAddress
    180: Set : SVPrintFileName : $$MakeMailName:##SEToMailId:##SEMailServer:##FullAddress:##SEMailCC:##SEMailSubject:##SEMailAuthUserName:##SEMailAuthPasswd:##SEMailUseSSL:##SEMailUseSSLOnStdPort


    100: Mail : StkItemCnfReport : TRUE
     


Share This Page