SeanHoppe.com › Code Samples › Add Messages to EXTOL Connection Message Queue
Formula: Using ADDMSGTXT to add messages to EXTOL Connection Message Queue
There are times when when certain error messages/notifications need to be captured; Creating a new table is not an option and using the inbound/outbound data logs is not an option . Using EXTOL formulas allow us to add messages to the EXTOL Connection MSGQ.
In our example we will use an inbound EXTOL map to apply logic to use EXTOL's Command ADDMSGTXT. We are chaining-out to JD Edwards F4104 (item cross reference file). If there is no value return (SZITM is null) then we execute ADDMSGTXT.
V:= C || D,if a = b then [ADDMSGTXT MSG('Missing Item: TP:&F STORE ID:&G PO#:&H
MSG ID:&I MSGREF:&J ITEM LINE #:&K ITEM NUMBER:&L') TOMSGQ(&V)]
ELSE a
ENDIF
Parameters:
@ - SZITM (Field in JD Edwards for short item number)A - IZITM (Field from EFL file - F4104 / Zoned Length:8)
B - *BLANK (Zoned Length:1 Digit:1 Dec: 0)
C - 'C' (Constant)
D - S1 (Session Log number / Alpha 7)
F - TP (Alpha 6)
G - WWAN8 (Field from EFL file - F0111 / Zoned Length:8)
H - D0 (BEG03 -- PO Number)
I - M0 (Alpha 5)
J - M1 (Zoned 11)
K - SC (Segment Counter -- attached to PO1)
L - D0 (PO107)
V - *BLANK (Alpha 8)
By: Sean Hoppe on
