Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations biv343 on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Creating an order from a quote 2

Status
Not open for further replies.

johnny9864

Programmer
Sep 27, 2013
35
CA
I created a UI using Microsoft .NET and ACCPAC .NET libraries to create orders outside of ACCPAC's environment for a customer that had special needs. All works perfectly but I cannot find how to create an order starting from a quote. In ACCPAC UI it seems that they simply leave the values there and create a "***NEW***" order from that but there is other things happening in the background. recording a macro didn't help, there seems to be steps missing.

Did anybody try that (and hopefully succeeded [smile]?)
 
Try recording another macro. Look for OECOMMAND being set to 11. View OE0526 is designed to facilitate what you're looking for so make sure that you watch it in the macro.
 

Good morning DjangMan, I tried to record a macro changing a quote to an order and as usual in ACCPAC pretty much nothing was recorded. So I still have no clue what to do. Do you have any pointers if you had experience doing that before. Should I fill view 526 with the relations between the quote and a new order myself before processing before processing the quote with value 11 ?
 
My guess is that the screen is allowing the UI to do part of the work.

Change the type field to Active and the OrdNumber to "*** NEW ***" and .Insert.

This seemed to work:
Code:
!!! composition code left out

OEORD1headerFields("DRIVENBYUI").Value = "1"                          ' Driven by UI
OEORD1header.Cancel
OEORD1header.Init

OEORD1headerFields("ORDNUMBER").Value = "QT0000000000002"             ' Order Number
OEORD1header.Order = 1
OEORD1header.Read
OEORD1header.Order = 0

OEORD1header.Fields("TYPE").Value = 1

OEORD1header.Insert

MsgBox OEORD1headerFields("ORDNUMBER").Value
 
You know I would have never thought of trying something so simple ! :)

I'll surely try that tomorrow morning and see what it does.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top