I have done this using the following snippet. Were you padding out the ItemCode?
retVal0 = oAliasItem.SetIndex("KITEMCUSTOMER")
retVal1 = oAliasItem.SetKeyValue("ItemCode$", Left(sItemCode & Space(30),30))
retVal2 = oAliasItem.SetKeyValue("Type$", "G")
retVal3 = oAliasItem.SetKeyValue("ARDivisionNo$", "")
retVal4 = oAliasItem.SetKeyValue("CustomerNo$", "")
retVal5 = oAliasItem.SetKeyValue("AliasItemNo$", sAliasItemNo)
retVal6 = oAliasItem.Find()------------------------------
Dan Burleson
Software Consultant
Connex Software
Corvallis OR
541-224-6642
------------------------------