>Well that certainly works - thanks, but I still do not understand why the original code did not work.

m.carloc = ThisForm.carousel + ;
PADL(LTRIM(STR(ThisForm.bin, 2, 0)), 2, "0") + ;
PADL(LTRIM(STR(ThisForm.shelf, 2, 0)), 2, "0") + ;
ThisForm.loc

lc_update = [carloc = ?m.carloc]
lc_item = ThisForm.citem

*-- Update ICITEM table
lcSQL = [UPDATE icitem SET ] + lc_update + [ WHERE item = ] + lc_item
lnRetVal = SQLEXEC(ln_connection, lcSQL)


Given that Sergey's code worked (doesn't it always)
I THINK the equivalent would have been

lcSQL = [UPDATE icitem SET ] + lc_update + [ WHERE item = '] + lc_item  + [']

or possibly

lcSQL = [UPDATE icitem SET ] + lc_update + [ WHERE item = ?lc_item]