Bloquear tipo de atendimento

[renato.brilhante]

Boa tarde!

Quero realizar o bloqueio da abertura do atendimento caso o aluno já possua algum atendimento em aberto do mesmo "Tipo de Atendimento".

Ex.: Aluno abriu uma solicitação com o Tipo de Atendimento 142, caso ele tente abrir outro, será apresentada uma mensagem informando que não será possível.

Estou tentando realizar esse bloqueio via fórmula, porém o atendimento ocorre ou algum outro tipo de problema é informado na execução ou antes da execução do processo.

Não consigo passar os parâmetros informados na consulta sql. Alguem teria uma dica?

FORMULA UTILIZADA

DECL AUX1, AUX2, AUX3;

EXECSQL('TOTVS.EDU.001');

SETVAR(AUX1, RESULTSQL('TOTVS.EDU.001','QUANTIDADE'));
SETVAR(AUX2,1);

SE AUX1 > AUX2
    ENTAO
        SETVAR(AUX3, 'O atendimento não pôde ser aberto. Você possui um atendimento em aberto.');
SENAO
    SETVAR(AUX3, 1);
FIMSE;

AUX3;

*****************************************************************************************************

SQL UTILIZADO

SELECT AB.CODTIPOATENDIMENTO, CONVERT(INT, COUNT(*)) AS QUANTIDADE, SPLETIVO.CODPERLET
FROM 
    HATENDIMENTOBASE  AS AB
    INNER JOIN HCLIENTEATENDIMENTO AS HC ON HC.CODCOLIGADA = AB.CODCOLIGADA AND HC.CODATENDIMENTO = AB.CODATENDIMENTO
    INNER JOIN SALUNO              AS AL ON AL.RA = HC.RAALUNO AND AL.CODCOLIGADA = HC.CODCOLIGADA
    INNER JOIN SATENDIMENTO        AS AT ON AT.CODCOLIGADA = AB.CODCOLIGADA AND AT.CODATENDIMENTO = AB.CODATENDIMENTO
    INNER JOIN SHABILITACAOALUNO AS HA ON AT.RA = HA.RA AND AT.CODCOLIGADA = HA.CODCOLIGADA AND AT.IDHABILITACAOFILIAL = HA.IDHABILITACAOFILIAL
    INNER JOIN SMATRICPL         AS MA ON MA.RA = AL.RA AND MA.CODCOLIGADA = AL.CODCOLIGADA AND MA.IDPERLET = AT.IDPERLET AND MA.IDHABILITACAOFILIAL = AT.IDHABILITACAOFILIAL
    INNER JOIN SPLETIVO (NOLOCK) ON SPLETIVO.CODCOLIGADA = MA.CODCOLIGADA AND SPLETIVO.IDPERLET = MA.IDPERLET
WHERE 
    AL.RA = :RA
    /*AND AL.CODCOLIGADA = :FRM_CODCOLIGADA*/
    /*AND SPLETIVO.IDPERLET = :IDPERLET*/
    AND AB.CODTIPOATENDIMENTO = 151
GROUP BY 
    AB.CODTIPOATENDIMENTO,
    SPLETIVO.CODPERLET