Hi Nathan,
There's a sample .p alert program (for use with a BAM):
\\<server>\epicor\mfgsys803\server\ud\test\RunBOThru4GL.p
I only found it recently and haven't managed to look at it properly yet. If you can get it working, you should be able to call the Quote.GetNewQSalesRP method from 4GL code.
If you do look at it and have any success, you might post your results back here.
Nigel.
There's a sample .p alert program (for use with a BAM):
\\<server>\epicor\mfgsys803\server\ud\test\RunBOThru4GL.p
I only found it recently and haven't managed to look at it properly yet. If you can get it working, you should be able to call the Quote.GetNewQSalesRP method from 4GL code.
If you do look at it and have any success, you might post your results back here.
Nigel.
--- In vantage@yahoogroups.com, "bonner.nathan" <bonner.n@...> wrote:
>
> Alison,
>
> I am not set on using the BPM and would love to hear what has worked for you.
>
> BPM Experts,
>
> Since the "Create" operator seems to be a dead end, do you know if there is a way to call another method from within a BPM? For example, I want to use a post-process BPM on the Quote.Update method to call the Quote.GetNewQSalesRP method.
>
> Thanks,
>
> NB
>
> --- In vantage@yahoogroups.com, Alison Levy <alevy@> wrote:
> >
> > Are you set on doing this with BPM? I've done something similar but
> > with a customization (I'm on version 9 though).
> >
> >
> >
> > From: vantage@yahoogroups.com [mailto:vantage@yahoogroups.com] On Behalf
> > Of bonner.nathan
> > Sent: Thursday, June 04, 2009 11:45 AM
> > To: vantage@yahoogroups.com
> > Subject: [Vantage] Re: Create Records with BPM
> >
> >
> >
> >
> >
> >
> >
> >
> > Nigel,
> >
> > Thanks for checking this out. This is not that answer I wanted to hear
> > but it seem consistent with some of the other issues users on this forum
> > are describing.
> >
> > I have put out a few other feelers to some folks at Epicor and will be
> > sure to let you know if they are able to provide a meaningful solution.
> >
> > Best regards,
> >
> > NB
> >
> > --- In vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com> ,
> > "Nigel Kerley" <nigel.kerley@> wrote:
> > >
> > > Hi Nathan,
> > >
> > > I just tried your code and the server log says "Could not create
> > buffer object for table".
> > >
> > > So, I'd say it the same old problem: with the OpenEdge licence you get
> > with Vantage you can't create new table records in 4GL. You can only
> > edit existing ones.
> > >
> > > I'd love to be corrected on this, though. Anyone?
> > >
> > > Maybe you could do something directly in SQL with Triggers?
> > >
> > >
> > > Nigel.
> > >
> > > --- In vantage@yahoogroups.com <mailto:vantage%40yahoogroups.com> ,
> > "bonner.nathan" <bonner.n@> wrote:
> > > >
> > > > Using Vantage 8.03.406A (SQL)
> > > >
> > > > Business Case: TPI has both inside and outside sales reps assigned
> > to most customer accounts. We would like both reps to appear on the
> > QSalesRP for Quotes. The Inside Sales Rep is brought over naturally from
> > the customer record on either the Quote.Update method or the
> > Quote.GetCustomerInfo method.
> > > >
> > > > Technical Approach: Have tried both Pre-Process and Post-Process
> > Actions on the Quote.Update and Quote.GetCustomerInfo methods.
> > > >
> > > > Current Script:
> > > >
> > > > For Each ttQuoteHed where (ttQuoteHed.RowMod = 'A' or
> > ttQuoteHed.RowMod = 'U' or ttQuoteHed.RowMod = ''), each Customer where
> > (ttQuoteHed.Company = Customer.Company and ttQuoteHed.CustNum =
> > Customer.CustNum) no-lock.
> > > >
> > > > Find SalesRep where (Customer.Company = SalesRep.Company and
> > Customer.ShortChar03 = SalesRep.SalesRepCode) No-lock.
> > > >
> > > > If available SalesRep then do:
> > > >
> > > > /*Create ttQSalesRp where (ttQSalesRP.Company = ttQuoteHed.Company
> > and ttQSalesRP.QuoteNum = ttQuoteHed.QuoteNum) no-lock.*/
> > > >
> > > > /*Create ttQSalesRP no-lock.*/
> > > >
> > > > /*Assign ttQSalesRP.SalesRepCode = SalesRep.SalesRepCode. */
> > > >
> > > > /*Assign ttQSalesRP.Name = SalesRep.Name.*/
> > > >
> > > > /*End.*/
> > > >
> > > > Def var wkhandle as handle no-undo.
> > > > def var wktable as char no-undo.
> > > >
> > > > /*create buffer for table - provided at runtime*/
> > > > create buffer wkhandle for table(wktable).
> > > > /*create buffer wkhandle for table(ttQSalesRP).*/
> > > >
> > > > do transaction:
> > > > /*create record*/
> > > > wkhandle:buffer-create().
> > > >
> > > > /* assign value to a field*/
> > > > wkhandle:buffer-field(ttQSalesRP.Company):buffer-value = CUR-COMP.
> > > >
> > > > Assign ttQSalesRP.ChangeDate = TODAY.
> > > >
> > > > Assign ttQSalesRP.ChangedBy = DCD-USERID.
> > > >
> > > > Assign ttQSalesRP.Name = SalesRep.Name.
> > > >
> > > > Assign ttQSalesRP.PrimeRep = FALSE.
> > > >
> > > > Assign ttQSalesRP.QuoteNum = ttQuoteHed.QuoteNum.
> > > >
> > > > Assign ttQSalesRP.RepRate = 0.
> > > >
> > > > Assign ttQSalesRP.RepSplit = 0.
> > > >
> > > > Assign ttQSalesRP.RoleCode = SalesRep.RoleCode.
> > > >
> > > > Assign ttQSalesRP.SalesRepCode = SalesRep.SalesRepCode.
> > > >
> > > > end.
> > > >
> > > > End.
> > > >
> > > > If not available SalesRep then return.
> > > >
> > > > End.
> > > >
> > > >
> > > > Problem: Script passes Validation but will not trigger when the
> > method is called.
> > > >
> > > > Any and all suggestions welcome.
> > > >
> > > > Thank you,
> > > >
> > > > Nathan Bonner
> > > > Business Systems Analyst
> > > > Total Plastics, Inc.
> > > > bonner.n@
> > > > 269.553.5838
> > > >
> > >
> >
> >
> >
> >
> >
> > [Non-text portions of this message have been removed]
> >
>