联系及时率

以下代码由PHP站长网 52php.cn收集自互联网

现在PHP站长网小编把它分享给大家，仅供参考

CREATE OR REPLACE PROCEDURE P_MDJ_1001066_TO_ZW(I_SPAN IN VARCHAR2,--无用参数可输入任意值
                                                O_SQL  OUT VARCHAR2,O_FILE OUT VARCHAR2)

 AS
  O_RET          NUMBER;
  PROCEDURE_NAME VARCHAR2(200);
  V_SQLECODE     VARCHAR2(50);
  V_SQLERRM      VARCHAR2(500);
  V_FILENAME     VARCHAR2(100);
  V_SQL          VARCHAR2(4000);
BEGIN
  PROCEDURE_NAME:=GETEXEC_PROCEDURE_NAME();
  O_RET := 1;

  execute immediate 'truncate table ICDPUB.T_MDJ_1001066_TO_ZW';

  INSERT INTO ICDPUB.T_MDJ_1001066_TO_ZW
  SELECT B.SERIALNO 流水号,CI.ORGANAME 地市名称,B.AREAID 小区编码,B.FIXMAN 维护员,A.CALLERNO 主叫号码,A.CALLEDNO 被叫号码,CASE WHEN A.ISPROCESSED IS NULL THEN '未呼出'
              WHEN A.ISPROCESSED = '0' THEN '呼出失败'
              ELSE '呼出成功' END 首次呼出是否成功,A.REMARK 首次呼出失败原因,A.FIRSTCONTACTSTARTTIME 首次联系时间,A.LASTCONTACTSTARTTIME 最后一次联系时间,A.CONTACTDURATION 首次通话时长,CASE WHEN A.FIRSTCONTACTSTARTTIME IS NULL THEN '否'
              WHEN (A.FIRSTCONTACTSTARTTIME - B.ARRIVETIME1) * 24 > 1 THEN '否'
              ELSE '是' END 是否1小时内联系用户,CASE WHEN A.FIRSTCONTACTSTARTTIME IS NULL THEN '否'
              WHEN (A.FIRSTCONTACTSTARTTIME - B.ARRIVETIME2) * 24 > 3 THEN '否'
              ELSE '是' END 是否3小时内联系用户,A.CALLCOUNT 本流水号累计联系用户次数
     FROM (SELECT T.SUBSNUMBER,MAX(CASE WHEN T.RN=1 THEN T.ISPROCESSED END) ISPROCESSED,MIN(T.CONTACTSTARTTIME) FIRSTCONTACTSTARTTIME,MAX(T.CONTACTSTARTTIME) LASTCONTACTSTARTTIME,MAX(CASE WHEN RN=1 THEN T.CALLERNO END) CALLERNO,MAX(CASE WHEN RN=1 THEN T.CALLEDNO END) CALLEDNO,MAX(CASE WHEN RN=1 THEN T.CONTACTDURATION END) CONTACTDURATION,MAX(CASE WHEN RN=1 THEN T.REMARK END) REMARK,COUNT(T.SUBSNUMBER) CALLCOUNT --一张工单有多次呼叫，按工单流水分组，取第一次呼叫用户的记录
                  FROM
               (SELECT CD.SUBSNUMBER,--工单流水号
                       CD.ISPROCESSED,--是否呼叫成功
                       CD.CONTACTSTARTTIME,--联系时间
                       CD.CALLERNO,--主叫号码
                       CD.CALLEDNO,--被叫号码
                       CD.CONTACTDURATION,--呼叫时长
                       CD.REMARK,--呼叫备注（失败原因）
                       ROW_NUMBER() OVER(PARTITION BY CD.SUBSNUMBER ORDER BY CD.CONTACTSTARTTIME) RN
                  FROM ICDPUB.T_CCT_CONTACTDETAIL CD
                 WHERE CD.CONTACTMODEID = '19'
                  AND CD.CONTACTSTARTTIME >= TRUNC(SYSDATE)-11
                  AND CD.CONTACTSTARTTIME < TRUNC(SYSDATE)
                  ) T GROUP BY T.SUBSNUMBER
           ) A,--表A，从呼叫用户的表里获取呼叫信息

          (SELECT SERIALNO,--工单流水号
                  CASE
                    WHEN TO_CHAR(CREATIONTIME,'hh24') < 9 THEN
                     TRUNC(CREATIONTIME) + 9 / 24 --9点前下派工单，下派时间算作9点
                    WHEN TO_CHAR(CREATIONTIME,'hh24') >= 18 THEN
                     TRUNC(CREATIONTIME + 1) + 9 / 24 --18点后下派的工单，下派时间算作第二天9点
                    WHEN TO_CHAR(CREATIONTIME,'HH24') >17 AND TO_CHAR(CREATIONTIME,'HH24') <18 THEN
                     TRUNC(CREATIONTIME + 1) + 9 / 24 - (CREATIONTIME - TRUNC(CREATIONTIME)-17/24) --17至18点间的工单，下派时间为第二天9点减去工单在17至18点之间已运行的时间
                    ELSE
                     CREATIONTIME --非以上时间段则为系统记录的工单下派时间
                  END AS ARRIVETIME1,--1小时联系及时率的工单下派时间（将系统记录的下派时间处理为正常上班时间）
                  CASE
                    WHEN TO_CHAR(CREATIONTIME,'hh24') < 8.5 THEN
                     TRUNC(CREATIONTIME) + 8.5 / 24
                    WHEN TO_CHAR(CREATIONTIME,'hh24') >= 18 THEN
                     TRUNC(CREATIONTIME + 1) + 8.5 / 24
                    WHEN TO_CHAR(CREATIONTIME,'hh24') >15 AND TO_CHAR(CREATIONTIME,'hh24') <18 THEN
                     TRUNC(CREATIONTIME + 1) + 8.5 / 24 - (CREATIONTIME - TRUNC(CREATIONTIME)-15/24)
                    ELSE
                     CREATIONTIME
                  END AS ARRIVETIME2,--3小时联系及时率的工单下派时间（将系统记录的下派时间处理为正常上班时间）
                  CREATIONTIME,--工单下派时间
                  SERVICECITY,--地市ID
                  FIXMAN,--装维人员
                  AREAID		--小区编码
             FROM (SELECT PP.SERIALNO,MIN(PW.CREATIONTIME) CREATIONTIME,MIN(PP.SERVICECITY) SERVICECITY,MIN(PP.PUBDYNACHAR108) FIXMAN,MIN(SR.SERVICEINFOCHAR165) AREAID
                     FROM ICDPUB.T_PBH_PROBLEMPROCESS  PP,ICDPUB.T_PBH_PROBLEMWORKITEM PW,ICDPUB.T_SR_SERVICEREQUEST   SR
                    WHERE PP.SRTYPEID LIKE '004001%'
                      AND PP.ARCHIVEDATE >= TRUNC(SYSDATE)-1
                      AND PP.ARCHIVEDATE < TRUNC(SYSDATE)
                      AND PP.SERIALNO = PW.SERIALNO
                      AND PW.NODENAME = '装维处理'
                      AND SR.SERVICEID = PP.SRID
                    GROUP BY PP.SERIALNO) --从工单记录表里获取装维系统环节的信息
           ) B,--表B，从工单表里获取工单信息
          ICDPUB.T_UCP_CITYINFO CI
    WHERE B.SERIALNO = A.SUBSNUMBER(+)
      AND CI.ORGAID = B.SERVICECITY;
  COMMIT;
  O_RET := 2;

  --获取文件名称
  V_FILENAME := 'order_' || TO_CHAR(SYSDATE,'yyyymmddhh24miss');
  V_SQL:='SELECT   SERIALNO,'||
         '         ORGANAME,'||
         '         AREAID,'||
         '         FIXMAN,'||
         '         CALLERNO,'||
         '         CALLEDNO,'||
         '         ISPROCESSED,'||
         '         REMARK,'||
         '         FIRSTCONTACTSTARTTIME,'||
         '         LASTCONTACTSTARTTIME,'||
         '         CONTACTDURATION,'||
         '         CALLIN1HOUR,'||
         '         CALLIN3HOURS,'||
         '         CALLCOUNT            FROM ICDPUB.T_MDJ_1001066_TO_ZW';
  O_RET := 3;

  O_FILE := V_FILENAME;
  O_SQL  := V_SQL;

EXCEPTION
  WHEN OTHERS THEN
    ROLLBACK;
    O_RET      := 999;
    V_SQLECODE := SQLCODE;
    V_SQLERRM  := SUBSTR(SQLERRM,1,300);
    INSERT INTO ICDPUB.T_MDJ_ERRORLOG
    VALUES
      (SYSDATE,'',O_RET,V_SQLECODE,V_SQLERRM,'[FAIL]['||PROCEDURE_NAME||']');
    COMMIT;

END P_MDJ_1001066_TO_ZW;

以上内容由PHP站长网【52php.cn】收集整理供大家参考研究

如果以上内容对您有帮助，欢迎收藏、点赞、推荐、分享。

（编辑：清远站长网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!