I have a button script in SO entry which uses the new invoke lookup function. The lookup calls the customer's price schedule list then after selecting it Adds that item to the order. The script works fine as long as the line is not the first line. If the line is the first time it forces focus to the totals tab. After the first line is written and you go back it never happens again. Anyone have any ideas??? Here is a copy of the script: retVal = 0 val = "" sDiv = "" sCust = "" sItem = "" lookupCode = "IM_PriceCodeCust" retVal = oBusObj.GetValue("ARDivisionNo$", sDiv) retVal = oBusObj.GetValue("CustomerNo$", sCust) set oLines = oBusObj.AsObject(oBusObj.Lines) If lookupCode "" Then retVal = oUIObj.InvokeLookup(LookupCode, val, sDiv + sCust + String(20 - Len(sCust),chr(0))) If retVal 0 And val "" Then sItem = replace(mid(val,6,30),chr(0),"") retVal = oLines.AddLine() retVal = oLines.SetValue("ItemCode$", sItem) retVal = oLines.Write() oScript.LinesAdded = 1 retVal = oScript.LoadGrid("GD_Lines") retVal = oUIObj.HandleScriptUI() End If End If
↧
