简单存储过程实例：P_GCELL_PEAK_ZTE

CREATE OR REPLACE PROCEDURE P_GCELL_PEAK_ZTE(I_RECDATE IN VARCHAR) AS
V_EXIST INT;
V_RECDATE DATE := TO_DATE(I_RECDATE, 'YYYY-MM-DD');

MY_BREAK EXCEPTION;

BEGIN
SELECT COUNT(1)
INTO V_EXIST
FROM A_BASIC_CS_RADIO_H
WHERE COLLECTTIME BETWEEN V_RECDATE AND V_RECDATE + 23 / 24;
IF V_EXIST = 0 THEN
RAISE MY_BREAK;
ELSE
DBMS_OUTPUT.PUT_LINE('A_BASIC_CS_RADIO_H 记录:' || V_EXIST);
END IF;

EXECUTE IMMEDIATE 'TRUNCATE TABLE GCELL_PEAK_TEMPZTETCH';
INSERT INTO GCELL_PEAK_TEMPZTETCH
SELECT BSCID, SITEID, BTSID, COLLECTTIME, TRAFFIC_TCH
FROM (SELECT BSCID,
SITEID,
BTSID,
COLLECTTIME,
(C100030127 + C100030129) / 3600 TRAFFIC_TCH,
ROW_NUMBER() OVER(PARTITION BY BSCID, SITEID, BTSID ORDER BY(C100030127 + C100030129) DESC) RN
FROM A_BASIC_CS_RADIO_H
WHERE COLLECTTIME BETWEEN V_RECDATE AND V_RECDATE + 23 / 24)
WHERE RN = 1;
COMMIT;
SELECT COUNT(1) INTO V_EXIST FROM GCELL_PEAK_TEMPZTETCH;
DBMS_OUTPUT.PUT_LINE('GCELL_PEAK_TEMPZTETCH TCH忙时已经汇总:' || V_EXIST);

EXECUTE IMMEDIATE 'TRUNCATE TABLE GCELL_PEAK_TEMPZTESD';
INSERT INTO GCELL_PEAK_TEMPZTESD
SELECT BSCID, SITEID, BTSID, COLLECTTIME, TRAFFIC_SD
FROM (SELECT BSCID,
SITEID,
BTSID,
COLLECTTIME,
C100030124 / 3600 TRAFFIC_SD,
ROW_NUMBER() OVER(PARTITION BY BSCID, SITEID, BTSID ORDER BY C100030124 DESC) RN
FROM A_BASIC_CS_RADIO_H
WHERE COLLECTTIME BETWEEN V_RECDATE AND V_RECDATE + 23 / 24)
WHERE RN = 1;
COMMIT;
SELECT COUNT(1) INTO V_EXIST FROM GCELL_PEAK_TEMPZTESD;
DBMS_OUTPUT.PUT_LINE('GCELL_PEAK_TEMPZTESD SD忙时已经汇总:' || V_EXIST);

EXCEPTION
WHEN MY_BREAK THEN
DBMS_OUTPUT.PUT_LINE('A_BASIC_CS_RADIO_H 没有记录');
END;