any idea for how to copy the order from OE and insert as a new order??

[kent01142]

i have no idea what's wrong with my code

first .read the value from table and put them into Dim and then adsOEORDD.cancel
adsOERODD.init

after that insert value into adsOEORDH and adsOEORDD

the result is I can insert the value into header but cannot insert into details

so what's wrong with it?

 

[ettienne]

How long is a piece of string?
You're going to have to be more specific than that....

 

[kent01142]

my code is something like this

Dim data as string
Dim data2 as string
.
.
.
Dim LINE as Long
Dim NUMOFLINE as string

NUMOFLINE = adsOEORDH.fields("ORDLINES")


data = adsOEORDH.fields("CUSTOMER").value
data2 = adsOEORDD.fiedls("ITEM").value

for LINE =1 to NUMOFLINE

adsOEORDD.fields("ITEM")= data2
.
.
.

adsOEORDD.cancel
adsOEORDH.cancel

with adsOEORDD
.RecordClear
.RecordGenerate False
.fields("ITEM").value = data2
.
.
.
.
.insert
end with
next line


with adsOEORDH
.init
.fields("ORDNUMBER").value = newOrderNO
adsOEORDD.cancel

.fields("CUSTOMER").value = data
end with

adsOEORDD.read
adsOEORDH.insert

 

[ettienne]

Um, how about OE Transactions, Copy Orders?

 

[kent01142]

thanks mate for reply but I have no idea of it... sorry about that

Im thinking about is it because when I .read the OEORDD, so OEORDD become a read only view and related to the old ORDUNIQ, so I can't write into the view?

if yes, how can I release the view?

 

[Jay Converse]

Use two sets of views, one read-only, one read-write.

 

[kent01142]

OK, so I need to set a new datasource as dsOEORDD?
as Im going to store those data back to OE table

 

[Jay Converse]

Yes, plus the other 6 views in the standard OEORDD composition.

 

[kent01142]

it is really a big idea for me, cheers

so let say I created the dsOEORDD, read those data from adsOEORDD and insert into dsOEORDD?

 

[Jay Converse]

Yes.

 

[kent01142]

thanks for help

I also confuse about should I really need string to store those data and insert back to table or I just need adsOEORDD.read and dsOEORDD.insert?

 

[Jay Converse]

No, not even close. It's more like this:

If OEOrderDetail2.Fields("LINETYPE") = 2 Then
OEOrderDetail2.Fields("MISCCHARGE") = OEOrderDetail.Fields("MISCCHARGE")
OEOrderDetail2.Fields("DESC") = OEOrderDetail.Fields("DESC")
OEOrderDetail2.Fields("EXTINVMISC") = OEOrderDetail.Fields("EXTINVMISC")
Else
OEOrderDetail2.Fields("ITEM") = OEOrderDetail.Fields("ITEM")
OEOrderDetail2.Fields("DESC") = OEOrderDetail.Fields("DESC")
OEOrderDetail2.Fields("LOCATION") = OEOrderDetail.Fields("LOCATION")
OEOrderDetail2.Fields("QTYORDERED") = OEOrderDetail.Fields("QTYORDERED")
OEOrderDetail2.Fields("ORDUNIT") = OEOrderDetail.Fields("ORDUNIT")
OEOrderDetail2.Fields("UNITCOST") = OEOrderDetail.Fields("UNITCOST")
OEOrderDetail2.Fields("UNITWEIGHT") = OEOrderDetail.Fields("UNITWEIGHT")
OEOrderDetail2.Fields("EXPDATE") = OEOrderDetail.Fields("EXPDATE")
OEOrderDetail2.Fields("PRIUNTPRC") = OEOrderDetail.Fields("PRIUNTPRC")
OEOrderDetail2.Fields("PICKSEQ") = OEOrderDetail.Fields("PICKSEQ")
End If

 

[kent01142]

I created the dsOEORDD and dsOEORDH, but when I cannot insert value into the table, so should I need to set it as write-able??

 

[ettienne]

You're so far off course that's it's not even funny.
First off you do not even say which Accpac version you are working with.
Start with recording a macro while you enter an OE order, you will get all the views that need to be opened and composed.
You need 2 complete sets of OE views opened, 1 set to read the source order and another set to create the new copy.

 

[kent01142]

sorry for the missed information but this problem is already fixed

but now what i found another problem after I success to copy the order.

when I create a new order and insert value into the detail in the UI, I got the error message

" Description: Internal error. Order Detail. Operation not allowed. "

so what's wrong with it?

accpac ver is 6.0a and sdk is 5.4a

 

[ettienne]

You're doing something that is not allowed, like writing to a read only field.

 

[Jay Converse]

Or your compositions are wrong.