Declarando Variáveis

BOM, DECLAROMOS AS VARIÁVEIS APÓS O [b:3e7cf5e2cd]AS[/b:3e7cf5e2cd] ONDE ESTÁ EM NEGRITO TERIA COM DECLARAR ELAS EM ALGUM LUGAR DENTRO DO BLOCO DE CÓDIGOS DENTRO DO [b:3e7cf5e2cd]BEGIN...END #[/b:3e7cf5e2cd].

SET TERM ;
CREATE PROCEDURE FATURAMENSAL(DIAVENC DOUBLE PRECISION, MESANO CHAR(4))
AS
[b:3e7cf5e2cd]DECLARE VARIABLE SALFATANT DOUBLE PRECISION;
DECLARE VARIABLE CLINCARTAO CHAR(16);
DECLARE VARIABLE CLICODRN INTEGER;
DECLARE VARIABLE CLICODRNTEMP INTEGER;
DECLARE VARIABLE CLIVALIDADE CHAR(4);[/b:3e7cf5e2cd]

BEGIN

FOR SELECT CLI.NCARTAO, CLI.CODRN, CLI.CODRNTEMP, CLI.VALIDADERN FROM TABCLIENTES CLI
WHERE CLI.FORMAPGTO=1 AND CLI.DIAVENCIMENTO=:DIAVENC AND CLI.CARTENTR=1
INTO :CLINCARTAO,:CLICODRN,:CLICODRNTEMP,:CLIVALIDADE DO

BEGIN
IF (:CLIVALIDADE >= :MESANO) THEN
BEGIN
SELECT * FROM SPTAXAS(:CODRN);

END
ELSE
BEGIN
SELECT * FROM SPTAXAS(:CODRNTEMP);

EN