Thanks Michael!

Looking at your code I wonder: could it be implementented like this, too?

 cSQLString = "Update Pecas_Parm Set PD_ExpLiPC = PD_ExpLiPC + 1; Select PD_ExpLiPC From Pecas_Parm; Commit"

 SqlExec (nHandle, cSQLString, CurResult)

 nPD_ExpLiPC = CurResult.PD_ExpLiPC