[firebase-br] Erro em procedure selecionável

[Jader Ricardo]

Boa tarde !

Pessoal, tenho uma dúvida simples, mas não consigo enxergar o erro, ao
tentar compilar uma procedure está me dando erro no trecho abaixo, então
estou tentando debuga-la e me dá o erro (*Error Message: Invalid variant
type conversion*), não sei se é uma possível configuração do banco ou um bug
do ibexpert .... Segue o trecho da procedure:

   VA_CONT   = 0;
   VA_STRSQL = 'SELECT STS_IN_ID, STS_TX_DES FROM STATUS';

   IF ((:PE_STS_IN_ID IS NULL) AND (:PE_STS_TX_DES IS NULL)) THEN
     BEGIN
       VA_STRSQL = 'SELECT STS_IN_ID, STS_TX_DES FROM STATUS';
     END

_____________
Jader Ricardo