BPM for Transfer Order Receipts

Dale,

Thanks for the advice, I'll get working on it now and let you know if it worked.

Best,

Michelle de la Vega
Business Applications Manager
Cold Jet, LLC
455 Wards Corner Road
Loveland, Ohio 45140
USA
+1 513-716-6400 (office)
+1 513-382-3281 (mobile)
+1 513-831-1209 (fax)
www.coldjet.com<http://www.coldjet.com>
[cid:image001.jpg@01CA8321.10E12370]

From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf Of Dale Schuerman
Sent: Tuesday, December 22, 2009 3:35 PM
To: vantage@yahoogroups.com
Subject: RE: [Vantage] BPM for Transfer Order Receipts



Here are a couple things to try.

1. Add "or ttTFShipDtl.RowMod = 'U' " to the Find First
ttTFShipDtl.

Depending on the Business Object the RowMod may be a "U"

2. Do a Find First on the PlantWhse

This should not happen but if there are multiple records that match the
where clause a Find will fail.

Dale E. Schuerman

Senior Consultant

Epicor Certified Consulting Partner

RAM Software Systems, Inc.

972-669-0763 x233 (voice)

972-669-9603 (fax)

mailto:dale.schuerman@...<mailto:dale.schuerman%40ramsys.com>
<BLOCKED::blocked::mailto:dale.schuerman@...<mailto:dale.schuerman%40ramsys.com>> (email)

http://www.ramsys.com <BLOCKED::blocked::http://www.ramsys.com/>
(website)

From: vantage@yahoogroups.com<mailto:vantage%40yahoogroups.com> [mailto:vantage@yahoogroups.com<mailto:vantage%40yahoogroups.com>] On Behalf
Of Michelle de la Vega
Sent: Tuesday, December 22, 2009 1:52 PM
To: vantage@yahoogroups.com<mailto:vantage%40yahoogroups.com>
Subject: [Vantage] BPM for Transfer Order Receipts

I am trying to write a 4GL BPM to assign the primary bin location to the
transfer order receipts. Currently, the primary bin does not default on
transfer orders so instead of looking up each line one at a time, I'm
trying to auto assign the bin. However, it doesn't seem to be working...

Here is my pre-processing code:

Find first ttTFShipDtl where ttTFShipDtl.RowMod = 'A' NO-LOCK NO-ERROR.
If available ttTFShipDtl then do:

DEFINE VARIABLE BIN AS Character NO-UNDO.

BIN=''.

Find PlantWhse WHERE ttTFShipDtl.Company = PlantWhse.Company AND
ttTFShipDtl.PartNum = PlantWhse.partnum and ttTFShipDtl.WarehouseCode =
PlantWhse.WarehouseCode and plantwhse.plant = CUR-PLANT NO-LOCK
NO-ERROR.

if available PlantWhse then do:
BIN = Plantwhse.PrimBin.

Assign ttTFShipDtl.BinNum = BIN.
end.
end.

If anyone has any ideas I would greatly appreciate it.

Thanks,

Michelle de la Vega
Business Applications Manager
Cold Jet, LLC
455 Wards Corner Road
Loveland, Ohio 45140
USA
+1 513-716-6400 (office)
+1 513-382-3281 (mobile)
+1 513-831-1209 (fax)
www.coldjet.com<http://www.coldjet.com>
[cid:image001.jpg@01CA8316.443E6760<mailto:image001.jpg%4001CA8316.443E6760>
<mailto:image001.jpg%4001CA8316.443E6760> ]

[Non-text portions of this message have been removed]

########################################################################
Attention:
This email message is privileged and confidential. If you are not the
intended recipient please delete the message and notify the sender.
Any views or opinions presented are solely those of the author.

This email message has been scanned for Viruses and Content and cleared
by MailMarshal SMTP

For more information go to http://www.ramsys.com
########################################################################

[Non-text portions of this message have been removed]



[Non-text portions of this message have been removed]
I am trying to write a 4GL BPM to assign the primary bin location to the transfer order receipts. Currently, the primary bin does not default on transfer orders so instead of looking up each line one at a time, I'm trying to auto assign the bin. However, it doesn't seem to be working...

Here is my pre-processing code:

Find first ttTFShipDtl where ttTFShipDtl.RowMod = 'A' NO-LOCK NO-ERROR.
If available ttTFShipDtl then do:

DEFINE VARIABLE BIN AS Character NO-UNDO.

BIN=''.

Find PlantWhse WHERE ttTFShipDtl.Company = PlantWhse.Company AND ttTFShipDtl.PartNum = PlantWhse.partnum and ttTFShipDtl.WarehouseCode = PlantWhse.WarehouseCode and plantwhse.plant = CUR-PLANT NO-LOCK NO-ERROR.

if available PlantWhse then do:
BIN = Plantwhse.PrimBin.

Assign ttTFShipDtl.BinNum = BIN.
end.
end.

If anyone has any ideas I would greatly appreciate it.

Thanks,

Michelle de la Vega
Business Applications Manager
Cold Jet, LLC
455 Wards Corner Road
Loveland, Ohio 45140
USA
+1 513-716-6400 (office)
+1 513-382-3281 (mobile)
+1 513-831-1209 (fax)
www.coldjet.com<http://www.coldjet.com>
[cid:image001.jpg@01CA8316.443E6760]



[Non-text portions of this message have been removed]
Here are a couple things to try.

1. Add "or ttTFShipDtl.RowMod = 'U' " to the Find First
ttTFShipDtl.

Depending on the Business Object the RowMod may be a "U"

2. Do a Find First on the PlantWhse

This should not happen but if there are multiple records that match the
where clause a Find will fail.





Dale E. Schuerman

Senior Consultant

Epicor Certified Consulting Partner



RAM Software Systems, Inc.

972-669-0763 x233 (voice)

972-669-9603 (fax)

mailto:dale.schuerman@...
<BLOCKED::blocked::mailto:dale.schuerman@...> (email)

http://www.ramsys.com <BLOCKED::blocked::http://www.ramsys.com/>
(website)





From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
Of Michelle de la Vega
Sent: Tuesday, December 22, 2009 1:52 PM
To: vantage@yahoogroups.com
Subject: [Vantage] BPM for Transfer Order Receipts





I am trying to write a 4GL BPM to assign the primary bin location to the
transfer order receipts. Currently, the primary bin does not default on
transfer orders so instead of looking up each line one at a time, I'm
trying to auto assign the bin. However, it doesn't seem to be working...

Here is my pre-processing code:

Find first ttTFShipDtl where ttTFShipDtl.RowMod = 'A' NO-LOCK NO-ERROR.
If available ttTFShipDtl then do:

DEFINE VARIABLE BIN AS Character NO-UNDO.

BIN=''.

Find PlantWhse WHERE ttTFShipDtl.Company = PlantWhse.Company AND
ttTFShipDtl.PartNum = PlantWhse.partnum and ttTFShipDtl.WarehouseCode =
PlantWhse.WarehouseCode and plantwhse.plant = CUR-PLANT NO-LOCK
NO-ERROR.

if available PlantWhse then do:
BIN = Plantwhse.PrimBin.

Assign ttTFShipDtl.BinNum = BIN.
end.
end.

If anyone has any ideas I would greatly appreciate it.

Thanks,

Michelle de la Vega
Business Applications Manager
Cold Jet, LLC
455 Wards Corner Road
Loveland, Ohio 45140
USA
+1 513-716-6400 (office)
+1 513-382-3281 (mobile)
+1 513-831-1209 (fax)
www.coldjet.com<http://www.coldjet.com>
[cid:image001.jpg@01CA8316.443E6760
<mailto:image001.jpg%4001CA8316.443E6760> ]

[Non-text portions of this message have been removed]




########################################################################
Attention:
This email message is privileged and confidential. If you are not the
intended recipient please delete the message and notify the sender.
Any views or opinions presented are solely those of the author.

This email message has been scanned for Viruses and Content and cleared
by MailMarshal SMTP

For more information go to http://www.ramsys.com
########################################################################


[Non-text portions of this message have been removed]