>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]