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.