-- 노선별 교통정보 개발서버용 스키마
--
-- 운영 뷰는 개발 Oracle에 없는 다수의 원천 테이블을 참조하므로,
-- 제공받은 뷰 결과 CSV를 물리 테이블에 적재하고 동일한 이름의 뷰로 노출한다.

SET DEFINE OFF
SET SERVEROUTPUT ON

BEGIN
  EXECUTE IMMEDIATE 'CREATE USER TROAD_APP NO AUTHENTICATION';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE != -1920 THEN RAISE; END IF;
END;
/

BEGIN
  EXECUTE IMMEDIATE 'CREATE USER TLISDEV NO AUTHENTICATION';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE != -1920 THEN RAISE; END IF;
END;
/

GRANT CREATE SESSION, CREATE TABLE, CREATE VIEW, UNLIMITED TABLESPACE TO TROAD_APP;
GRANT CREATE SESSION, CREATE TABLE, CREATE VIEW, UNLIMITED TABLESPACE TO TLISDEV;

BEGIN
  EXECUTE IMMEDIATE q'[
    CREATE TABLE TLISDEV.T_TRMB_CD_INFO01M1 (
      HGRN_CD_ID       VARCHAR2(50) NOT NULL,
      CMMN_CD          VARCHAR2(20) NOT NULL,
      USE_XN           VARCHAR2(1),
      CMMN_CD_NM       VARCHAR2(200),
      DETL_CTNT        VARCHAR2(1000),
      FSTTM_RGSR_ID    VARCHAR2(30),
      FSTTM_RGST_DTTM  DATE,
      LSTTM_MODFR_ID   VARCHAR2(30),
      LSTTM_ALTR_DTTM  DATE
    )
  ]';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE != -955 THEN RAISE; END IF;
END;
/

BEGIN
  EXECUTE IMMEDIATE
    'CREATE INDEX TLISDEV.IX_TRMB_CD_INFO_HGRN_CMMN ' ||
    'ON TLISDEV.T_TRMB_CD_INFO01M1 (HGRN_CD_ID, CMMN_CD)';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE NOT IN (-955, -1408) THEN RAISE; END IF;
END;
/

BEGIN
  EXECUTE IMMEDIATE q'[
    CREATE TABLE TROAD_APP.T_ROUTE_NEW_NM (
      ROUTECD          VARCHAR2(4),
      GRPID            VARCHAR2(2),
      ROUTESHORTNO     NUMBER,
      ROUTENM          VARCHAR2(100),
      ROUTESORT        NUMBER,
      UPDOWNDIR        VARCHAR2(1),
      ROUTEDIRNM       VARCHAR2(100),
      ROUTELAYOVERNM   VARCHAR2(200),
      OPER             VARCHAR2(30),
      HOINSTNM         VARCHAR2(100),
      RPRSTELNO        VARCHAR2(30),
      CLSSCD           VARCHAR2(10)
    )
  ]';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE != -955 THEN RAISE; END IF;
END;
/

BEGIN
  EXECUTE IMMEDIATE
    'CREATE INDEX TROAD_APP.IX_ROUTE_NEW_NM_NAME ' ||
    'ON TROAD_APP.T_ROUTE_NEW_NM (ROUTENM)';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE NOT IN (-955, -1408) THEN RAISE; END IF;
END;
/

BEGIN
  EXECUTE IMMEDIATE
    'CREATE INDEX TROAD_APP.IX_ROUTE_NEW_NM_KEY ' ||
    'ON TROAD_APP.T_ROUTE_NEW_NM (ROUTECD, GRPID, UPDOWNDIR)';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE NOT IN (-955, -1408) THEN RAISE; END IF;
END;
/

BEGIN
  EXECUTE IMMEDIATE q'[
    CREATE TABLE TROAD_APP.T_ROUTE_TRFC_VER001 (
      NODE_NM                 VARCHAR2(100),
      CONZONE_ID              VARCHAR2(30),
      ROUTE_NO_LIST           VARCHAR2(100),
      LINK_LEN_KM             NUMBER,
      BUS_YN                  VARCHAR2(1),
      ROUTESORT               NUMBER,
      SPEED                   NUMBER,
      SPEED_BUS               NUMBER,
      TRAFFIC_GRADE           VARCHAR2(1),
      TRAFFIC_GRADE_BUS       VARCHAR2(1),
      CCTV_ID                 VARCHAR2(30),
      CCTV_AREA               VARCHAR2(200),
      HLS_URL                 VARCHAR2(500),
      FILEURL_IMG             VARCHAR2(500),
      INCIDENT_TYPE_CD        VARCHAR2(10),
      INCIDENT_DESC           VARCHAR2(200),
      MSG                     VARCHAR2(2000),
      INCIDENT_POS_NAME       VARCHAR2(500),
      DETR_ID                 VARCHAR2(30),
      SPEED_DETR              NUMBER,
      TRAFFIC_GRADE_DETR      VARCHAR2(1),
      RESTAREA_ID             VARCHAR2(30),
      RESTAREA_NM             VARCHAR2(200),
      CONZONE_X               NUMBER,
      CONZONE_Y               NUMBER,
      DRIVE_DRCT_CD           VARCHAR2(1),
      SECT_SQNO               NUMBER,
      ROUTE_CD                VARCHAR2(4),
      GRP_ID                  VARCHAR2(2),
      WORK_CD                 VARCHAR2(10),
      VVALUE01                VARCHAR2(2000),
      VVALUE02                VARCHAR2(2000),
      VVALUE03                VARCHAR2(2000),
      VVALUE04                VARCHAR2(2000),
      VVALUE05                VARCHAR2(2000),
      VVALUE06                VARCHAR2(2000),
      VVALUE07                VARCHAR2(2000),
      VVALUE08                VARCHAR2(2000),
      VVALUE09                VARCHAR2(2000)
    )
  ]';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE != -955 THEN RAISE; END IF;
END;
/

BEGIN
  EXECUTE IMMEDIATE
    'CREATE INDEX TROAD_APP.IX_ROUTE_TRFC_ROUTE ' ||
    'ON TROAD_APP.T_ROUTE_TRFC_VER001 ' ||
    '(ROUTE_CD, GRP_ID, DRIVE_DRCT_CD, SECT_SQNO)';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE NOT IN (-955, -1408) THEN RAISE; END IF;
END;
/

BEGIN
  EXECUTE IMMEDIATE
    'CREATE INDEX TROAD_APP.IX_ROUTE_TRFC_CONZONE ' ||
    'ON TROAD_APP.T_ROUTE_TRFC_VER001 (CONZONE_ID, DRIVE_DRCT_CD)';
EXCEPTION
  WHEN OTHERS THEN
    IF SQLCODE NOT IN (-955, -1408) THEN RAISE; END IF;
END;
/

CREATE OR REPLACE VIEW TROAD_APP.V_ROUTE_NEW_NM AS
SELECT ROUTECD, GRPID, ROUTESHORTNO, ROUTENM, ROUTESORT, UPDOWNDIR,
       ROUTEDIRNM, ROUTELAYOVERNM, OPER, HOINSTNM, RPRSTELNO, CLSSCD
  FROM TROAD_APP.T_ROUTE_NEW_NM;

CREATE OR REPLACE VIEW TROAD_APP.V_ROUTE_TRFC_VER001 AS
SELECT NODE_NM, CONZONE_ID, ROUTE_NO_LIST, LINK_LEN_KM, BUS_YN, ROUTESORT,
       SPEED, SPEED_BUS, TRAFFIC_GRADE, TRAFFIC_GRADE_BUS, CCTV_ID, CCTV_AREA,
       HLS_URL, FILEURL_IMG, INCIDENT_TYPE_CD, INCIDENT_DESC, MSG,
       INCIDENT_POS_NAME, DETR_ID, SPEED_DETR, TRAFFIC_GRADE_DETR,
       RESTAREA_ID, RESTAREA_NM, CONZONE_X, CONZONE_Y, DRIVE_DRCT_CD,
       SECT_SQNO, ROUTE_CD, GRP_ID, WORK_CD, VVALUE01, VVALUE02, VVALUE03,
       VVALUE04, VVALUE05, VVALUE06, VVALUE07, VVALUE08, VVALUE09
  FROM TROAD_APP.T_ROUTE_TRFC_VER001;

GRANT SELECT ON TLISDEV.T_TRMB_CD_INFO01M1 TO OPR_MAIN;
GRANT SELECT ON TROAD_APP.V_ROUTE_NEW_NM TO OPR_MAIN;
GRANT SELECT ON TROAD_APP.V_ROUTE_TRFC_VER001 TO OPR_MAIN;

CREATE OR REPLACE VIEW OPR_MAIN.V_ROUTE_NEW_NM AS
SELECT * FROM TROAD_APP.V_ROUTE_NEW_NM;

CREATE OR REPLACE VIEW OPR_MAIN.V_ROUTE_TRFC_VER001 AS
SELECT * FROM TROAD_APP.V_ROUTE_TRFC_VER001;