[firebird-support] get number of combinations of to keys

[josef.gschwendt...@quattro-soft.de [firebird-support]]

Hi,
 

 Is there a way to get this ProFaCount in one statement (without for select)

 
 ProFaCount = 0;
for
  select distinct PRO, FA
    from Tab
   where Key = :Key
    into :PRO, :FA
do
  ProFaCount = ProFaCount + 1;


 Thank you for your help.
 

 Regards,
 Josef