PostWrite on the Details table happens during line data entry.  If you want to have it only run when saving an order, switch it to a Header trigger, and loop through lines.

Thanks Kevin, it sounds like your solution is what I'm looking for! Will I still be able to use my

 set oItem = oSession.AsObject(oSession.GetObject("CI_ItemCode_bus")) line inside of oLines? 

You will have to retrieve the object handle via the oLines object, something like:

Set oLines = oSession.AsObject(oBusObj.Lines)

Set oItem = oSession.AsObject(oLines.GetChildHandle("ITEMCODE"))

I'm not sure your logic above would have worked as it is in your example.

But once you have the oItem above you should be able to use it for your GetValue() of the ProductLine.

Thanks

Elliott

You will have to retrieve the object handle via the oLines object, something like:

Set oLines = oSession.AsObject(oBusObj.Lines)

Set oItem = oSession.AsObject(oLines.GetChildHandle("ITEMCODE"))

I'm not sure your logic above would have worked as it is in your example.

But once you have the oItem above you should be able to use it for your GetValue() of the ProductLine.

Thanks

Elliott

I feel I am very close, Thanks for all the help.  Right now, this writes to my table perfectly with the two below lines commented out. However, I get an error when uncommenting those two lines. Does this have to do with the fact that the one that works is changing the Key, and the other is changing a non-key value? The error is: "Cannot use parentheses when calling a Sub" 

Here is the code in question: 

Set oLines = oBusobj.AsObject(oBusObj.Lines)
oLines.MoveFirst()
do Until cBool(oLines.EOF)
Set oItem = oSession.AsObject(oLines.GetChildHandle("ITEMCODE"))
retVal = oItem.GetValue("ProductLine$", pLine)
'retVal = oItem.GetValue("QuantityOrdered", Qty)
resul = oCap.SetKey(SP + Pline)
'oCap.SetValue("UDF_Current_qty", Qty)
oCap.Write()
retVal = oLines.MoveNext()
Loop

QuantityOrdered needs to come from oLines, not oItem.

Thanks, now when I uncomment the first commented line there is no error, but I still receive the same error when I uncomment the second commented line. 

I have: 

Set oLines = oBusobj.AsObject(oBusObj.Lines)
oLines.MoveFirst()
do Until cBool(oLines.EOF)
Set oItem = oSession.AsObject(oLines.GetChildHandle("ITEMCODE"))
retVal = oItem.GetValue("ProductLine$", pLine)
retVals = oLines.GetValue("QuantityOrdered", Qty)
resul = oCap.SetKey(SP + Pline)
oCap.SetValue("UDF_Current_qty", Qty)
oCap.Write()
retVal = oLines.MoveNext()

and get this error: 

I got it to work by removing the parentheses...duh. Thanks again!

Sorry the developer in me wants to move the 

Set oItem = oSession.AsObject(oLines.GetChildHandle("ItemCode"))

outside of the loop, as you should only need to retrieve the object handle once.

Elliott

RetVal = on that line might have worked too.

Great, thanks. Last questions.... I added the line: 

retVal = oLines.SetValue("Unitprice", 0)

There are no errors, but the script does not change the price on the entry tab. I'm assuming using oLines is correct here, and I'm pretty sure I have the column name correct. 

I have also tried the following: 

retVal = oLines.GetValue("LineKey$", sLineKey)
sEditKey = oLines.GetEditKey(sLineKey)
retVal = oLines.EditLine(sEditKey)
retVal = oLines.SetValue("Unitprice", 0)
oLines.Write()

During research I saw jepritch has some expertise dealing with lines. Hopefully you have can answer this last piece of the puzzle for me?? Thanks again for all the help, it's been extremely helpful and much appreciated!

The script is for our sample program. So if a salesperson is under the threshhold, I want to set the price to 0. If they are above they threshhold, I will not set the price to 0.