1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
| BEGIN
OPEN cur FOR
select c.PDD as pdd, c.NUM_SERIE_COMPTEUR as cptnum,
to_number(n.T1_INDEX)/1000 as indexcalc,
to_char(n.T1_DATE_REF,'ddmmyyyy hh24:mi') as dateref
from ENREG_T1_DEBIT_WARM_WB n, COMPTEUR c
where n.ID_COMPTEUR = c.ID_COMPTEUR
AND c.CODE_REGION = p_code_region
AND n.DATE_ENVOIE_SICOMPTAGE is null;
update ENREG_T1_DEBIT_WARM_WB
set DATE_ENVOIE_SICOMPTAGE = SYSDATE()
where ID_COMPTEUR in (select ID_COMPTEUR
from COMPTEUR
where CODE_REGION = p_code_region);
commit; |
Partager