Amy,
You can customize your own messages by using a .p program. Create
a .p program in your mfgsys80\server\ud directory, and point to that
under the "Alert Program" (reference "ud\Program.p" in that field).
We use the following program when fields have changed on the part
master to kick off an email showing old/new data.
Hope this helps.
Kevin
******* START OF PROGRAM ********
{ud/GlbAlert.i &TableName = "Part"}
DEFINE VARIABLE Email1 AS CHARACTER NO-UNDO.
DEFINE VARIABLE Email2 AS CHARACTER NO-UNDO.
DEFINE VARIABLE Email3 AS CHARACTER NO-UNDO.
DEFINE VARIABLE Email4 AS CHARACTER NO-UNDO.
/* Create the new body of the email */
ASSIGN Email-Subject = 'Vantage Part Change: Weight/Factor'.
Email1 = "Part " + String(Part.PartNum) + " (" + Part.SearchWord
+ ") has changed." .
IF OLDPart.NetWeight = Part.NetWeight THEN DO:
Email2 = "~n~tNet weight has not changed: " + STRING
(Part.NetWeight).
END.
ELSE DO:
Email2 = "~n~tNet weight has changed from " + STRING
(OLDPart.NetWeight) + " to " + STRING(Part.NetWeight).
END.
IF OLDPart.SalesUM = Part.SalesUM THEN DO:
Email3 = "~n~tSales U/M has not changed: " + STRING
(Part.SalesUM).
END.
ELSE DO:
Email3 = "~n~tSales U/M has changed from " + STRING
(OLDPart.SalesUM) + " to " + STRING(Part.SalesUM).
END.
IF OLDPart.SellingFactor = Part.SellingFactor THEN DO:
Email4 = "~n~tSelling Factor has not changed: " + STRING
(Part.SellingFactor).
END.
ELSE DO:
Email4 = "~n~tSelling Factor has changed from " + STRING
(OLDPart.SellingFactor) + " to " + STRING(Part.SellingFactor).
END.
Email-Text = Email1 + Email2 + Email3 + Email4.
******* END OF PROGRAM ********
You can customize your own messages by using a .p program. Create
a .p program in your mfgsys80\server\ud directory, and point to that
under the "Alert Program" (reference "ud\Program.p" in that field).
We use the following program when fields have changed on the part
master to kick off an email showing old/new data.
Hope this helps.
Kevin
******* START OF PROGRAM ********
{ud/GlbAlert.i &TableName = "Part"}
DEFINE VARIABLE Email1 AS CHARACTER NO-UNDO.
DEFINE VARIABLE Email2 AS CHARACTER NO-UNDO.
DEFINE VARIABLE Email3 AS CHARACTER NO-UNDO.
DEFINE VARIABLE Email4 AS CHARACTER NO-UNDO.
/* Create the new body of the email */
ASSIGN Email-Subject = 'Vantage Part Change: Weight/Factor'.
Email1 = "Part " + String(Part.PartNum) + " (" + Part.SearchWord
+ ") has changed." .
IF OLDPart.NetWeight = Part.NetWeight THEN DO:
Email2 = "~n~tNet weight has not changed: " + STRING
(Part.NetWeight).
END.
ELSE DO:
Email2 = "~n~tNet weight has changed from " + STRING
(OLDPart.NetWeight) + " to " + STRING(Part.NetWeight).
END.
IF OLDPart.SalesUM = Part.SalesUM THEN DO:
Email3 = "~n~tSales U/M has not changed: " + STRING
(Part.SalesUM).
END.
ELSE DO:
Email3 = "~n~tSales U/M has changed from " + STRING
(OLDPart.SalesUM) + " to " + STRING(Part.SalesUM).
END.
IF OLDPart.SellingFactor = Part.SellingFactor THEN DO:
Email4 = "~n~tSelling Factor has not changed: " + STRING
(Part.SellingFactor).
END.
ELSE DO:
Email4 = "~n~tSelling Factor has changed from " + STRING
(OLDPart.SellingFactor) + " to " + STRING(Part.SellingFactor).
END.
Email-Text = Email1 + Email2 + Email3 + Email4.
******* END OF PROGRAM ********
--- In vantage@yahoogroups.com, "cpsadp" <cpsadp@...> wrote:
>
> Hi,
>
> I created a BAM to note changes to certain fields within parts.
The
> global alert works, an email goes out. But the text of the email
> included ONLY the changes that were made, NOT the part on which
the
> changes were made. I thought I could fix this by checking the
Include
> Link box, but no link goes out in the email. Am I missing
> something?? The help file says this about that box:
>
> Include Link
> When selected, this check box causes a hyperlink to be created
inside
> the alert message. When users click on this link, the record that
> caused the alert automatically appears within its appropriate
entry
> program.
>
> So should I not be getting a link? I'm new to the BAM thing, so
maybe
> I'm missing something. Anyone tried this?
>
> Amy
>