Advertisement
mnakos

S1Workshop-DoSendMail3

Oct 5th, 2017
212
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. function ON_POST() {
  2.     if ( (SALDOC.FINSTATES == 100) && (SALDOC.TFPRMS == 201) )
  3.         SendEmail();
  4. }
  5.  
  6. function SendEmail() {
  7.     strTO = SALDOC.TRDR_CUSTOMER_EMAIL
  8.     strCC = '';
  9.     strBCC = '';
  10.     strSubject = 'Η παραγγελία ολοκληρώθηκε';
  11.     strBodyPlain = 'Η παραγγελία ολοκληρώθηκε'
  12.     strBodyHTML = 'Η παραγγελία ολοκληρώθηκε'
  13.                                 +'<br><br><b>Κωδικός:</b> '+SALDOC.FINCODE
  14.                                 +'<br><br><b>Πελάτης:</b> '+SALDOC.TRDR_CUSTOMER_NAME
  15.                                 +'<br><br><b>Σχόλια:</b> ' +SALDOC.COMMENTS
  16.                                 +'<br><br><b>Συν.Αξία:</b> ' +SALDOC.SUMAMNT;
  17.     strFromName = 'SoftOne ERP';
  18.     strAttachment = '';
  19.     vEmailAccount = 9001; //Sets the email account
  20.     X.EXEC('CODE:SysRequest.doSendMail3', strTO, strCC, strBCC, strSubject, strBodyPlain, strBodyHTML, strAttachment, strFromName, vEmailAccount);
  21. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement