We do not have an Internal exchange server to have email notifications from workflows. Anyone know o

We just found out from infor that an internal Microsoft exchange server is required to get message notifications. We are a small company and a internal exchange server is just not feasible for our company. We were wondering if anyone else had the same issue and if they were able to figure out a work around that would shoot out email notifications.

Find more posts tagged with

VISUAL - Enterprise General Discussions

Comments

Legacy Contributor

Yes, we use macro entry in customer order entry and the manufacturing window, and a workflow on part maintenance.

Legacy Contributor

If your SQL Server can send emails, then it would be possible for the SQL Server Agent to run a task to send notifications. It would take some pretty complex queries to accomplish this, however.

Legacy Contributor

Patric:

We are thinking of using macros but haven't in the past. We really need to improve efficiency in our use of Visual. What kind of things do you do in customer order entry and manufacturing? How do you make it easy for people to use the macros? What's a good resource to learn how VB works with Visual to automate tasks?

Thanks,

Legacy Contributor

CO Macros
If order shipping from remote WH, e-mail to remaote WH manager.
If ship dates updated on lines of CO, WO Want Dates update automically.
Check lead times of parts and set ship lines accordingly, also check if ship partial allowed.

WO Macros
send email if CO not R status due to credit rating of customer, will not allow R of WO

This just "some" of the macros. There are several types - on-save, on-load, on-after save, and user activiated. So first determine desired result, then back into the macro type.

Legacy Contributor

Would it be too much to ask for the code for these macros? Especially auto-update WO Want Date when the CO line date is changed. That's EXACTLY what I've been thinking about as I go in line-by-line to update WO's...

Is there a source for macro code for Visual?

[Updated on 1/16/2013 5:33 PM]

Legacy Contributor

Dim OrderLines
Dim OrderLine
Dim i
Dim rs
Dim SQL
Dim CONN
Dim Oline
Dim Line_Des_Ship_Date
Dim OBASE_ID
Dim OLOT_ID
Dim OSPLIT_ID
Dim OSUB_ID
Dim WO_DES_DATE

CONN= "Provider=OraOLEDB.Oracle;Data Source=cdata;User ID=sysadm;Password=etcetera;"

oORDER_MSG = ""

'Line Processing
Set OrderLines = LINES.VALUE
i = 0

While i
Set OrderLine = OrderLines(i).VALUE

If iShipped_Qty = 0 Then

Oline= OrderLine("LINE_NO")
Line_Des_Ship_Date=OrderLine("DESIRED_SHIP_DATE")
WO_DES_DATE = DESIRED_SHIP_DATE
If Line_Des_Ship_Date <> "" then
WO_DES_DATE = Line_Des_Ship_Date
End If
Set rs=CreateObject("ADODB.Recordset")
SQL= "SELECT SUPPLY_BASE_ID, SUPPLY_LOT_ID, SUPPLY_SPLIT_ID, SUPPLY_SUB_ID FROM DEMAND_SUPPLY_LINK WHERE DEMAND_BASE_ID='" & ORDER_ID & "' AND DEMAND_SEQ_NO='" & Oline & "' AND RECEIVED_QTY=0 AND ISSUED_QTY=0"
rs.Open SQL, CONN
If Not rs.EOF Then
OBASE_ID= rs.Fields("SUPPLY_BASE_ID")
OLOT_ID= rs.Fields("SUPPLY_LOT_ID")
OSPLIT_ID= rs.Fields("SUPPLY_SPLIT_ID")
OSUB_ID= rs.Fields("SUPPLY_SUB_ID")

rs.close
Set rs = Nothing
Set rs=CreateObject("ADODB.Recordset")
SQL= "UPDATE WORK_ORDER SET DESIRED_WANT_DATE = to_date('" & WO_DES_DATE & "','mm/dd/yy') WHERE TYPE='W' AND BASE_ID = '" & OBASE_ID & "' AND LOT_ID = '" & OLOT_ID & "' AND SPLIT_ID = '" & OSPLIT_ID & "' AND SUB_ID = '" & OSUB_ID & "'"
rs.Open SQL, CONN
Else
rs.close
End If

' MsgBox SQL, vbInformation

'
Set rs = Nothing

eND IF
i = i + 1
Set OrderLine = Nothing
Wend

Set OrderLine = Nothing
Set OrderLines = Nothing

Copyright © 2025 Infor. All rights reserved.