Thanks for the tip Carl. I'll have to keep that in mind going forward. As we only have one company, I tend to leave that out, though I know it's good practice.
Thanks again.
Thanks again.
--- In vantage@yahoogroups.com, "Carl Peterson" <cpeterson@...> wrote:
>
>
>
> From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf Of
> bobschnable
> Sent: Friday, August 05, 2011 11:05 AM
> To: vantage@yahoogroups.com
> Subject: [Vantage] Re: BPM to stop the receiving of unapproved/held/pending
> Purchase Orders
>
> Bob:
>
> This looks good but I would suggest that you use the company field to
> connect files for performance and integrity.
>
> Carl Peterson
> Nexus Software, Inc.
>
> FIND FIRST ttRcvHead WHERE ttRcvHead.RowMod = "A" NO-LOCK NO-ERROR.
> FIND FIRST POHeader where POHeader.company = ttRcvHead.company and
> POHeader.poNum = ttRcvHead.poNum NO-LOCK NO-ERROR.
> /*IF POHeader.ApprovalStatus <> "A" THEN*/
> Case POHeader.ApprovalStatus:
> WHEN "U" THEN
> {Lib/PublishEx.i &ExMsg = "'PO has not been submitted for approval. Please
> submit for approval before receiving PO.'"}
> WHEN "P" THEN
> {Lib/PublishEx.i &ExMsg = "'PO has not been approved. Please approve PO
> before receiving.'"}
> WHEN "R" THEN
> {Lib/PublishEx.i &ExMsg = "'PO has been rejected. PO cannot be received.'"}
> END CASE.
>
>
> Hi Guys,
>
> I came up with this BPM to prevent the receipt of PO's when on
> hold/unapproved/rejected. I applied the code to the Receipt business object,
> on the GetPOInfo method.
>
> FIND FIRST ttRcvHead WHERE ttRcvHead.RowMod = "A" NO-LOCK NO-ERROR.
> FIND FIRST POHeader where POHeader.poNum = poNum NO-LOCK NO-ERROR.
> /*IF POHeader.ApprovalStatus <> "A" THEN*/
> Case POHeader.ApprovalStatus:
> WHEN "U" THEN
> {Lib/PublishEx.i &ExMsg = "'PO has not been submitted for approval. Please
> submit for approval before receiving PO.'"}
> WHEN "P" THEN
> {Lib/PublishEx.i &ExMsg = "'PO has not been approved. Please approve PO
> before receiving.'"}
> WHEN "R" THEN
> {Lib/PublishEx.i &ExMsg = "'PO has been rejected. PO cannot be received.'"}
> END CASE.
>
> Let me know if you have any questions.
>
> Bob
>
> --- In vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com> , "Brian
> Roberts" <broberts@> wrote:
> >
> > I would also like a BPM that does this, but am having trouble making
> > one.
> >
> >
> >
> > I experimented with adding a BPM on Receipt.GetDtlPOLineInfo
> > pre-processing that does this:
> >
> >
> >
> > FOR EACH ttRcvDtl WHERE (ttRcvDtl.RowMod = "A" or ttRcvDtl.RowMod =
> > "U"):
> >
> > FIND FIRST POHeader WHERE POHeader.Company = CUR-COMP AND POHeader.PONum
> > = ttRcvDtl.PONum AND POHeader.ApprovalStatus = "U" NO-LOCK NO-ERROR.
> >
> > IF AVAILABLE POHeader THEN DO:
> >
> > {lib\PublishInfoMsg.i &infoMsg = "'PO ' + string(ttRcvDtl.PONum) + '
> > is not approved. Do you have the correct PO number?'"}
> >
> > {&THROW_PUBLIC}.
> >
> > END.
> >
> > END.
> >
> >
> >
> > This works if "new stock line" is chosen, but that method doesn't get
> > called if a mass receipt is done. Its also later in the process that I
> > want - should be able to check on the receipt header, instead of waiting
> > for the detail line to get created. I'm currently looking for a better
> > method, but a trace didn't point out an obvious method.
> >
> >
> >
> > Brian.
> >
> >
> >
> > ________________________________
> >
> > From: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
> [mailto:vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com> ] On
> Behalf
> > Of Bethany Rye
> > Sent: Thursday, August 04, 2011 4:18 PM
> > To: vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com>
> > Subject: [Vantage] BPM to stop the receiving of unapproved/held/pending
> > Purchase Orders
> >
> >
> >
> >
> >
> > Does anyone have a BPM written to stop your receiving department from
> > receiving in parts that are on a purchase order that is unapproved/on
> > hold/pending that they would be willing to share with me? I would
> > greatly
> > appreciate the help!
> >
> > Beth
> >
> > Beth Rye
> >
> > IT Director
> >
> > CIGNYS
> > 68 Williamson Street
> > Saginaw, Michigan 48601
> >
> > Phone: (989) 753-1411 ext. 1114
> >
> > Direct Line: (989) 393-0108
> >
> > Fax: (989) 393-0208
> >
> > Email: <mailto:brye@ <mailto:brye%40cignys.com> >
> > brye@ <mailto:brye%40cignys.com>
> >
> > ***ITAR NOTICE***
> >
> > This e-mail and/or the attached documents may contain technical data
> > within
> > the definition of the International Traffic in Arms regulations, and are
> > subject to the export control laws of the US Government. Transfer of
> > this
> > data by any means to a foreign person, whether in the US or abroad,
> > without
> > an export license or other approval from the US Department of State, is
> > prohibited. No portion of this e-mail or its attachment(s) may be
> > reproduced
> > without written consent of CIGNYS. If you are not the intended recipient
> > or
> > believe that you may have received this document in error, please notify
> > the
> > sender and delete this e-mail and any attachments immediately.
> >
> > [Non-text portions of this message have been removed]
> >
> >
> > <http://geo.yahoo.com/serv?s=97359714/grpId=20369/grpspId=1705007181/msg
> > Id=102870/stime=1312489102/nc1=3848583/nc2=3848640/nc3=4836036>
> >
> >
> >
> >
> >
> > [Non-text portions of this message have been removed]
> >
>
> _____
>
> No virus found in this message.
> Checked by AVG - www.avg.com
> Version: 10.0.1390 / Virus Database: 1518/3807 - Release Date: 08/03/11
>
>
> [Non-text portions of this message have been removed]
>