[firebird-support] check for exist with assignment

[Daniel L. Miller]

Building a procedure - why is this rejected:

if ( exists( select ID from CITIES where CITY = :NEWCITY into :NEWID ) ) 
then begin
       suspend;
end

the error is on the 'into' word

but this is accepted:

if ( exists( select ID from CITIES where CITY = :NEWCITY ) ) then begin
       select ID from CITIES where CITY = :NEWCITY into :NEWID;
       suspend;
end

-- 
Daniel