update del query4 dentro de un while

[olbeup]

DIAS_EN_PAGA,
POLITICA_DSCTO_ART_CLI_ID,
CLAVE_CLIENTE,
CLAVE_CTE

Todos estos campos son Numéricos creo yo, porque lo pasa a Alfanuméricos y sino es así, porque defines campos Alfanuméricos cuanto tenían que ser Numéricos.

Creo que el problema está en SET y WHERE de cada uno de los UPDATE

Código Delphi [-]
IBQuery4.SQL.Add('SET POLITICA_DSCTO_ART_CLI_ID = '+ Char(39)+'48'+Char(39)+' ');

Un saludo.