--- In ib-support@y..., "slsolutions2002" <strtline@a...> wrote:
  Hi. If FieldX was never assigned a value before select and this code 
is not within For Select or While loop,
> SELECT FIELD1,FIELD2
> FROM TABLE1
> WHERE FIELD3=:XXXX
> INTO :FIELDX,:FIELDY
  if (FieldX Is Not Null) then
> UPDATE TABLE2
> SET FIELDA =:FIELDX
> WHERE FIELD4 = :FIELDY
in other case
  FieldX=<value which never can be retrieved from Table1> 
> SELECT FIELD1,FIELD2
> FROM TABLE1
> WHERE FIELD3=:XXXX
> INTO :FIELDX,:FIELDY
  if (FieldX<>those value) then
> UPDATE TABLE2
> SET FIELDA =:FIELDX
> WHERE FIELD4 = :FIELDY
Best regards, Alexander V.Nevsky.