huawei--創建遊標，遊標使用

CREATE OR REPLACE PACKAGE xpp_DB170 AS
  TYPE t_RetDataSet IS REF CURSOR;
END xpp_DB170;
/
CREATE OR REPLACE PROCEDURE P_TotalByIVR(
  rCursor IN OUT xpp_DB170.T_RetDataSet
)
AS
BEGIN
  OPEN rCursor FOR SELECT
  NVL(SUM(AnsNum+FailNum),0) AS ID1
  FROM tAutoInfo
  WHERE LogDate >= TRUNC(tMaxDate)
  RETURN;
EXCEPTION
  WHEN OTHERS THEN
  RETURN;
END P_TotalByIVR;
/