DECLARE
CURSOR tot_pnt_fata IS
SELECT cd_cc cliente,
SUM(nr_pnt) pontos
FROM t416fata
GROUP BY cd_cc;
CURSOR pnt_acima IS
SELECT cd_cc
FROM t411licc
WHERE nr_pt > 1000;
v_cli_acm NUMBER(20);
v_pnt NUMBER(20);
v_cli NUMBER(20);
BEGIN
OPEN tot_pnt_fata;
LOOP
FETCH tot_pnt_fata
INTO v_cli,
v_pnt;
UPDATE t411licc licc
SET licc.nr_pt = v_pnt
WHERE licc.cd_cc = v_cli;
EXIT WHEN tot_pnt_fata%NOTFOUND;
END LOOP;
CLOSE tot_pnt_fata;
pkg_fidelidade.sp_gera_relatorio;
OPEN pnt_acima;
LOOP
FETCH pnt_acima
INTO v_cli_acm;
UPDATE t411licc licc
SET licc.nr_pt = licc.nr_pt - 1000,
licc.dh_atu = SYSDATE
WHERE licc.cd_cc = v_cli_acm;
EXIT WHEN pnt_acima%NOTFOUND;
END LOOP;
CLOSE pnt_acima;
END;
este é o bloco.. quando executo ele nao entra no pkg_fidelidade.sp_gera_relatorio;
mas se eu for debugar passo a passo ele entra no pkg_fidelidade.sp_gera_relatorio;
não sei se ficou mais claro?
Leo_nardo.
Leo_nardo.
Leo_nardo
Leo_nardo
Regis Araujo