#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_001)
#--【内容】
#--サービス契約番号を元に、サービス契約ステータス、料金グループコード、料金コースコードを取得（世代管理、予約管理を考慮）
#--【条件】
#--サービス契約番号
#--予約適用年月日
#--【抽出対象】
#--一意
#-----------------------------------------------------------

--KEY:AC_SELECT_001

SELECT KK0081.SVC_KEI_NO
     , KK0081.SVC_KEI_STAT
     , KK0081.PRC_GRP_CD
     , KK0081.PCRS_CD
  FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_NO = RPAD(?, 10, ' ')
   AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2')
   AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_003)
#--【内容】
#--サービス契約番号(KK0081.SVC_KEI_NO)、料金コースコード(KK0081.PCRS_CD)、サービス契約ステータス、世代登録年月日(KK0081.GENE_ADD_DTM)を取得する 
#--【検索条件】
#--事業者契約ID(KK0121.JIGYOSHA_KEI_ID)
#--予約適用年月日(KK0081.RSV_APLY_YMD) 
#--【結合テーブル】
#--サービス契約(KK_T_SVC_KEI)、サービス契約(eoモバイル)(KK_T_SVC_KEI_EOMOBA) 
#--【結合条件】
#--サービス契約.サービス契約番号(KK0081.SVC_KEI_NO) = サービス契約(eoモバイル).サービス契約番号(KK0121.SVC_KEI_NO) 
#--【抽出対象】
#--一意 
#--【世代管理】
#--あり 
#--【予約管理】
#--あり 
#--【無効フラグ考慮】
#--あり
#-----------------------------------------------------------

--KEY:AC_SELECT_003

SELECT
    KK0081.SVC_KEI_NO
    , KK0081.PCRS_CD
    , KK0081.SVC_KEI_STAT
    , KK0081.GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN 
        KK_T_SVC_KEI_EOMOBA KK0121
    ON 
        KK0081.SVC_KEI_NO = KK0121.SVC_KEI_NO
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE 
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
    ) 
    AND KK0121.JIGYOSHA_KEI_ID = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_004)
#--【内容】
#--サービス契約番号(KK0081.SVC_KEI_NO)
#--SYSID(KK0081.SYSID)
#--料金コースコード(KK0081.PCRS_CD)
#--サービス契約ステータス(KK0081.SVC_KEI_STAT)を取得する。
#--【検索条件】
#--予約適用年月日(KK0081.RSV_APLY_YMD) 
#--外部連携契約コード(KK0101.OUT_RNKI_KEI_CD)
#--【結合テーブル】
#--サービス契約
#--サービス契約<eoTV>
#--【結合条件】
#--サービス契約.サービス契約番号 ＝ サービス契約<eoTV>.サービス契約番号
#--【抽出対象】
#--一意 
#--【世代管理】
#--あり 
#--【予約管理】
#--あり 
#--【無効フラグ考慮】
#--あり
#-----------------------------------------------------------

--KEY:AC_SELECT_004

SELECT
 SVKEI.SVC_KEI_NO
,SVKEI.SYSID
,SVKEI.PCRS_CD
,SVKEI.SVC_KEI_STAT
FROM
(
    SELECT 
         KK0081.SVC_KEI_NO
        ,KK0081.SYSID
        ,KK0081.PCRS_CD
        ,KK0081.GENE_ADD_DTM
        ,KK0081.SVC_KEI_STAT
    FROM
        KK_T_SVC_KEI KK0081
    WHERE
        KK0081.MK_FLG = '0'
    AND
        KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
            (
                SELECT
                    MAX(KK0081_1.RSV_APLY_YMD || KK0081_1.GENE_ADD_DTM) AS KTSK_MAX
                FROM
                    KK_T_SVC_KEI KK0081_1
                WHERE
                    KK0081_1.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND
                    KK0081_1.RSV_APLY_YMD <= ?
                AND
                    KK0081_1.RSV_APLY_CD = '2'
                AND
                    KK0081_1.MK_FLG = '0'
            )
) SVKEI
INNER JOIN
(
    SELECT
         KK0101.SVC_KEI_NO
        ,KK0101.GENE_ADD_DTM
    FROM
        KK_T_SVC_KEI_EOH_TV KK0101
    WHERE
        KK0101.MK_FLG = '0'
    AND
        KK0101.OUT_RNKI_KEI_CD = SUBSTR(?, 2, 10)
    AND
        KK0101.GENE_ADD_DTM = 
            (
                SELECT
                    MAX(KK0101_1.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
                FROM
                    KK_T_SVC_KEI_EOH_TV KK0101_1
                WHERE
                    KK0101_1.SVC_KEI_NO = KK0101.SVC_KEI_NO
                AND
                    KK0101_1.RSV_APLY_CD = '2'
                AND
                    KK0101_1.MK_FLG = '0'
            )
) SVKEI_EOTV
ON
    SVKEI_EOTV.SVC_KEI_NO = SVKEI.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_005)
#--UIA17_ACPRC00110_一時金情報抽出.xlsx 参照
#-----------------------------------------------------------

--KEY:AC_SELECT_005

SELECT
     KK0081.PCRS_CD
    ,KK0081.SVC_CHRG_ENDYMD
    ,KK0081.SVC_CHRG_STAYMD
    ,CK0011.KEISHA_TYPE_CD
    ,KK0781.KAIHK_PSB_PRD
FROM
    KK_T_SEIKY_KEI KK0491
    INNER JOIN KK_T_KAKINS KK0321
        ON  KK0491.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
    INNER JOIN KK_T_SVC_KEI KK0081
        ON  KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
    INNER JOIN CK_T_CUST CK0011
        ON  KK0081.SYSID = CK0011.SYSID
    INNER JOIN KK_M_PRC_GRP KK0781
        ON  KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD
WHERE
    KK0491.SEIKY_KEI_NO = ?
    AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
            FROM
                KK_T_SEIKY_KEI KK0491_GENE
            WHERE
                KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
                AND KK0491_GENE.RSV_APLY_YMD <= ?
                AND KK0491_GENE.RSV_APLY_CD = ?
                AND KK0491_GENE.MK_FLG = '0'
    )
    AND ? BETWEEN  KK0321.KAKINS_TSTAYMD AND KK0321.KAKINS_TENDYMD
    AND KK0321.MK_FLG = '0'
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM
                KK_T_SVC_KEI KK0081_GENE
            WHERE 
                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
                AND KK0081_GENE.RSV_APLY_YMD <= ?
                AND KK0081_GENE.RSV_APLY_CD = ?
                AND KK0081_GENE.MK_FLG = '0'
        )
    AND KK0081.SVC_CHRG_ENDYMD IS NOT NULL
    AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =
        (
            SELECT
                MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
            FROM
                CK_T_CUST CK0011_GENE
            WHERE
                CK0011_GENE.SYSID = CK0011.SYSID
                AND CK0011_GENE.RSV_APLY_YMD <= ?
                AND CK0011_GENE.RSV_APLY_CD = ?
                AND CK0011_GENE.MK_FLG = '0'
        )
    AND ? BETWEEN KK0781.PRC_GRP_TSTAYMD AND KK0781.PRC_GRP_TENDYMD
    AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
            FROM
                KK_M_PRC_GRP KK0781_GENE
            WHERE
                KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
                AND KK0781_GENE.RSV_APLY_YMD <= ?
                AND KK0781_GENE.MK_FLG = '0'
        )
ORDER BY KK0081.SVC_CHRG_ENDYMD DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_006)
#--UIA17_ACPRC00110_一時金情報抽出.xlsx 参照
#-----------------------------------------------------------

--KEY:AC_SELECT_006

SELECT
     KK0081.PCRS_CD
    ,KK0081.SVC_CHRG_ENDYMD
    ,KK0081.SVC_CHRG_STAYMD
    ,CK0011.KEISHA_TYPE_CD
    ,KK0781.KAIHK_PSB_PRD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
        ON KK0081.SYSID = CK0011.SYSID
    INNER JOIN KK_M_PRC_GRP KK0781
        ON KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM
                KK_T_SVC_KEI KK0081_GENE
            WHERE 
                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
                AND KK0081_GENE.RSV_APLY_YMD <= ?
                AND KK0081_GENE.RSV_APLY_CD = ?
                AND KK0081_GENE.MK_FLG = '0'
        )
    AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =
        (
            SELECT
                MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
            FROM
                CK_T_CUST CK0011_GENE
            WHERE
                CK0011_GENE.SYSID = CK0011.SYSID
                AND CK0011_GENE.RSV_APLY_YMD <= ?
                AND CK0011_GENE.RSV_APLY_CD = ?
                AND CK0011_GENE.MK_FLG = '0'
        )
    AND ? BETWEEN KK0781.PRC_GRP_TSTAYMD AND KK0781.PRC_GRP_TENDYMD
    AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
            FROM
                KK_M_PRC_GRP KK0781_GENE
            WHERE
                KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
                AND KK0781_GENE.RSV_APLY_YMD <= ?
                AND KK0781_GENE.MK_FLG = '0'
        )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_007)
#--【内容】
#--サービス契約番号(KK0081.SVC_KEI_NO)
#--サービス契約ステータス(KK0081.SVC_KEI_STAT)を取得する。
#--【検索条件】
#--サービス契約番号(KK0081.SVC_KEI_NO)
#--予約適用年月日(KK0081.RSV_APLY_YMD) 
#--【結合テーブル】
#--なし
#--【結合条件】
#--なし
#--【抽出対象】
#--一意 
#--【世代管理】
#--あり 
#--【予約管理】
#--あり 
#--【無効フラグ考慮】
#--あり
#-----------------------------------------------------------

--KEY:AC_SELECT_007

SELECT
  KK0081.SVC_KEI_NO,
  KK0081.SVC_KEI_STAT
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.MK_FLG = '0'
AND
  KK0081.SVC_KEI_NO = ?
AND
  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (
      SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
      FROM
        KK_T_SVC_KEI KK0081_GENE
      WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND
        KK0081_GENE.RSV_APLY_YMD <= ?
      AND
        KK0081_GENE.RSV_APLY_CD = '2'
      AND
        KK0081_GENE.MK_FLG = '0'
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_008)
#--【ACPRC04001_一時金一括登録】
#-----------------------------------------------------------

--KEY:AC_SELECT_008

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SEIKY_KEI   KK0491
    INNER JOIN
    (
        SELECT 
            MAX(KK0491_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
            ,KK0491_GENE.SEIKY_KEI_NO
        FROM    
            KK_T_SEIKY_KEI KK0491_GENE
        WHERE
            KK0491_GENE.RSV_APLY_CD  = '2'
            AND KK0491_GENE.RSV_APLY_YMD <= ?
            AND KK0491_GENE.MK_FLG = '0'
        GROUP BY
            KK0491_GENE.SEIKY_KEI_NO
    ) KK0491_GENE
    ON 
        KK0491.SEIKY_KEI_NO = KK0491_GENE.SEIKY_KEI_NO
        AND KK0491.GENE_ADD_DTM = KK0491_GENE.MAX_GENE_DTM
   ,KK_T_SVC_KEI   KK0081
   INNER JOIN
   (
       SELECT 
           MAX(KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
           ,KK0081_GENE.SVC_KEI_NO
       FROM
           KK_T_SVC_KEI KK0081_GENE
       WHERE
           KK0081_GENE.SVC_KEI_NO   = ?
           AND KK0081_GENE.RSV_APLY_CD  = '2'
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.MK_FLG = '0'
       GROUP BY
           KK0081_GENE.SVC_KEI_NO
   ) KK0081_GENE
   ON
       KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
       AND KK0081.GENE_ADD_DTM = KK0081_GENE.MAX_GENE_DTM
   ,KK_T_KAKINS    KK0321
WHERE
    KK0491.SEIKY_KEI_NO = ?
AND KK0321.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
AND KK0081.SVC_KEI_NO   = KK0321.SVC_KEI_NO
AND ? BETWEEN KK0321.KAKINS_TSTAYMD AND KK0321.KAKINS_TENDYMD
AND KK0491.MK_FLG = '0'
AND KK0321.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_009)
#--【内容】
#--サービス契約番号(KK0081.SVC_KEI_NO)
#--【検索条件】
#--サービス契約番号(KK0081.SVC_KEI_NO)
#--サービス種別コード(AC0501.PCALL_SVC_SBT_CD)
#--通話種別コード(AC0501.TUWA_SBT_CD)
#--通話種別適用開始年月日(AC0501.TUWA_SBT_TSTAYMD)
#--通話種別適用終了年月日(AC0501.TUWA_SBT_TENDYMD)
#--予約適用年月日(KK0081.RSV_APLY_YMD)
#--【結合テーブル】
#--通話種別(AC_M_TUWA_SBT)
#--【結合条件】
#--なし
#--【抽出対象】
#--一意 
#--【世代管理】
#--あり 
#--【予約管理】
#--あり 
#--【無効フラグ考慮】
#--あり
#-----------------------------------------------------------

--KEY:AC_SELECT_009

SELECT
  KK0081.SVC_KEI_NO
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN AC_M_TUWA_SBT AC0501
  ON KK0081.SVC_CD = AC0501.SVC_CD
WHERE
  KK0081.SVC_KEI_NO = ?
  AND AC0501.PCALL_SVC_SBT_CD = ?
  AND AC0501.PCALL_SBT_CD = ?
  AND AC0501.TUWA_SBT_TSTAYMD <= ?
  AND AC0501.TUWA_SBT_TENDYMD >= ?
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
      SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
      FROM
        KK_T_SVC_KEI KK0081_GENE
      WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND
        KK0081_GENE.RSV_APLY_YMD <= ?
      AND
        KK0081_GENE.RSV_APLY_CD = '2'
      AND
        KK0081_GENE.MK_FLG = '0'
    )
  AND KK0081.MK_FLG = '0'
  AND AC0501.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_010)
#--【KCAT事業者間精算明細表作成】
#--マンション情報取得
#-----------------------------------------------------------

--KEY:AC_SELECT_010

SELECT
     KK0881.MANSION_ID
   , KK0861.MANSION_BUKKEN_CD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_RSVYMD_GENEDTM
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO   =   ?
          AND KK0081_GENE.RSV_APLY_CD  =  '2'
          AND KK0081_GENE.RSV_APLY_YMD <=  ?
          AND KK0081_GENE.MK_FLG       =  '0'
        GROUP BY
              KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON  KK0081.SVC_KEI_NO                          = KK0081_GENE.SVC_KEI_NO
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = KK0081_GENE.MAX_RSVYMD_GENEDTM
    INNER JOIN
        KK_T_TK_HOSHIKI_KEI KK0891
    ON KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO
    INNER JOIN
        KK_T_KAISEN_USE_KEI KK0881
    ON KK0891.KAISEN_USE_KEI_NO = KK0881.KAISEN_USE_KEI_NO
    INNER JOIN
        KK_T_OWNR_KEI KK0871
    ON KK0881.OWNR_KEI_NO = KK0871.OWNR_KEI_NO
    INNER JOIN
        KK_T_MANSION_BUKKEN KK0861
    ON KK0871.MANSION_BUKKEN_NO = KK0861.MANSION_BUKKEN_NO
WHERE
        KK0861.MK_FLG = '0'
    AND KK0871.MK_FLG = '0'
    AND KK0881.MK_FLG = '0'
    AND KK0891.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_011)
#--【KCAT事業者間精算明細表作成】
#--電障コード取得
#-----------------------------------------------------------

--KEY:AC_SELECT_011

SELECT
     KK0581.DMPSANK_SBT_CD
    ,ZM0171.CD_DIV_NM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO    = ?
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.MK_FLG        = '0'
        GROUP BY
              KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON      KK0081.SVC_KEI_NO   = KK0081_GENE.SVC_KEI_NO
        AND KK0081.GENE_ADD_DTM = KK0081_GENE.MAX_GENE_DTM
    INNER JOIN
        KK_T_SVC_KEI_EOH_TV KK0101
    ON  KK0081.SVC_KEI_NO    = KK0101.SVC_KEI_NO
    INNER JOIN
        (SELECT
              KK0101_GENE.SVC_KEI_NO
            , MAX( KK0101_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
         FROM KK_T_SVC_KEI_EOH_TV KK0101_GENE
        WHERE KK0101_GENE.SVC_KEI_NO   =  ?
          AND KK0101_GENE.MK_FLG       =  '0'
        GROUP BY
              KK0101_GENE.SVC_KEI_NO
        ) KK0101_GENE
    ON      KK0101.SVC_KEI_NO   = KK0101_GENE.SVC_KEI_NO
        AND KK0101.GENE_ADD_DTM = KK0101_GENE.MAX_GENE_DTM
    INNER JOIN
        KK_T_DMPS_ANKEN KK0581
    ON  KK0101.DMPS_ANKEN_NO    = KK0581.DMPS_ANKEN_NO
    LEFT OUTER JOIN
        ZM_M_CD_NM_KANRI ZM0171
    ON KK0581.DMPSANK_SBT_CD = ZM0171.CD_DIV
WHERE
        KK0581.MK_FLG      = '0'
    AND ZM0171.CD_SBT_CD   = ?
    AND ZM0171.CD_TSTAYMD <= ?
    AND ZM0171.CD_TENDYMD >= ?
    AND ZM0171.MK_FLG      = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_012)
#--【KCAT事業者間精算明細表作成】
#--工事完了情報取得
#-----------------------------------------------------------

--KEY:AC_SELECT_012

SELECT
    KU0011.KOJIAK_FIN_DTM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO   =  ?
          AND KK0081_GENE.RSV_APLY_CD  =  '2'
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.MK_FLG       =  '0'
        GROUP BY
              KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON  KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
    INNER JOIN
        KU_T_SVKEI_KOJIAK KU0081
    ON KK0081.SVC_KEI_NO = KU0081.SVC_KEI_NO
    INNER JOIN
        KU_T_KOJIAK KU0011
    ON KU0081.KOJIAK_NO = KU0011.KOJIAK_NO
WHERE
        KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
    AND KU0081.SVKEI_KOJIAK_TENDYMD >= ?
    AND KU0081.MK_FLG = '0'
    AND KU0011.MK_FLG = '0'
ORDER BY
    KU0011.KOJIAK_FIN_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_013)
#--【KCN事業者間精算明細表作成】
#--【KCAT事業者間精算明細表作成】
#--【通信補正情報チェック】
#--サービス情報取得
#-----------------------------------------------------------

--KEY:AC_SELECT_013

SELECT
       KK0081.SVC_CHRG_STAYMD
      ,KK0081.SVC_CHRG_ENDYMD
      ,KK0081.PLAN_CHRG_STAYMD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO    = ?
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.RSV_APLY_CD   = '2'
          AND KK0081_GENE.MK_FLG        = '0'
        GROUP BY
              KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON      KK0081.SVC_KEI_NO   = KK0081_GENE.SVC_KEI_NO
       AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = KK0081_GENE.MAX_GENE_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_014)
#--【ＥＭ事業者間精算チェックデータ作成】
#--料金プラン名を取得する。
#-----------------------------------------------------------

--KEY:AC_SELECT_014

SELECT
     KK0591.PPLAN_NM
FROM
    KK_M_PPLAN KK0591
WHERE
        KK0591.PPLAN_CD = ?
    AND KK0591.PPLAN_TSTAYMD <= ?
    AND KK0591.PPLAN_TENDYMD >= ?
    AND KK0591.MK_FLG        =  '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_015)
#--【通話料上限超過情報出力】
#--ハガキ用の情報取得
#-----------------------------------------------------------

--KEY:AC_SELECT_015

SELECT
      KK0081.SYSID
    , CK0011.CUST_NM
    , CK0011.KEISHA_PCD
    , (
        SELECT
          ZM0081.STATE_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          CK0011.KEISHA_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) STATE_NM_CUST
    , (
        SELECT
          ZM0081.CITY_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          CK0011.KEISHA_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) CITY_NM_CUST
    , (
        SELECT
          ZM0081.OAZTSU_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          CK0011.KEISHA_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) OAZTSU_NM_CUST
    , (
        SELECT
          ZM0081.AZCHO_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          CK0011.KEISHA_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) AZCHO_NM_CUST
    , CK0011.KEISHA_BNCHIGO
    , CK0011.KEISHA_ADRTTM
    , CK0011.KEISHA_ADRRM
    , KK0491.SEIKY_KEI_NO
    , KK0491.SOHUS_NM
    , KK0491.SOHUS_PCD
    , (
        SELECT
          ZM0081.STATE_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          KK0491.SOHUS_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) STATE_NM_SEIKY
    , (
        SELECT
          ZM0081.CITY_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          KK0491.SOHUS_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) CITY_NM_SEIKY
    , (
        SELECT
          ZM0081.OAZTSU_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          KK0491.SOHUS_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) OAZTSU_NM_SEIKY
    , (
        SELECT
          ZM0081.AZCHO_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          KK0491.SOHUS_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) AZCHO_NM_SEIKY
    , KK0491.SOHUS_BNCHIGO
    , KK0491.SOHUS_ADRTTM
    , KK0491.SOHUS_ADRRM
    , KK0251.KAISEN_PLACE_PCD
    , (
        SELECT
          ZM0081.STATE_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          KK0251.KAISEN_PLACE_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) STATE_NM_RIYOU
    , (
        SELECT
          ZM0081.CITY_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          KK0251.KAISEN_PLACE_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) CITY_NM_RIYOU
    , (
        SELECT
          ZM0081.OAZTSU_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          KK0251.KAISEN_PLACE_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) OAZTSU_NM_RIYOU
    , (
        SELECT
          ZM0081.AZCHO_NM
        FROM
          ZM_M_AD ZM0081
        WHERE
          KK0251.KAISEN_PLACE_AD_CD = ZM0081.AD_CD
          AND ZM0081.RSV_APLY_YMD || ZM0081.GENE_ADD_DTM =
          (
            SELECT
                MAX(ZM0081_GENE.RSV_APLY_YMD || ZM0081_GENE.GENE_ADD_DTM) AS ZM0081_MAX
            FROM
                ZM_M_AD ZM0081_GENE
            WHERE
                ZM0081_GENE.AD_CD = ZM0081.AD_CD
                AND ZM0081_GENE.RSV_APLY_YMD <= ?
                AND ZM0081_GENE.MK_FLG = '0'
          )
    ) AZCHO_NM_RIYOU
    , KK0251.KAISEN_PLACE_BNCHIGO
    , KK0251.KAISEN_PLACE_ADRTTM
    , KK0251.KAISEN_PLACE_ADRRM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
        ON KK0081.SYSID = CK0011.SYSID
    INNER JOIN KK_T_KAKINS KK0321
        ON KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
    INNER JOIN KK_T_SEIKY_KEI KK0491
        ON KK0321.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
    INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241
        ON KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
    INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
        ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM
                KK_T_SVC_KEI KK0081_GENE
            WHERE 
                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
                AND KK0081_GENE.RSV_APLY_YMD <= ?
                AND KK0081_GENE.RSV_APLY_CD = '2'
                AND KK0081_GENE.MK_FLG = '0'
        )
    AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =
        (
            SELECT
                MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
            FROM
                CK_T_CUST CK0011_GENE
            WHERE
                CK0011_GENE.SYSID = CK0011.SYSID
                AND CK0011_GENE.RSV_APLY_YMD <= ?
                AND CK0011_GENE.RSV_APLY_CD = '2'
                AND CK0011_GENE.MK_FLG = '0'
        )
    AND ? BETWEEN KK0321.KAKINS_TSTAYMD AND KK0321.KAKINS_TENDYMD
    AND KK0321.MK_FLG = '0'
    AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM =
        (    
            SELECT
                MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
            FROM
                KK_T_SEIKY_KEI KK0491_GENE
            WHERE
                KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
                AND KK0491_GENE.RSV_APLY_YMD <= ?
                AND KK0491_GENE.RSV_APLY_CD = '2'
                AND KK0491_GENE.MK_FLG = '0'
        )
    AND ? BETWEEN KK0241.KAISEN_UCWK_USE_STAYMD AND KK0241.KAISEN_UCWK_USE_ENDYMD
    AND KK0241.MK_FLG = '0'
    AND KK0251.GENE_ADD_DTM =
        (    
            SELECT
                MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
            FROM
                KK_T_SVKEI_KAISEN_UW KK0251_GENE
            WHERE
                KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                AND ? BETWEEN KK0251_GENE.USE_STAYMD AND KK0251_GENE.USE_ENDYMD
                AND KK0251_GENE.MK_FLG = '0'
        )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_016)
#--UIA017_ACPRC00801_ｅｏ光電話利用呼情報取込.elsx 参照
#-----------------------------------------------------------

--KEY:AC_SELECT_016

SELECT
    KK0081.SVC_KEI_NO
   ,KK0081.SVC_KEI_UCWK_NO
   ,KK0081.SEIKY_KEI_NO
   ,KK0081.PRC_GRP_CD
   ,KK0081.PCRS_CD
   ,KK0081.PPLAN_CD
FROM
    (SELECT
        KK0081.SVC_KEI_NO
       ,KK0161.SVC_KEI_UCWK_NO
       ,KK0321.SEIKY_KEI_NO
       ,KK0081.PRC_GRP_CD
       ,KK0081.PCRS_CD
       ,KK0081.PPLAN_CD
    FROM
        KK_T_SVKEIUW_EOH_TEL KK0191
        INNER JOIN
            KK_T_SVC_KEI_UCWK KK0161
            INNER JOIN
                (SELECT
                    MAX(KK0161_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
                   ,KK0161_GENE.SVC_KEI_UCWK_NO
                FROM
                    KK_T_SVC_KEI_UCWK KK0161_GENE
                WHERE
                        KK0161_GENE.MK_FLG          = '0'
                    AND KK0161_GENE.RSV_APLY_YMD   <= ?
                    AND KK0161_GENE.RSV_APLY_CD     = '2'
                GROUP BY
                    KK0161_GENE.SVC_KEI_UCWK_NO
                ) KK0161_GENE
            ON  KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
            AND KK0161_GENE.MAX_GENE_DTM    = KK0161.GENE_ADD_DTM
            AND (KK0161.SVC_ENDYMD > ?
                 OR KK0161.SVC_ENDYMD IS NULL)
            INNER JOIN
                KK_T_SVC_KEI KK0081
            ON
                KK0161.SVC_KEI_NO      = KK0081.SVC_KEI_NO
        ON
            KK0191.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
        INNER JOIN
            KK_T_KAKINS KK0321
        ON
            KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
    WHERE
        KK0191.TELNO            = ?
        AND KK0191.GENE_ADD_DTM = 
            (SELECT
                MAX(KK0191_GENE.GENE_ADD_DTM)
            FROM
                KK_T_SVKEIUW_EOH_TEL KK0191_GENE
            WHERE
                KK0191_GENE.SVC_KEI_UCWK_NO = KK0191.SVC_KEI_UCWK_NO
                AND KK0191_GENE.RSV_APLY_CD = '2'
                AND KK0191_GENE.MK_FLG      = '0')
        AND KK0191.MK_FLG          = '0'
        AND KK0161.MK_FLG          = '0'
        AND KK0321.KAKINS_TSTAYMD <= ?
        AND KK0321.KAKINS_TENDYMD >= ?
        AND KK0321.MK_FLG          = '0'
        AND KK0081.GENE_ADD_DTM    = 
            (SELECT
                MAX(KK0081_GENE.GENE_ADD_DTM)
            FROM
                KK_T_SVC_KEI KK0081_GENE
            WHERE
                KK0081_GENE.SVC_KEI_NO        = KK0081.SVC_KEI_NO
                AND KK0081_GENE.RSV_APLY_CD   = '2'
                AND KK0081_GENE.RSV_APLY_YMD <= ?
                AND KK0081_GENE.MK_FLG        = '0')
        AND KK0081.MK_FLG          = '0'
    ORDER BY
        KK0161.SVC_ENDYMD NULLS LAST
    ) KK0081
WHERE
    ROWNUM = 1

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_017)
#--【割引適用上限判定】
#--料金グループコード、料金コースコード、料金プランコードを取得する。
#-----------------------------------------------------------

--KEY:AC_SELECT_017

SELECT
    KK0081.PRC_GRP_CD
   ,KK0081.PCRS_CD
   ,KK0081.PPLAN_CD
FROM
    (SELECT
        KK0321_SUB.SVC_KEI_NO
    FROM
        KK_T_KAKINS KK0321_SUB
    WHERE
        KK0321_SUB.SEIKY_KEI_NO        = ?
        AND KK0321_SUB.KAKINS_TSTAYMD <= ?
        AND KK0321_SUB.KAKINS_TENDYMD >= ?
        AND KK0321_SUB.MK_FLG          = '0'
    ) KK0321
    INNER JOIN
        (SELECT DISTINCT
            KK0081_SUB.PRC_GRP_CD
           ,KK0081_SUB.PCRS_CD
           ,KK0081_SUB.PPLAN_CD
           ,KK0081_SUB.SVC_KEI_NO
        FROM
            KK_T_SVC_KEI KK0081_SUB
                INNER JOIN
                    (SELECT 
                        MAX(KK0081_MAX.RSV_APLY_YMD || KK0081_MAX.GENE_ADD_DTM) AS MAX_DATE
                       ,KK0081_MAX.SVC_KEI_NO
                    FROM
                        KK_T_SVC_KEI KK0081_MAX
                    WHERE
                        KK0081_MAX.RSV_APLY_YMD <= ?
                        AND KK0081_MAX.MK_FLG    = '0'
                    GROUP BY
                        KK0081_MAX.SVC_KEI_NO
                    ) KK0081_MAX
                ON
                    KK0081_MAX.SVC_KEI_NO                                    = KK0081_SUB.SVC_KEI_NO
                    AND (KK0081_SUB.RSV_APLY_YMD || KK0081_SUB.GENE_ADD_DTM) = KK0081_MAX.MAX_DATE
        WHERE
                 KK0081_SUB.SVC_KEI_STAT IN (?, ?, ?)
            AND  KK0081_SUB.SHOSA_YMD    <= ?
            AND (KK0081_SUB.SHOSA_CL_YMD  > ?
            OR   KK0081_SUB.SHOSA_CL_YMD IS NULL)
        ) KK0081
    ON
        KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
GROUP BY KK0081.PRC_GRP_CD,KK0081.PCRS_CD,KK0081.PPLAN_CD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_018)
#--【ＥＭ利用呼情報取込】
#--初回課金情報作成判定
#-----------------------------------------------------------

--KEY:AC_SELECT_018

SELECT
    KK0121.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN 
        KK_T_SVC_KEI_EOMOBA KK0121
    ON 
        KK0081.SVC_KEI_NO = KK0121.SVC_KEI_NO
        AND KK0081.GENE_ADD_DTM = KK0121.GENE_ADD_DTM
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE 
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
    )
     AND (
        KK0121.FIRST_PCT_HASSEI_YMD IS NULL
        OR  KK0121.FIRST_PCT_HASSEI_YMD > ?
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_019)
#--【内容】
#--料金コースコード(KK0081.PCRS_CD)
#--料金プランコード(KK0081.PPLAN_CDFROM)
#--【検索条件】
#--サービス契約番号(KK0081.SVC_KEI_NO)
#--【結合テーブル】
#--なし
#--【結合条件】
#--なし
#--【抽出対象】
#--一意
#-----------------------------------------------------------

--KEY:AC_SELECT_019

SELECT
  KK0081.PCRS_CD,
  KK0081.PPLAN_CD
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.MK_FLG = '0'
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT
         MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM
         KK_T_SVC_KEI KK0081_GENE
       WHERE 
         KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND KK0081_GENE.RSV_APLY_YMD <= ?
     AND KK0081_GENE.RSV_APLY_CD = '2'
     AND KK0081_GENE.MK_FLG = '0')
  ORDER BY KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_020)
#--UIA17_ACPRC04801_通話料上限超過情報出力.xlsx参照
#-----------------------------------------------------------

--KEY:AC_SELECT_020

SELECT
      CK0011.CUST_NM
    , KK0491.SOHUS_NM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
         FROM 
              KK_T_SVC_KEI KK0081_GENE
         WHERE
                  KK0081_GENE.RSV_APLY_YMD <=  ?
              AND KK0081_GENE.RSV_APLY_CD   = '2'
              AND KK0081_GENE.MK_FLG        = '0'
          GROUP BY
              KK0081_GENE.SVC_KEI_NO
         ) KK0081_GENE
     ON
             KK0081.SVC_KEI_NO                          = KK0081_GENE.SVC_KEI_NO
         AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = KK0081_GENE.MAX_GENE_ADD_DTM
    INNER JOIN
        CK_T_CUST CK0011
    ON 
        KK0081.SYSID = CK0011.SYSID
        INNER JOIN
            (SELECT
                   CK0011_GENE.SYSID
                 , MAX(CK0011_GENE.RSV_APLY_YMD||CK0011_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
             FROM
                 CK_T_CUST CK0011_GENE
             WHERE
                     CK0011_GENE.RSV_APLY_YMD <=  ?
                 AND CK0011_GENE.RSV_APLY_CD  =  '2'
                 AND CK0011_GENE.MK_FLG       =  '0'
             GROUP BY
                 CK0011_GENE.SYSID
             ) CK0011_GENE
        ON
                CK0011.SYSID                             = CK0011_GENE.SYSID
            AND CK0011.RSV_APLY_YMD||CK0011.GENE_ADD_DTM = CK0011_GENE.MAX_GENE_ADD_DTM
    INNER JOIN
        (SELECT
            KK0321.SEIKY_KEI_NO
          , KK0321.SVC_KEI_NO
        FROM
            KK_T_KAKINS KK0321
        WHERE
                KK0321.KAKINS_TSTAYMD <= ?
            AND KK0321.KAKINS_TENDYMD >= ?
            AND KK0321.MK_FLG = '0'
        ) KK0321
        ON KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
    INNER JOIN
        (SELECT
            KK0491.SEIKY_KEI_NO
          , KK0491.SOHUS_NM
        FROM
            KK_T_SEIKY_KEI KK0491
            INNER JOIN
                (SELECT
                       KK0491_GENE.SEIKY_KEI_NO
                     , MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
                 FROM
                       KK_T_SEIKY_KEI KK0491_GENE
                 WHERE
                         KK0491_GENE.RSV_APLY_YMD <=  ?
                     AND KK0491_GENE.RSV_APLY_CD   = '2'
                     AND KK0491_GENE.MK_FLG        = '0'
                 GROUP BY
                         KK0491_GENE.SEIKY_KEI_NO
                 ) KK0491_GENE
             ON
                     KK0491.SEIKY_KEI_NO                        = KK0491_GENE.SEIKY_KEI_NO
                 AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM = KK0491_GENE.MAX_GENE_ADD_DTM
        ) KK0491
    ON
        KK0321.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
WHERE
         KK0081.SVC_KEI_NO    =  ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_021)
#--UIA17_ACPRC05001_通信量補正情報取込.xlsx　参照
#-----------------------------------------------------------

--KEY:AC_SELECT_021

SELECT
    KK0491.SEIKY_KEI_NO
    ,KK0081.PCRS_CD
    ,KK0081.PPLAN_CD
    ,KK0171.ISP_NINSHO_ID
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
            KK0081_GENE.SVC_KEI_NO
            ,MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
                KK0081_GENE.SVC_KEI_NO    = ?
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD   = '2'
            AND KK0081_GENE.MK_FLG        = '0'
        GROUP BY
            KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON
            KK0081.SVC_KEI_NO                            = KK0081_GENE.SVC_KEI_NO
        AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = KK0081_GENE.MAX_GENE_ADD_DTM
    INNER JOIN
            KK_T_KAKINS KK0321
    ON  
        KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND ? BETWEEN  KK0321.KAKINS_TSTAYMD AND KK0321.KAKINS_TENDYMD
    AND KK0321.MK_FLG = '0'
    INNER JOIN
        KK_T_SEIKY_KEI KK0491
    ON
        KK0491.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
    INNER JOIN
        (SELECT
            KK0491_GENE.SEIKY_KEI_NO
            ,MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_SEIKY_KEI KK0491_GENE
        WHERE
                KK0491_GENE.RSV_APLY_YMD <= ?
            AND KK0491_GENE.RSV_APLY_CD   = '2'
            AND KK0491_GENE.MK_FLG        = '0'
        GROUP BY
            KK0491_GENE.SEIKY_KEI_NO
        ) KK0491_GENE
    ON
             KK0491.SEIKY_KEI_NO                         = KK0491_GENE.SEIKY_KEI_NO
        AND (KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM) = KK0491_GENE.MAX_GENE_ADD_DTM
    INNER JOIN
        KK_T_SVC_KEI_UCWK KK0161
    ON
        KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO
    INNER JOIN
        (SELECT
            KK0161_GENE.SVC_KEI_UCWK_NO
            ,MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_SVC_KEI_UCWK KK0161_GENE
        WHERE
                KK0161_GENE.SVC_KEI_NO    = ?
            AND KK0161_GENE.RSV_APLY_YMD <= ?
            AND KK0161_GENE.RSV_APLY_CD   = '2'
            AND KK0161_GENE.MK_FLG        = '0'
        GROUP BY
            KK0161_GENE.SVC_KEI_UCWK_NO
        ) KK0161_GENE
    ON
            KK0161.SVC_KEI_UCWK_NO                      = KK0161_GENE.SVC_KEI_UCWK_NO
       AND (KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM) = KK0161_GENE.MAX_GENE_ADD_DTM
    INNER JOIN
        KK_T_SVKEIUW_EOH_NET KK0171
    ON
        KK0171.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
    INNER JOIN
        (SELECT
            KK0171_GENE.SVC_KEI_UCWK_NO
            ,MAX(KK0171_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_SVKEIUW_EOH_NET KK0171_GENE
        WHERE
                KK0171_GENE.RSV_APLY_CD   = '2'
            AND KK0171_GENE.MK_FLG        = '0'
        GROUP BY
            KK0171_GENE.SVC_KEI_UCWK_NO
        ) KK0171_GENE
    ON
           KK0171.SVC_KEI_UCWK_NO  = KK0171_GENE.SVC_KEI_UCWK_NO
       AND KK0171.GENE_ADD_DTM     = KK0171_GENE.MAX_GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_022)
#--UIA17_ACPRC04001_一時金一括登録.xlsx　参照
#-----------------------------------------------------------

--KEY:AC_SELECT_022

SELECT 
    KK0881.MANSION_ID 
   ,KK0891.TK_HOSHIKI_KEI_NO 
   ,KK0891.KANYU_KEI_PAY_HOSHIKI_CD 
   ,KK0081.PRC_GRP_CD 
FROM 
    KK_T_SVC_KEI KK0081 
    INNER JOIN 
      ( SELECT 
              KK0081_GENE.SVC_KEI_NO 
             ,MAX(KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
        FROM 
              KK_T_SVC_KEI KK0081_GENE 
        WHERE KK0081_GENE.SVC_KEI_NO  = ? 
          AND KK0081_GENE.RSV_APLY_CD = ? 
          AND KK0081_GENE.MK_FLG      = '0' 
        GROUP BY 
              KK0081_GENE.SVC_KEI_NO 
      ) KK0081_GENE 
    ON  
        KK0081.SVC_KEI_NO   = KK0081_GENE.SVC_KEI_NO 
    AND KK0081.GENE_ADD_DTM = KK0081_GENE.KK0081_MAX 
    INNER JOIN  
        KK_T_TK_HOSHIKI_KEI KK0891 
    ON  KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO 
    INNER JOIN  
        KK_T_SVC_KEI_DUMMY KK2281 
    ON  KK0081.SVC_KEI_NO   = KK2281.SVC_KEI_NO
    INNER JOIN  
        KK_T_KAISEN_USE_KEI KK0881 
    ON  KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_023)
#--UIA17_ACPRC02806_UQサービス契約精算料金計算
#-----------------------------------------------------------

--KEY:AC_SELECT_023

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_ENDYMD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
            (
             SELECT
                 KK0081_GENE.SVC_KEI_NO,
                 MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
             FROM
                 KK_T_SVC_KEI KK0081_GENE
             WHERE
                 KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD   = '2'
             AND KK0081_GENE.MK_FLG        = '0'
             GROUP BY
                 KK0081_GENE.SVC_KEI_NO
            ) KK0081_GENE
    ON
        KK0081.SVC_KEI_NO                            = KK0081_GENE.SVC_KEI_NO
    AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = KK0081_GENE.MAX_GENE_ADD_DTM
WHERE
    KK0081.SVC_KEI_STAT in (?, ?)
AND KK0081.PRC_GRP_CD   = ?
AND KK0081.SVC_STA_YMD <= ?
AND KK0081.SVC_ENDYMD  >= ?
ORDER BY
    KK0081.SVC_KEI_NO
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_024)
#--UIA17_ACPRC00150_割賦債権内訳情報作成.xlsx
#-----------------------------------------------------------

--KEY:AC_SELECT_024

SELECT
    KK2541.KAP_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
          (SELECT
               MAX(KK0081_GENE.RSV_APLY_YMD||KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
              ,KK0081_GENE.SVC_KEI_NO
           FROM
               KK_T_SVC_KEI KK0081_GENE
           WHERE
               KK0081_GENE.SVC_KEI_NO  = ?
           AND KK0081_GENE.RSV_APLY_CD  = ?
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.MK_FLG       = '0'
           GROUP BY
               KK0081_GENE.SVC_KEI_NO
          ) KK0081_GENE
     ON  KK0081.SVC_KEI_NO                        = KK0081_GENE.SVC_KEI_NO
     AND KK0081.RSV_APLY_YMD||KK0081.GENE_ADD_DTM = KK0081_GENE.MAX_GENE_DTM
    INNER JOIN
            KK_T_KAKINS KK0321
    ON
            KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
    AND ? BETWEEN  KK0321.KAKINS_TSTAYMD AND KK0321.KAKINS_TENDYMD
    AND KK0321.MK_FLG = '0'
    INNER JOIN
            KK_T_KAP_KEI KK2541
    ON
            KK2541.KKTK_SVC_KEI_NO = KK0321.KKTK_SVC_KEI_NO
    WHERE
            KK2541.KKTK_SVC_KEI_NO = ?
    AND     KK2541.RSV_APLY_YMD || KK2541.GENE_ADD_DTM = 
           (
             SELECT MAX(KK2541_GENE.RSV_APLY_YMD || KK2541_GENE.GENE_ADD_DTM)
             FROM   KK_T_KAP_KEI KK2541_GENE
             WHERE  KK2541_GENE.KAP_KEI_NO = KK2541.KAP_KEI_NO
             AND    KK2541_GENE.RSV_APLY_CD = ?
             AND    KK2541_GENE.RSV_APLY_YMD <= ?
             AND    KK2541_GENE.MK_FLG = '0'
           )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_025)
#--EO光電話使用呼情報取り込み
#-----------------------------------------------------------

--KEY:AC_SELECT_025

SELECT
  KK0081.SVC_CD
 ,KK0081.PRC_GRP_CD
FROM
KK_T_SVC_KEI KK0081
INNER JOIN 
(
 SELECT
   MAX(KK0081_GENE.GENE_ADD_DTM) ADD_DTM
  ,KK0081_GENE.SVC_KEI_NO
 FROM
   KK_T_SVC_KEI KK0081_GENE
 WHERE
       KK0081_GENE.SVC_KEI_NO    = ?
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD   = '2'
   AND KK0081_GENE.MK_FLG        = '0'
 GROUP BY
   KK0081_GENE.SVC_KEI_NO
) KK0081_GENE
ON
        KK0081_GENE.ADD_DTM = KK0081.GENE_ADD_DTM
    AND KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
  KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_026)
#--【ＥＭ利用呼情報取込】
#--初回課金情報作成判定
#-----------------------------------------------------------

--KEY:AC_SELECT_026

SELECT
    KK0121.SVC_KEI_NO
    ,KK0121.FIRST_PCT_HASSEI_YMD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN 
        KK_T_SVC_KEI_EOMOBA KK0121
    ON 
        KK0081.SVC_KEI_NO = KK0121.SVC_KEI_NO
        AND KK0081.GENE_ADD_DTM = KK0121.GENE_ADD_DTM
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE 
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_027)
#--【050通話料上限超過情報出力】サービス契約スキーマ情報取得
#-----------------------------------------------------------

--KEY:AC_SELECT_027

SELECT
   KK0081.SVC_KEI_NO
FROM
   KK_T_SVC_KEI KK0081
INNER JOIN 
(
 SELECT
   MAX(KK0081_GENE.GENE_ADD_DTM) ADD_DTM
  ,KK0081_GENE.SYSID
 FROM
   KK_T_SVC_KEI KK0081_GENE
 WHERE
       KK0081_GENE.SYSID    = ?
   AND KK0081_GENE.PCRS_CD  =  'A58'
   AND KK0081_GENE.PPLAN_CD  =  'PA5801'
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD   = '2'
   AND KK0081_GENE.MK_FLG        = '0'
 GROUP BY
   KK0081_GENE.SYSID
) KK0081_GENE
ON
        KK0081_GENE.ADD_DTM = KK0081.GENE_ADD_DTM
    AND KK0081_GENE.SYSID = KK0081.SYSID
WHERE
      KK0081.PCRS_CD      =  'A58'
AND   KK0081.PPLAN_CD     =  'PA5801'
AND   KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_028)
#--【一時金一括登録】
#--サービス契約番号にひもづく料金グループコード取得
#-----------------------------------------------------------

--KEY:AC_SELECT_028

 SELECT
    KK0081.PRC_GRP_CD 
  , KK0081.PCRS_CD
   FROM 
      KK_T_SVC_KEI KK0081
WHERE
        KK0081.SVC_KEI_NO = ? 
    AND KK0081.SVC_KEI_STAT <> ? 
    AND KK0081.RSV_APLY_CD = '2' 
    AND KK0081.MK_FLG = '0'  
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM IN  
        (SELECT 
             MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX   
           FROM 
             KK_T_SVC_KEI KK0081_GENE 
          WHERE 
                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
            AND KK0081_GENE.RSV_APLY_YMD <= ? 
            AND KK0081_GENE.RSV_APLY_CD = '2' 
            AND KK0081_GENE.MK_FLG = '0')
            

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_029)
#--【MVNO料金情報取込】
#--サービス契約番号存在チェック
#-----------------------------------------------------------

--KEY:AC_SELECT_029

SELECT
  KK0081.PRC_GRP_CD
  ,KK0081.PCRS_CD
  ,KK0081.PPLAN_CD
  ,KK0081.SVC_KEI_STAT
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.RSV_APLY_YMD <= ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_030)
#--【MVNO料金情報取込】
#--課金開始済みチェック
#-----------------------------------------------------------

--KEY:AC_SELECT_030

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND 
    KK0081.SVC_CHRG_STAYMD = 
    (SELECT 
        MAX(KK0081_SUB.SVC_CHRG_STAYMD) 
     FROM 
        KK_T_SVC_KEI KK0081_SUB 
     WHERE 
        KK0081_SUB.PCRS_CD = ?
        AND KK0081_SUB.PPLAN_CD = ?
        AND SUBSTR(KK0081_SUB.SVC_CHRG_STAYMD, 1, 6) <= ?
        AND KK0081_SUB.SVC_KEI_NO = ?)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_031)
#--【MVNO料金情報取込】
#--課金開始済みチェック
#-----------------------------------------------------------

--KEY:AC_SELECT_031

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND 
    KK0081.SVC_CHRG_STAYMD = 
    (SELECT 
        MIN(KK0081_SUB.SVC_CHRG_STAYMD)
     FROM 
        KK_T_SVC_KEI KK0081_SUB 
     WHERE 
        KK0081_SUB.PCRS_CD = ?
        AND KK0081_SUB.PPLAN_CD = ?
        AND SUBSTR(KK0081_SUB.SVC_STA_YMD, 1, 6) <= ?
        AND KK0081_SUB.SVC_KEI_NO = ?)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_032)
#--【内容】
#--サービス契約番号を元に、サービス解約理由コードを取得（世代管理、予約管理を考慮）
#--【条件】
#--サービス契約番号
#--予約適用年月日
#--【抽出対象】
#--一意
#-----------------------------------------------------------

--KEY:AC_SELECT_032

SELECT KK0081.SVC_DLRE_CD
  FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_NO = RPAD(?, 10, ' ')
   AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2')
   AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_033)
#--【料金内訳名称補填】
#--サービス契約の月末課金契約
#-----------------------------------------------------------

--KEY:AC_SELECT_033

SELECT
       KK0081.PRC_GRP_CD
      ,KK0081.PCRS_CD
      ,KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO       = ?
          AND KK0081_GENE.RSV_APLY_YMD     <= ?
          AND KK0081_GENE.RSV_APLY_CD      = '2'
          AND KK0081_GENE.MK_FLG           = '0'
        GROUP BY
              KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON      KK0081.SVC_KEI_NO   = KK0081_GENE.SVC_KEI_NO
       AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = KK0081_GENE.MAX_GENE_DTM
WHERE
              KK0081.PLAN_CHRG_STAYMD <= ?
          AND ? <= KK0081.PLAN_CHRG_ENDYMD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_034)
#--【料金内訳名称補填】
#--サービス契約の月末利用契約
#-----------------------------------------------------------

--KEY:AC_SELECT_034

SELECT
       KK0081.PRC_GRP_CD
      ,KK0081.PCRS_CD
      ,KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO    = ?
          AND KK0081_GENE.RSV_APLY_YMD  <= ?
          AND KK0081_GENE.RSV_APLY_CD   = '2'
          AND KK0081_GENE.MK_FLG        = '0'
        GROUP BY
              KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON      KK0081.SVC_KEI_NO   = KK0081_GENE.SVC_KEI_NO
       AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = KK0081_GENE.MAX_GENE_DTM
WHERE
              KK0081.PLAN_STAYMD <= ?
          AND ? <= KK0081.PLAN_ENDYMD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_035)
#--【料金内訳名称補填】
#--サービス契約の世代最新契約
#-----------------------------------------------------------

--KEY:AC_SELECT_035

SELECT
       KK0081.PRC_GRP_CD
      ,KK0081.PCRS_CD
      ,KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO    = ?
          AND KK0081_GENE.MK_FLG        = '0'
        GROUP BY
              KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON      KK0081.SVC_KEI_NO   = KK0081_GENE.SVC_KEI_NO
       AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = KK0081_GENE.MAX_GENE_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_036)
#--【通信量情報チェック】
#--プラン終了種別コード＝１かつプラン課金中の予約適用済レコードの取得
#-----------------------------------------------------------

--KEY:AC_SELECT_036

SELECT KK0081.SVC_KEI_NO
      ,KK0081.PCRS_CD
      ,KK0081.PPLAN_CD
FROM   KK_T_SVC_KEI KK0081
WHERE  KK0081.SVC_KEI_NO = ?
AND    KK0081.RSV_APLY_YMD <= ?
AND    KK0081.RSV_APLY_CD = '2'
AND    KK0081.PLAN_CHRG_STAYMD <= ?
AND    KK0081.PLAN_CHRG_ENDYMD >= ?
AND    KK0081.PLAN_END_SBT_CD = '1'
AND    KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_037)
#--ACPRC05201にて使用
#--サービス契約からカレントデータのサービス課金開始年月日を取得する。
#-----------------------------------------------------------

--KEY:AC_SELECT_037

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_CHRG_STAYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM
             KK_T_SVC_KEI KK0081_GENE
         WHERE
             KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
             AND KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD = '2'
             AND KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_038)
#--【内容】
#--請求に対するサービス契約(「ネット」契約)の件数を取得
#--【条件】
#--予約適用年月日、予約適用年月日、予約適用年月日
#--請求契約番号
#--請求書発行手数料課金サービス 
#--請求書発行手数料非課金料金グループ 
#--サービス開始年月日、サービス解約起算年月日
#--【抽出対象】
#--一意
#-----------------------------------------------------------

--KEY:AC_SELECT_038

SELECT COUNT(1) AS CNT 
FROM KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAKINS KK0321 ON
KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE 
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
        SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0081_GENE.MK_FLG       =  '0'
        AND KK0081_GENE.RSV_APLY_CD  =  '2'
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        GROUP BY KK0081_GENE.SVC_KEI_NO
    )
AND KK0321.MK_FLG = '0'
AND ? BETWEEN KAKINS_TSTAYMD AND KAKINS_TENDYMD
AND KK0321.SEIKY_KEI_NO =  ?
AND 0 < INSTR(?, KK0081.SVC_CD)
AND 0 = INSTR(?, KK0081.PRC_GRP_CD)
AND KK0081.SVC_STA_YMD <= ?
AND ? < NVL(RTRIM(KK0081.SVC_DSL_KISAN_YMD),'99999999')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_039)
#--サービス開始日を取得する。
#-----------------------------------------------------------

--KEY:AC_SELECT_039

SELECT KK0081.SVC_STA_YMD
FROM KK_T_SVC_KEI KK0081
WHERE KK0081.SVC_KEI_NO = ?
AND KK0081.SVC_STA_YMD IS NOT NULL
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
    SELECT KK0081_G.SVC_KEI_NO, MAX (KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
    FROM KK_T_SVC_KEI KK0081_G
    WHERE KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_G.RSV_APLY_YMD <= ?
    AND KK0081_G.RSV_APLY_CD = '2'
    AND KK0081_G.MK_FLG = '0'
    GROUP BY KK0081_G.SVC_KEI_NO
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_040)
#--mineo支払方法未登録情報を取得する。
#-----------------------------------------------------------

--KEY:AC_SELECT_040

SELECT 
	KK0491.SEIKY_KEI_NO 
	, KK0491.SEIKY_KEI_STAT 
	, KK0491.SEIKY_WAY_CD
	, KK0081.SVC_KEI_STAT
	, KK0501.KOZA_STAT 
	, KK0521.CRECA_MK_YM
	, KK0081.SVC_KEI_NO
FROM 
	KK_T_SEIKY_KEI KK0491 
	INNER JOIN ( 
		SELECT  KK0321.SEIKY_KEI_NO
				, KK0321.SVC_KEI_NO 
	    FROM    KK_T_KAKINS KK0321 
	    WHERE   KK0321.MK_FLG       = '0' 
	      AND   KK0321.SVC_KEI_NO   = ? 
	      AND   KK0321.KAKINS_TSTAYMD <= ? 
	      AND   KK0321.KAKINS_TENDYMD >= ? 
	) KK0321 
	ON  KK0321.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
   INNER JOIN ( 
		SELECT  KK0081.SVC_KEI_NO, KK0081.SVC_KEI_STAT 
		FROM    KK_T_SVC_KEI KK0081 
		WHERE   KK0081.SVC_KEI_NO || KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
                                    SELECT
                                        KK0081_GENE.SVC_KEI_NO || MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                    FROM
                                        KK_T_SVC_KEI KK0081_GENE
                                    WHERE 
                                        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                        AND KK0081_GENE.RSV_APLY_YMD <= ?
                                        AND KK0081_GENE.RSV_APLY_CD = '2'
                                        AND KK0081_GENE.MK_FLG = '0'
                                        GROUP BY KK0081_GENE.SVC_KEI_NO
                                ) 
   ) KK0081 
       ON  KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
   LEFT OUTER JOIN ( 
       SELECT  KK0501.SEIKY_WAY_NO_KOZA ,  KK0501.KOZA_STAT
       FROM    KK_T_KOZA KK0501 
       WHERE       (KK0501.SEIKY_WAY_NO_KOZA,KK0501.GENE_ADD_DTM) = (
                                        SELECT KK0501_GENE.SEIKY_WAY_NO_KOZA,MAX(KK0501_GENE.GENE_ADD_DTM)
                                        FROM KK_T_KOZA KK0501_GENE
                                        WHERE KK0501_GENE.SEIKY_WAY_NO_KOZA = KK0501.SEIKY_WAY_NO_KOZA
                                        AND KK0501_GENE.MK_FLG = '0'
                                        GROUP BY KK0501_GENE.SEIKY_WAY_NO_KOZA
                                        )
   ) KK0501 
       ON  KK0501.SEIKY_WAY_NO_KOZA = KK0491.SEIKY_WAY_NO_KOZA 
   LEFT OUTER JOIN ( 
       SELECT  KK0521.SEIKY_WAY_NO_CRECARD , KK0521.CRECA_MK_YM
       FROM    KK_T_CRECARD KK0521 
       WHERE   (KK0521.SEIKY_WAY_NO_CRECARD , KK0521.GENE_ADD_DTM) = (
                                SELECT
                                    KK0521_GENE.SEIKY_WAY_NO_CRECARD,MAX(KK0521_GENE.GENE_ADD_DTM)
                                FROM
                                    KK_T_CRECARD KK0521_GENE
                                WHERE
                                    KK0521_GENE.SEIKY_WAY_NO_CRECARD = KK0521.SEIKY_WAY_NO_CRECARD AND
                                    KK0521_GENE.MK_FLG = '0'
                                    GROUP BY KK0521_GENE.SEIKY_WAY_NO_CRECARD
                                )           
                     ) KK0521
       ON  KK0521.SEIKY_WAY_NO_CRECARD = KK0491.SEIKY_WAY_NO_CRECARD 
WHERE 
    KK0491.MK_FLG           = '0' 
    AND KK0491.RSV_APLY_CD  = '2' 
    AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM = ( 
        SELECT  MAX(T.RSV_APLY_YMD || T.GENE_ADD_DTM) AS MAX_RSV_GENE 
        FROM    KK_T_SEIKY_KEI T  
        WHERE   T.SEIKY_KEI_NO  = KK0491.SEIKY_KEI_NO  
          AND   T.MK_FLG        = '0' 
          AND   T.RSV_APLY_CD   = '2' 
          AND   T.RSV_APLY_YMD  <= ? 
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AC_SELECT_041)
#--請求先番号、お客さまID、支払方法、督促ステータス、契約状態、送付先住所を取得する。
#-----------------------------------------------------------

--KEY:AC_SELECT_041

SELECT
    KK0081.SVC_KEI_NO
    ,KK0081.SVC_KEI_STAT
    ,KK0491.SEIKY_WAY_CD
    ,KK0491.SOHUS_AD_CD
    ,KK0491.SOHUS_PCD
    ,KK0491.SOHUS_STATE_NM
    ,KK0491.SOHUS_CITY_NM
    ,KK0491.SOHUS_OAZTSU_NM
    ,KK0491.SOHUS_AZCHO_NM
    ,KK0491.SOHUS_ADRTTM
    ,KK0491.SOHUS_ADRRM
    ,KK0491.SOHUS_BNCHIGO
    ,NVL(KK0491.TOKUSOKU_STAT, '00') TOKUSOKU_STAT
    ,KK0491.SEIKY_KEI_NO
FROM
     KK_T_SVC_KEI KK0081
INNER JOIN 
         (
          SELECT
               KK0081.SVC_KEI_NO
              ,MAX(KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) AS KK0081_MAX
          FROM
               KK_T_SVC_KEI KK0081
          WHERE 
               KK0081.SVC_KEI_NO = ?
          AND  KK0081.RSV_APLY_YMD <=  ?
          AND  KK0081.RSV_APLY_CD   = '2'
          AND  KK0081.MK_FLG        = '0'
          GROUP BY
               KK0081.SVC_KEI_NO
         ) KK0081_GENE
 ON
     KK0081.SVC_KEI_NO                          = KK0081_GENE.SVC_KEI_NO
 AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = KK0081_GENE.KK0081_MAX
INNER JOIN
        (
         SELECT
               KK0321.SEIKY_KEI_NO
              ,KK0321.SVC_KEI_NO
         FROM
               KK_T_KAKINS KK0321
         WHERE
               KK0321.KAKINS_TSTAYMD <=  ?
         AND   KK0321.KAKINS_TENDYMD >=  ?
         AND   KK0321.MK_FLG          = '0'
        ) KK0321
ON  KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
INNER JOIN
        (
         SELECT
              KK0491.SEIKY_KEI_NO
             ,KK0491.SEIKY_WAY_CD
             ,KK0491.SOHUS_AD_CD
             ,KK0491.SOHUS_PCD
             ,KK0491.SOHUS_STATE_NM
             ,KK0491.SOHUS_CITY_NM
             ,KK0491.SOHUS_OAZTSU_NM
             ,KK0491.SOHUS_AZCHO_NM
             ,KK0491.SOHUS_ADRTTM
             ,KK0491.SOHUS_ADRRM
             ,KK0491.SOHUS_BNCHIGO
             ,CH0231.TOKUSOKU_STAT
         FROM
              KK_T_SEIKY_KEI KK0491
         INNER JOIN 
                 (
                  SELECT
                       KK0491.SEIKY_KEI_NO
                      ,MAX(KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM) AS KK0081_MAX
                  FROM
                       KK_T_SEIKY_KEI KK0491
                  WHERE 
                       KK0491.RSV_APLY_YMD <=  ?
                  AND  KK0491.RSV_APLY_CD   = '2'
                  AND  KK0491.MK_FLG        = '0'
                  GROUP BY
                       KK0491.SEIKY_KEI_NO
                 ) KK0491_GENE
         ON
             KK0491.SEIKY_KEI_NO                        = KK0491_GENE.SEIKY_KEI_NO
         AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM = KK0491_GENE.KK0081_MAX
         LEFT OUTER JOIN
                 (
                  SELECT
                       CH0231.TOKUSOKU_STAT
                      ,CH0231.SEIKY_KEI_NO
                  FROM
                       CH_T_TOKUSOKU CH0231
                  WHERE
                       CH0231.TOKUSOKU_STAYMD <=  ?
                  AND  CH0231.TOKUSOKU_ENDYMD  >  ?
                  AND  CH0231.MK_FLG = '0'
                 ) CH0231
         ON
             KK0491.SEIKY_KEI_NO = CH0231.SEIKY_KEI_NO
         ) KK0491        
ON   KK0491.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AK_SELECT_001)
#--【検証用サービス契約抽出】
#--サービス契約情報（継続分）を抽出する。
#-----------------------------------------------------------

--KEY:AK_SELECT_001

SELECT
     KK0081_SUB.SVC_KEI_NO
    ,KK0081_SUB.GENE_ADD_DTM
    ,KK0081_SUB.SVC_KEI_STAT
    ,KK0081_SUB.SYSID
    ,KK0081_SUB.SEIRI_NO
    ,KK0081_SUB.PRC_GRP_CD
    ,KK0081_SUB.PCRS_CD
    ,KK0081_SUB.PPLAN_CD
    ,KK0081_SUB.TK_HOSHIKI_KEI_NO
    ,KK0081_SUB.PLAN_STAYMD
    ,KK0081_SUB.PLAN_ENDYMD
    ,KK0081_SUB.PLAN_CHRG_STAYMD
    ,KK0081_SUB.PLAN_CHRG_ENDYMD
    ,KK0081_SUB.PLAN_END_SBT_CD
    ,KK0081_SUB.RSV_APLY_YMD
    ,KK0081_SUB.SVC_CANCEL_YMD
    ,KK0081_SUB.SVC_STA_YMD
    ,KK0081_SUB.SVC_CHRG_STAYMD
    ,KK0081_SUB.KEIZK_SVC_STAYMD
    ,KK0081_SUB.KEIZK_SVC_CHRG_STAYMD
    ,KK0081_SUB.PAUSE_STP_CD
    ,KK0081_SUB.SVC_PAUSE_RLS_YMD
    ,KK0081_SUB.SVC_ENDYMD
    ,KK0081_SUB.SVC_CHRG_ENDYMD
    ,KK0081_SUB.SVC_DSL_YMD
    ,KK0081_SUB.SVC_DLRE_CD
    ,KK0081_SUB.KAIHK_YMD
    ,KK0081_SUB.PNLTY_HASSEI_CD
    ,KK0081_SUB.IDO_DIV
    ,KK0081_SUB.SVC_PAUSE_CHRG_STA_YMD
    ,KK2281_SUB.REPLICA_MOTO_TK_HSK_KEI_NO
FROM
    (
        SELECT
            KK0321.SVC_KEI_NO
        FROM
            KK_T_KAKINS KK0321
        WHERE
               KK0321.SEIKY_KEI_NO    = ?
           AND KK0321.KAKINS_TSTAYMD <= ?
           AND KK0321.KAKINS_TENDYMD >= ?
           AND KK0321.MK_FLG          = '0'
    ) KK0321_SUB
    INNER JOIN
    (
        SELECT
            KK0081.SVC_KEI_NO
           ,KK0081.GENE_ADD_DTM
           ,KK0081.SVC_KEI_STAT
           ,KK0081.SYSID
           ,KK0081.SEIRI_NO
           ,KK0081.PRC_GRP_CD
           ,KK0081.PCRS_CD
           ,KK0081.PPLAN_CD
           ,KK0081.TK_HOSHIKI_KEI_NO
           ,KK0081.PLAN_STAYMD
           ,KK0081.PLAN_ENDYMD
           ,KK0081.PLAN_CHRG_STAYMD
           ,KK0081.PLAN_CHRG_ENDYMD
           ,KK0081.PLAN_END_SBT_CD
           ,KK0081.RSV_APLY_YMD
           ,KK0081.SVC_CANCEL_YMD
           ,KK0081.SVC_STA_YMD
           ,KK0081.SVC_CHRG_STAYMD
           ,KK0081.KEIZK_SVC_STAYMD
           ,KK0081.KEIZK_SVC_CHRG_STAYMD
           ,KK0081.PAUSE_STP_CD
           ,KK0081.SVC_PAUSE_RLS_YMD
           ,KK0081.SVC_ENDYMD
           ,KK0081.SVC_CHRG_ENDYMD
           ,KK0081.SVC_DSL_YMD
           ,KK0081.SVC_DLRE_CD
           ,KK0081.KAIHK_YMD
           ,KK0081.PNLTY_HASSEI_CD
           ,KK0081.IDO_DIV
           ,KK0081.SVC_PAUSE_CHRG_STA_YMD
        FROM
            KK_T_SVC_KEI KK0081
            INNER JOIN
            (
                SELECT
                    MAX(KK0081_GENE1.RSV_APLY_YMD || KK0081_GENE1.GENE_ADD_DTM) AS KK0081_GENE1_MAX
                   ,KK0081_GENE1.SVC_KEI_NO
                FROM
                    KK_T_SVC_KEI KK0081_GENE1
                   ,KK_T_KAKINS  KK0321
                WHERE
                       KK0081_GENE1.SVC_KEI_NO   = KK0321.SVC_KEI_NO
                   AND KK0081_GENE1.RSV_APLY_YMD < ?
                   AND KK0081_GENE1.RSV_APLY_CD  = '2'
                   AND KK0081_GENE1.MK_FLG       = '0'
                GROUP BY
                    KK0081_GENE1.SVC_KEI_NO
            ) KK0081_GENE2
            ON
                    KK0081.SVC_KEI_NO                            = KK0081_GENE2.SVC_KEI_NO
                AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = KK0081_GENE2.KK0081_GENE1_MAX
    ) KK0081_SUB
    ON
        KK0321_SUB.SVC_KEI_NO = KK0081_SUB.SVC_KEI_NO
    LEFT OUTER JOIN
    (
        SELECT
            KK2281.SVC_KEI_NO
           ,KK2281.REPLICA_MOTO_TK_HSK_KEI_NO
           ,KK2281.GENE_ADD_DTM
        FROM
            KK_T_SVC_KEI_DUMMY KK2281
           ,KK_T_SVC_KEI       KK0081
        WHERE
            KK2281.SVC_KEI_NO   = KK0081.SVC_KEI_NO
        AND KK2281.GENE_ADD_DTM = KK0081.GENE_ADD_DTM
        AND KK2281.RSV_APLY_CD  = '2'
        AND KK2281.MK_FLG       = '0'
    ) KK2281_SUB
    ON
        KK0081_SUB.SVC_KEI_NO = KK2281_SUB.SVC_KEI_NO
    AND KK0081_SUB.GENE_ADD_DTM = KK2281_SUB.GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AK_SELECT_002)
#--【検証用サービス契約抽出】
#--サービス契約情報（異動分）を抽出する。
#-----------------------------------------------------------

--KEY:AK_SELECT_002

SELECT
     KK0081_ALL.SVC_KEI_NO
    ,KK0081_ALL.GENE_ADD_DTM
    ,KK0081_ALL.SVC_KEI_STAT
    ,KK0081_ALL.SYSID
    ,KK0081_ALL.SEIRI_NO
    ,KK0081_ALL.PRC_GRP_CD
    ,KK0081_ALL.PCRS_CD
    ,KK0081_ALL.PPLAN_CD
    ,KK0081_ALL.TK_HOSHIKI_KEI_NO
    ,KK0081_ALL.PLAN_STAYMD
    ,KK0081_ALL.PLAN_ENDYMD
    ,KK0081_ALL.PLAN_CHRG_STAYMD
    ,KK0081_ALL.PLAN_CHRG_ENDYMD
    ,KK0081_ALL.PLAN_END_SBT_CD
    ,KK0081_ALL.RSV_APLY_YMD
    ,KK0081_ALL.SVC_CANCEL_YMD
    ,KK0081_ALL.SVC_STA_YMD
    ,KK0081_ALL.SVC_CHRG_STAYMD
    ,KK0081_ALL.KEIZK_SVC_STAYMD
    ,KK0081_ALL.KEIZK_SVC_CHRG_STAYMD
    ,KK0081_ALL.PAUSE_STP_CD
    ,KK0081_ALL.SVC_PAUSE_RLS_YMD
    ,KK0081_ALL.SVC_ENDYMD
    ,KK0081_ALL.SVC_CHRG_ENDYMD
    ,KK0081_ALL.SVC_DSL_YMD
    ,KK0081_ALL.SVC_DLRE_CD
    ,KK0081_ALL.KAIHK_YMD
    ,KK0081_ALL.PNLTY_HASSEI_CD
    ,KK0081_ALL.IDO_DIV
    ,KK0081_ALL.SVC_PAUSE_CHRG_STA_YMD
    ,KK0081_ALL.REPLICA_MOTO_TK_HSK_KEI_NO
FROM
    (
         (
              SELECT
                   KK0081_SUB.SVC_KEI_NO
                  ,KK0081_SUB.GENE_ADD_DTM
                  ,KK0081_SUB.SVC_KEI_STAT
                  ,KK0081_SUB.SYSID
                  ,KK0081_SUB.SEIRI_NO
                  ,KK0081_SUB.PRC_GRP_CD
                  ,KK0081_SUB.PCRS_CD
                  ,KK0081_SUB.PPLAN_CD
                  ,KK0081_SUB.TK_HOSHIKI_KEI_NO
                  ,KK0081_SUB.PLAN_STAYMD
                  ,KK0081_SUB.PLAN_ENDYMD
                  ,KK0081_SUB.PLAN_CHRG_STAYMD
                  ,KK0081_SUB.PLAN_CHRG_ENDYMD
                  ,KK0081_SUB.PLAN_END_SBT_CD
                  ,KK0081_SUB.RSV_APLY_YMD
                  ,KK0081_SUB.SVC_CANCEL_YMD
                  ,KK0081_SUB.SVC_STA_YMD
                  ,KK0081_SUB.SVC_CHRG_STAYMD
                  ,KK0081_SUB.KEIZK_SVC_STAYMD
                  ,KK0081_SUB.KEIZK_SVC_CHRG_STAYMD
                  ,KK0081_SUB.PAUSE_STP_CD
                  ,KK0081_SUB.SVC_PAUSE_RLS_YMD
                  ,KK0081_SUB.SVC_ENDYMD
                  ,KK0081_SUB.SVC_CHRG_ENDYMD
                  ,KK0081_SUB.SVC_DSL_YMD
                  ,KK0081_SUB.SVC_DLRE_CD
                  ,KK0081_SUB.KAIHK_YMD
                  ,KK0081_SUB.PNLTY_HASSEI_CD
                  ,KK0081_SUB.IDO_DIV
                  ,KK0081_SUB.SVC_PAUSE_CHRG_STA_YMD
                  ,KK2281_SUB.REPLICA_MOTO_TK_HSK_KEI_NO
              FROM
                  (
                      SELECT
                          KK0321.SVC_KEI_NO
                      FROM
                          KK_T_KAKINS KK0321
                      WHERE
                             KK0321.SEIKY_KEI_NO    = ?
                         AND KK0321.KAKINS_TSTAYMD <= ?
                         AND KK0321.KAKINS_TENDYMD >= ?
                         AND KK0321.MK_FLG          = '0'
                  ) KK0321_SUB
                  INNER JOIN
                  (
                      SELECT
                          KK0081.SVC_KEI_NO
                         ,KK0081.GENE_ADD_DTM
                         ,KK0081.SVC_KEI_STAT
                         ,KK0081.SYSID
                         ,KK0081.SEIRI_NO
                         ,KK0081.PRC_GRP_CD
                         ,KK0081.PCRS_CD
                         ,KK0081.PPLAN_CD
                         ,KK0081.TK_HOSHIKI_KEI_NO
                         ,KK0081.PLAN_STAYMD
                         ,KK0081.PLAN_ENDYMD
                         ,KK0081.PLAN_CHRG_STAYMD
                         ,KK0081.PLAN_CHRG_ENDYMD
                         ,KK0081.PLAN_END_SBT_CD
                         ,KK0081.RSV_APLY_YMD
                         ,KK0081.SVC_CANCEL_YMD
                         ,KK0081.SVC_STA_YMD
                         ,KK0081.SVC_CHRG_STAYMD
                         ,KK0081.KEIZK_SVC_STAYMD
                         ,KK0081.KEIZK_SVC_CHRG_STAYMD
                         ,KK0081.PAUSE_STP_CD
                         ,KK0081.SVC_PAUSE_RLS_YMD
                         ,KK0081.SVC_ENDYMD
                         ,KK0081.SVC_CHRG_ENDYMD
                         ,KK0081.SVC_DSL_YMD
                         ,KK0081.SVC_DLRE_CD
                         ,KK0081.KAIHK_YMD
                         ,KK0081.PNLTY_HASSEI_CD
                         ,KK0081.IDO_DIV
                         ,KK0081.SVC_PAUSE_CHRG_STA_YMD
                      FROM
                          KK_T_SVC_KEI KK0081
                         ,KK_T_KAKINS  KK0321
                      WHERE
                             KK0081.SVC_KEI_NO    = KK0321.SVC_KEI_NO
                         AND KK0081.RSV_APLY_YMD <= ?
                         AND KK0081.RSV_APLY_YMD >= ?
                         AND KK0081.RSV_APLY_CD   = '2'
                         AND KK0081.MK_FLG        = '0'
                  ) KK0081_SUB
                  ON
                      KK0321_SUB.SVC_KEI_NO = KK0081_SUB.SVC_KEI_NO
                  LEFT OUTER JOIN
                  (
                      SELECT
                          KK2281.SVC_KEI_NO
                         ,KK2281.REPLICA_MOTO_TK_HSK_KEI_NO
                         ,KK2281.GENE_ADD_DTM
                      FROM
                          KK_T_SVC_KEI_DUMMY KK2281
                         ,KK_T_SVC_KEI       KK0081
                      WHERE
                          KK2281.SVC_KEI_NO    = KK0081.SVC_KEI_NO
                      AND KK2281.GENE_ADD_DTM  = KK0081.GENE_ADD_DTM
                      AND KK2281.RSV_APLY_CD   = '2'
                      AND KK2281.MK_FLG        = '0'
                  ) KK2281_SUB
                  ON
                      KK0081_SUB.SVC_KEI_NO = KK2281_SUB.SVC_KEI_NO
                  AND KK0081_SUB.GENE_ADD_DTM = KK2281_SUB.GENE_ADD_DTM
         )
         UNION ALL
         (
              SELECT
                   KK0081_SUB.SVC_KEI_NO
                  ,KK0081_SUB.GENE_ADD_DTM
                  ,KK0081_SUB.SVC_KEI_STAT
                  ,KK0081_SUB.SYSID
                  ,KK0081_SUB.SEIRI_NO
                  ,KK0081_SUB.PRC_GRP_CD
                  ,KK0081_SUB.PCRS_CD
                  ,KK0081_SUB.PPLAN_CD
                  ,KK0081_SUB.TK_HOSHIKI_KEI_NO
                  ,KK0081_SUB.PLAN_STAYMD
                  ,KK0081_SUB.PLAN_ENDYMD
                  ,KK0081_SUB.PLAN_CHRG_STAYMD
                  ,KK0081_SUB.PLAN_CHRG_ENDYMD
                  ,KK0081_SUB.PLAN_END_SBT_CD
                  ,KK0081_SUB.RSV_APLY_YMD
                  ,KK0081_SUB.SVC_CANCEL_YMD
                  ,KK0081_SUB.SVC_STA_YMD
                  ,KK0081_SUB.SVC_CHRG_STAYMD
                  ,KK0081_SUB.KEIZK_SVC_STAYMD
                  ,KK0081_SUB.KEIZK_SVC_CHRG_STAYMD
                  ,KK0081_SUB.PAUSE_STP_CD
                  ,KK0081_SUB.SVC_PAUSE_RLS_YMD
                  ,KK0081_SUB.SVC_ENDYMD
                  ,KK0081_SUB.SVC_CHRG_ENDYMD
                  ,KK0081_SUB.SVC_DSL_YMD
                  ,KK0081_SUB.SVC_DLRE_CD
                  ,KK0081_SUB.KAIHK_YMD
                  ,KK0081_SUB.PNLTY_HASSEI_CD
                  ,KK0081_SUB.IDO_DIV
                  ,KK0081_SUB.SVC_PAUSE_CHRG_STA_YMD
                  ,KK2281_SUB.REPLICA_MOTO_TK_HSK_KEI_NO
              FROM
                  (
                      SELECT
                          KK0321.SVC_KEI_NO
                      FROM
                          KK_T_KAKINS KK0321
                      WHERE
                             KK0321.SEIKY_KEI_NO    = ?
                         AND KK0321.KAKINS_TSTAYMD <= ?
                         AND KK0321.KAKINS_TENDYMD >= ?
                         AND KK0321.MK_FLG          = '0'
                  ) KK0321_SUB
                  INNER JOIN
                  (
                      SELECT
                          KK0081.SVC_KEI_NO
                         ,KK0081.GENE_ADD_DTM
                         ,KK0081.SVC_KEI_STAT
                         ,KK0081.SYSID
                         ,KK0081.SEIRI_NO
                         ,KK0081.PRC_GRP_CD
                         ,KK0081.PCRS_CD
                         ,KK0081.PPLAN_CD
                         ,KK0081.TK_HOSHIKI_KEI_NO
                         ,KK0081.PLAN_STAYMD
                         ,KK0081.PLAN_ENDYMD
                         ,KK0081.PLAN_CHRG_STAYMD
                         ,KK0081.PLAN_CHRG_ENDYMD
                         ,KK0081.PLAN_END_SBT_CD
                         ,KK0081.RSV_APLY_YMD
                         ,KK0081.SVC_CANCEL_YMD
                         ,KK0081.SVC_STA_YMD
                         ,KK0081.SVC_CHRG_STAYMD
                         ,KK0081.KEIZK_SVC_STAYMD
                         ,KK0081.KEIZK_SVC_CHRG_STAYMD
                         ,KK0081.PAUSE_STP_CD
                         ,KK0081.SVC_PAUSE_RLS_YMD
                         ,KK0081.SVC_ENDYMD
                         ,KK0081.SVC_CHRG_ENDYMD
                         ,KK0081.SVC_DSL_YMD
                         ,KK0081.SVC_DLRE_CD
                         ,KK0081.KAIHK_YMD
                         ,KK0081.PNLTY_HASSEI_CD
                         ,KK0081.IDO_DIV
                         ,KK0081.SVC_PAUSE_CHRG_STA_YMD
                      FROM
                          KK_T_SVC_KEI KK0081
                          INNER JOIN
                          (
                              SELECT
                                  MAX(KK0081_GENE1.RSV_APLY_YMD || KK0081_GENE1.GENE_ADD_DTM) AS KK0081_GENE1_MAX
                                 ,KK0081_GENE1.SVC_KEI_NO
                              FROM
                                  KK_T_SVC_KEI KK0081_GENE1
                                 ,KK_T_KAKINS  KK0321
                              WHERE
                                     KK0081_GENE1.SVC_KEI_NO   = KK0321.SVC_KEI_NO
                                 AND KK0081_GENE1.RSV_APLY_YMD < ?
                                 AND KK0081_GENE1.RSV_APLY_CD  = '2'
                                 AND KK0081_GENE1.MK_FLG       = '0'
                              GROUP BY
                                  KK0081_GENE1.SVC_KEI_NO
                          ) KK0081_GENE2
                          ON
                                  KK0081.SVC_KEI_NO                            = KK0081_GENE2.SVC_KEI_NO
                              AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = KK0081_GENE2.KK0081_GENE1_MAX
                  ) KK0081_SUB
                  ON
                      KK0321_SUB.SVC_KEI_NO = KK0081_SUB.SVC_KEI_NO
                  LEFT OUTER JOIN
                  (
                      SELECT
                          KK2281.SVC_KEI_NO
                         ,KK2281.REPLICA_MOTO_TK_HSK_KEI_NO
                         ,KK2281.GENE_ADD_DTM
                      FROM
                          KK_T_SVC_KEI_DUMMY KK2281
                         ,KK_T_SVC_KEI       KK0081
                      WHERE
                          KK2281.SVC_KEI_NO   = KK0081.SVC_KEI_NO
                      AND KK2281.GENE_ADD_DTM = KK0081.GENE_ADD_DTM
                      AND KK2281.RSV_APLY_CD  = '2'
                      AND KK2281.MK_FLG       = '0'
                  ) KK2281_SUB
                  ON
                      KK0081_SUB.SVC_KEI_NO = KK2281_SUB.SVC_KEI_NO
                  AND KK0081_SUB.GENE_ADD_DTM = KK2281_SUB.GENE_ADD_DTM
         )
    ) KK0081_ALL

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AK_SELECT_003)
#--【契約状態判定】
#--直近の解約レコードを検索する。
#-----------------------------------------------------------

--KEY:AK_SELECT_003

SELECT
    KK0081.SVC_CHRG_ENDYMD
   ,KK0081.PLAN_CHRG_ENDYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    ( SELECT
          MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
      FROM
          KK_T_SVC_KEI KK0081_GENE
      WHERE
          KK0081_GENE.SVC_KEI_NO = ?
      AND KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM < ?
      AND KK0081_GENE.SVC_KEI_STAT = '910'
      AND KK0081_GENE.MK_FLG = '0' )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AK_SELECT_004)
#--【請求パターン内訳情報作成】
#--請求月月末日に有効なサービス契約を検索する。
#-----------------------------------------------------------

--KEY:AK_SELECT_004

SELECT
    KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    ( SELECT
          MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS kk0081_GENE
      FROM
          KK_T_SVC_KEI KK0081_GENE
      WHERE
          KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND KK0081_GENE.RSV_APLY_YMD <= ?
      AND KK0081_GENE.RSV_APLY_CD   = '2'
      AND KK0081_GENE.MK_FLG = '0' )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-AK_SELECT_005)
#--【提供方式契約番号抽出】
#--提供方式契約番号を取得する。
#-----------------------------------------------------------

--KEY:AK_SELECT_005

SELECT
     NVL(KK2281.REPLICA_MOTO_TK_HSK_KEI_NO , KK0081.TK_HOSHIKI_KEI_NO) AS TK_HOSHIKI_KEI_NO
FROM 
    (
    SELECT
        KK0321_SUB.SVC_KEI_NO
    FROM
        KK_T_KAKINS KK0321_SUB
    WHERE
            KK0321_SUB.SEIKY_KEI_NO    = ?
        AND KK0321_SUB.KAKINS_TSTAYMD <= ?
        AND KK0321_SUB.KAKINS_TENDYMD >= ?
        AND KK0321_SUB.MK_FLG          = '0'
    )KK0321
INNER JOIN
    (
    SELECT
         KK0081_SUB.SVC_KEI_NO
        ,KK0081_SUB.GENE_ADD_DTM
        ,KK0081_SUB.TK_HOSHIKI_KEI_NO
    FROM
        KK_T_SVC_KEI KK0081_SUB
    INNER JOIN
        (
        SELECT
             KK0081_GENE.SVC_KEI_NO
            ,MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM 
            KK_T_SVC_KEI KK0081_GENE
        WHERE
                KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD   = '2'
            AND KK0081_GENE.SVC_STA_YMD  <= ?
            AND KK0081_GENE.MK_FLG        = '0'
        GROUP BY
            KK0081_GENE.SVC_KEI_NO
        )KK0081_GENE
    ON
            KK0081_SUB.SVC_KEI_NO                              = KK0081_GENE.SVC_KEI_NO
        AND KK0081_SUB.RSV_APLY_YMD || KK0081_SUB.GENE_ADD_DTM = KK0081_GENE.MAX_GENE_ADD_DTM
    )KK0081
ON
    KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
LEFT OUTER JOIN
    KK_T_SVC_KEI_DUMMY KK2281
ON
        KK2281.SVC_KEI_NO   = KK0081.SVC_KEI_NO
    AND KK2281.GENE_ADD_DTM = KK0081.GENE_ADD_DTM
    AND KK2281.MK_FLG       = '0'
WHERE
        KK0081.TK_HOSHIKI_KEI_NO          IS NOT NULL
    OR  KK2281.REPLICA_MOTO_TK_HSK_KEI_NO IS NOT NULL

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_001)
#--【料金一括調整】
#--サービス契約番号チェックに用いる。
#-----------------------------------------------------------

--KEY:CH_SELECT_001

SELECT 
    SVC_KEI_NO
   ,SEIRI_NO
   ,LINE
FROM (
SELECT DISTINCT
    1 AS LINE
   ,CH0101.SVC_KEI_NO
   ,CH0101.SEIRI_NO
FROM
   CH_T_SEIKY_UCWK   CH0101
WHERE  CH0101.SEIKY_KEI_NO = ?
  AND  CH0101.SEIKY_YM = ?
  AND  CH0101.SVC_KEI_NO = ?
  AND  TRIM(CH0101.SEIRI_NO) IS NOT NULL
UNION
SELECT
    2 AS LINE
   ,KK0081.SVC_KEI_NO
   ,KK0081.SEIRI_NO
FROM
   KK_T_SVC_KEI   KK0081
   INNER JOIN
     (
       SELECT 
           MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
           ,KK0081_GENE.SVC_KEI_NO
       FROM
           KK_T_SVC_KEI KK0081_GENE
       WHERE
              KK0081_GENE.RSV_APLY_YMD <= ?
         AND KK0081_GENE.RSV_APLY_CD = '2'
         AND KK0081_GENE.MK_FLG = '0'
       GROUP BY
           KK0081_GENE.SVC_KEI_NO
     ) KK0081_GENE
   ON
       KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
       AND  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = KK0081_GENE.MAX_GENE_DTM
   INNER JOIN
        (SELECT
            KK0321.SEIKY_KEI_NO
          , KK0321.SVC_KEI_NO
        FROM
            KK_T_KAKINS KK0321
        WHERE
            KK0321.MK_FLG = '0'
        ) KK0321
        ON KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
   INNER JOIN
        (SELECT
            KK0491.SEIKY_KEI_NO
         FROM
            KK_T_SEIKY_KEI KK0491
            INNER JOIN
                (SELECT
                       KK0491_GENE.SEIKY_KEI_NO
                     , MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
                 FROM
                       KK_T_SEIKY_KEI KK0491_GENE
                 WHERE
                        KK0491_GENE.RSV_APLY_YMD <= ?
                   AND KK0491_GENE.RSV_APLY_CD = '2'
                   AND KK0491_GENE.MK_FLG = '0'
                 GROUP BY
                         KK0491_GENE.SEIKY_KEI_NO
                 ) KK0491_GENE
             ON
                     KK0491.SEIKY_KEI_NO = KK0491_GENE.SEIKY_KEI_NO
                 AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM = KK0491_GENE.MAX_GENE_ADD_DTM
        ) KK0491
    ON
        KK0321.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
WHERE
    KK0491.SEIKY_KEI_NO = ?
AND KK0081.SVC_KEI_NO   = ?
AND KK0081.PRC_GRP_CD  <> ?
)
ORDER BY LINE

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_002)
#--【貸倒れ対象者抽出】
#--送付先名、サービス課金開始年月日、サービス課金終了年月日を取得
#-----------------------------------------------------------

--KEY:CH_SELECT_002

SELECT
     KK0491.SOHUS_NM
    ,KK0081.SVC_CHRG_STAYMD
    ,KK0081.SVC_CHRG_ENDYMD
    ,KK0081.SVC_CANCEL_YMD
    ,KK0081.SVC_DSL_KISAN_YMD
    ,KK0321.KAKINS_TSTAYMD
    ,KK0321.KAKINS_TENDYMD
FROM
    KK_T_SEIKY_KEI KK0491
    INNER JOIN KK_T_KAKINS KK0321
        ON  KK0491.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
    INNER JOIN KK_T_SVC_KEI KK0081
        ON  KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
        KK0491.SEIKY_KEI_NO = ?
    AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM =
            (SELECT
                 MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
             FROM
                 KK_T_SEIKY_KEI KK0491_GENE
             WHERE 
                    KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
                AND KK0491_GENE.RSV_APLY_YMD <= ?
                AND KK0491_GENE.RSV_APLY_CD = '2'
                AND KK0491_GENE.MK_FLG = '0'
            )
    AND KK0321.MK_FLG = '0'
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT
                 MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
             FROM
                 KK_T_SVC_KEI KK0081_GENE
             WHERE 
                    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND KK0081_GENE.PRC_GRP_CD = ?
                AND KK0081_GENE.RSV_APLY_YMD <= ?
                AND KK0081_GENE.RSV_APLY_CD = '2'
                AND KK0081_GENE.MK_FLG = '0'
            )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_003)
#--【ｅｏモバイル強制解約予告済者抽出】
#--料金グループコード、料金グループ名称、料金コースコード、料金コース名称を取得する。
#-----------------------------------------------------------

--KEY:CH_SELECT_003

SELECT DISTINCT
      KK0081.PRC_GRP_CD
     ,KK0081.PCRS_CD
     ,KK0781.PRC_GRP_NM
     ,KK0791.PCRS_NM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
              KK0081_GENE.SVC_KEI_NO
            , MAX(KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO   =  ?
          AND KK0081_GENE.RSV_APLY_CD  =  '2'
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.MK_FLG       =  '0'
        GROUP BY
              KK0081_GENE.SVC_KEI_NO
        ) KK0081_GENE
    ON  KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
    AND KK0081.GENE_ADD_DTM = KK0081_GENE.MAX_GENE_DTM
    LEFT OUTER JOIN
        KK_M_PRC_GRP KK0781
            INNER JOIN
                (SELECT
                    KK0781_GENE.PRC_GRP_CD
                    ,KK0781_GENE.PRC_GRP_NM
                    ,MAX(KK0781_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
                FROM
                    KK_M_PRC_GRP KK0781_GENE
                WHERE
                    KK0781_GENE.RSV_APLY_YMD        <= ?
                    AND KK0781_GENE.PRC_GRP_TSTAYMD <= ?
                    AND KK0781_GENE.PRC_GRP_TENDYMD >= ?
                    AND KK0781_GENE.MK_FLG           = '0'
                GROUP BY
                    KK0781_GENE.PRC_GRP_CD
                    ,KK0781_GENE.PRC_GRP_NM
                ) KK0781_GENE
            ON KK0781.PRC_GRP_CD     = KK0781_GENE.PRC_GRP_CD
            AND KK0781.PRC_GRP_NM   = KK0781_GENE.PRC_GRP_NM
            AND KK0781.GENE_ADD_DTM = KK0781_GENE.MAX_GENE_DTM
    ON KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD
    LEFT OUTER JOIN
        KK_M_PCRS KK0791
            INNER JOIN
                (SELECT 
                    KK0791_GENE.PCRS_CD
                    ,KK0791_GENE.PCRS_NM
                    ,MAX(KK0791_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
                FROM
                     KK_M_PCRS KK0791_GENE
                WHERE
                    KK0791_GENE.RSV_APLY_YMD     <= ?
                    AND KK0791_GENE.PCRS_TSTAYMD <= ?
                    AND KK0791_GENE.PCRS_TENDYMD >= ?
                    AND KK0791_GENE.MK_FLG        ='0'
                GROUP BY
                    KK0791_GENE.PCRS_CD
                    ,KK0791_GENE.PCRS_NM
            ) KK0791_GENE
        ON KK0791.PCRS_CD = KK0791_GENE.PCRS_CD
        AND KK0791.PCRS_NM = KK0791_GENE.PCRS_NM
        AND KK0791.GENE_ADD_DTM = KK0791_GENE.MAX_GENE_DTM
    ON KK0791.PCRS_CD = KK0081.PCRS_CD 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_004)
#--【料金対応記録登録】
#--請求契約番号から、サービス番号を取得する
#-----------------------------------------------------------

--KEY:CH_SELECT_004

SELECT
     KK0321.SVC_KEI_NO
FROM
    KK_T_KAKINS KK0321
INNER JOIN KK_T_SVC_KEI KK0081
    ON  KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
WHERE
    KK0321.SEIKY_KEI_NO = ?
AND KK0321.KAKINS_TSTAYMD <= ?
AND KK0321.KAKINS_TENDYMD >= ?
AND KK0321.MK_FLG = '0'
AND    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
            SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM   KK_T_SVC_KEI KK0081_GENE
            WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND    KK0081_GENE.RSV_APLY_YMD <= ?
            AND    KK0081_GENE.RSV_APLY_CD = '2'
            AND    KK0081_GENE.MK_FLG = '0'
            GROUP BY KK0081_GENE.SVC_KEI_NO)
ORDER BY
      KK0321.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_005)
#--【請求内訳データ編集】
#--お客様名を取得する。
#-----------------------------------------------------------

--KEY:CH_SELECT_005

SELECT
    CK0011.CUST_NM
FROM
    (SELECT
         KK0081.SYSID
     FROM
         KK_T_SVC_KEI KK0081
     INNER JOIN
         (SELECT
              KK0081_GENE.SVC_KEI_NO,
              MAX(KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM
              KK_T_SVC_KEI KK0081_GENE
          WHERE
                  KK0081_GENE.SVC_KEI_NO = ?
              AND KK0081_GENE.RSV_APLY_CD = '2'
              AND KK0081_GENE.RSV_APLY_YMD <= ?
              AND KK0081_GENE.MK_FLG = '0'
          GROUP BY
              KK0081_GENE.SVC_KEI_NO
         )KK0081_GENE
     ON
            KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
        AND KK0081.GENE_ADD_DTM = KK0081_GENE.KK0081_MAX
    )KK0081
    INNER JOIN
    (SELECT
         CK0011.SYSID,
         CK0011.CUST_NM
     FROM
         CK_T_CUST CK0011
     INNER JOIN
         (SELECT
              CK0011_GENE.SYSID,
              MAX(CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM
              CK_T_CUST CK0011_GENE
          WHERE
                  CK0011_GENE.RSV_APLY_CD = '2'
              AND CK0011_GENE.RSV_APLY_YMD <= ?
              AND CK0011_GENE.MK_FLG = '0'
          GROUP BY
              CK0011_GENE.SYSID
         ) CK0011_GENE
     ON
              CK0011.SYSID = CK0011_GENE.SYSID
          AND CK0011.GENE_ADD_DTM = CK0011_GENE.CK0011_MAX
    )CK0011
    ON
        KK0081.SYSID = CK0011.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_006)
#--UIA17_CHPRC07801_割賦催告状情報作成.xlsx
#-----------------------------------------------------------

--KEY:CH_SELECT_006

SELECT
    KK0081.SVC_KEI_STAT
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
    (
        SELECT
            KK0081_GENE.SVC_KEI_NO,
            MAX(KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.MK_FLG = '0'
        GROUP BY
            KK0081_GENE.SVC_KEI_NO
    ) KK0081_GENE
        ON  KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
        AND KK0081.GENE_ADD_DTM = KK0081_GENE.KK0081_MAX
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_007)
#-----------------------------------------------------------

--KEY:CH_SELECT_007

SELECT 
   KK0081.SVC_DSL_YMD
FROM
   KK_T_SVC_KEI KK0081
   INNER JOIN
               (SELECT
                        KK0081_GENE.SVC_KEI_NO
                      , MAX(KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
                FROM
                        KK_T_SVC_KEI KK0081_GENE
                        INNER JOIN
                       (SELECT
                             KK0081_MAX.SVC_KEI_NO
                           , MAX(KK0081_MAX.RSV_APLY_YMD) MAX_RSV_APLY_YMD
                       FROM KK_T_SVC_KEI KK0081_MAX
                        WHERE 
                             KK0081_MAX.RSV_APLY_CD  =  '2'
                        AND  KK0081_MAX.RSV_APLY_YMD <=  ?
                        AND  KK0081_MAX.MK_FLG       =  '0'
                       GROUP BY
                             KK0081_MAX.SVC_KEI_NO
                       ) KK0081_MAX
                      ON  KK0081_GENE.SVC_KEI_NO = KK0081_MAX.SVC_KEI_NO
                      AND KK0081_GENE.RSV_APLY_YMD = KK0081_MAX.MAX_RSV_APLY_YMD
                GROUP BY
                        KK0081_GENE.SVC_KEI_NO
               ) KK0081_GENE
       ON      KK0081.SVC_KEI_NO   = KK0081_GENE.SVC_KEI_NO
       AND     KK0081.GENE_ADD_DTM = KK0081_GENE.MAX_GENE_DTM
WHERE
   KK0081.SVC_KEI_NO = ?   

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_008)
#--【料金一括調整・変更】
#--マンションIDからオーナーのサービス契約番号（ダミー）を取得
#-----------------------------------------------------------

--KEY:CH_SELECT_008

SELECT KK0081.SVC_KEI_NO
FROM   KK_T_SVC_KEI KK0081
    INNER JOIN
        (
        SELECT KK2281.SVC_KEI_NO
              ,KK2281.GENE_ADD_DTM
        FROM   KK_T_SVC_KEI_DUMMY KK2281
            INNER JOIN 
                    KK_T_TK_HOSHIKI_KEI KK0891
               ON   KK2281.REPLICA_MOTO_TK_HSK_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO
              AND   KK2281.MK_FLG = '0'
              AND   KK0891.MK_FLG = '0'
            INNER JOIN
                    KK_T_KAISEN_USE_KEI KK0881
               ON   KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
              AND   (     KK0881.MANSION_ID = ?
                      OR  KK0881.CATID = ?
                      OR  KK0881.MSBSN_ANKEN_KNRI_NO = ?
                      OR  KK0881.OWNR_KEI_NO =
                         (SELECT  KK0871.OWNR_KEI_NO
                          FROM    KK_T_OWNR_KEI KK0871
                          WHERE   KK0871.PID = ?
                          AND     KK0871.MK_FLG = '0')
                    )
              AND   KK0881.MK_FLG = '0'
          ) KK2281
    ON KK0081.SVC_KEI_NO = KK2281.SVC_KEI_NO
   AND KK0081.GENE_ADD_DTM = KK2281.GENE_ADD_DTM
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        ( SELECT
             MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
           FROM
               KK_T_SVC_KEI KK0081_GENE
           WHERE
               KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2'
           AND KK0081_GENE.MK_FLG = '0'
        )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_009)
#--【料金再調整】
#--サービス契約番号から整理番号を取得
#-----------------------------------------------------------

--KEY:CH_SELECT_009

SELECT
    KK0081.SEIRI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.MK_FLG = '0'
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND KK0081_GENE.MK_FLG = '0'
                                                  )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_010)
#--【料金再調整】
#--サービス契約番号に紐付くマンションＩＤを取得
#-----------------------------------------------------------

--KEY:CH_SELECT_010

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK2281.MANSION_ID
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        (SELECT
                KK2281.SVC_KEI_NO,
                KK0881.MANSION_ID
         FROM
             KK_T_SVC_KEI_DUMMY KK2281
                 INNER JOIN
                    KK_T_TK_HOSHIKI_KEI KK0891
                        INNER JOIN
                            KK_T_KAISEN_USE_KEI KK0881
                        ON KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
                        AND KK0881.MK_FLG = '0'
                 ON KK0891.TK_HOSHIKI_KEI_NO = KK2281.REPLICA_MOTO_TK_HSK_KEI_NO
                 AND KK0891.MK_FLG = '0'
         WHERE
             KK2281.GENE_ADD_DTM = (SELECT
                                        MAX(KK2281_GENE.GENE_ADD_DTM) AS KK2281_MAX
                                    FROM
                                        KK_T_SVC_KEI KK2281_GENE
                                    WHERE
                                        KK2281_GENE.SVC_KEI_NO = KK2281.SVC_KEI_NO
                                    AND KK2281_GENE.RSV_APLY_CD = '2'
                                    AND KK2281_GENE.MK_FLG = '0'
                                    ) 
         )KK2281
    ON KK2281.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
    KK0081.PRC_GRP_CD = ?
AND KK0081.SVC_KEI_NO = ?
AND KK0081.MK_FLG = '0'
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND KK0081_GENE.MK_FLG = '0'
                                                  )
UNION
SELECT
    KK0081.SVC_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0881.MANSION_ID
FROM
    KK_T_SVC_KEI KK0081
        INNER JOIN
            KK_T_TK_HOSHIKI_KEI KK0891
                INNER JOIN
                    KK_T_KAISEN_USE_KEI KK0881
                ON KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
                AND KK0881.MK_FLG = '0'
        ON KK0891.TK_HOSHIKI_KEI_NO = KK0081.TK_HOSHIKI_KEI_NO
        AND KK0891.MK_FLG = '0'
WHERE
    KK0081.PRC_GRP_CD <> ?
AND KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND KK0081_GENE.MK_FLG = '0'
                                                  )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_013)
#--【コンテンツ連絡先メールアドレス取得】
#--サービス契約番号からコンテンツ連絡先のメールアドレスを取得する。
#-----------------------------------------------------------

--KEY:CH_SELECT_013

SELECT
   CK0201.MLAD
FROM
   KK_T_SVC_KEI KK0081
INNER JOIN
   CK_T_RRKS CK0201
ON
   CK0201.SYSID = KK0081.SYSID
WHERE
   KK0081.SVC_KEI_NO = ?
AND
   CK0201.RRK_WAY_CD = '001'
AND
   CK0201.RRKS_SBT_CD = '1'
AND
   CK0201.RRKS_BUNRUI_CD = '1'
AND
   (CK0201.RRKS_NO, CK0201.RSV_APLY_YMD || CK0201.GENE_ADD_DTM) =
       (SELECT
          CK0201_GENE.RRKS_NO, MAX (CK0201_GENE.RSV_APLY_YMD || CK0201_GENE.GENE_ADD_DTM) AS CK0201_MAX
       FROM
          CK_T_RRKS CK0201_GENE
       WHERE
          CK0201.RRKS_NO = CK0201_GENE.RRKS_NO
           AND CK0201_GENE.RSV_APLY_YMD <= ?
           AND CK0201_GENE.RSV_APLY_CD = '2'
           AND CK0201_GENE.MK_FLG = '0'
           GROUP BY CK0201_GENE.RRKS_NO
     )
AND
   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
       (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
               KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2'
           AND KK0081_GENE.MK_FLG = '0'
       )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_319)
#--通知書番号に紐づく通知対象物にネット契約が存在する場合、
#--ネット契約のカレントデータを取得する。
#-----------------------------------------------------------

--KEY:CH_SELECT_014

SELECT
	PRC_GRP_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM
             KK_T_SVC_KEI KK0081_GENE
         WHERE
             KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
             AND KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD = '2'
             AND KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_016)
#-----------------------------------------------------------

--KEY:CH_SELECT_016

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0081.PPLAN_CD,
    KK0081.SVC_CHRG_STAYMD
FROM KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAKINS KK0321
    ON KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0321.KAKINS_TSTAYMD <= ?
    AND KK0321.KAKINS_TENDYMD > ?
    AND KK0321.MK_FLG = '0'
WHERE
    KK0321.SEIKY_KEI_NO = ?
    AND KK0081.SVC_KEI_STAT in ('100', '210', '220')
    AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
    (
        SELECT MAX(GENE.RSV_APLY_YMD || GENE.GENE_ADD_DTM)
        FROM KK_T_SVC_KEI GENE
        WHERE
            GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND GENE.RSV_APLY_YMD <= ?
            AND GENE.RSV_APLY_CD = '2'
            AND GENE.MK_FLG = '0'
    )
ORDER BY
    KK0081.SVC_CHRG_STAYMD DESC,
    KK0081.SVC_KEI_NO ASC
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_017)
#-----------------------------------------------------------

--KEY:CH_SELECT_017

SELECT
    KK0081.SVC_KEI_NO
FROM KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAKINS KK0321
    ON KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0321.KAKINS_TSTAYMD <= ?
    AND KK0321.KAKINS_TENDYMD > ?
    AND KK0321.MK_FLG = '0'
WHERE
    KK0321.SEIKY_KEI_NO = ?
    AND KK0081.SVC_KEI_STAT in ('100', '210', '220')
    AND KK0081.SVC_CD = '02'
    AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
    (
        SELECT MAX(GENE.RSV_APLY_YMD || GENE.GENE_ADD_DTM)
        FROM KK_T_SVC_KEI GENE
        WHERE
            GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND GENE.RSV_APLY_YMD <= ?
            AND GENE.RSV_APLY_CD = '2'
            AND GENE.MK_FLG = '0'
    )
ORDER BY
    KK0081.SVC_CHRG_STAYMD DESC,
    KK0081.SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-DK_SELECT_001)
#--サービス契約からサービス契約番号で以下の項目値を取得する。
#--・サービス契約番号
#--・サービス契約ステータス
#--・サービス解約理由コード
#--・世代登録年月日時分秒
#-----------------------------------------------------------

--KEY:DK_SELECT_001

SELECT
KK0081.SVC_KEI_NO,
KK0081.SVC_KEI_STAT,
KK0081.SVC_DLRE_CD,
KK0081.GENE_ADD_DTM
FROM KK_T_SVC_KEI KK0081
WHERE KK0081.SVC_KEI_NO = ?
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-DK_SELECT_002)
#--サービス契約からサービス契約番号で以下の項目値を取得する。
#--・サービス契約番号
#-----------------------------------------------------------

--KEY:DK_SELECT_002

SELECT
KU0081.KOJIAK_NO
FROM KU_T_SVKEI_KOJIAK KU0081
INNER JOIN  KU_T_KOJIAK KU0011
ON KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
AND KU0011.KOJIAK_SBT_CD IN ('001', '003')
AND KU0011.MK_FLG = '0'
WHERE KU0081.SVC_KEI_NO IN (
SELECT
KK0081_UNION.SVC_KEI_NO
FROM (
    SELECT
    KK0081.SVC_KEI_NO,
    KK0891.KAISEN_USE_KEI_NO
    FROM KK_T_SVC_KEI KK0081
    INNER JOIN  KK_T_TK_HOSHIKI_KEI KK0891
    ON KK0891.TK_HOSHIKI_KEI_NO = KK0081.TK_HOSHIKI_KEI_NO
    WHERE KK0081.SVC_KEI_NO = ?
      AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
             (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
              FROM   KK_T_SVC_KEI KK0081_GENE
              WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
              AND    KK0081_GENE.RSV_APLY_YMD <= ?
              AND    KK0081_GENE.RSV_APLY_CD = '2'
              AND    KK0081_GENE.MK_FLG = '0')
      AND SVC_CD IN ('01', '02')
    UNION
    SELECT
    KK0081.SVC_KEI_NO,
    KK2701.NET_KAISEN_USE_KEI_NO KAISEN_USE_KEI_NO
    FROM KK_T_SVC_KEI KK0081
    INNER JOIN  KK_T_TK_HOSHIKI_KEI KK0891
    ON KK0891.TK_HOSHIKI_KEI_NO = KK0081.TK_HOSHIKI_KEI_NO
    INNER JOIN  KK_T_MANTKKSN_PAIRKH KK2701
    ON KK2701.TV_KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
    WHERE KK0081.SVC_KEI_NO = ?
      AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
             (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
              FROM   KK_T_SVC_KEI KK0081_GENE
              WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
              AND    KK0081_GENE.RSV_APLY_YMD <= ?
              AND    KK0081_GENE.RSV_APLY_CD = '2'
              AND    KK0081_GENE.MK_FLG = '0')
      AND SVC_CD = '03'
) KK0081_UNION
INNER JOIN  KK_T_KAISEN_USE_KEI KK0881
ON KK0881.KAISEN_USE_KEI_NO = KK0081_UNION.KAISEN_USE_KEI_NO
AND KK0881.MANSION_COURSE_CD IN ('001', '002', '003', '004', '005', '006', '007', '008')
)
AND KU0081.MK_FLG = '0'
ORDER BY KU0011.RCNT_KIHON_KOJI_FLG DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-DK_SELECT_003)
#--サービス契約番号、及び申込明細番号に紐付くサービス契約情報を取得する。
#-----------------------------------------------------------

--KEY:DK_SELECT_003

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.MSKM_DTL_NO = ?
AND KK0081.SVC_KEI_STAT = '910'
AND KK0081.RSV_APLY_YMD <= ?
AND KK0081.RSV_APLY_CD = '2'
AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-DK_SELECT_004)
#--電話契約と同じ回線に紐付くネット契約の料金コースコードを取得する。
#-----------------------------------------------------------

--KEY:DK_SELECT_004

SELECT
    KK0081_NET.SVC_KEI_NO,
    KK0081_NET.PCRS_CD
FROM
    KK_T_SVC_KEI KK0081_NET
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241_NET
ON
    KK0081_NET.SVC_KEI_NO = KK0241_NET.SVC_KEI_NO
WHERE
    KK0081_NET.SVC_CD = '01'
AND KK0081_NET.SVC_KEI_STAT NOT IN ('910', '920')
AND KK0241_NET.SVC_KEI_KAISEN_UCWK_NO =
    (SELECT
         KK0241_TEL.SVC_KEI_KAISEN_UCWK_NO
     FROM
         KK_T_KAISEN_TG_SVKEI KK0241_TEL
     WHERE
         KK0241_TEL.SVC_KEI_NO = ?
     AND KK0241_TEL.KAISEN_UCWK_USE_STAYMD = 
         (SELECT MAX(KK0241_TEL_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_NET_MAXYMD
            FROM KK_T_KAISEN_TG_SVKEI KK0241_TEL_MAX
           WHERE KK0241_TEL.SVC_KEI_NO = KK0241_TEL_MAX.SVC_KEI_NO
             AND KK0241_TEL_MAX.KAISEN_UCWK_USE_STAYMD <= ?
             AND KK0241_TEL_MAX.MK_FLG = '0')
     AND KK0241_TEL.MK_FLG = '0'
    )
AND KK0241_NET.KAISEN_UCWK_USE_STAYMD = 
    (SELECT MAX(KK0241_NET_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_NET_MAXYMD
       FROM KK_T_KAISEN_TG_SVKEI KK0241_NET_MAX
      WHERE KK0241_NET.SVC_KEI_NO = KK0241_NET_MAX.SVC_KEI_NO
        AND KK0241_NET_MAX.KAISEN_UCWK_USE_STAYMD <= ?
        AND KK0241_NET_MAX.KAISEN_UCWK_USE_ENDYMD >= ?
        AND KK0241_NET_MAX.MK_FLG = '0')
AND KK0081_NET.RSV_APLY_YMD || KK0081_NET.GENE_ADD_DTM = 
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM KK_T_SVC_KEI KK0081_GENE
      WHERE KK0081_GENE.SVC_KEI_NO = KK0081_NET.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-DK_SELECT_005)
#--サービス契約からサービス契約番号でサービスコードを取得する。
#-----------------------------------------------------------

--KEY:DK_SELECT_005

SELECT
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CK_SELECT_001)
#--未審査申込情報を取得する。
#-----------------------------------------------------------

--KEY:CK_SELECT_001

SELECT  MSKM.MSKM_NO,
        MSKM.SYSID,
        MSKM_DTL.MSKM_FORM_CD,
        MSKM.MSKM_SBT_CD,
        MSKM_DTL.MSKM_DTL_NO,
        CUST.CUST_NM,
        CUST.CUST_KANA,
        CUST.KEISHA_TYPE_CD,
        SVC.SVC_KEI_NO,
        SVC.IDO_DIV
FROM    KK_T_SVC_KEI SVC
INNER JOIN KK_T_MSKM_DTL MSKM_DTL
ON      SVC.MSKM_DTL_NO = MSKM_DTL.MSKM_DTL_NO
INNER JOIN KK_T_MSKM MSKM
ON      MSKM_DTL.MSKM_NO = MSKM.MSKM_NO
INNER JOIN CK_T_CUST CUST
ON      SVC.SYSID = CUST.SYSID
WHERE   SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM =
            (SELECT MAX(KK_T_SVC_KEI_RCNT.RSV_APLY_YMD || KK_T_SVC_KEI_RCNT.GENE_ADD_DTM) AS KK_T_SVC_KEI_MAX
            FROM    KK_T_SVC_KEI KK_T_SVC_KEI_RCNT
            WHERE   KK_T_SVC_KEI_RCNT.SVC_KEI_NO = SVC.SVC_KEI_NO
            AND     KK_T_SVC_KEI_RCNT.RSV_APLY_YMD <= ?
            AND     KK_T_SVC_KEI_RCNT.RSV_APLY_CD = '2'
            AND     KK_T_SVC_KEI_RCNT.MK_FLG = '0')
AND     MSKM_DTL.GENE_ADD_DTM = (SELECT MAX(KK_T_MSKM_DTL_RCNT.GENE_ADD_DTM) AS KK_T_MSKM_DTL_MAX
            FROM    KK_T_MSKM_DTL KK_T_MSKM_DTL_RCNT
            WHERE   KK_T_MSKM_DTL_RCNT.MSKM_DTL_NO = MSKM_DTL.MSKM_DTL_NO
            AND     KK_T_MSKM_DTL_RCNT.MK_FLG = '0')
AND     MSKM.GENE_ADD_DTM = (SELECT MAX(KK_T_MSKM_RCNT.GENE_ADD_DTM) AS KK_T_MSKM_MAX
            FROM    KK_T_MSKM KK_T_MSKM_RCNT
            WHERE   KK_T_MSKM_RCNT.MSKM_NO = MSKM.MSKM_NO
            AND     KK_T_MSKM_RCNT.MK_FLG = '0')
AND     CUST.RSV_APLY_YMD || CUST.GENE_ADD_DTM =
            (SELECT MAX(CK_T_CUST_RCNT.RSV_APLY_YMD || CK_T_CUST_RCNT.GENE_ADD_DTM) AS CK_T_CUST_MAX
            FROM    CK_T_CUST CK_T_CUST_RCNT
            WHERE   CK_T_CUST_RCNT.SYSID = CUST.SYSID
            AND     CK_T_CUST_RCNT.RSV_APLY_YMD <= ?
            AND     CK_T_CUST_RCNT.RSV_APLY_CD = '2'
            AND     CK_T_CUST_RCNT.MK_FLG = '0')
AND     SVC.AUTO_SHOSA_TRAN_STAT_CD = '0'
AND     SVC.SVC_KEI_STAT = '010'
AND     MSKM.MSKM_STAT = '130'
AND     SVC.GENE_ADD_DTM >= ?
AND NOT EXISTS (
SELECT 1 FROM KK_T_JUDGE JUDGE WHERE JUDGE.SVC_KEI_NO = SVC.SVC_KEI_NO AND JUDGE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CK_SELECT_002)
#--SELECT_LIST01にて取得した情報よりサービス契約が解約、キャンセルがされていないサービス契約情報を取得する
#-----------------------------------------------------------

--KEY:CK_SELECT_002

SELECT
  KK0081.SYSID
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.SYSID =?
  AND KK0081.SVC_KEI_STAT NOT IN ('910','920')
  AND KK0081.PRC_GRP_CD NOT IN ('14')
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 
  AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CK_SELECT_003)
#--不良顧客チェックファイルのサービス契約番号に紐づくサービス契約情報を取得する
#-----------------------------------------------------------

--KEY:CK_SELECT_003

SELECT 
    KK0081.SVC_KEI_NO, 
    KK0081.GENE_ADD_DTM, 
    KK0081.PRC_GRP_CD, 
    KK0081.IDO_DIV, KK0081.IDO_NG_STAT_CD 
FROM 
    KK_T_SVC_KEI KK0081 
WHERE 
    KK0081.SVC_KEI_NO = ? AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT 
                                                       MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
                                                  FROM 
                                                       KK_T_SVC_KEI KK0081_GENE 
                                                  WHERE 
                                                       KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND 
                                                       KK0081_GENE.RSV_APLY_YMD <= ? AND 
                                                       KK0081_GENE.RSV_APLY_CD = '2' AND 
                                                       KK0081_GENE.MK_FLG = '0' 
                                                 )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CK_SELECT_010)
#--CKPRC00901
#--運用日当日にサービスの回復を行ったデータの抽出を行う。
#-----------------------------------------------------------

--KEY:CK_SELECT_010

SELECT
    CK0011.SYSID,
    CK0011.GENE_ADD_DTM,
    CK0011.MEMBER_SBT_CD,
    CK0011.CUST_NTAIKAI_CD,
    CK0011.CUST_TAIKAI_RSN_CD,
    CK0011.UPD_DTM,
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011 ON
        KK0081.SYSID = CK0011.SYSID AND
        CK0011.GENE_ADD_DTM = 
        (SELECT
            MAX(CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
        FROM
            CK_T_CUST CK0011_GENE
        WHERE
            CK0011_GENE.SYSID = CK0011.SYSID AND
            CK0011.RSV_APLY_YMD <= ? AND
            CK0011.RSV_APLY_CD = '2' AND
            CK0011_GENE.MK_FLG = '0')
WHERE
    KK0081.KAIHK_YMD = ? AND
    KK0081.SVC_KEI_NO = ? AND
    KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_001)
#--番ポなし番号事前通知データ抽出
#--番ポなしサービス契約<eo光電話>で電話番号事前通知対象を抽出する
#-----------------------------------------------------------

--KEY:KK_SELECT_001

SELECT
    KK0081.SVC_KEI_NO
   ,KK0081.SYSID
   ,KK0081.SVC_CD
   ,KK0081.PRC_GRP_CD
   ,KK0081.PCRS_CD
   ,KK0081.PPLAN_CD
   ,KK0081.IDO_DIV
   ,KK0021.MSKMSHO_NO
   ,KK0021.MSKMSHO_DTL_NO
   ,KK0251.KAISEN_PLACE_PCD
   ,KK0251.KAISEN_PLACE_STATE_NM
   ,KK0251.KAISEN_PLACE_CITY_NM
   ,KK0251.KAISEN_PLACE_OAZTSU_NM
   ,KK0251.KAISEN_PLACE_AZCHO_NM
   ,KK0251.KAISEN_PLACE_BNCHIGO
   ,KK0251.KAISEN_PLACE_ADRTTM
   ,KK0251.KAISEN_PLACE_ADRRM
   ,KK0251.KISN_PLC_AD_MI_FIX_FLG
   ,CK0011.KEISHA_TYPE_CD
FROM  KK_T_SVC_KEI KK0081

  INNER JOIN CK_T_CUST CK0011
  ON  CK0011.SYSID = KK0081.SYSID

  INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241
  ON  KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO

  INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
  ON  KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO

  INNER JOIN KK_T_MSKM_DTL KK0021
  ON  KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO

WHERE KK0081.SVC_KEI_STAT IN ( '030','100' )
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_G
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_YMD <= ?
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0')

AND   CK0011.KEISHA_TYPE_CD IN ('1','2')
AND   CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = (
  SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS GENE_M
  FROM   CK_T_CUST CK0011_GENE
  WHERE  CK0011_GENE.SYSID = CK0011.SYSID
  AND    CK0011_GENE.RSV_APLY_YMD <= ?
  AND    CK0011_GENE.RSV_APLY_CD = '2'
  AND    CK0011_GENE.MK_FLG = '0')

AND   ? BETWEEN KK0241.KAISEN_UCWK_USE_STAYMD AND KK0241.KAISEN_UCWK_USE_ENDYMD

AND   KK0251.GENE_ADD_DTM = (
  SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS GENE_M
  FROM   KK_T_SVKEI_KAISEN_UW KK0251_GENE
  WHERE  KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
  AND    KK0251_GENE.MK_FLG = '0')

AND   KK0021.GENE_ADD_DTM = (
  SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS GENE_MAX
  FROM   KK_T_MSKM_DTL KK0021_GENE
  WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
  AND    KK0021_GENE.MK_FLG = '0')

AND EXISTS (
  SELECT 1
  FROM   KK_T_SVKEIUW_EOH_TEL KK0191
    INNER JOIN KK_T_SVC_KEI_UCWK KK0161
    ON  KK0161.SVC_KEI_UCWK_NO = KK0191.SVC_KEI_UCWK_NO
    AND KK0161.GENE_ADD_DTM = KK0191.GENE_ADD_DTM
  WHERE KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND   KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM = (
      SELECT MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS MAX_G
      FROM   KK_T_SVC_KEI_UCWK KK0161_GENE
      WHERE  KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
      AND    KK0161_GENE.RSV_APLY_YMD <= ?
      AND    KK0161_GENE.RSV_APLY_CD = '2'
      AND    KK0161_GENE.MK_FLG = '0')
  AND  (KK0191.TEL_NO_PRE_TCHI_CD = '1' OR KK0191.TEL_NO_PRE_TCHI_CD IS NULL)
  AND   KK0191.BMP_UM = '0'
  AND   KK0191.RSV_APLY_CD = '2'
  AND   KK0191.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_002)
#--請求契約と課金先TBLの紐づいた請求契約番号でサービス契約番号を取得します。
#--KKPRC04403、KKPRC41301にて使用。
#-----------------------------------------------------------

--KEY:KK_SELECT_002

SELECT 
    KK0081.SVC_KEI_NO 
FROM 
    KK_T_SVC_KEI KK0081 
WHERE 
    KK0081.SVC_KEI_NO = ? AND 
    KK0081.SVC_KEI_STAT IN('010','020','030','100','210','220') AND 
    KK0081.MK_FLG = '0' AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT 
                                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
                            FROM 
                                KK_T_SVC_KEI KK0081_GENE 
                            WHERE 
                                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO  AND
                                KK0081_GENE.RSV_APLY_YMD <= ? AND
                                KK0081_GENE.RSV_APLY_CD = '2' AND
                                KK0081_GENE.MK_FLG = '0'
                            )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_003)
#--強制解約され回復可能期間を超え回復不可能な状態のサービス契約に請求先番号で紐付くeo電話が手続中で存在するデータの抽出を行う。
#--使用ジョブ
#--強制解約後の光電話自動キャンセル対象抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_003

SELECT
    TARGET_SK.SVC_KEI_NO,
    TARGET_SK.SVC_KEI_STAT
FROM (
    SELECT
        KKN.SEIKY_KEI_NO
    FROM
        KK_T_SVC_KEI SK
        INNER JOIN KK_T_PRG PRG
            ON PRG.MSKM_DTL_NO = SK.MSKM_DTL_NO
            AND PRG.SVC_KEI_NO = SK.SVC_KEI_NO
            AND PRG.IDO_DIV = SK.IDO_DIV
            AND PRG.PRG_STAT = '2203'
            AND PRG.MK_FLG = '0'
        INNER JOIN KK_T_KAKINS KKN
            ON KKN.SVC_KEI_NO = SK.SVC_KEI_NO
            AND SK.SVC_DSL_YMD BETWEEN KKN.KAKINS_TSTAYMD AND KKN.KAKINS_TENDYMD
            AND KKN.MK_FLG = '0'
    WHERE
        SK.SVC_KEI_STAT ='910'
    AND SK.SVC_DLRE_CD = '02'
    AND (SK.SVC_KEI_NO, SK.RSV_APLY_YMD || SK.GENE_ADD_DTM) =
                (
                    SELECT
                        KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                    FROM
                        KK_T_SVC_KEI KK0081_GENE
                    WHERE
                        KK0081_GENE.SVC_KEI_NO = SK.SVC_KEI_NO
                        AND KK0081_GENE.RSV_APLY_YMD <= ?
                        AND KK0081_GENE.RSV_APLY_CD = '2'
                        AND KK0081_GENE.MK_FLG = '0'
                    GROUP BY KK0081_GENE.SVC_KEI_NO
            )        
        AND PRG.PRG_DTM = (
            SELECT MAX(SUB_PRG.PRG_DTM) AS MAX_PRG_DTM
            FROM KK_T_PRG SUB_PRG 
            WHERE SUB_PRG.MSKM_DTL_NO = SK.MSKM_DTL_NO
            AND SUB_PRG.SVC_KEI_NO = SK.SVC_KEI_NO
            AND SUB_PRG.IDO_DIV = SK.IDO_DIV
            AND SUB_PRG.MK_FLG = '0')
        AND PRG.PRG_DTM < TO_CHAR(TO_DATE(?)-60,'YYYYMMDDHH24MISSSSS')
    ) KSKY_SVC
    INNER JOIN KK_T_KAKINS TARGET_KNN
        ON TARGET_KNN.SEIKY_KEI_NO = KSKY_SVC.SEIKY_KEI_NO
        AND ? BETWEEN TARGET_KNN.KAKINS_TSTAYMD AND TARGET_KNN.KAKINS_TENDYMD
        AND TARGET_KNN.MK_FLG = '0'
    INNER JOIN KK_T_SVC_KEI TARGET_SK
        ON TARGET_SK.SVC_KEI_NO = TARGET_KNN.SVC_KEI_NO
        AND TARGET_SK.SVC_KEI_STAT IN ('010','020','030','100','210')
        AND (TARGET_SK.PRC_GRP_CD = '02' OR TARGET_SK.PRC_GRP_CD = '03' OR TARGET_SK.PRC_GRP_CD = '04'
            OR TARGET_SK.PRC_GRP_CD = '05' OR TARGET_SK.PRC_GRP_CD = '06' OR TARGET_SK.PRC_GRP_CD = '07'
            OR TARGET_SK.PRC_GRP_CD = '08' OR TARGET_SK.PRC_GRP_CD = '09' OR TARGET_SK.PRC_GRP_CD = '10'
            OR TARGET_SK.PRC_GRP_CD = '11' OR TARGET_SK.PRC_GRP_CD = '12' OR TARGET_SK.PRC_GRP_CD = '13')
        AND TARGET_SK.MK_FLG = '0'
 WHERE
 (TARGET_SK.SVC_KEI_NO, TARGET_SK.RSV_APLY_YMD || TARGET_SK.GENE_ADD_DTM) =
                (
                    SELECT
                        KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX_TEL
                    FROM
                        KK_T_SVC_KEI KK0081_GENE
                    WHERE
                        KK0081_GENE.SVC_KEI_NO = TARGET_SK.SVC_KEI_NO
                        AND KK0081_GENE.RSV_APLY_YMD <= ?
                        AND KK0081_GENE.RSV_APLY_CD = '2'
                        AND KK0081_GENE.MK_FLG = '0'
                    GROUP BY KK0081_GENE.SVC_KEI_NO
            )        


#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_004)
#--概要＞
#--サービス契約より、照査解約完了ステータスが‘照査ＮＧ’のまま、最後の進捗より進捗ＮＧ情報保持期間を経過しているレコードを検索するSELECT文
#--　　(a)同一サービス契約番号のレコードのうち「世代登録年月日時分秒」が最大のもの
#--　　(b)照査ＮＧとなっていること
#--　　　→照査解約完了コードが‘2’（照査ＮＧ）
#--　　(c)同一サービス契約番号の最新進捗ステータスが照査ＮＧである
#--　　　　且つ、進捗の異動年月日時分秒が（運用日 － 照査ＮＧ情報保持期間）よりも過去
#--　　　→サービス契約のサービス契約番号／申込明細番号／異動区分で進捗テーブルを検索し、
#--　　　　異動年月日時分秒が最大のレコードについて、進捗ステータスが‘090E’（照査ＮＧ）となっていること
#--　　　→照査ＮＧ情報保持期間は、サービスマスタより次の項目を指定して取得
#--　　　　　・サービスコード ＝ サービス契約のサービスコード
#--　　　　　・世代登録年月日時分秒 ＝ サービス契約の世代登録年月日時分秒
#--　　　　　・サービス適用開始年月日 ＝ サービス契約のサービス開始年月日時分秒の年月日部分
#--　　(d)無効フラグ ＝ ‘0’（有効）
#--使用ジョブ＞
#--KKJN0053000101 照査ＮＧキャンセル対象抽出
#--※注意※
#--サービスマスタのサブクエリは、照査ＮＧ情報保持期間用カラムが正式に登録され次第改正することとし、それまでデバッグ目的で異なるカラムを使用します
#-----------------------------------------------------------

--KEY:KK_SELECT_004

SELECT
 A.SVC_KEI_NO,
 A.SVC_KEI_STAT,
 A.SVC_CD,
 A.IDO_DIV,
 B.PRG_DTM,
 B.PRG_STAT
FROM KK_T_SVC_KEI A
INNER JOIN KK_T_PRG B 
 ON (
 B.SVC_KEI_NO = A.SVC_KEI_NO 
 AND
 B.MSKM_DTL_NO = A.MSKM_DTL_NO 
 AND 
 B.IDO_DIV = A.IDO_DIV
 AND
 B.PRG_STAT = '090E' 
 AND A.SVC_KEI_STAT='020'
 AND
 SUBSTR(B.PRG_DTM, 0, 8) <= (SELECT TO_CHAR(TO_DATE(?,'YYYYMMDD')-C.WORK_PARAM_SETTE_VALUE,'YYYYMMDD')
              FROM ZM_M_WORK_PARAM_KNRI C
              WHERE C.WORK_PARAM_ID ='KK_SHOSA_NG_SAVEPRD') 
 AND
 B.PRG_DTM = (SELECT MAX(D.PRG_DTM) 
              FROM KK_T_PRG D 
              WHERE D.SVC_KEI_NO=B.SVC_KEI_NO
              AND
              D.MSKM_DTL_NO = B.MSKM_DTL_NO 
              AND 
              D.IDO_DIV = B.IDO_DIV
              AND 
              D.MK_FLG='0'
              ) 
 AND
 B.MK_FLG = '0'
)
WHERE
 (A.SVC_KEI_NO, A.RSV_APLY_YMD || A.GENE_ADD_DTM) =
        (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM  KK_T_SVC_KEI KK0081_GENE
          WHERE KK0081_GENE.SVC_KEI_NO = A.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
           GROUP BY KK0081_GENE.SVC_KEI_NO)
 AND
 A.SHOSA_DSL_FIN_CD = '2' 
 AND
 A.SHOSA_YMD IS NOT NULL 
 AND
 A.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_005)
#--カレントレコードより未来のデータを対象に
#--審査結果送信コードが通知未のデータを対象とする
#-----------------------------------------------------------

--KEY:KK_SELECT_005

SELECT
    CK0011.SYSID
   ,CK0011.GENE_ADD_DTM
   ,CK0011.CUST_STAT
   ,CK0011.KEISHA_TYPE_CD
   ,CK0011.CUST_NM
   ,CK0011.CUST_KANA
   ,CK0011.KEISHA_PCD
   ,CK0011.KEISHA_STATE_NM
   ,CK0011.KEISHA_CITY_NM
   ,CK0011.KEISHA_OAZTSU_NM
   ,CK0011.KEISHA_AZCHO_NM
   ,CK0011.KEISHA_BNCHIGO
   ,CK0011.KEISHA_ADRTTM
   ,CK0011.KEISHA_ADRRM
   ,CK0011.KEISHA_TELNO
FROM  KK_T_SVC_KEI KK0081
  INNER JOIN CK_T_CUST CK0011
  ON CK0011.SYSID = KK0081.SYSID
WHERE  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  /* 最新の世代をみるために予約適用年月日は参照しない */
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0')
AND  (KK0081.SKEKKA_SEND_CD = '0' OR KK0081.SKEKKA_SEND_CD IS NULL)
AND   CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = (
  SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
  FROM   CK_T_CUST CK0011_GENE
  WHERE  CK0011_GENE.SYSID = CK0011.SYSID
  AND    CK0011_GENE.RSV_APLY_YMD <= ?
  AND    CK0011_GENE.RSV_APLY_CD = '2'
  AND    CK0011_GENE.MK_FLG = '0')
GROUP BY
    CK0011.SYSID
   ,CK0011.GENE_ADD_DTM
   ,CK0011.CUST_STAT
   ,CK0011.KEISHA_TYPE_CD
   ,CK0011.CUST_NM
   ,CK0011.CUST_KANA
   ,CK0011.KEISHA_PCD
   ,CK0011.KEISHA_STATE_NM
   ,CK0011.KEISHA_CITY_NM
   ,CK0011.KEISHA_OAZTSU_NM
   ,CK0011.KEISHA_AZCHO_NM
   ,CK0011.KEISHA_BNCHIGO
   ,CK0011.KEISHA_ADRTTM
   ,CK0011.KEISHA_ADRRM
   ,CK0011.KEISHA_TELNO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_006)
#--加入御礼管理データ抽出
#--指定されたSYSIDに紐づくすべてのサービス契約抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_006

SELECT
    KK0081.RSV_APLY_YMD,
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.MSKM_DTL_NO,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SKEKKA_CD,
    KK0081.SKEKKA_SEND_CD,
    KK0081.PAYWAY_KEIZOKU_FLG,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.IDO_DIV,
    KK0081.MENKAIHAT_ANKEN_NO,
    KK0081.SHOSA_DSL_FIN_CD,
    KK0081.SHOSA_YMD,
    KK0081.TK_HOSHIKI_KEI_NO
FROM  KK_T_SVC_KEI KK0081
WHERE (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
  SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO)
AND KK0081.SYSID = ?
AND KK0081.SKEKKA_SEND_CD <> '3'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_007)
#--UIA17_バッチ機能仕様書(KKPRC11001_継続分サービス契約情報抽出)
#--3.全体構成/3-3.処理詳細
#--(1)サービス契約抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_007

SELECT
    K.SVC_KEI_NO, 
    K.SVC_CD, 
    K.PRC_GRP_CD, 
    K.PCRS_CD, 
    K.PPLAN_CD, 
    K.TK_HOSHIKI_KEI_NO,
    K.SVC_STA_YMD,
    K.SVC_CHRG_STAYMD,
    K.KEIZK_SVC_STAYMD, 
    K.KEIZK_SVC_CHRG_STAYMD,
    K.PLAN_CHRG_STAYMD, 
    K.PLAN_CHRG_ENDYMD, 
    K.SVC_DSL_YMD,
    K.SVC_DLRE_CD,
    K.PNLTY_HASSEI_CD, 
    K.PLAN_END_SBT_CD,
    K.KAIHK_YMD, 
    K.PAUSE_STP_CD,
    K.SVC_PAUSE_YMD, 
    K.SVC_PAUSE_CHRG_STA_YMD,
    K.SVC_PAUSE_RLS_YMD, 
    K.SVC_ENDYMD,
    K.SVC_CHRG_ENDYMD, 
    K.IDO_DIV, 
    K.SEIRI_NO,
    '' JIGYOSHA_KEI_ID,
    DMY.REPLICA_MOTO_TK_HSK_KEI_NO
FROM 
    (SELECT 
        K_SUB.SVC_KEI_NO, 
        K_SUB.SVC_CD, 
        K_SUB.PRC_GRP_CD, 
        K_SUB.PCRS_CD, 
        K_SUB.PPLAN_CD, 
        K_SUB.TK_HOSHIKI_KEI_NO,
        K_SUB.SVC_STA_YMD,
        K_SUB.SVC_CHRG_STAYMD,
        K_SUB.KEIZK_SVC_STAYMD, 
        K_SUB.KEIZK_SVC_CHRG_STAYMD,
        K_SUB.PLAN_CHRG_STAYMD, 
        K_SUB.PLAN_CHRG_ENDYMD, 
        K_SUB.SVC_DSL_YMD,
        K_SUB.SVC_DLRE_CD,
        K_SUB.PNLTY_HASSEI_CD, 
        K_SUB.PLAN_END_SBT_CD,
        K_SUB.KAIHK_YMD, 
        K_SUB.PAUSE_STP_CD,
        K_SUB.SVC_PAUSE_YMD, 
        K_SUB.SVC_PAUSE_CHRG_STA_YMD,
        K_SUB.SVC_PAUSE_RLS_YMD, 
        K_SUB.SVC_ENDYMD,
        K_SUB.SVC_CHRG_ENDYMD, 
        K_SUB.IDO_DIV, 
        K_SUB.SEIRI_NO,
        K_SUB.GENE_ADD_DTM,
        K_SUB.PLAN_STAYMD,
        ROW_NUMBER() OVER(PARTITION BY SVC_KEI_NO ORDER BY RSV_APLY_YMD DESC, GENE_ADD_DTM DESC) AS ROW_NUM
    FROM
        KK_T_SVC_KEI K_SUB
    WHERE
        RSV_APLY_YMD <= ?
        AND RSV_APLY_CD = '2'
        AND MK_FLG = '0'
    ) K
    LEFT JOIN
        (SELECT
            SVC_KEI_NO,
            GENE_ADD_DTM,
            REPLICA_MOTO_TK_HSK_KEI_NO
        FROM
            KK_T_SVC_KEI_DUMMY
        WHERE
            RSV_APLY_CD = '2'
            AND MK_FLG = '0'
        ) DMY
    ON 
        K.SVC_KEI_NO = DMY.SVC_KEI_NO
        AND K.GENE_ADD_DTM = DMY.GENE_ADD_DTM
WHERE
    K.PLAN_STAYMD <= '20991231'
    AND K.ROW_NUM = 1
ORDER BY K.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_010)
#--サービス契約が解約3日以降かどうか判定する。
#--使用ジョブ
#--EO2130130J0_公衆網電話番号履歴情報マッチング
#-----------------------------------------------------------

--KEY:KK_SELECT_010

SELECT COUNT(*) AS COUNT_NUM
  FROM KK_T_SVC_KEI SK
 WHERE SK.SVC_KEI_NO = ? 
   AND (SK.SVC_KEI_NO, SK.RSV_APLY_YMD || SK.GENE_ADD_DTM) = ( 
        SELECT SUB_SK.SVC_KEI_NO, MAX(SUB_SK.RSV_APLY_YMD || SUB_SK.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM 
          FROM KK_T_SVC_KEI SUB_SK 
         WHERE SUB_SK.SVC_KEI_NO = SK.SVC_KEI_NO 
           AND SUB_SK.RSV_APLY_YMD <= ? 
           AND SUB_SK.RSV_APLY_CD = '2' 
           AND SUB_SK.MK_FLG = '0' 
         GROUP BY SUB_SK.SVC_KEI_NO) 
   AND (
         (SK.SVC_KEI_STAT = '910' AND SK.SVC_DSL_YMD <= TO_CHAR(TO_DATE(?) - 3,'YYYYMMDD')) 
          OR (SK.SVC_KEI_STAT = '920' AND SK.SVC_CANCEL_YMD <= TO_CHAR(TO_DATE(?) - 3,'YYYYMMDD')) 
          OR (SK.SVC_CD = '02' 
              AND EXISTS( 
                   SELECT 1 
                     FROM KK_T_KAISEN_TG_SVKEI KTS 
                    WHERE KTS.SVC_KEI_NO = SK.SVC_KEI_NO 
                      AND KTS.KAISEN_UCWK_USE_STAYMD <= ? 
                      AND (KTS.SVC_KEI_NO, KTS.KAISEN_UCWK_USE_ENDYMD) = 
                          (SELECT KTS_GENE.SVC_KEI_NO, MAX(KTS_GENE.KAISEN_UCWK_USE_ENDYMD) 
                             FROM KK_T_KAISEN_TG_SVKEI KTS_GENE 
                            WHERE KTS_GENE.SVC_KEI_NO = KTS.SVC_KEI_NO 
                              AND KTS_GENE.KAISEN_UCWK_USE_STAYMD <= ?
                              AND KTS_GENE.MK_FLG = '0'
                            GROUP BY KTS_GENE.SVC_KEI_NO)
                      AND NOT EXISTS(
                            SELECT 1 
                              FROM KK_T_SVC_KEI KK0081_01
                             INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241_01
                                ON KK0241_01.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
                               AND KK0241_01.MK_FLG = '0'
                             WHERE KK0241_01.SVC_KEI_KAISEN_UCWK_NO = KTS.SVC_KEI_KAISEN_UCWK_NO 
                               AND KK0081_01.SVC_KEI_NO <> KTS.SVC_KEI_NO 
                               AND KK0081_01.SVC_CD = '01'
                               AND KK0081_01.SVC_KEI_STAT IN ('010', '020' ,'030' ,'100' ,'210' ,'220')
                               AND (KK0081_01.SVC_KEI_NO, KK0081_01.RSV_APLY_YMD || KK0081_01.GENE_ADD_DTM) =
                                   (SELECT KK0081_01_GENE.SVC_KEI_NO, MAX(KK0081_01_GENE.RSV_APLY_YMD || KK0081_01_GENE.GENE_ADD_DTM)
                                      FROM KK_T_SVC_KEI KK0081_01_GENE
                                     WHERE KK0081_01_GENE.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
                                       AND KK0081_01_GENE.RSV_APLY_YMD <= ?
                                       AND KK0081_01_GENE.RSV_APLY_CD = '2'
                                       AND KK0081_01_GENE.MK_FLG = '0'
                                     GROUP BY KK0081_01_GENE.SVC_KEI_NO)
                          )
                  )
              AND (SK.SVC_DSL_YMD <> '20991231' AND SK.SVC_DSL_YMD <= TO_CHAR(TO_DATE(?) -3,'YYYYMMDD')
                   OR SK.SVC_DSL_YMD = '20991231')
         )
   )


#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_011)
#--サービス契約が照査前、もしくは解約+1日か判定する。
#--使用ジョブ
#--EO2130130J0_公衆網電話番号履歴情報マッチング
#-----------------------------------------------------------

--KEY:KK_SELECT_011

SELECT COUNT(*) AS COUNT_NUM
  FROM KK_T_SVC_KEI SK
 INNER JOIN KK_T_SVC_KEI_UCWK SKU
    ON SKU.SVC_KEI_NO = SK.SVC_KEI_NO
   AND SKU.RSV_APLY_YMD || SKU.GENE_ADD_DTM = (
        SELECT MAX(SUB_SKU.RSV_APLY_YMD || SUB_SKU.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
          FROM KK_T_SVC_KEI_UCWK SUB_SKU
         WHERE SUB_SKU.SVC_KEI_NO = SKU.SVC_KEI_NO
           AND SUB_SKU.RSV_APLY_YMD = '20991231'
           AND SUB_SKU.MK_FLG = '0')
 WHERE SK.SVC_KEI_NO = ?
   AND (SK.SVC_KEI_NO, SK.RSV_APLY_YMD || SK.GENE_ADD_DTM) = ( 
        SELECT SUB_SK.SVC_KEI_NO, MAX(SUB_SK.RSV_APLY_YMD || SUB_SK.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM 
          FROM KK_T_SVC_KEI SUB_SK 
         WHERE SUB_SK.SVC_KEI_NO = SK.SVC_KEI_NO 
           AND SUB_SK.RSV_APLY_YMD <= ? 
           AND SUB_SK.RSV_APLY_CD = '2' 
           AND SUB_SK.MK_FLG = '0' 
         GROUP BY SUB_SK.SVC_KEI_NO) 
   AND (
         (SK.SVC_KEI_STAT = '910' AND SK.SVC_DSL_YMD >= TO_CHAR(TO_DATE(?) - 1,'YYYYMMDD'))
         OR (SK.SVC_KEI_STAT = '920' AND SK.SVC_CANCEL_YMD >= TO_CHAR(TO_DATE(?) - 1,'YYYYMMDD'))
         OR (SKU.SHOSA_YMD IS NULL)
         OR (SK.SVC_CD = '02' 
             AND EXISTS( 
                  SELECT 1 
                    FROM KK_T_KAISEN_TG_SVKEI KTS 
                   WHERE KTS.SVC_KEI_NO = SK.SVC_KEI_NO 
                     AND KTS.KAISEN_UCWK_USE_STAYMD <= ? 
                     AND (KTS.SVC_KEI_NO, KTS.KAISEN_UCWK_USE_ENDYMD) = 
                         (SELECT KTS_GENE.SVC_KEI_NO, MAX(KTS_GENE.KAISEN_UCWK_USE_ENDYMD) 
                            FROM KK_T_KAISEN_TG_SVKEI KTS_GENE 
                           WHERE KTS_GENE.SVC_KEI_NO = KTS.SVC_KEI_NO 
                             AND KTS_GENE.KAISEN_UCWK_USE_STAYMD <= ?
                             AND KTS_GENE.MK_FLG = '0'
                           GROUP BY KTS_GENE.SVC_KEI_NO)
                     AND NOT EXISTS(
                           SELECT 1 
                             FROM KK_T_SVC_KEI KK0081_01
                            INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241_01
                               ON KK0241_01.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
                              AND KK0241_01.MK_FLG = '0'
                            WHERE KK0241_01.SVC_KEI_KAISEN_UCWK_NO = KTS.SVC_KEI_KAISEN_UCWK_NO 
                              AND KK0081_01.SVC_KEI_NO <> KTS.SVC_KEI_NO 
                              AND KK0081_01.SVC_CD = '01'
                              AND KK0081_01.SVC_KEI_STAT IN ('010', '020' ,'030' ,'100' ,'210' ,'220')
                              AND (KK0081_01.SVC_KEI_NO, KK0081_01.RSV_APLY_YMD || KK0081_01.GENE_ADD_DTM) =
                                  (SELECT KK0081_01_GENE.SVC_KEI_NO, MAX(KK0081_01_GENE.RSV_APLY_YMD || KK0081_01_GENE.GENE_ADD_DTM)
                                     FROM KK_T_SVC_KEI KK0081_01_GENE
                                    WHERE KK0081_01_GENE.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
                                      AND KK0081_01_GENE.RSV_APLY_YMD <= ?
                                      AND KK0081_01_GENE.RSV_APLY_CD = '2'
                                      AND KK0081_01_GENE.MK_FLG = '0'
                                    GROUP BY KK0081_01_GENE.SVC_KEI_NO)
                         )
                 )
            AND SK.SVC_DSL_YMD <= TO_CHAR(TO_DATE(?) - 1,'YYYYMMDD')
       )
   )


#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_012)
#--サービス契約テーブルより、サービス契約番号をキーにカレントレコードの以下の情報を取得する。
#--・サービス契約ステータス
#--・SYSID
#--・サービスコード
#--・料金グループコード
#--・料金コースコード
#--・料金プランコード
#--使用ジョブ
#--EO28Z0210J0_はぴｅポイント契約審査
#--（UIA17_KKPRC32302_はぴeポイント審査 - 4.内部スキーマI/O一覧　参照）
#-----------------------------------------------------------

--KEY:KK_SELECT_012

SELECT
    SK.SVC_KEI_NO,
    SK.SVC_KEI_STAT,
    SK.SYSID,
    SK.SVC_CD,
    SK.PRC_GRP_CD,
    SK.PCRS_CD,
    SK.PPLAN_CD
FROM
    KK_T_SVC_KEI SK
WHERE
    SK.SVC_KEI_NO = ?
AND SK.RSV_APLY_YMD || SK.GENE_ADD_DTM = (
        SELECT
            MAX(SUB_SK.RSV_APLY_YMD || SUB_SK.GENE_ADD_DTM) AS SK_MAX
        FROM
            KK_T_SVC_KEI SUB_SK
        WHERE
            SUB_SK.SVC_KEI_NO = SK.SVC_KEI_NO
        AND SUB_SK.RSV_APLY_YMD <= ?
        AND SUB_SK.RSV_APLY_CD = '2'
        AND SUB_SK.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_013)
#--加入御礼書（オプション用）にデータを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_013

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM ,
    KK0081.SVC_KEI_STAT,
    KK0081.PRC_GRP_CD,
    KK0081.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD ||KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0')
AND KK0081.SVC_CD = '01'
AND KK0081.SVC_KEI_STAT IN ('010','020','030','100','210','220') 
AND KK0081.SHOSA_DSL_FIN_CD = '1'
AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_014)
#--UIA17_バッチ機能仕様書(KKPRC04601_サービス契約差分情報抽出)
#--3.全体構成/3-3.処理詳細
#--(1)サービス契約取得
#-----------------------------------------------------------

--KEY:KK_SELECT_014

SELECT
   K.SVC_KEI_NO,
   K.SVC_CD,
   K.PRC_GRP_CD,
   K.PCRS_CD,
   K.PPLAN_CD,
   K.TK_HOSHIKI_KEI_NO,
   K.SVC_STA_YMD,
   K.SVC_CHRG_STAYMD,
   K.KEIZK_SVC_STAYMD,
   K.KEIZK_SVC_CHRG_STAYMD,
   K.PLAN_CHRG_STAYMD,
   K.PLAN_CHRG_ENDYMD,
   K.SVC_DSL_YMD,
   K.SVC_DLRE_CD,
   K.PNLTY_HASSEI_CD,
   K.KAIHK_YMD,
   K.PAUSE_STP_CD,
   K.SVC_PAUSE_YMD,
   K.SVC_PAUSE_CHRG_STA_YMD,
   K.SVC_PAUSE_RLS_YMD,
   K.SVC_CANCEL_YMD,
   K.SVC_ENDYMD,
   K.SVC_CHRG_ENDYMD,
   K.IDO_DIV,
   K.PLAN_END_SBT_CD,
   K.SEIRI_NO,
   K.RSV_APLY_YMD,
   K.GENE_ADD_DTM,
   K.TK_HOSHIKI_KEI_NO AS REPLICA_MOTO_TK_HSK_KEI_NO
FROM
   KK_T_SVC_KEI K
WHERE
   K.MK_FLG = '0'
AND
   K.SVC_KEI_NO = ?
AND
   K.PLAN_STAYMD <= '20991231'
AND
   K.RSV_APLY_YMD <= ?
AND
   K.RSV_APLY_CD = ?
ORDER BY
   K.RSV_APLY_YMD DESC,
   K.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_015)
#--UIA17_バッチ機能仕様書(KKPRC10002_サービス契約従属契約トリガー抽出)
#--3.全体構成/3-3.処理詳細
#--(1) 対象サービス契約番号取得
#-----------------------------------------------------------

--KEY:KK_SELECT_015

SELECT SVC_KEI_NO
FROM   KK_T_SVC_KEI
WHERE  SVC_KEI_NO = ?
  AND  RSV_APLY_CD = ?
  AND  MK_FLG = '0'
GROUP BY
       SVC_KEI_NO
ORDER BY
       SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_016)
#--UIA17_バッチ機能仕様書(KKPRC33301_請求契約キャンセル情報作成)
#--3.全体構成/3-3.処理詳細
#--(1) 全サービスキャンセルチェック
#-----------------------------------------------------------

--KEY:KK_SELECT_016

SELECT SVC_KEI_NO
FROM   KK_T_SVC_KEI K
WHERE  K.SVC_KEI_NO = ?
  AND  ( (SVC_CANCEL_YMD IS NOT NULL AND SVC_CANCEL_YMD <= ?)
          OR
         (SVC_DSL_YMD IS NOT NULL AND SVC_CHRG_ENDYMD <= ?) )
  AND  K.RSV_APLY_YMD || K.GENE_ADD_DTM =
         (SELECT MAX(RSV_APLY_YMD||GENE_ADD_DTM)
          FROM   KK_T_SVC_KEI
          WHERE  SVC_KEI_NO = K.SVC_KEI_NO
            AND  RSV_APLY_CD = ?
            AND  RSV_APLY_YMD <= ?
            AND  MK_FLG = '0'
         )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_017)
#--UIA17_バッチ機能仕様書(KKPRC36202_契約一時金インターフェイス情報作成)
#--3. 全体構成/3-3.処理詳細
#--(3) インターフェイス情報作成出力
#-----------------------------------------------------------

--KEY:KK_SELECT_017

SELECT SVC.SVC_KEI_NO,
       SVC.PRC_GRP_CD,
       SVC.PCRS_CD,
       SVC.PPLAN_CD,
       SVC.PLAN_CHRG_STAYMD,
       SVC.PLAN_CHRG_ENDYMD,
       SVC.GENE_ADD_DTM,
       KAKINS.SEIKY_KEI_NO
FROM   KK_T_SVC_KEI SVC
         INNER JOIN
           (SELECT SVC_KEI_NO,
                   PPLAN_CD,
                   MAX(RSV_APLY_YMD||GENE_ADD_DTM) AS SVC_MAX
            FROM   KK_T_SVC_KEI
            WHERE  SVC_KEI_NO = ?
              AND  RSV_APLY_YMD <= ?
              AND  RSV_APLY_CD = ?
              AND  MK_FLG = '0'
            GROUP BY
                   SVC_KEI_NO,
                   PPLAN_CD
            UNION ALL
            SELECT SVC_KEI_NO,
                   PPLAN_CD,
                   RSV_APLY_YMD||GENE_ADD_DTM AS SVC_MAX
            FROM   KK_T_SVC_KEI
            WHERE  SVC_KEI_NO = ?
              AND  RSV_APLY_YMD <= ?
              AND  RSV_APLY_CD = ?
              AND  MK_FLG = '0'
              AND  PLAN_CHRG_STAYMD <= PLAN_CHRG_ENDYMD
              AND  PLAN_CHRG_ENDYMD >= ?
              AND  PLAN_CHRG_ENDYMD <> '20991231'
           ) SVC_GENE
           ON  SVC.SVC_KEI_NO = SVC_GENE.SVC_KEI_NO
           AND SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM = SVC_GENE.SVC_MAX
         INNER JOIN
           KK_T_KAKINS KAKINS
             INNER JOIN
               (SELECT SVC_KEI_NO,
                       MAX(KAKINS_TSTAYMD)||MAX(KAKINS_TENDYMD) AS KKN_MAX
                FROM   KK_T_KAKINS
                WHERE  (KAKINS_TSTAYMD <= ?
                        AND
                        KAKINS_TENDYMD >= ?
                       )
                  AND  MK_FLG = '0'
                GROUP BY
                       SVC_KEI_NO
               ) KKN_GENE
               ON  KAKINS.SVC_KEI_NO = KKN_GENE.SVC_KEI_NO
               AND KAKINS.KAKINS_TSTAYMD || KAKINS.KAKINS_TENDYMD = KKN_GENE.KKN_MAX
           ON SVC.SVC_KEI_NO = KAKINS.SVC_KEI_NO
           AND KAKINS.MK_FLG = '0'
ORDER BY
       GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_018)
#--・代理店コードチェック情報を抽出する。
#--    ＜抽出条件＞
#--        １．サービス契約.SYSIDが入力パラメータ.SYSIDと紐づくデータ
#--        ２．申込明細.申込明細番号がサービス契約.申込明細番号と紐づくデータ。
#--        ３．申込代理店.申込番号が申込明細.申込番号と紐づくデータ。
#--        ４．申込代理店.代理店コードが入力パラメータ.代理店コードと前方一致で紐づくデータ。
#-----------------------------------------------------------

--KEY:KK_SELECT_018

SELECT
    1
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN KK_T_MSKM_DTL KK0021
  ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
  AND KK0021.GENE_ADD_DTM =
                  (SELECT
                       MAX(KK0021_GENE.GENE_ADD_DTM) AS KTMD_MAX
                   FROM
                       KK_T_MSKM_DTL KK0021_GENE
                   WHERE 
                       KK0021_GENE.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
                   AND KK0021_GENE.MK_FLG = '0')
INNER JOIN KK_T_MSKM_AGNT KK0071
  ON KK0071.MSKM_NO = KK0021.MSKM_NO
  AND KK0071.MK_FLG = '0'
  AND KK0071.AGNT_CD LIKE CONCAT(?,'%') 
WHERE
    KK0081.SYSID = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
                              (SELECT
                                   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KTSK_MAX
                               FROM
                                   KK_T_SVC_KEI KK0081_GENE
                               WHERE 
                                   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                               AND KK0081_GENE.RSV_APLY_YMD <= ?
                               AND KK0081_GENE.RSV_APLY_CD = '2'
                               AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_019)
#--サービス契約番号を元に料金グループコード、料金コースコードを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_019

SELECT
    SVC_KEI.PRC_GRP_CD,
    SVC_KEI.PCRS_CD,
    SVC_KEI.PPLAN_CD,
    SVC_KEI.SVC_STA_YMD,
    SVC_KEI.SHK_DFLT_PWD,
    SVC_KEI.SVC_CD,
    SVC_KEI.SEIRI_NO,
    SVC_KEI.SVC_KEI_NO,
    SVC_KEI.SVC_USE_STA_KIBO_YMD
FROM KK_T_SVC_KEI SVC_KEI
WHERE SVC_KEI.SVC_KEI_NO = ?
AND   SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM = (
  SELECT MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX
  FROM   KK_T_SVC_KEI SVC_KEI_GENE
  WHERE  SVC_KEI_GENE.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
  AND    SVC_KEI_GENE.RSV_APLY_YMD <= ?
  AND    SVC_KEI_GENE.RSV_APLY_CD = '2'
  AND    SVC_KEI_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_020)
#--KKPRC06501
#--当日分のeoID会員情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_020

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_KEI_STAT,
    KK0081.ADD_DTM,
    KK0081.UPD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_STAT IN ('020','030','100','210','220','910','920')
    AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
    (SELECT 
        KK0081_GENE.SVC_KEI_NO, 
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM 
        KK_T_SVC_KEI KK0081_GENE
     WHERE 
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0'
     GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_021)
#--KKPRC00906
#--サービス契約ステータス取得SQL
#-----------------------------------------------------------

--KEY:KK_SELECT_021

SELECT
 KK0081.SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ? AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) KK0081_MAX
                                     FROM KK_T_SVC_KEI KK0081_GENE
                                     WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                           KK0081_GENE.RSV_APLY_YMD <= ? AND
                                           KK0081_GENE.RSV_APLY_CD = '2' AND
                                           KK0081_GENE.MK_FLG = '0') AND
 KK0081.SVC_KEI_STAT = '100' AND
 KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_022)
#--KKPRC00910
#--指定された工事案件番号、サービス契約番号でサービス契約工事案件に存在する場合はサービス開始日を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_022

SELECT
    KK0081.SVC_STA_YMD,
    KK0081.SVC_USE_STA_KIBO_YMD,
    KU0011.KOJIAK_JSSI_YMD
FROM
    KU_T_SVKEI_KOJIAK KU0081
    INNER JOIN
        KK_T_SVC_KEI KK0081
    ON
        KK0081.SVC_KEI_NO = KU0081.SVC_KEI_NO AND
        KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT
                 MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
             FROM
                 KK_T_SVC_KEI KK0081_GENE
             WHERE
                 KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
                 AND KK0081_GENE.RSV_APLY_YMD <= ?
                 AND KK0081_GENE.RSV_APLY_CD = '2'
                 AND KK0081_GENE.MK_FLG = '0')
    INNER JOIN
        KU_T_KOJIAK KU0011
    ON
        KU0081.KOJIAK_NO = KU0011.KOJIAK_NO 
    AND KU0011.MK_FLG = '0'
WHERE
   KU0081.KOJIAK_NO = ?
   AND KU0081.SVC_KEI_NO <> ?
   AND KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
   AND KU0081.SVKEI_KOJIAK_TENDYMD >= ?
   AND KU0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_023)
#--KKPRC00910、KKPRC02205、KKPRC9701、KKPRC02202、KKPRC02204、
#--KKPRC39601、KKPRC00905にて使用
#--サービス契約からカレントデータを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_023

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.MSKM_DTL_NO,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SVC_KEI_STAT
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM
             KK_T_SVC_KEI KK0081_GENE
         WHERE
             KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
             AND KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD = '2'
             AND KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_024)
#--＜抽出条件＞
#--    １．回線対象サービス契約.サービス契約番号が入力パラメータ.サービス契約番号と紐づくデータ。
#--        回線対象サービス契約.回線内訳使用開始年月日がNULLでないデータ。
#--        回線対象サービス契約.回線内訳使用終了年月日が'20991231'のデータ。
#--    ２．回線対象サービス契約.サービス契約回線内訳番号が１で取得したサービス契約回線内訳番号と紐づくデータ。
#--        回線対象サービス契約.回線内訳使用開始年月日がNULLでないデータ。
#--        回線対象サービス契約.回線内訳使用終了年月日が'20991231'のデータ。
#--    ３．サービス契約.サービス契約番号が２で取得したサービス契約番号と紐づくデータ。
#--        サービス契約.サービスキャンセル年月日がNULLのデータ。
#--        サービス契約.サービス解約年月日がNULLのデータ。
#-----------------------------------------------------------

--KEY:KK_SELECT_024

SELECT
  KTSK.SVC_KEI_NO
  ,KTSK.GENE_ADD_DTM
  ,KTSK.SVC_KEI_STAT
  ,KTSK.SYSID
  ,KTSK.SVC_CD
  ,KTSK.MSKM_DTL_NO
  ,KTSK.MENKAIHAT_ANKEN_NO
  ,KTSK.PRC_GRP_CD
  ,KTSK.PCRS_CD
  ,KTSK.PPLAN_CD
  ,KTSK.TK_HOSHIKI_KEI_NO
  ,KTSK.SVC_USE_STA_KIBO_YMD
  ,KTSK.RSV_TSTA_KIBO_YMD
  ,KTSK.ID_SOKHOSHO_OUTPUT_YH
  ,KTSK.SVC_KEI_KZKWRK_REQYMD
  ,KTSK.SHOSA_YMD
  ,KTSK.SHOSA_CL_YMD
  ,KTSK.SKEKKA_CD
  ,KTSK.SKEKKA_DTL_CD
  ,KTSK.SKEKKA_HOKI_CD
  ,KTSK.SKEKKA_SEND_CD
  ,KTSK.PAYWAY_KEIZOKU_FLG
  ,KTSK.FTRIAL_KANYU_YMD
  ,KTSK.FTRIAL_PRD_ENDYMD
  ,KTSK.HONKANYU_YMD
  ,KTSK.HONKANYU_IKO_KIGEN_YMD
  ,KTSK.KEI_CNC_YMD
  ,KTSK.PLAN_STAYMD
  ,KTSK.PLAN_ENDYMD
  ,KTSK.PLAN_CHRG_STAYMD
  ,KTSK.PLAN_CHRG_ENDYMD
  ,KTSK.RSV_APLY_YMD
  ,KTSK.RSV_CL_YMD
  ,KTSK.RSV_APLY_CD
  ,KTSK.SVC_CANCEL_YMD
  ,KTSK.SVC_CANCEL_RSN_CD
  ,KTSK.SVC_STA_YMD
  ,KTSK.SVC_CHRG_STAYMD
  ,KTSK.LETTER_HASSO_SHIWAKE_DIV
  ,KTSK.THNX_LETTER_SHS_CD
  ,KTSK.WEB_OP_ADD_FAIL_FLG
  ,KTSK.SVC_STP_YMD
  ,KTSK.SVC_STP_RSN_CD
  ,KTSK.SVC_STP_RLS_YMD
  ,KTSK.SVC_STP_RLS_RSN_CD
  ,KTSK.PAUSE_STP_CD
  ,KTSK.SVC_PAUSE_YMD
  ,KTSK.SVC_PAUSE_RSN_CD
  ,KTSK.SVC_PAUSE_RSN_MEMO
  ,KTSK.SVC_PAUSE_RLS_YMD
  ,KTSK.SVC_PAUSE_RLS_RSN_CD
  ,KTSK.SVC_PAUSE_RLS_RSN_MEMO
  ,KTSK.SVC_ENDYMD
  ,KTSK.SVC_CHRG_ENDYMD
  ,KTSK.SVC_DSL_YMD
  ,KTSK.SVC_DLRE_CD
  ,KTSK.SVC_DLRE_MEMO
  ,KTSK.SVC_DSL_TTDKI_FIN_FLG
  ,KTSK.KAIHK_YMD
  ,KTSK.SVC_CANCEL_CL_YMD
  ,KTSK.SVC_DSL_CL_YMD
  ,KTSK.CHGE_MT_HOJINSVKEI_UK_NO
  ,KTSK.CHGE_MT_HOJINSVKEI_UK_NOPT
  ,KTSK.CHGE_SK_HOJINSVKEI_UK_NO
  ,KTSK.CHGE_SK_HOJINSVKEI_UK_NOPT
  ,KTSK.CHMT_HJIN_EO_YKAE_SVKEI_NO
  ,KTSK.CHSK_HJIN_EO_YKAE_SVKEI_NO
  ,KTSK.PNLTY_HASSEI_CD
  ,KTSK.IDO_DIV
  ,KTSK.MENKAIHAT_ANKEN_KR_ADD_FLG
  ,KTSK.INTR_CD
  ,KTSK.SHOSA_DSL_FIN_CD
  ,KTSK.IDO_NG_STAT_CD
  ,KTSK.CHRG_STA_YMD_HOSEI_UM
  ,KTSK.SVC_PAUSE_CHRG_STA_YMD
  ,KTSK.WORK_RRK_BIKO
  ,KTSK.AUTO_SHOSA_TRAN_STAT_CD
  ,KTSK.ADD_DTM
  ,KTSK.ADD_OPEACNT
  ,KTSK.UPD_DTM
  ,KTSK.UPD_OPEACNT
  ,KTSK.DEL_DTM
  ,KTSK.DEL_OPEACNT
  ,KTSK.MK_FLG FROM
  KK_T_KAISEN_TG_SVKEI KTKTSSVC
INNER JOIN KK_T_KAISEN_TG_SVKEI KTKTSUCWK
  ON KTKTSUCWK.SVC_KEI_KAISEN_UCWK_NO = KTKTSSVC.SVC_KEI_KAISEN_UCWK_NO
  AND KTKTSUCWK.MK_FLG = '0'
  AND LENGTH(TRIM(KTKTSUCWK.KAISEN_UCWK_USE_STAYMD)) > 0
  AND KTKTSUCWK.KAISEN_UCWK_USE_ENDYMD < '20991231'
INNER JOIN KK_T_SVC_KEI KTSK
  ON KTSK.SVC_KEI_NO = KTKTSUCWK.SVC_KEI_NO
  AND KTSK.MK_FLG = '0'
  AND LENGTH(TRIM(KTSK.SVC_CANCEL_YMD)) IS NULL
  AND LENGTH(TRIM(KTSK.SVC_DSL_YMD)) IS NULL
  AND KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM =
      (SELECT
         MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
       FROM
         KK_T_SVC_KEI KTSK_GENE
       WHERE 
         KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
         AND KTSK_GENE.RSV_APLY_YMD <= ?
         AND KTSK_GENE.RSV_APLY_CD = '2'
         AND KTSK_GENE.MK_FLG = '0')
WHERE
  KTKTSSVC.SVC_KEI_NO = ?
  AND KTKTSSVC.MK_FLG = '0'
  AND LENGTH(TRIM(KTKTSSVC.KAISEN_UCWK_USE_STAYMD)) > 0
  AND KTKTSSVC.KAISEN_UCWK_USE_ENDYMD < '20991231'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_025)
#--KKPRC01601
#--指定された年月日のKCNの異動情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_025

SELECT
    DISTINCT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK1091.IDO_DIV,
    KK1091.PRG_STAT,
    KK1561.KCNRIDODIV,
    KK1091.ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK1091.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK1091.PRG_DTM > ? AND
    KK1091.PRG_DTM <= ? AND
    KK1091.MK_FLG = '0'
INNER JOIN
    KK_M_KCNRIDODIV_CHG KK1561
ON
    KK1561.IDO_DIV = KK1091.IDO_DIV AND
    KK1561.PRG_STAT = KK1091.PRG_STAT AND
    ? BETWEEN KK1561.KCNRIDODIV_CHG_TSTAYMD AND
    KK1561.KCNRIDODIV_CHG_TENDYMD AND
    KK1561.MK_FLG = '0'
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD = '12' AND
    KK0081.MK_FLG = '0'
ORDER BY KK0081.SVC_KEI_NO, KK1091.ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_026)
#--KKPRC01701
#--指定された年月日のテレビ、テレビと同一利用場所のテレビ以外の異動情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_026

SELECT
    DISTINCT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD,
    KK0081.SYSID,
    KK1091.IDO_DIV,
    KK1091.PRG_STAT,
    KK1561.KCNRIDODIV,
    KK1091.ADD_DTM,
    KK1091.IDO_DTM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK1091.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK1091.PRG_DTM > ? || '235959999' AND
    KK1091.PRG_DTM <= ? || '235959999' AND
    KK1091.MK_FLG = '0'
INNER JOIN
    KK_M_KCNRIDODIV_CHG KK1561
ON
    KK1561.IDO_DIV = KK1091.IDO_DIV AND
    KK1561.PRG_STAT = KK1091.PRG_STAT AND
    ? BETWEEN KK1561.KCNRIDODIV_CHG_TSTAYMD AND
    KK1561.KCNRIDODIV_CHG_TENDYMD AND
    KK1561.MK_FLG = '0'
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD IN('11','12','13') AND
    KK0081.MK_FLG = '0'
UNION
SELECT
    DISTINCT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD,
    KK0081.SYSID,
    KK1091.IDO_DIV,
    KK1091.PRG_STAT,
    KK1561.KCNRIDODIV,
    KK1091.ADD_DTM,
    KK1091.IDO_DTM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK1091.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK1091.PRG_DTM > ? || '235959999' AND
    KK1091.PRG_DTM <= ? || '235959999' AND
    KK1091.IDO_DIV IN('00012','00013','00015','00016') AND
    KK1091.PRG_STAT IN ('6100','6300','1601','4100','4400') AND
    KK1091.MK_FLG = '0'
INNER JOIN
    KK_M_KCNRIDODIV_CHG KK1561
ON
    KK1561.IDO_DIV = KK1091.IDO_DIV AND
    KK1561.PRG_STAT = KK1091.PRG_STAT AND
    ? BETWEEN KK1561.KCNRIDODIV_CHG_TSTAYMD AND
    KK1561.KCNRIDODIV_CHG_TENDYMD AND
    KK1561.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO IN
    (SELECT
         KK0241.SVC_KEI_NO
     FROM
         KK_T_KAISEN_TG_SVKEI KK0241
     WHERE
         KK0241.SVC_KEI_KAISEN_UCWK_NO IN
         (SELECT
              KK0241_TV.SVC_KEI_KAISEN_UCWK_NO
          FROM
              KK_T_SVC_KEI KK0081_TV
          INNER JOIN
              KK_T_KAISEN_TG_SVKEI KK0241_TV
          ON
              KK0081_TV.SVC_KEI_NO = KK0241_TV.SVC_KEI_NO AND
              KK0241_TV.KAISEN_UCWK_USE_STAYMD <= ? AND
              KK0241_TV.MK_FLG = '0'
          WHERE
              KK0081_TV.SVC_CD = '03' AND
              KK0081_TV.PRC_GRP_CD IN('11','12','13') AND
              KK0081_TV.MK_FLG = '0') AND
         KK0241.MK_FLG = '0'
    ) AND
    KK0081.SVC_CD <> '03'
ORDER BY 1

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_027)
#--KKPRC00902
#--RULE0065結果取得用SQL
#-----------------------------------------------------------

--KEY:KK_SELECT_027

SELECT
  KK0081.IDO_DIV,
  KK0081.SVC_CD,
  KK0081.PRC_GRP_CD,
  KK0081.CHRG_STA_YMD_HOSEI_UM,
  KK0081.SVC_STA_YMD,
  KK0081.SVC_CHRG_STAYMD,
  KK0251.KAISEN_TK_COMP_CD
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
  ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0241.KAISEN_UCWK_USE_STAYMD = 
    (SELECT
      MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)  AS KK0241_MAXYMD
    FROM
      KK_T_KAISEN_TG_SVKEI KK0241_MAX
    WHERE
      KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
      KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
      KK0241_MAX.MK_FLG = '0') 
  INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
  ON
    KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.GENE_ADD_DTM =
    (SELECT
      MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
    FROM
      KK_T_SVKEI_KAISEN_UW KK0251_GENE
    WHERE
      KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
      AND KK0251_GENE.MK_FLG = '0')
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
  (SELECT
    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
    KK_T_SVC_KEI KK0081_GENE
  WHERE
    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_028)
#--KKPRC00902
#--RULE0066結果取得用SQL
#-----------------------------------------------------------

--KEY:KK_SELECT_028

SELECT 
       KK0081.SVC_CD,
       KK0081.SVC_STA_YMD,
       KK0081.SVC_CHRG_STAYMD,
       KK0081.PRC_GRP_CD,
       KK0351OP.OP_SVC_KEI_NO,
       KK0351OP.GENE_ADD_DTM,
       KK0351OP.OP_SVC_CD,
       KK0351OP.SVC_KEI_UCWK_NO,
       KK0351OP.SVC_STAYMD,
       KK0351OP.RSV_APLY_YMD,
       KK0351OP.OP_SVC_KEI_STAT,
       KK0351OP.MSKM_DTL_NO,
       KK0351OP.IDO_DIV,
       KK0351OP.SVC_USE_STA_KIBO_YMD
  FROM KK_T_SVC_KEI KK0081
       INNER JOIN (SELECT KK0351_SVC.OP_SVC_KEI_NO,
                          KK0351_SVC.SVC_KEI_NO,
                          KK0351_SVC.GENE_ADD_DTM,
                          KK0351_SVC.OP_SVC_CD,
                          KK0351_SVC.SVC_KEI_UCWK_NO,
                          KK0351_SVC.SVC_STAYMD,
                          KK0351_SVC.RSV_APLY_YMD,
                          KK0351_SVC.OP_SVC_KEI_STAT,
                          KK0351_SVC.MSKM_DTL_NO,
                          KK0351_SVC.IDO_DIV,
                          KK0351_SVC.SVC_USE_STA_KIBO_YMD
                     FROM KK_T_OP_SVC_KEI KK0351_SVC
                    WHERE KK0351_SVC.SVC_KEI_NO = ?
                      AND KK0351_SVC.OYA_KEI_SKBT_CD = '01'
                      AND KK0351_SVC.RSV_APLY_YMD || KK0351_SVC.GENE_ADD_DTM =
                           (SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) 
                              FROM KK_T_OP_SVC_KEI KK0351_GENE
                             WHERE KK0351_SVC.OP_SVC_KEI_NO = KK0351_GENE.OP_SVC_KEI_NO
                               AND KK0351_GENE.RSV_APLY_YMD <= ?
                               AND KK0351_GENE.RSV_APLY_CD = '2'
                               AND KK0351_GENE.MK_FLG = '0')
                   UNION ALL
                   SELECT KK0351_SVC.OP_SVC_KEI_NO,
                          KK0161.SVC_KEI_NO,
                          KK0351_SVC.GENE_ADD_DTM,
                          KK0351_SVC.OP_SVC_CD,
                          KK0351_SVC.SVC_KEI_UCWK_NO,
                          KK0351_SVC.SVC_STAYMD,
                          KK0351_SVC.RSV_APLY_YMD,
                          KK0351_SVC.OP_SVC_KEI_STAT,
                          KK0351_SVC.MSKM_DTL_NO,
                          KK0351_SVC.IDO_DIV,
                          KK0351_SVC.SVC_USE_STA_KIBO_YMD
                     FROM KK_T_OP_SVC_KEI KK0351_SVC
                          INNER JOIN KK_T_SVC_KEI_UCWK KK0161
                                  ON KK0351_SVC.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
                                 AND KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM =
                                       (SELECT MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) 
                                          FROM KK_T_SVC_KEI_UCWK KK0161_GENE
                                         WHERE KK0161.SVC_KEI_UCWK_NO = KK0161_GENE.SVC_KEI_UCWK_NO
                                           AND KK0161_GENE.RSV_APLY_YMD <= ?
                                           AND KK0161_GENE.RSV_APLY_CD = '2'
                                           AND KK0161_GENE.MK_FLG = '0')
                    WHERE KK0351_SVC.SVC_KEI_UCWK_NO IN
                        (
                        SELECT
                            KK0161.SVC_KEI_UCWK_NO
                        FROM
                            KK_T_SVC_KEI_UCWK KK0161
                        WHERE
                            KK0161.SVC_KEI_NO = ?
                        AND KK0161.KEIZK_AF_KEI_CHGECHU_FLG = '0'
                        AND (KK0161.SVC_KEI_UCWK_NO, KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM) =
                                      (SELECT KK0161_GENE.SVC_KEI_UCWK_NO, MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
                                         FROM KK_T_SVC_KEI_UCWK KK0161_GENE
                                        WHERE KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
                                          AND KK0161_GENE.RSV_APLY_YMD <= ?
                                          AND KK0161_GENE.RSV_APLY_CD = '2'
                                          AND KK0161_GENE.MK_FLG = '0'
                                        GROUP BY KK0161_GENE.SVC_KEI_UCWK_NO)
                        ) 
                      AND KK0351_SVC.OYA_KEI_SKBT_CD = '03'
                      AND KK0351_SVC.RSV_APLY_YMD || KK0351_SVC.GENE_ADD_DTM =
                           (SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) 
                              FROM KK_T_OP_SVC_KEI KK0351_GENE
                             WHERE KK0351_SVC.OP_SVC_KEI_NO = KK0351_GENE.OP_SVC_KEI_NO
                               AND KK0351_GENE.RSV_APLY_YMD <= ?
                               AND KK0351_GENE.RSV_APLY_CD = '2'
                               AND KK0351_GENE.MK_FLG = '0')
                  ) KK0351OP
           ON KK0351OP.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
               (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                  FROM KK_T_SVC_KEI KK0081_GENE
                 WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND KK0081_GENE.RSV_APLY_YMD <= ?
                   AND KK0081_GENE.RSV_APLY_CD = '2'
                   AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_029)
#--KKPRC00907
#--カレントが照査済みのｅｏモバイル（Ｗｉ－Ｆｉ）のデータを抽出します。
#-----------------------------------------------------------

--KEY:KK_SELECT_029

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_CD = '01'   AND
    KK0081.PRC_GRP_CD IN ('07','16') AND
    KK0081.SVC_KEI_STAT = '020' AND
    KK0081.SHOSA_DSL_FIN_CD = '1' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
         MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM
         KK_T_SVC_KEI KK0081_GENE
      WHERE
         KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
         KK0081_GENE.RSV_APLY_YMD <= ? AND
         KK0081_GENE.RSV_APLY_CD = '2' AND
         KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_030)
#--KKPRC08101
#--機器未登録お客様チェックリスト情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_030

SELECT KK0081.SVC_KEI_NO,
       KK0081.GENE_ADD_DTM,
       KK0081.SVC_STA_YMD,
       KK1471.KOJIAK_NO,
       KK1471.KOJIAK_SBT_CD,
       KK1471.NEW_CHGE_CD,
       KK1471.KOJIAK_JSSI_YMD
  FROM KK_T_KJ_FIN_WK KK1471
       INNER JOIN KK_T_SVC_KEI KK0081
          ON KK0081.SVC_KEI_NO=KK1471.SVC_KEI_NO
         AND KK0081.SVC_CD = '03'
         AND KK0081.PRC_GRP_CD IN ('10','11','12')
         AND KK0081.SVC_KEI_STAT='100'
         AND (KK0081.KIKI_MIADD_LIST_OPUTZM_FLG = '0' OR KK0081.KIKI_MIADD_LIST_OPUTZM_FLG IS NULL)
         AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
                    (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                       FROM KK_T_SVC_KEI KK0081_GENE
                      WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                        AND KK0081_GENE.RSV_APLY_YMD <= ?
                        AND KK0081_GENE.RSV_APLY_CD = '2'
                        AND KK0081_GENE.MK_FLG = '0'
                      GROUP BY KK0081_GENE.SVC_KEI_NO)
 WHERE (KK1471.SVC_KEI_NO || KK1471.SVC_KEI_KAISEN_UCWK_NO || KK1471.RNKI_YMD || KK1471.RNKI_SEQ) =
          (SELECT MAX(KK1471_MAX.SVC_KEI_NO || KK1471_MAX.SVC_KEI_KAISEN_UCWK_NO || KK1471_MAX.RNKI_YMD || KK1471_MAX.RNKI_SEQ)
             FROM KK_T_KJ_FIN_WK KK1471_MAX
            WHERE KK1471_MAX.SVC_KEI_NO = KK1471.SVC_KEI_NO
              AND KK1471_MAX.SVC_KEI_KAISEN_UCWK_NO = KK1471.SVC_KEI_KAISEN_UCWK_NO
              AND KK1471_MAX.RNKI_YMD = KK1471.RNKI_YMD
              AND KK1471_MAX.MK_FLG='0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_031)
#--サービス契約番号に紐づくサービス契約情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_031

SELECT  SVC.SVC_KEI_NO,
        SVC.IDO_DIV,
        SVC.SVC_CD,
        SVC.PRC_GRP_CD,
        SVC.MENKAIHAT_ANKEN_NO,
        SVC.TK_HOSHIKI_KEI_NO,
        SVC.PCRS_CD,
        SVC.PPLAN_CD
FROM    KK_T_SVC_KEI SVC
WHERE   SVC.SVC_KEI_NO = ?
AND     SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM =
            (SELECT MAX(KK_T_SVC_KEI_RCNT.RSV_APLY_YMD || KK_T_SVC_KEI_RCNT.GENE_ADD_DTM) AS KK_T_SVC_KEI_MAX
            FROM    KK_T_SVC_KEI KK_T_SVC_KEI_RCNT
            WHERE  KK_T_SVC_KEI_RCNT.SVC_KEI_NO = SVC.SVC_KEI_NO
            AND     KK_T_SVC_KEI_RCNT.RSV_APLY_YMD <= ?
            AND     KK_T_SVC_KEI_RCNT.RSV_APLY_CD = '2'
            AND     KK_T_SVC_KEI_RCNT.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_032)
#--サービス締結登録
#--サービス契約の主キー情報（サービス契約番号,世代登録年月日時分秒）を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_032

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV,
    KK0081.SVC_CANCEL_RSN_CD,
    KK0081.SVC_STP_RSN_CD,
    KK0081.SVC_STP_RLS_RSN_CD,
    KK0081.SVC_PAUSE_RSN_CD,
    KK0081.SVC_PAUSE_RLS_RSN_CD,
    KK0081.SVC_DLRE_CD,
    KK0081.SVC_STA_YMD,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_CHRG_STAYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO =?
    AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
      (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.RSV_APLY_CD = '2'
          AND KK0081_GENE.MK_FLG = '0'
      GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_033)
#--KKPRC06401
#--期間内に「サービス解約」（キャンセル、契約者併合・分割、コース変更[多チャンネル⇒再送信]）、「サービス回復」の異動が異動が発生した対象サービス契約を検索します。
#-----------------------------------------------------------

--KEY:KK_SELECT_033

SELECT
  KK0081_TMP.SYSID,
  KK0081_TMP.SVC_KEI_NO,
  KK0081_TMP.GENE_ADD_DTM,
  KK0081_TMP.IDO_DIV,
  KK0081_TMP.PRC_GRP_CD,
  KK0081_TMP.PCRS_CD,
  KK0081_TMP.ADD_DTM,
  KK0081_TMP.ADD_OPEACNT,
  KK0081_TMP.ADD_TRN_ID,
  KK0081_TMP.UPD_DTM,
  KK0081_TMP.UPD_OPEACNT,
  KK0081_TMP.UPD_TRN_ID,
  KK0081_TMP.MK_FLG,
  KK0081_TMP.TOKUSOKU_STAT,
  KK0081_TMP.SEIKY_KEI_NO
FROM
  (
 SELECT
   KK0081.SYSID,
   KK0081.SVC_KEI_NO,
   KK0081.GENE_ADD_DTM,
   KK0081.IDO_DIV,
   KK0081.PRC_GRP_CD,
   KK0081.PCRS_CD,
   KK0081.ADD_DTM,
   KK0081.ADD_OPEACNT,
   KK0081.ADD_TRN_ID,
   KK0081.UPD_DTM,
   KK0081.UPD_OPEACNT,
   KK0081.UPD_TRN_ID,
   KK0081.MK_FLG,
   CH0231.TOKUSOKU_STAT,
   CH0231.SEIKY_KEI_NO
 FROM
   KK_T_KAKINS KK0321
 LEFT OUTER JOIN
   CH_T_TOKUSOKU CH0231
 ON
   KK0321.SEIKY_KEI_NO = CH0231.SEIKY_KEI_NO
  AND CH0231.TOKUSOKU_IDO_YMD <= ?
  AND CH0231.TOKUSOKU_STAYMD <= ?
  AND CH0231.TOKUSOKU_ENDYMD >= ?
  AND CH0231.MK_FLG = '0'
 INNER JOIN
    KK_T_SVC_KEI KK0081
 ON
   KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
   AND KK0081.IDO_DIV IN('00005','00004','00006','00008','00013','00014','00064')
   AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
     (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0') 
   AND KK0081.UPD_DTM BETWEEN ? AND ? 
 WHERE
   KK0321.KAKINS_TSTAYMD <= ?
   AND KK0321.KAKINS_TENDYMD >= ?
   AND KK0321.MK_FLG = '0'
 UNION
 SELECT
     KK0081.SYSID,
     KK0081.SVC_KEI_NO,
     KK0081.GENE_ADD_DTM,
     KK0081.IDO_DIV,
     KK0081.PRC_GRP_CD,
     KK0081.OLD_PCRS_CD,
     KK0081.ADD_DTM,
     KK0081.ADD_OPEACNT,
     KK0081.ADD_TRN_ID,
     KK0081.UPD_DTM,
     KK0081.UPD_OPEACNT,
     KK0081.UPD_TRN_ID,
     KK0081.MK_FLG,
     CH0231.TOKUSOKU_STAT,
     CH0231.SEIKY_KEI_NO
 FROM
     KK_T_KAKINS KK0321
 LEFT OUTER JOIN
     CH_T_TOKUSOKU CH0231
 ON
     KK0321.SEIKY_KEI_NO = CH0231.SEIKY_KEI_NO
     AND CH0231.TOKUSOKU_IDO_YMD <= ?
     AND CH0231.TOKUSOKU_STAYMD <= ?
     AND CH0231.TOKUSOKU_ENDYMD >= ?
     AND CH0231.MK_FLG = '0'
 INNER JOIN
     (SELECT
         LAG(KK0081_TMP.PCRS_CD,1,'0') OVER(PARTITION BY KK0081_TMP.SVC_KEI_NO ORDER BY KK0081_TMP.RSV_APLY_YMD || KK0081_TMP.GENE_ADD_DTM) OLD_PCRS_CD,
         KK0081_TMP.PCRS_CD NEW_PCRS_CD,
         ROW_NUMBER() OVER(PARTITION BY KK0081_TMP.SVC_KEI_NO ORDER BY KK0081_TMP.GENE_ADD_DTM DESC) RNUM,
         KK0081_TMP.SVC_KEI_NO,
         KK0081_TMP.GENE_ADD_DTM,
         KK0081_TMP.SYSID,
         KK0081_TMP.IDO_DIV,
         KK0081_TMP.PRC_GRP_CD,
         KK0081_TMP.PCRS_CD,
         KK0081_TMP.RSV_APLY_YMD,
         KK0081_TMP.ADD_DTM,
         KK0081_TMP.ADD_OPEACNT,
         KK0081_TMP.ADD_TRN_ID,
         KK0081_TMP.UPD_DTM,
         KK0081_TMP.UPD_OPEACNT,
         KK0081_TMP.UPD_TRN_ID,
         KK0081_TMP.MK_FLG
     FROM
         KK_T_SVC_KEI KK0081_TMP
     WHERE
         KK0081_TMP.RSV_APLY_YMD <= ?
         AND KK0081_TMP.RSV_APLY_CD = '2'
         AND KK0081_TMP.MK_FLG = '0'
     ) KK0081
 ON
     KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
     AND KK0081.IDO_DIV IN('00009') 
     AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
     (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) KK0081_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0')
     AND    KK0081.OLD_PCRS_CD = 'A24'
     AND    KK0081.NEW_PCRS_CD = 'A23'
     AND    KK0081.UPD_DTM BETWEEN ? AND ? 
     AND    RNUM = 1
 WHERE
     KK0321.KAKINS_TSTAYMD <= ?
     AND KK0321.KAKINS_TENDYMD >= ?
     AND KK0321.MK_FLG = '0'
)KK0081_TMP
ORDER BY KK0081_TMP.GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_034)
#--マンションレプリカ、料金データ作成時、サービス契約番号取得
#-----------------------------------------------------------

--KEY:KK_SELECT_034

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN  KK_T_SVC_KEI_DUMMY KK2281
ON  KK2281.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK2281.REPLICA_MOTO_TK_HSK_KEI_NO = ? AND
    KK2281.MK_FLG = '0' AND
    KK0081.MK_FLG = '0'
ORDER BY
    KK0081.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_035)
#--KKPRC00908
#--サービス契約ステータス取得SQL
#-----------------------------------------------------------

--KEY:KK_SELECT_035

SELECT
  KK0081.SVC_KEI_STAT
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.SVC_KEI_NO = ? AND
  KK0081.RSV_APLY_YMD <= ? AND
  KK0081.RSV_APLY_CD = '2' AND
  KK0081.MK_FLG = '0'
ORDER BY 
  KK0081.RSV_APLY_YMD DESC,
  KK0081.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_036)
#--対象サービス契約抽出
#--サービス開始判定となるサービス契約を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_036

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0081.SVC_USE_STA_KIBO_YMD,
    KK0081.IDO_DIV,
    KK0081.MSKM_DTL_NO,
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_STAT = '030'
AND KK0081.PRC_GRP_CD <> '10'
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_037)
#--対象サービス契約抽出
#--KKPRC00901
#--呼び出したルール[RULE0073:サービス開始日設定定義(サービス)]の結果を元に判定用データを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_037

SELECT
    KK0081.SHOSA_YMD,
    KK0081.SVC_USE_STA_KIBO_YMD,
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0891.SVC_STA_YMD
FROM
    KK_T_SVC_KEI KK0081
LEFT OUTER JOIN
    KK_T_TK_HOSHIKI_KEI KK0891
ON
    KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO AND
    KK0891.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_038)
#--サービス契約開始対象抽出（工事起因）
#--ルール[RULE0073:サービス開始日設定定義(サービス)]およびルール[RULE0082:工事完了状況判定]を呼び出す際に必要な情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_038

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SVC_USE_STA_KIBO_YMD,
    KK0081.IDO_DIV,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SHOSA_YMD,
    KK0251.KAISEN_TK_COMP_CD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        KK_T_KAISEN_TG_SVKEI KK0241
    ON
        KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0241.MK_FLG = '0'
        AND KK0241.KAISEN_UCWK_USE_STAYMD = 
        (SELECT
            MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
        FROM
            KK_T_KAISEN_TG_SVKEI KK0241_MAX
        WHERE
            KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
            KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
            KK0241_MAX.KAISEN_UCWK_USE_ENDYMD >= KK0241_MAX.KAISEN_UCWK_USE_STAYMD AND
            KK0241_MAX.MK_FLG = '0') 
        AND KK0241.KAISEN_UCWK_USE_ENDYMD >= KK0241.KAISEN_UCWK_USE_STAYMD
    INNER JOIN
        KK_T_SVKEI_KAISEN_UW KK0251
    ON
        KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
        AND KK0251.GENE_ADD_DTM =
        (SELECT
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
        FROM
            KK_T_SVKEI_KAISEN_UW KK0251_GENE
        WHERE
            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
            AND KK0251_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.SVC_KEI_STAT IN ('030','100')
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_039)
#--KKPRC01601
#--異動情報の抽出１
#-----------------------------------------------------------

--KEY:KK_SELECT_039

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.MSKM_DTL_NO,
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.KAISEN_UCWK_USE_STAYMD = (SELECT
                                         MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
                                       FROM
                                         KK_T_KAISEN_TG_SVKEI KK0241_MAX
                                      WHERE
                                         KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
                                         KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
                                         KK0241_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
    KK0251.GENE_ADD_DTM = (SELECT
                               MAX(KK0251_MAX.GENE_ADD_DTM)
                             FROM
                               KK_T_SVKEI_KAISEN_UW KK0251_MAX
                            WHERE
                               KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                               KK0251_MAX.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.GENE_ADD_DTM = (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) AS GENE_MAX
                             FROM KK_T_SVC_KEI KK0081_GENE
                            WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                  KK0081_GENE.ADD_DTM <= ? AND
                                  KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_041)
#--KKPRC01601
#--異動情報の抽出２
#-----------------------------------------------------------

--KEY:KK_SELECT_041

SELECT
    DISTINCT
    KK0081.SVC_KEI_NO,
    KK0081.IDO_DIV,
    KK1091.PRG_STAT,
    KK1561.KCNRIDODIV,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK1091.PRG_NO =
     (SELECT 
       MAX(KK1091_GENE.PRG_NO) AS KK1091_MAX
      FROM
       KK_T_PRG KK1091_GENE
      WHERE 
       KK1091_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
       KK1091_GENE.IDO_DIV = KK0081.IDO_DIV AND
       KK1091_GENE.PRG_STAT IN ('6100','6300','1601','4100','4400','1304','2203') AND
       KK1091_GENE.PRG_DTM > ? AND
       KK1091_GENE.PRG_DTM <= ? AND
       KK1091_GENE.MK_FLG = '0')
INNER JOIN
    KK_M_KCNRIDODIV_CHG KK1561
ON
    KK1561.IDO_DIV = KK0081.IDO_DIV AND
    KK1561.PRG_STAT = KK1091.PRG_STAT AND
    ? BETWEEN KK1561.KCNRIDODIV_CHG_TSTAYMD AND KK1561.KCNRIDODIV_CHG_TENDYMD AND
    KK1561.MK_FLG = '0'
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    (KK0241.SVC_KEI_NO, KK0241.KAISEN_UCWK_USE_STAYMD) = (SELECT KK0241_MAX.SVC_KEI_NO,
                                                                 MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
                                                            FROM KK_T_KAISEN_TG_SVKEI KK0241_MAX
                                                           WHERE KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
                                                                 KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
                                                                 KK0241_MAX.MK_FLG = '0'
                                                           GROUP BY KK0241_MAX.SVC_KEI_NO)
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
    (KK0251.SVC_KEI_KAISEN_UCWK_NO, KK0251.GENE_ADD_DTM) = (SELECT KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO,
                                                                   MAX(KK0251_MAX.GENE_ADD_DTM)
                                                              FROM KK_T_SVKEI_KAISEN_UW KK0251_MAX
                                                             WHERE KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                                                             GROUP BY KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO)
WHERE
    KK0081.SVC_KEI_NO IN
       (SELECT KK0241.SVC_KEI_NO
          FROM KK_T_KAISEN_TG_SVKEI KK0241
         WHERE KK0241.SVC_KEI_KAISEN_UCWK_NO IN (SELECT SVC_KEI_KAISEN_UCWK_NO
                                                   FROM KK_T_SVC_KEI KK0081_TV
                                                        INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241_TV
                                                           ON KK0081_TV.SVC_KEI_NO = KK0241_TV.SVC_KEI_NO AND
                                                                (KK0241_TV.SVC_KEI_NO, KK0241_TV.KAISEN_UCWK_USE_STAYMD) = (SELECT KK0241_TV_MAX.SVC_KEI_NO,
                                                                                                                                   MAX(KK0241_TV_MAX.KAISEN_UCWK_USE_STAYMD)
                                                                                                                              FROM KK_T_KAISEN_TG_SVKEI KK0241_TV_MAX
                                                                                                                             WHERE KK0241_TV.SVC_KEI_NO = KK0241_TV_MAX.SVC_KEI_NO AND
                                                                                                                                   KK0241_TV_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
                                                                                                                                   KK0241_TV_MAX.MK_FLG = '0'
                                                                                                                             GROUP BY KK0241_TV_MAX.SVC_KEI_NO)
             WHERE
                 KK0081_TV.SVC_CD = '03' AND
                 KK0081_TV.PRC_GRP_CD = '12' AND
                 KK0081_TV.MK_FLG = '0')
       ) AND
    KK0081.SVC_CD <> '03' AND
    KK0081.IDO_DIV IN('00005','00012','00013','00015','00016','00064')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_042)
#--KKPRC01701
#--住所変更情報の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_042

SELECT DISTINCT
    KK2101.CHBF_SKBT_NO AS SVC_KEI_NO,
    KK2101.CHAF_SKBT_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_ADCHG_DTL KK2101
ON
    KK2101.CHBF_SKBT_NO = KK0081.SVC_KEI_NO
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0') AND
    KK2101.ADCHG_DTL_SBT_CD = '01' AND
    KK2101.UPD_DTM > ? AND
    KK2101.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_043)
#--KKPRC01701
#--住所変更撤去情報の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_043

SELECT DISTINCT
    KU0081.SVC_KEI_NO,
    KK2101_01.CHAF_SKBT_NO,
    KU0011.KOJIAK_NO,
    KU0011.KOJIAK_JSSI_YMD
FROM
    KU_T_KOJIAK KU0011
INNER JOIN
    KU_T_SVKEI_KOJIAK KU0081
ON
    KU0081.KOJIAK_NO = KU0011.KOJIAK_NO
INNER JOIN
    KK_T_ADCHG_DTL KK2101_06
ON
    KK2101_06.CHBF_SKBT_NO = KU0081.KOJIAK_NO
INNER JOIN
    KK_T_ADCHG_DTL KK2101_01
ON
    KK2101_01.ADCHG_NO = KK2101_06.ADCHG_NO
AND KK2101_01.CHBF_SKBT_NO = KU0081.SVC_KEI_NO
WHERE
    KU0011.KOJIAK_SBT_CD IN ('002','004') AND
    KU0011.KOJIAK_STAT = '200' AND
    KU0011.PRC_GRP_CD IN ('11','12','13') AND
    KU0011.UPD_DTM > ? AND
    KU0011.MK_FLG = '0' AND
    KU0081.SVC_CD = '03' AND
    KU0081.SVKEI_KOJIAK_TSTAYMD <= ? AND
    KU0081.SVKEI_KOJIAK_TENDYMD >= ? AND
    KU0081.MK_FLG = '0' AND
    KK2101_06.ADCHG_DTL_SBT_CD = '06' AND
    KK2101_06.MK_FLG = '0' AND
    KK2101_01.ADCHG_DTL_SBT_CD = '01' AND
    KK2101_01.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_044)
#--KKPRC01701
#--住所変更確定情報の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_044

SELECT /*+ INDEX(KK1091 KK_T_PRG_IDX_03) */
    KK0081.SVC_KEI_NO,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0081.MSKM_DTL_NO,
    KK0081.PCRS_CD,
    KK0081.SVC_CD,
    KK0101.DMPS_ANKEN_NO,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0251.KITEN_HDSHO_CD,
    KK1091.PRG_STAT,
    KK1091.PRG_DTM,
    KK2101.CHBF_SKBT_NO,
    KK2101.CHAF_SKBT_NO,
    KK2101.ADCHG_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK0081.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
    KK1091.PRG_STAT = '6100' AND
    KK1091.PRG_DTM > ? AND
    KK1091.PRG_DTM <= ? AND
    KK1091.MK_FLG = '0'
INNER JOIN
    KK_T_ADCHG_DTL KK2101
ON
    KK2101.CHAF_SKBT_NO = KK0081.SVC_KEI_NO AND
    KK2101.ADCHG_DTL_SBT_CD = '01' AND
    KK2101.ADCHG_NO = (SELECT
                          MAX(KK2101_AN_MAX.ADCHG_NO) AS KK2101_MAX
                      FROM
                          KK_T_ADCHG_DTL KK2101_AN_MAX
                      WHERE
                          KK2101_AN_MAX.CHAF_SKBT_NO = KK2101.CHAF_SKBT_NO AND
                          KK2101_AN_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.KAISEN_UCWK_USE_STAYMD = (SELECT
                                        MAX(KK0241_KUUS_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
                                    FROM
                                        KK_T_KAISEN_TG_SVKEI KK0241_KUUS_MAX
                                    WHERE
                                        KK0241_KUUS_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
                                        KK0241_KUUS_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
                                        KK0241_KUUS_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
    KK0251.GENE_ADD_DTM = (SELECT
                              MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                          FROM
                              KK_T_SVKEI_KAISEN_UW KK0251_GENE
                          WHERE
                              KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                              KK0251_GENE.MK_FLG = '0')
INNER JOIN
    KK_T_SVC_KEI_EOH_TV KK0101
ON
    KK0101.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0101.GENE_ADD_DTM = KK0081.GENE_ADD_DTM AND
    KK0101.MK_FLG = '0'
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_045)
#--KKPRC01601
#--解約削除情報の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_045

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.IDO_DIV,
    KK1091.PRG_STAT,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK1091.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK1091.PRG_NO =
     (SELECT 
       MAX(KK1091_GENE.PRG_NO) AS KK1091_MAX
      FROM
       KK_T_PRG KK1091_GENE
      WHERE 
       KK1091_GENE.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
       KK1091_GENE.MK_FLG = '0')
INNER JOIN
    KK_M_PRC_GRP KK0781
ON
    KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD AND
    KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =
    (SELECT
         MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
     FROM
         KK_M_PRC_GRP KK0781_GENE
     WHERE
         KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD AND
         KK0781_GENE.RSV_APLY_YMD <= ? AND
         KK0781_GENE.MK_FLG = '0')
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.KAISEN_UCWK_USE_STAYMD = (SELECT
                                         MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
                                       FROM
                                         KK_T_KAISEN_TG_SVKEI KK0241_MAX
                                      WHERE
                                         KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
                                         KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
                                         KK0241_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
    KK0251.GENE_ADD_DTM = (SELECT
                               MAX(KK0251_MAX.GENE_ADD_DTM)
                             FROM
                               KK_T_SVKEI_KAISEN_UW KK0251_MAX
                            WHERE
                               KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                               KK0251_MAX.MK_FLG = '0')
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD = '12' AND
    ((KK0081.SVC_KEI_STAT = '910' AND
     ? < TO_CHAR(TO_DATE(KK0081.SVC_DSL_YMD, 'YYYYMMDD') + (KK0781.KAIHK_PSB_PRD + 1), 'YYYYMMDD') AND
     ? >= TO_CHAR(TO_DATE(KK0081.SVC_DSL_YMD, 'YYYYMMDD') + (KK0781.KAIHK_PSB_PRD + 1), 'YYYYMMDD') AND
     TRIM(KK0081.SVC_CANCEL_CL_YMD) IS NULL)
     OR
    (KK0081.SVC_KEI_STAT = '920' AND ? < TO_CHAR(TO_DATE(KK0081.SVC_CANCEL_YMD) + 1, 'YYYYMMDD')  AND
     ? >= TO_CHAR(TO_DATE(KK0081.SVC_CANCEL_YMD) + 1, 'YYYYMMDD'))) AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_046)
#--KKPRC00906
#--サービス契約ステータス取得SQL
#-----------------------------------------------------------

--KEY:KK_SELECT_046

SELECT
 KK0081.SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ? AND
 KK0081.GENE_ADD_DTM = (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) KK0081_MAX
                        FROM KK_T_SVC_KEI KK0081_GENE
                        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                              KK0081_GENE.RSV_APLY_YMD <= ? AND
                              KK0081_GENE.RSV_APLY_CD = '2' AND
                              KK0081_GENE.MK_FLG = '0') AND
 (KK0081.SVC_KEI_STAT IN ('100' , '910' , '920') OR
 KK0081.SVC_CHRG_STAYMD <= ADD_MONTHS(?,-2)) AND
 KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_047)
#--KKPRC05301
#--OPMS側からの新設工事取消が行われたサービス契約を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_047

SELECT
    KTS.SVC_KEI_NO              AS SVC_KEI_NO,
    KTS.SVC_KEI_STAT            AS SVC_KEI_STAT,
    KTS.SVC_CD                  AS SVC_CD,
    ''                          AS IDO_DIV,
    ''                          AS PRG_STAT,
    KTK.KOJIAK_STP_ADD_YMD      AS KOJIAK_STP_ADD_YMD,
    KTK.OPMS_KOJIAK_STP_RSLT_CD AS OPMS_KOJIAK_STP_RSLT_CD,
    KTK.KOJI_PDING_UM           AS KOJI_PDING_UM,
    '0'                         AS KOJI_NGDATA_JUDGE_FLG,
    KTK.KOJIAK_STP_RSN_CD_1     AS KOJIAK_STP_RSN_CD_1,
    KTK.KOJIAK_STP_RSN_CD_2     AS KOJIAK_STP_RSN_CD_2,
    KTK.KOJIAK_NO               AS KOJIAK_NO
FROM
    KK_T_SVC_KEI  KTS,
    KK_T_KJ_CL_WK KTK
WHERE
    KTK.KOJIAK_STP_ADD_YMD = (
        SELECT MAX(SUB_KTK.KOJIAK_STP_ADD_YMD)
        FROM   KK_T_KJ_CL_WK SUB_KTK
        WHERE  SUB_KTK.SVC_KEI_NO          = KTS.SVC_KEI_NO
        AND    SUB_KTK.KOJIAK_SBT_CD       = '001'
        AND    SUB_KTK.KOJIAK_STP_ADD_YMD <= ?
        AND    SUB_KTK.MK_FLG              = '0'
        GROUP BY SUB_KTK.SVC_KEI_NO
    )
AND KTK.SYRZM_FLG           = '0'
AND KTK.MK_FLG     = '0'
AND KTS.SVC_KEI_NO = KTK.SVC_KEI_NO
AND KTS.SVC_KEI_STAT IN ('020', '030')
AND (KTS.SVC_KEI_NO, KTS.RSV_APLY_YMD || KTS.GENE_ADD_DTM) = (
        SELECT KTS_GENE.SVC_KEI_NO, MAX(KTS_GENE.RSV_APLY_YMD || KTS_GENE.GENE_ADD_DTM) AS KTS_MAX
        FROM   KK_T_SVC_KEI KTS_GENE
        WHERE  KTS_GENE.SVC_KEI_NO    = KTS.SVC_KEI_NO
        AND    KTS_GENE.RSV_APLY_YMD <= ?
        AND    KTS_GENE.RSV_APLY_CD   = '2'
        AND    KTS_GENE.MK_FLG        = '0'
        GROUP BY KTS_GENE.SVC_KEI_NO
    )
UNION
SELECT
    KTS.SVC_KEI_NO              AS SVC_KEI_NO,
    KTS.SVC_KEI_STAT            AS SVC_KEI_STAT,
    KTS.SVC_CD                  AS SVC_CD,
    ''                          AS IDO_DIV,
    ''                          AS PRG_STAT,
    KTK.KOJIAK_STP_ADD_YMD      AS KOJIAK_STP_ADD_YMD,
    KTK.OPMS_KOJIAK_STP_RSLT_CD AS OPMS_KOJIAK_STP_RSLT_CD,
    KTK.KOJI_PDING_UM           AS KOJI_PDING_UM,
    '0'                         AS KOJI_NGDATA_JUDGE_FLG,
    KTK.KOJIAK_STP_RSN_CD_1     AS KOJIAK_STP_RSN_CD_1,
    KTK.KOJIAK_STP_RSN_CD_2     AS KOJIAK_STP_RSN_CD_2,
    KTK.KOJIAK_NO               AS KOJIAK_NO
FROM
    KK_T_SVC_KEI  KTS,
    KK_T_KJ_CL_WK KTK,
    KU_T_KOJIAK   KU0011
WHERE
    KTK.KOJIAK_STP_ADD_YMD = (
        SELECT MAX(SUB_KTK.KOJIAK_STP_ADD_YMD)
        FROM   KK_T_KJ_CL_WK SUB_KTK
        WHERE  SUB_KTK.SVC_KEI_NO          = KTS.SVC_KEI_NO
        AND    SUB_KTK.KOJIAK_SBT_CD       IN ('001', '003')
        AND    SUB_KTK.KOJIAK_STP_ADD_YMD <= ?
        AND    SUB_KTK.MK_FLG              = '0'
        GROUP BY SUB_KTK.SVC_KEI_NO
    )
AND KTK.SYRZM_FLG           = '0'
AND KTK.MK_FLG     = '0'
AND KTS.SVC_KEI_NO = KTK.SVC_KEI_NO
AND KTS.SVC_KEI_STAT NOT IN ('010', '910', '920')
AND KTS.SVC_CD = '03'
AND (KTS.SVC_KEI_NO, KTS.RSV_APLY_YMD || KTS.GENE_ADD_DTM) = (
        SELECT KTS_GENE.SVC_KEI_NO, MAX(KTS_GENE.RSV_APLY_YMD || KTS_GENE.GENE_ADD_DTM) AS KTS_MAX
        FROM   KK_T_SVC_KEI KTS_GENE
        WHERE  KTS_GENE.SVC_KEI_NO    = KTS.SVC_KEI_NO
        AND    KTS_GENE.RSV_APLY_YMD <= ?
        AND    KTS_GENE.RSV_APLY_CD   = '2'
        AND    KTS_GENE.MK_FLG        = '0'
        GROUP BY KTS_GENE.SVC_KEI_NO
    )
AND KTK.KOJIAK_NO = KU0011.KOJIAK_NO
AND KU0011.KOJI_UK_OPTNTY_IDO_DIV = '00019'
AND KU0011.MK_FLG = '0'
AND KU0011.AD_CHG_FIX_DTM IS NOT NULL

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_054)
#--サービス契約番号
#-----------------------------------------------------------

--KEY:KK_SELECT_054

SELECT 
    TSK.IDO_DIV
FROM
    KK_T_SVC_KEI TSK
WHERE
    TSK.SVC_KEI_NO = ?
AND
    TSK.RSV_APLY_YMD || TSK.GENE_ADD_DTM =
                       (SELECT MAX(SUB_TSK.RSV_APLY_YMD || SUB_TSK.GENE_ADD_DTM)
                        FROM   KK_T_SVC_KEI SUB_TSK
                        WHERE  SUB_TSK.SVC_KEI_NO = TSK.SVC_KEI_NO
                        AND    SUB_TSK.RSV_APLY_YMD <= ?
                        AND    SUB_TSK.RSV_APLY_CD = '2'
                        AND    SUB_TSK.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_055)
#--KKPRC00909
#--サービス契約ステータス取得SQL
#-----------------------------------------------------------

--KEY:KK_SELECT_055

SELECT
 KK0081.SVC_KEI_STAT,
 KK0081.MSKM_DTL_NO,
 KK0081.SVC_STA_YMD,
 KK0081.SVC_CHRG_STAYMD,
 KK0081.PLAN_CHRG_STAYMD,
 KK2111.LAST_UPD_DTM,
 KK0081.PLAN_STAYMD
FROM
 KK_T_SVC_KEI KK0081
INNER JOIN
 KK_T_SVKEI_EXC_CTRL KK2111
ON
 KK2111.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
 KK2111.MK_FLG = '0'
WHERE
 KK0081.SVC_KEI_NO = ? AND
KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2' 
          AND    KK0081_GENE.MK_FLG = '0') AND
 KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_056)
#--サービス契約番号とSYSIDよりサービス契約とお客様名を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_056


SELECT
  CK0011.CUST_NM
  ,KK0081.SVC_KEI_STAT
  ,KK0081.SYSID
  ,KK0081.SVC_CD
  ,KK0081.MSKM_DTL_NO
  ,KK0081.MENKAIHAT_ANKEN_NO
  ,KK0081.PRC_GRP_CD
  ,KK0081.PCRS_CD
  ,KK0081.PPLAN_CD
  ,KK0081.TK_HOSHIKI_KEI_NO
  ,KK0081.SVC_USE_STA_KIBO_YMD
  ,KK0081.RSV_TSTA_KIBO_YMD
  ,KK0081.ID_SOKHOSHO_OUTPUT_YH
  ,KK0081.SVC_KEI_KZKWRK_REQYMD
  ,KK0081.SHOSA_YMD
  ,KK0081.SHOSA_CL_YMD
  ,KK0081.SKEKKA_CD
  ,KK0081.SKEKKA_DTL_CD
  ,KK0081.SKEKKA_HOKI_CD
  ,KK0081.SKEKKA_SEND_CD
  ,KK0081.PAYWAY_KEIZOKU_FLG
  ,KK0081.FTRIAL_KANYU_YMD
  ,KK0081.FTRIAL_PRD_ENDYMD
  ,KK0081.HONKANYU_YMD
  ,KK0081.HONKANYU_IKO_KIGEN_YMD
  ,KK0081.KEI_CNC_YMD
  ,KK0081.PLAN_STAYMD
  ,KK0081.PLAN_ENDYMD
  ,KK0081.PLAN_CHRG_STAYMD
  ,KK0081.PLAN_CHRG_ENDYMD
  ,KK0081.PLAN_END_SBT_CD
  ,KK0081.RSV_APLY_YMD
  ,KK0081.RSV_CL_YMD
  ,KK0081.RSV_APLY_CD
  ,KK0081.SVC_CANCEL_YMD
  ,KK0081.SVC_CANCEL_RSN_CD
  ,KK0081.SVC_STA_YMD
  ,KK0081.SVC_CHRG_STAYMD
  ,KK0081.LETTER_HASSO_SHIWAKE_DIV
  ,KK0081.THNX_LETTER_SHS_CD
  ,KK0081.WEB_OP_ADD_FAIL_FLG
  ,KK0081.SVC_STP_YMD
  ,KK0081.SVC_STP_RSN_CD
  ,KK0081.SVC_STP_RLS_YMD
  ,KK0081.SVC_STP_RLS_RSN_CD
  ,KK0081.PAUSE_STP_CD
  ,KK0081.SVC_PAUSE_YMD
  ,KK0081.SVC_PAUSE_RSN_CD
  ,KK0081.SVC_PAUSE_RSN_MEMO
  ,KK0081.SVC_PAUSE_RLS_YMD
  ,KK0081.SVC_PAUSE_RLS_RSN_CD
  ,KK0081.SVC_PAUSE_RLS_RSN_MEMO
  ,KK0081.SVC_ENDYMD
  ,KK0081.SVC_CHRG_ENDYMD
  ,KK0081.SVC_DSL_YMD
  ,KK0081.SVC_DLRE_CD
  ,KK0081.SVC_DLRE_MEMO
  ,KK0081.SVC_DSL_TTDKI_FIN_FLG
  ,KK0081.KAIHK_YMD
  ,KK0081.SVC_CANCEL_CL_YMD
  ,KK0081.SVC_DSL_CL_YMD
  ,KK0081.CHGE_MT_HOJINSVKEI_UK_NO
  ,KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT
  ,KK0081.CHGE_SK_HOJINSVKEI_UK_NO
  ,KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT
  ,KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO
  ,KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO
  ,KK0081.PNLTY_HASSEI_CD
  ,KK0081.PNLTY_CHGE_RSN_CD
  ,KK0081.IDO_DIV
  ,KK0081.SHK_DFLT_PWD
  ,KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG
  ,KK0081.INTR_CD
  ,KK0081.SHOSA_DSL_FIN_CD
  ,KK0081.IDO_NG_STAT_CD
  ,KK0081.CHRG_STA_YMD_HOSEI_UM
  ,KK0081.SVC_PAUSE_CHRG_STA_YMD
  ,KK0081.WORK_RRK_BIKO
  ,KK0081.AUTO_SHOSA_TRAN_STAT_CD
  ,KK0081.KIKI_MIADD_LIST_OPUTZM_FLG
  ,KK0081.ADD_DTM
  ,KK0081.ADD_OPEACNT
  ,KK0081.UPD_DTM
  ,KK0081.UPD_OPEACNT
  ,KK0081.DEL_DTM
  ,KK0081.DEL_OPEACNT
  ,KK0081.MK_FLG
FROM
  KK_T_SVC_KEI KK0081
INNER JOIN CK_T_CUST CK0011 ON CK0011.SYSID = KK0081.SYSID
  AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =
                              (SELECT
                                   MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CTC_MAX
                               FROM
                                   CK_T_CUST CK0011_GENE
                               WHERE 
                                   CK0011_GENE.SYSID = CK0011.SYSID
                               AND CK0011_GENE.RSV_APLY_YMD <= ?
                               AND CK0011_GENE.RSV_APLY_CD = '2'
                               AND CK0011_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.SYSID = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
                              (SELECT
                                   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                               FROM
                                   KK_T_SVC_KEI KK0081_GENE
                               WHERE 
                                   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                               AND KK0081_GENE.RSV_APLY_YMD <= ?
                               AND KK0081_GENE.RSV_APLY_CD = '2'
                               AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_057)
#--KKPRC08301
#--工事工程遅延リスト作成に必要な情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_057

SELECT 
  KK0081.SYSID, 
  KK0081.PRC_GRP_CD, 
  KK0081.PCRS_CD, 
  KK0081.SVC_STA_YMD,
  KK0081.PPLAN_CD,
  KK0321.SEIKY_KEI_NO
FROM 
  KK_T_SVC_KEI KK0081 
INNER JOIN 
  KK_T_KAKINS KK0321 
ON 
  KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO 
  AND KK0321.MK_FLG = '0' 
WHERE 
  KK0081.SVC_KEI_NO = ? 
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT 
      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
    FROM 
      KK_T_SVC_KEI KK0081_GENE 
    WHERE 
      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
      AND KK0081_GENE.RSV_APLY_YMD <= ? 
      AND KK0081_GENE.RSV_APLY_CD = '2' 
      AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_058)
#--KKPRC08101
#--サービス契約番号に対するカレント・予約レコード情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_058

SELECT
  KK0081.GENE_ADD_DTM
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
      KK_T_SVC_KEI KK0081_GENE
    WHERE
      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND KK0081_GENE.RSV_APLY_CD = '2'
      AND KK0081_GENE.MK_FLG = '0')
  AND KK0081.RSV_APLY_YMD > ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_059)
#-----------------------------------------------------------

--KEY:KK_SELECT_059
SELECT
    KK0081.SVC_KEI_NO,
    SUBSTR(CK0011.CUST_NM,1,20) AS CUST_NM,
    CK0011.KEISHA_TELNO,
    SUBSTR(KK0781.PRC_GRP_NM,1,20) AS PRC_GRP_NM,
    ZM0171.CD_DIV_NM,
    KK0081.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081,
    CK_T_CUST CK0011,
    KK_M_PRC_GRP KK0781,
    ZM_M_CD_NM_KANRI ZM0171
WHERE
    KK0081.SVC_KEI_STAT IN ('020','030','100','210','220','910','920')
AND (KK0081.SVC_KEI_NO ,KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (SELECT
													KK0081_GENE.SVC_KEI_NO,
                                                    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                FROM
                                                    KK_T_SVC_KEI KK0081_GENE
                                                WHERE
                                                    KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
                                                AND KK0081_GENE.RSV_APLY_YMD = KK0081.RSV_APLY_YMD
                                                AND KK0081_GENE.MK_FLG = '0'
                                                AND KK0081_GENE.RSV_APLY_CD = '2'
												AND (KK0081_GENE.IDO_DIV IN ('00004','00005','00008','00010','00011','00062','00063','00064')
												     OR ((KK0081_GENE.IDO_DIV = '00024' AND KK0081_GENE.PAUSE_STP_CD IS NOT NULL)
												          OR (KK0081_GENE.IDO_DIV = '00025' AND KK0081_GENE.SVC_PAUSE_RLS_YMD IS NOT NULL)))
												GROUP BY
													KK0081_GENE.SVC_KEI_NO
                                            )
AND KK0081.SYSID = CK0011.SYSID
AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = (SELECT
                                                    MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
                                                FROM
                                                    CK_T_CUST CK0011_GENE
                                                WHERE
                                                    CK0011_GENE.SYSID = KK0081.SYSID
                                                AND CK0011_GENE.RSV_APLY_YMD <= ?
                                                AND CK0011_GENE.MK_FLG = '0'
                                                AND CK0011_GENE.RSV_APLY_CD = '2'
                                                )
AND KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD
AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM = (SELECT
                                                    MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
                                                FROM
                                                    KK_M_PRC_GRP KK0781_GENE
                                                WHERE
                                                    KK0781_GENE.PRC_GRP_CD = KK0081.PRC_GRP_CD
                                                AND KK0781_GENE.RSV_APLY_YMD <= ?
                                                AND KK0781_GENE.MK_FLG = '0'
                                                )
AND ZM0171.CD_SBT_CD = 'CD00576'
AND ZM0171.MK_FLG = '0'
AND KK0081.IDO_DIV = ZM0171.CD_DIV
AND KK0081.RSV_APLY_YMD = ?
ORDER BY
    KK0081.PRC_GRP_CD,
    KK0081.SVC_KEI_NO
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_060)
#--工事間情報受入確認チェックに必要な情報を取得します。
#--KKPRC33701にて使用。
#-----------------------------------------------------------

--KEY:KK_SELECT_060

SELECT
    KK0081.SVC_KEI_STAT,
    KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_061)
#--KKPRC06401
#--SYSIDに属する全サービス契約の取得
#-----------------------------------------------------------

--KEY:KK_SELECT_061

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.IDO_DIV,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.SVC_ENDYMD
FROM
    (SELECT
       KK0081_TMP.SVC_KEI_NO,
       KK0081_TMP.GENE_ADD_DTM
     FROM KK_T_SVC_KEI KK0081_TMP
     WHERE KK0081_TMP.SYSID = ?) KK0081_TMP
     INNER JOIN
       KK_T_SVC_KEI KK0081
     ON
       KK0081.SVC_KEI_NO = KK0081_TMP.SVC_KEI_NO
       AND KK0081_TMP.GENE_ADD_DTM = KK0081.GENE_ADD_DTM
       AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
          KK_T_SVC_KEI KK0081_GENE
        WHERE
          KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0081.SVC_CD <> '04'
          AND KK0081_GENE.GENE_ADD_DTM <= ?
          AND KK0081_GENE.RSV_APLY_YMD <= ? 
          AND KK0081_GENE.RSV_APLY_CD = '2'
          AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_062)
#--サービス契約休止対象抽出を行う
#-----------------------------------------------------------

--KEY:KK_SELECT_062

SELECT KTS.SVC_KEI_NO 
FROM KK_T_SVC_KEI  KTS 
WHERE KTS.SVC_PAUSE_YMD = ? 
AND KTS.SVC_KEI_STAT = '210'
AND KTS.PAUSE_STP_CD = '00'
AND KTS.MK_FLG = '0'
AND KTS.GENE_ADD_DTM = (SELECT MAX(GENE_ADD_DTM) MAX_GENE_ADD_DTM 
                        FROM KK_T_SVC_KEI SUB_KTSK 
                        WHERE KTS.SVC_KEI_NO = SUB_KTSK.SVC_KEI_NO
                        AND SUB_KTSK.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_063)
#--KKPRC01601
#--WEB工程進捗情報ファイル作成（サービス契約）
#-----------------------------------------------------------

--KEY:KK_SELECT_063

SELECT
    KK0021.MSKMSHO_NO,
    KK0011.MSKMSHO_ARIV_YMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_MSKM_DTL KK0021
ON
    KK0081.MSKM_DTL_NO = KK0021.MSKM_DTL_NO AND
    KK0021.GENE_ADD_DTM = (SELECT
                               MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
                            FROM
                                KK_T_MSKM_DTL KK0021_GENE
                            WHERE
                                KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO AND
                                KK0021_GENE.MK_FLG = '0')
INNER JOIN
    KK_T_MSKM KK0011
ON
    KK0021.MSKM_NO = KK0011.MSKM_NO AND
    KK0011.GENE_ADD_DTM = (SELECT
                               MAX(KK0011_GENE.GENE_ADD_DTM) AS KK0011_MAX
                            FROM
                                KK_T_MSKM KK0011_GENE
                            WHERE
                                KK0011_GENE.MSKM_NO = KK0011.MSKM_NO AND
                                KK0011_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_CD ='03' AND
    KK0081.PRC_GRP_CD = '12' AND
    ((KK0081.SVC_KEI_STAT = '010' AND TRIM(KK0081.SHOSA_YMD) IS NULL)
    OR
    (KK0081.SVC_KEI_STAT = '920' AND TRIM(KK0081.SHOSA_YMD) IS NULL AND
     KK0081.SVC_CANCEL_YMD BETWEEN TO_CHAR(TO_DATE(?) - 13,'YYYYMMDD') AND ?)) AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                                      KK0081_GENE.RSV_APLY_YMD <= ? AND
                                                      KK0081_GENE.RSV_APLY_CD = '2' AND
                                                      KK0081_GENE.MK_FLG = '0')
UNION ALL
SELECT
    KK0021.MSKMSHO_NO,
    KK0011.MSKMSHO_ARIV_YMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_MSKM_DTL KK0021
ON
    KK0081.MSKM_DTL_NO = KK0021.MSKM_DTL_NO AND
    KK0021.GENE_ADD_DTM = (SELECT
                               MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
                            FROM
                                KK_T_MSKM_DTL KK0021_GENE
                            WHERE
                                KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO AND
                                KK0021_GENE.MK_FLG = '0')
INNER JOIN
    KK_T_MSKM KK0011
ON
    KK0021.MSKM_NO = KK0011.MSKM_NO AND
    KK0011.GENE_ADD_DTM = (SELECT
                               MAX(KK0011_GENE.GENE_ADD_DTM) AS KK0011_MAX
                            FROM
                                KK_T_MSKM KK0011_GENE
                            WHERE
                                KK0011_GENE.MSKM_NO = KK0011.MSKM_NO AND
                                KK0011_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_CD = '01' AND
    ((KK0081.SVC_KEI_STAT = '010' AND TRIM(KK0081.SHOSA_YMD) IS NULL)
    OR
    (KK0081.SVC_KEI_STAT = '920' AND TRIM(KK0081.SHOSA_YMD) IS NULL AND
     KK0081.SVC_CANCEL_YMD BETWEEN TO_CHAR(TO_DATE(?) - 13,'YYYYMMDD') AND ?)) AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                                      KK0081_GENE.RSV_APLY_YMD <= ? AND 
                                                      KK0081_GENE.RSV_APLY_CD = '2' AND
                                                      KK0081_GENE.MK_FLG = '0') AND
EXISTS 
(
SELECT
 '1'
FROM
 KK_T_SVC_KEI KK0081_EX
WHERE
 KK0081_EX.SYSID = KK0081.SYSID AND
 KK0081_EX.SVC_CD = '03' AND
 KK0081_EX.PRC_GRP_CD = '12' AND
 KK0081_EX.RSV_APLY_YMD || KK0081_EX.GENE_ADD_DTM = (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
   AND KK0081_GENE.RSV_APLY_YMD <= ? 
   AND KK0081_GENE.RSV_APLY_CD = '2'
   AND KK0081_GENE.MK_FLG = '0')
)

#-

-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_064)
#--KKPRC33704
#--進捗登録情報を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_064

SELECT
    KK0241.SVC_KEI_NO,
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV
FROM
    KK_T_KAISEN_TG_SVKEI KK0241
INNER JOIN
    KU_T_SVKEI_KOJIAK KU0081
ON
    KU0081.KOJIAK_NO = ? AND
    KU0081.MK_FLG = '0'
INNER JOIN
    KU_T_KOJIAK KU0011
ON
    KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
    AND KU0011.MK_FLG = '0'
INNER JOIN
    KK_T_SVC_KEI KK0081
ON
    KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
    AND KK0081.GENE_ADD_DTM = 
    (SELECT
        MIN(KK0081_GENE.GENE_ADD_DTM) AS KK0081_MIN
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')
WHERE
    KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
    AND KK0241.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_065)
#--サービスコードが「インターネットサービス」「電話サービス」「テレビサービス」の全件と関連するお客様、サービス契約回線内訳を抽出する（ADSLは除く）
#-----------------------------------------------------------

--KEY:KK_SELECT_065

SELECT
    KK0251.SVC_KEI_KAISEN_UCWK_NO,
    KK0251.GENE_ADD_DTM AS KK0251_GENE_ADD_DTM,
    KK0251.KAISEN_PLACE_AD_CD,
    KK0251.CUST_SOS_USE_UM,
    KK0251.LOOPBACK_TEST_FIN_YMD,
    CK0011.SYSID,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    CK0011.CUST_KANA,
    CK0011.CUST_NM,
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.RSV_APLY_YMD,
    KK0081.PLAN_ENDYMD,
    KK0081.MK_FLG,
    KK0081.SVC_CD,
    KK0081.SVC_KEI_STAT,
    KK2141.OLD_ICS_KEI_STAT_CD,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.SVC_ENDYMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.SVC_DSL_YMD,
    KK0081.SVC_PAUSE_YMD,
    KK0081.SVC_PAUSE_RLS_YMD,
    KK0081.PPLAN_CD,
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0081.IDO_DIV,
    KK0081.PCRS_CD,
    (SELECT
        KK0861.MANSION_BUKKEN_CD
     FROM
        KK_T_TK_HOSHIKI_KEI KK0891
        INNER JOIN KK_T_KAISEN_USE_KEI KK0881
        ON KK0891.KAISEN_USE_KEI_NO = KK0881.KAISEN_USE_KEI_NO
        AND KK0881.MK_FLG = '0'
        INNER JOIN KK_T_OWNR_KEI KK0871
        ON KK0881.OWNR_KEI_NO = KK0871.OWNR_KEI_NO
        AND KK0871.MK_FLG = '0'
        INNER JOIN KK_T_MANSION_BUKKEN KK0861
        ON KK0871.MANSION_BUKKEN_NO = KK0861.MANSION_BUKKEN_NO
        AND KK0861.MK_FLG = '0'
     WHERE
        KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO
     AND
        KK0891.MK_FLG = '0'
    ) AS MANSION_BUKKEN_CD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD ||CK0011.GENE_ADD_DTM =
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM   CK_T_CUST CK0011_GENE
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID
          AND    CK0011_GENE.RSV_APLY_YMD <= ?
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241
    ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND 
    KK0241.KAISEN_UCWK_USE_STAYMD =
         (SELECT MAX(KK0241_STA.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
          FROM   KK_T_KAISEN_TG_SVKEI KK0241_STA
          WHERE  KK0241_STA.SVC_KEI_NO = KK0241.SVC_KEI_NO
          AND    KK0241_STA.KAISEN_UCWK_USE_STAYMD <= TO_CHAR(TO_DATE(?,'YYYYMMDD'),'YYYYMMDD')
          AND    KK0241_STA.MK_FLG = '0') 
    INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
    ON KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.GENE_ADD_DTM =
         (SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
          FROM  KK_T_SVKEI_KAISEN_UW KK0251_GENE
          WHERE  KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
          AND    KK0251_GENE.MK_FLG = '0'
          AND    KK0251_GENE.GENE_ADD_DTM =
              (
                SELECT MAX(UW.GENE_ADD_DTM)
                FROM KK_T_SVKEI_KAISEN_UW UW
                INNER JOIN KU_T_SVKEI_KOJIAK SK
                ON UW.SVC_KEI_KAISEN_UCWK_NO = SK.SVC_KEI_KAISEN_UCWK_NO
                WHERE
                    SK.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND UW.GENE_ADD_DTM = 
                 (
                    SELECT MAX(UW_GENE.GENE_ADD_DTM) AS UW_GENE_MAX 
                    FROM   KK_T_SVKEI_KAISEN_UW UW_GENE 
                    WHERE  UW_GENE.SVC_KEI_KAISEN_UCWK_NO = UW.SVC_KEI_KAISEN_UCWK_NO
                    AND    UW_GENE.MK_FLG = '0'
                )
            )
          )
    INNER JOIN KK_M_OLD_ICS_CD_CHG KK2141
    ON KK0081.SVC_KEI_STAT = KK2141.SVC_KEI_STAT
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 
AND KK0081.SVC_CD IN ('01','02','03') 
AND KK0081.PRC_GRP_CD IN ('02','03','04','07','08','09','10','11','12','13','16') 
AND KK0081.MK_FLG = '0'
AND KK2141.RNK_SAKI_SYS_SKBT_CD = '02'
AND KK2141.OLD_ICS_CD_CHG_SBT_CD = '01'
AND KK2141.MK_FLG = '0'
AND KK2141.OLD_ICS_CD_CHG_TSTAYMD <= TO_DATE(?,'YYYYMMDD')
AND KK2141.OLD_ICS_CD_CHG_TENDYMD >= TO_DATE(?,'YYYYMMDD')
ORDER BY
    KK0251.SVC_KEI_KAISEN_UCWK_NO,
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_066)
#--サービスコードが「電話サービス」の全件と関連するサービス契約回線内訳を抽出する
#-----------------------------------------------------------

--KEY:KK_SELECT_066

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    '1' AS TEL_ORDER,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_ENDYMD,
    KK0081.MK_FLG,
    KK0081.SVC_KEI_STAT,
    KK2141.OLD_ICS_KEI_STAT_CD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.SVC_DSL_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0251.KAISEN_PLACE_AD_CD,
    KK0081.PPLAN_CD, 
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0081.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241
    ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND 
    KK0241.KAISEN_UCWK_USE_STAYMD =
         (SELECT MAX(KK0241_STA.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
          FROM   KK_T_KAISEN_TG_SVKEI KK0241_STA
          WHERE  KK0241_STA.SVC_KEI_NO = KK0241.SVC_KEI_NO
          AND    KK0241_STA.KAISEN_UCWK_USE_STAYMD <= ?
          AND    KK0241_STA.MK_FLG = '0') 
    INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
    ON KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.GENE_ADD_DTM =
         (SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
          FROM  KK_T_SVKEI_KAISEN_UW KK0251_GENE
          WHERE  KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
          AND    KK0251_GENE.MK_FLG = '0')
    INNER JOIN KK_M_OLD_ICS_CD_CHG KK2141
    ON KK0081.SVC_KEI_STAT = KK2141.SVC_KEI_STAT
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 
AND KK0081.SVC_CD = '02'
AND KK0081.MK_FLG = '0'
AND KK2141.RNK_SAKI_SYS_SKBT_CD = '02'
AND KK2141.OLD_ICS_CD_CHG_SBT_CD = '01'
AND KK2141.MK_FLG = '0'
AND ? BETWEEN KK2141.OLD_ICS_CD_CHG_TSTAYMD
AND KK2141.OLD_ICS_CD_CHG_TENDYMD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_067)
#--サービス契約番号と世代管理登録年月日時分秒に紐づくSOD発行に必要なデータを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_067

SELECT 
    KTSK.SHK_DFLT_PWD,  
    KTSK.SVC_KEI_STAT,
    KTSK.CUST_ID_PWD
FROM 
    KK_T_SVC_KEI KTSK 
WHERE
    KTSK.MK_FLG = '0'
AND
    KTSK.SVC_KEI_NO = ?
AND
    KTSK.GENE_ADD_DTM = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_068)
#--サービス契約番号に紐づくサービス契約データと、サービス契約＜eo光電話＞のデータを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_068

SELECT 
    KTSK.SVC_KEI_STAT
  , KTSK.GENE_ADD_DTM
  , KTSK.RSV_APLY_YMD
  , KTSK.PCRS_CD
FROM 
    KK_T_SVC_KEI KTSK
WHERE
    KTSK.SVC_KEI_NO = ?
AND
    KTSK.MK_FLG = '0'
AND 
    KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM = (
SELECT MAX(KTSK_SUB.RSV_APLY_YMD || KTSK_SUB.GENE_ADD_DTM) AS KTSK_SUB_MAX
          FROM   KK_T_SVC_KEI KTSK_SUB
          WHERE  KTSK_SUB.SVC_KEI_NO = KTSK.SVC_KEI_NO
          AND    KTSK_SUB.RSV_APLY_YMD <= ?
          AND    KTSK_SUB.RSV_APLY_CD = '2'
          AND    KTSK_SUB.MK_FLG = '0'
group by KTSK_SUB.SVC_KEI_NO
) 
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_069)
#--サービス契約番号に紐づくサービス契約情報、サービス情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_069

SELECT 
  KK0081.SVC_KEI_NO 
  ,KK0081.SVC_KEI_STAT 
  ,KK0081.SVC_CD 
  ,KK0081.MSKM_DTL_NO 
  ,KK0081.PRC_GRP_CD 
  ,KK0081.PCRS_CD 
  ,KK0081.PPLAN_CD 
  ,KK0081.RSV_TSTA_KIBO_YMD 
  ,KK0081.RSV_APLY_YMD 
  ,KK0081.RSV_CL_YMD 
  ,KK0081.RSV_APLY_CD 
  ,KK0081.SVC_CANCEL_YMD 
  ,KK0081.SVC_STA_YMD 
  ,KK0081.SVC_CHRG_STAYMD 
  ,KK0081.SVC_ENDYMD 
  ,KK0081.SVC_CHRG_ENDYMD 
  ,KK0751.SVC_NM 
  ,KK0751.RSV_APLY_YMD 
  ,KK0781.PRC_GRP_NM 
  ,KK0781.RSV_APLY_YMD 
  ,KK0791.PRC_GRP_CD 
  ,KK0791.PCRS_NM 
  ,KK0791.RSV_APLY_YMD 
  ,KK0591.PPLAN_NM  
FROM  
((  (KK_T_SVC_KEI KK0081 
    INNER JOIN  
      KK_M_SVC KK0751 
    ON  
      KK0081.SVC_CD = KK0751.SVC_CD  
    )  
    INNER JOIN  
      KK_M_PRC_GRP KK0781 
    ON  
      KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD  
  )  
  INNER JOIN  
    KK_M_PCRS KK0791 
  ON  
    KK0081.PCRS_CD = KK0791.PCRS_CD  
)  
INNER JOIN  
  KK_M_PPLAN KK0591 
ON  
  KK0081.PCRS_CD = KK0591.PCRS_CD  
  AND KK0081.PPLAN_CD = KK0591.PPLAN_CD  
WHERE  
  KK0081.SVC_KEI_NO = ? 
  AND KK0591.MK_FLG = '0' 
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =  
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
          FROM   KK_T_SVC_KEI KK0081_GENE 
          WHERE  KK0081_GENE.SVC_CD = KK0081.SVC_CD 
          AND    KK0081_GENE.RSV_APLY_YMD <= ? 
          AND    KK0081_GENE.RSV_APLY_CD = '2' 
          AND    KK0081_GENE.MK_FLG = '0') 
  AND KK0751.RSV_APLY_YMD || KK0751.GENE_ADD_DTM =  
         (SELECT MAX(KK0751_GENE.RSV_APLY_YMD || KK0751_GENE.GENE_ADD_DTM) AS KK0751_MAX 
          FROM   KK_M_SVC KK0751_GENE 
          WHERE  KK0751_GENE.SVC_CD = KK0751.SVC_CD 
          AND    KK0751_GENE.RSV_APLY_YMD <= ? 
          AND    KK0751_GENE.MK_FLG = '0') 
  AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =  
         (SELECT MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX 
          FROM   KK_M_PRC_GRP KK0781_GENE 
          WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD 
          AND    KK0781_GENE.RSV_APLY_YMD <= ? 
          AND    KK0781_GENE.MK_FLG = '0') 
  AND KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM =  
         (SELECT MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX 
          FROM   KK_M_PCRS KK0791_GENE 
          WHERE  KK0791_GENE.PCRS_CD = KK0791.PCRS_CD 
          AND    KK0791_GENE.RSV_APLY_YMD <= ? 
          AND    KK0791_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_070)
#--指定されたサービス契約回線内訳番号に紐づくサービス契約番号、サービスコードを取得する。
#--KKPRC35201にて使用
#-----------------------------------------------------------

--KEY:KK_SELECT_070

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_NO,
    KK0251.KISN_PLC_AD_MI_FIX_FLG
FROM
KK_T_SVC_KEI KK0081
    INNER JOIN 
        KK_T_KAISEN_TG_SVKEI KK0241
    ON
        KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
        KK0241.SVC_KEI_KAISEN_UCWK_NO = ? AND
        KK0241.KAISEN_UCWK_USE_STAYMD <= ? AND
        KK0241.MK_FLG = '0'
    INNER JOIN
        KK_T_SVKEI_KAISEN_UW KK0251
    ON
        KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
        KK0251.GENE_ADD_DTM =
        (SELECT
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
        FROM
           KK_T_SVKEI_KAISEN_UW KK0251_GENE
        WHERE
           KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
            AND KK0251_GENE.MK_FLG = '0') 
WHERE
    KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_071)
#--一つ前の履歴を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_071

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_CD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_DSL_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.PPLAN_CD,
    KK0081.PRC_GRP_CD,
    KK0081.MK_FLG,
    KK0081.PCRS_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.GENE_ADD_DTM < ?
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_072)
#--eo光電話単独契約は判断するために対象サービス契約番号のカレントデータを取得します。
#--KKPRC01601にて使用。
#-----------------------------------------------------------

--KEY:KK_SELECT_072

SELECT
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN 
        KK_T_KAISEN_TG_SVKEI KK0241
    ON
        KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
        KK0241.MK_FLG = '0'
    INNER JOIN
        KK_T_SVKEI_KAISEN_UW KK0251
    ON
        KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
        KK0251.GENE_ADD_DTM =
        (SELECT
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
        FROM KK_T_SVKEI_KAISEN_UW KK0251_GENE
        WHERE
           KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
           AND KK0251_GENE.MK_FLG = '0') AND
        KK0251.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM KK_T_SVC_KEI KK0081_GENE
        WHERE
           KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2'
           AND KK0081_GENE.MK_FLG = '0') AND
KK0081.SVC_CD IN('01','02') AND
KK0081.PRC_GRP_CD = '12'AND
KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_073)
#--サービス終了年月日にnullが設定されている情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_073

SELECT
1
FROM
KK_T_SVC_KEI SK
WHERE
SK.SVC_KEI_NO = ?
AND SK.GENE_ADD_DTM = 
   (SELECT MAX(SK_GENE.GENE_ADD_DTM) AS UCWK_MAX FROM KK_T_SVC_KEI SK_GENE
    WHERE SK_GENE.SVC_KEI_NO = SK.SVC_KEI_NO
    AND SK_GENE.MK_FLG = '0')
AND SK.SVC_ENDYMD IS NULL
AND SK.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_074)
#--サービス開始年月日にnullが設定されている情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_074

SELECT
1
FROM
KK_T_SVC_KEI SK
WHERE
SK.SVC_KEI_NO = ?
AND SK.GENE_ADD_DTM = 
   (SELECT MAX(SK_GENE.GENE_ADD_DTM) AS UCWK_MAX FROM KK_T_SVC_KEI SK_GENE
    WHERE SK_GENE.SVC_KEI_NO = SK.SVC_KEI_NO
    AND SK_GENE.MK_FLG = '0')
AND SK.SVC_STA_YMD IS NULL
AND SK.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_075)
#--カレントのレコードからサービス契約開始日を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_075

SELECT SVC_KEI.SVC_STA_YMD
  FROM KK_T_SVC_KEI SVC_KEI
 WHERE SVC_KEI.SVC_KEI_NO = ?
   AND SVC_KEI.GENE_ADD_DTM = 
       (SELECT MAX(SVC_KEI_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX 
        FROM   KK_T_SVC_KEI SVC_KEI_GENE
        WHERE  SVC_KEI_GENE.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
        AND    SVC_KEI_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_076)
#--サービス契約番号を基にサービス契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_076

SELECT
    KK0081.SVC_KEI_NO AS SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (
        SELECT
            MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_SVC_KEI SVC_KEI_GENE
        WHERE
            SVC_KEI_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND 
            SVC_KEI_GENE.RSV_APLY_YMD <= ?
        AND 
            SVC_KEI_GENE.RSV_APLY_CD = '2'
        AND
            SVC_KEI_GENE.MK_FLG = '0'
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_077)
#--整理番号に紐づくマンションのサービスが存在するか検索する
#--(マンションプライベートは含めない)
#-----------------------------------------------------------

--KEY:KK_SELECT_077

SELECT
    1
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SEIRI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM   KK_T_SVC_KEI KK0081_GENE
         WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND    KK0081_GENE.RSV_APLY_YMD <= ?
         AND    KK0081_GENE.RSV_APLY_CD = '2'
         AND    KK0081_GENE.MK_FLG = '0')
AND KK0081.PRC_GRP_CD = '04'
AND KK0081.SVC_KEI_STAT NOT IN ('010','910','920')
AND NOT EXISTS
        (SELECT 1
         FROM   KK_M_PCRS KK0791
         WHERE  KK0791.PCRS_CD = KK0081.PCRS_CD
         AND    KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM = 
                 (SELECT MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX
                  FROM   KK_M_PCRS KK0791_GENE
                  WHERE  KK0791_GENE.PCRS_CD = KK0791.PCRS_CD
                  AND    ? BETWEEN KK0791_GENE.PCRS_TSTAYMD AND KK0791_GENE.PCRS_TENDYMD
                  AND    KK0791_GENE.RSV_APLY_YMD <= ?
                  AND    KK0791_GENE.MK_FLG = '0')
         AND    KK0791.ID_TCHISHO_HAK_SKBT_CD = '4')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_078)
#--サービス契約解約対象、サービス契約撤去工事完了対象のレコード（MUSe連携以外）を抽出する。
#--※工事案件.マンション工事案件状態コードがNULLの場合、MUSe連携以外と判定する。
#-----------------------------------------------------------

--KEY:KK_SELECT_078

SELECT
    TKK_IDY.IDO_RSV_NO,
    TKK_IDY.SVC_KEI_NO,
    TKK_IDY.SVC_KEI_KAISEN_UCWK_NO,
    TKK_IDY.MSKM_DTL_NO,
    TKK_IDY.SVC_KEI_STAT,
    TKK_IDY.UPD_DTM,
    TKK_IDY.RSV_APLY_YMD,
    TKK_KOJ.KOJIAK_JSSI_YMD,
    TKK_KOJ.KOJIAK_NO,
    '1' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        TKK_IDY_KAISEN_TG.SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_KAISEN_TG_SVKEI TKK_IDY_KAISEN_TG
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_KAISEN_TG.SVC_KEI_NO
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00006' AND TKK_IDY_IDO_RSV.IDO_RSV_DTL_CD = '007' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03')
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_STAYMD <= ?
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_ENDYMD >= ?
    AND TKK_IDY_IDO_RSV.MK_FLG   = '0'
    AND TKK_IDY_KAISEN_TG.MK_FLG = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= ?
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
) TKK_IDY
INNER JOIN
(
    SELECT
        TKK_KOJ_BASE.SVC_KEI_NO,
        TKK_KOJ_BASE.SVC_KEI_KAISEN_UCWK_NO,
        TKK_KOJ_BASE.KOJIAK_NO,
        TKK_KOJ_BASE.KOJIAK_JSSI_YMD,
        TKK_KOJ_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT
            TKK_KOJ_KJ_FIN.*
        FROM
            KK_T_KJ_FIN_WK TKK_KOJ_KJ_FIN
        INNER JOIN
        (
            SELECT
                SVC_KEI_NO,
                SVC_KEI_KAISEN_UCWK_NO,
                MAX(RNKI_YMD) RNKI_YMD,
                MAX(RNKI_SEQ) RNKI_SEQ
            FROM
                (
                    SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, RNKI_YMD, RNKI_SEQ
                    FROM   KK_T_KJ_FIN_WK
                    WHERE  RNKI_YMD <= ?
                    AND    (KOJIAK_SBT_CD = '002' OR KOJIAK_SBT_CD = '004')
                    AND EXISTS
                    (
                        SELECT KOJIAK.KOJIAK_NO
                        FROM   KU_T_KOJIAK KOJIAK
                        WHERE  KOJIAK.KOJIAK_NO = KK_T_KJ_FIN_WK.KOJIAK_NO
                        AND    KOJIAK.MANS_KOJIAK_STAT_CD IS NULL
                        AND    KOJIAK.MK_FLG = '0'
                    )
                    AND    MK_FLG = '0'
                )
            GROUP BY
                SVC_KEI_NO,
                SVC_KEI_KAISEN_UCWK_NO
        ) TKK_KOJ_WK_KJ_FIN
            ON  TKK_KOJ_KJ_FIN.SVC_KEI_NO             = TKK_KOJ_WK_KJ_FIN.SVC_KEI_NO
            AND TKK_KOJ_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO = TKK_KOJ_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO 
            AND TKK_KOJ_KJ_FIN.RNKI_YMD               = TKK_KOJ_WK_KJ_FIN.RNKI_YMD
            AND TKK_KOJ_KJ_FIN.RNKI_SEQ               = TKK_KOJ_WK_KJ_FIN.RNKI_SEQ
        WHERE
            OPMS_KOJIAK_RSLT_CD <> '2'
    ) TKK_KOJ_BASE
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) TKK_KOJ_MSKMD_KOJIAK
        ON  TKK_KOJ_BASE.KOJIAK_NO = TKK_KOJ_MSKMD_KOJIAK.KOJIAK_NO
)
TKK_KOJ
    ON  TKK_IDY.SVC_KEI_NO             = TKK_KOJ.SVC_KEI_NO
    AND TKK_IDY.SVC_KEI_KAISEN_UCWK_NO = TKK_KOJ.SVC_KEI_KAISEN_UCWK_NO
    AND TKK_IDY.MSKM_DTL_NO            = TKK_KOJ.MSKM_DTL_NO
UNION
SELECT
    KKB_KKW_IDO.IDO_RSV_NO,
    KKB_KKW_IDO.SVC_KEI_NO,
    KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO,
    KKB_KKW_IDO.MSKM_DTL_NO,
    KKB_KKW_IDO.SVC_KEI_STAT,
    KKB_KKW_IDO.UPD_DTM,
    KKB_KKW_IDO.RSV_APLY_YMD,
    '' AS KOJIAK_JSSI_YMD,
    '' AS KOJIAK_NO,
    '2' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        TKK_IDY_KAISEN_TG.SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_KAISEN_TG_SVKEI TKK_IDY_KAISEN_TG
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_KAISEN_TG.SVC_KEI_NO
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00006' AND TKK_IDY_IDO_RSV.IDO_RSV_DTL_CD = '007' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03')
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_STAYMD <= ?
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_ENDYMD >= ?
    AND TKK_IDY_IDO_RSV.RSV_APLY_YMD <= ? 
    AND TKK_IDY_IDO_RSV.MK_FLG        = '0'
    AND TKK_IDY_KAISEN_TG.MK_FLG      = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= ?
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
) KKB_KKW_IDO
WHERE
NOT EXISTS
(
    SELECT
        KKB_KKW_WK_KJ_FIN.SVC_KEI_NO,
        KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO,
        KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, KOJIAK_NO
        FROM   KK_T_KJ_FIN_WK
        WHERE  RNKI_YMD <= ?
        AND    (KOJIAK_SBT_CD = '002' OR KOJIAK_SBT_CD = '004')
        AND    OPMS_KOJIAK_RSLT_CD = '1'
        AND    MK_FLG = '0'
        GROUP BY
            SVC_KEI_NO,
            SVC_KEI_KAISEN_UCWK_NO,
            KOJIAK_NO
    ) KKB_KKW_WK_KJ_FIN
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_WK_KJ_FIN.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        KKB_KKW_IDO.SVC_KEI_NO             = KKB_KKW_WK_KJ_FIN.SVC_KEI_NO
    AND KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO
    AND KKB_KKW_IDO.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
)
AND EXISTS
(
    SELECT
        KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO
    FROM
    (
        SELECT SVKEI_KOJIAK.KOJIAK_NO, SVKEI_KOJIAK.SVC_KEI_NO, SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO
        FROM   KU_T_SVKEI_KOJIAK SVKEI_KOJIAK
        WHERE  SVKEI_KOJIAK.MK_FLG = '0'
    ) KKB_KKW_SVKEI_KOJIAK
    INNER JOIN
    (
        SELECT MSKM_DTL_KOJIAK.KOJIAK_NO, MSKM_DTL_KOJIAK.MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK MSKM_DTL_KOJIAK
        WHERE  MSKM_DTL_KOJIAK.MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        KKB_KKW_IDO.SVC_KEI_NO             = KKB_KKW_SVKEI_KOJIAK.SVC_KEI_NO
    AND KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO
    AND KKB_KKW_IDO.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    AND EXISTS
    (
        SELECT KOJIAK.KOJIAK_NO
        FROM   KU_T_KOJIAK KOJIAK
        WHERE  KOJIAK.KOJIAK_NO = KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO
        AND    KOJIAK.MANS_KOJIAK_STAT_CD IS NULL
        AND    KOJIAK.MK_FLG = '0'
    )
)
AND
    ? = (
        SELECT TO_CHAR(TO_DATE(EVENT_YMD, 'YYYYMMDD') - 1, 'YYYYMMDD')
        FROM   CH_M_PRC_SCHDL_TEIGI
        WHERE  EVENT_CD = '03'
        AND    SEIKY_YM = TO_CHAR(TO_DATE(substr(?, 1, 6), 'YYYYMM') - 1, 'YYYYMM')
    )
UNION
SELECT
    TKK_IDY.IDO_RSV_NO,
    TKK_IDY.SVC_KEI_NO,
    TKK_IDY.SVC_KEI_KAISEN_UCWK_NO,
    TKK_IDY.MSKM_DTL_NO,
    TKK_IDY.SVC_KEI_STAT,
    TKK_IDY.UPD_DTM,
    TKK_IDY.RSV_APLY_YMD,
    TKK_KOJ.KOJIAK_JSSI_YMD,
    TKK_KOJ.KOJIAK_NO,
    '1' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        TKK_IDY_KAISEN_TG.SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_KAISEN_TG_SVKEI TKK_IDY_KAISEN_TG
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_KAISEN_TG.SVC_KEI_NO
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00019' AND TKK_IDY_IDO_RSV.IDO_RSV_DTL_CD = '007' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03')
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_STAYMD <= ?
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_ENDYMD >= ?
    AND TKK_IDY_IDO_RSV.MK_FLG   = '0'
    AND TKK_IDY_KAISEN_TG.MK_FLG = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= ?
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
) TKK_IDY
INNER JOIN
(
    SELECT
        TKK_KOJ_BASE.SVC_KEI_NO,
        TKK_KOJ_BASE.SVC_KEI_KAISEN_UCWK_NO,
        TKK_KOJ_BASE.KOJIAK_NO,
        TKK_KOJ_BASE.KOJIAK_JSSI_YMD,
        TKK_KOJ_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT
            TKK_KOJ_KJ_FIN.*
        FROM
            KK_T_KJ_FIN_WK TKK_KOJ_KJ_FIN
        INNER JOIN
        (
            SELECT
                SVC_KEI_NO,
                SVC_KEI_KAISEN_UCWK_NO,
                MAX(RNKI_YMD) RNKI_YMD,
                MAX(RNKI_SEQ) RNKI_SEQ
            FROM
                (
                    SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, RNKI_YMD, RNKI_SEQ
                    FROM   KK_T_KJ_FIN_WK
                    WHERE  RNKI_YMD <= ?
                    AND    (KOJIAK_SBT_CD = '002' OR KOJIAK_SBT_CD = '004')
                    AND EXISTS
                    (
                        SELECT KOJIAK.KOJIAK_NO
                        FROM   KU_T_KOJIAK KOJIAK
                        WHERE  KOJIAK.KOJIAK_NO = KK_T_KJ_FIN_WK.KOJIAK_NO
                        AND    KOJIAK.MANS_KOJIAK_STAT_CD IS NULL
                        AND    KOJIAK.MK_FLG = '0'
                    )
                    AND    MK_FLG = '0'
                )
            GROUP BY
                SVC_KEI_NO,
                SVC_KEI_KAISEN_UCWK_NO
        ) TKK_KOJ_WK_KJ_FIN
            ON  TKK_KOJ_KJ_FIN.SVC_KEI_NO             = TKK_KOJ_WK_KJ_FIN.SVC_KEI_NO
            AND TKK_KOJ_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO = TKK_KOJ_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO 
            AND TKK_KOJ_KJ_FIN.RNKI_YMD               = TKK_KOJ_WK_KJ_FIN.RNKI_YMD
            AND TKK_KOJ_KJ_FIN.RNKI_SEQ               = TKK_KOJ_WK_KJ_FIN.RNKI_SEQ
        WHERE
            OPMS_KOJIAK_RSLT_CD <> '2'
    ) TKK_KOJ_BASE
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) TKK_KOJ_MSKMD_KOJIAK
        ON  TKK_KOJ_BASE.KOJIAK_NO = TKK_KOJ_MSKMD_KOJIAK.KOJIAK_NO
)
TKK_KOJ
    ON  TKK_IDY.SVC_KEI_NO             = TKK_KOJ.SVC_KEI_NO
    AND TKK_IDY.SVC_KEI_KAISEN_UCWK_NO = TKK_KOJ.SVC_KEI_KAISEN_UCWK_NO
    AND TKK_IDY.MSKM_DTL_NO            = TKK_KOJ.MSKM_DTL_NO
UNION
SELECT
    KKB_KKW_IDO.IDO_RSV_NO,
    KKB_KKW_IDO.SVC_KEI_NO,
    KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO,
    KKB_KKW_IDO.MSKM_DTL_NO,
    KKB_KKW_IDO.SVC_KEI_STAT,
    KKB_KKW_IDO.UPD_DTM,
    KKB_KKW_IDO.RSV_APLY_YMD,
    '' AS KOJIAK_JSSI_YMD,
    '' AS KOJIAK_NO,
    '2' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        KK2091.ITNM_SVKEI_KISUW_NO AS SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    INNER JOIN KK_T_MSKM_DTL KK0021
        ON  KK0021.MSKM_DTL_NO = TKK_IDY_IDO_RSV.MSKM_DTL_NO
    INNER JOIN KK_T_MSKM KK0011
        ON  KK0011.MSKM_NO = KK0021.MSKM_NO
    INNER JOIN KK_T_ADCHG KK2091
        ON  KK2091.MSKM_NO = KK0011.MSKM_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00019' AND TKK_IDY_IDO_RSV.IDO_RSV_DTL_CD = '007' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03')
    AND TKK_IDY_IDO_RSV.RSV_APLY_YMD <= ? 
    AND TKK_IDY_IDO_RSV.MK_FLG        = '0'
    AND KK2091.MK_FLG        = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= ?
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
    AND (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) = 
        (
            SELECT KK0021_GENE.MSKM_DTL_NO, MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
            FROM    KK_T_MSKM_DTL KK0021_GENE
            WHERE   KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
            AND     KK0021_GENE.MK_FLG = '0'
            GROUP BY KK0021_GENE.MSKM_DTL_NO
        )
    AND (KK0011.MSKM_NO, KK0011.GENE_ADD_DTM) = 
        (
            SELECT KK0011_GENE.MSKM_NO, MAX(KK0011_GENE.GENE_ADD_DTM) AS KK0011_MAX
            FROM    KK_T_MSKM KK0011_GENE
            WHERE   KK0011_GENE.MSKM_NO = KK0011.MSKM_NO
            AND     KK0011_GENE.MK_FLG = '0'
            GROUP BY KK0011_GENE.MSKM_NO
        )
) KKB_KKW_IDO
WHERE
NOT EXISTS
(
    SELECT
        KKB_KKW_WK_KJ_FIN.SVC_KEI_NO,
        KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO,
        KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, KOJIAK_NO
        FROM   KK_T_KJ_FIN_WK
        WHERE  RNKI_YMD <= ?
        AND    (KOJIAK_SBT_CD = '002' OR KOJIAK_SBT_CD = '004')
        AND    OPMS_KOJIAK_RSLT_CD = '1'
        AND    MK_FLG = '0'
        GROUP BY
            SVC_KEI_NO,
            SVC_KEI_KAISEN_UCWK_NO,
            KOJIAK_NO
    ) KKB_KKW_WK_KJ_FIN
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_WK_KJ_FIN.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        KKB_KKW_IDO.SVC_KEI_NO             = KKB_KKW_WK_KJ_FIN.SVC_KEI_NO
    AND KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO
    AND KKB_KKW_IDO.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
)
AND EXISTS
(
    SELECT
        KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO
    FROM
    (
        SELECT SVKEI_KOJIAK.KOJIAK_NO, SVKEI_KOJIAK.SVC_KEI_NO, SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO
        FROM   KU_T_SVKEI_KOJIAK SVKEI_KOJIAK
        WHERE  SVKEI_KOJIAK.MK_FLG = '0'
    ) KKB_KKW_SVKEI_KOJIAK
    INNER JOIN
    (
        SELECT MSKM_DTL_KOJIAK.KOJIAK_NO, MSKM_DTL_KOJIAK.MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK MSKM_DTL_KOJIAK
        WHERE  MSKM_DTL_KOJIAK.MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        KKB_KKW_IDO.SVC_KEI_NO             = KKB_KKW_SVKEI_KOJIAK.SVC_KEI_NO
    AND KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO
    AND KKB_KKW_IDO.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    AND EXISTS
    (
        SELECT KOJIAK.KOJIAK_NO
        FROM   KU_T_KOJIAK KOJIAK
        WHERE  KOJIAK.KOJIAK_NO = KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO
        AND    KOJIAK.MANS_KOJIAK_STAT_CD IS NULL
        AND    KOJIAK.MK_FLG = '0'
    )
)
AND
    ? = (
        SELECT TO_CHAR(TO_DATE(EVENT_YMD, 'YYYYMMDD') - 1, 'YYYYMMDD')
        FROM   CH_M_PRC_SCHDL_TEIGI
        WHERE  EVENT_CD = '03'
        AND    SEIKY_YM = TO_CHAR(TO_DATE(substr(?, 1, 6), 'YYYYMM') - 1, 'YYYYMM')
    )
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_079)
#--解約年月日が運用日かつ、サービス契約ステータスが解約済み、またはキャンセル済みのサービス契約番号を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_079

SELECT
  SK.SVC_KEI_NO, 
  SK.SVC_KEI_STAT, 
  SK.SVC_DSL_YMD, 
  SK.SVC_CANCEL_YMD
FROM
  KK_T_SVC_KEI SK 
WHERE
  ((SK.SVC_KEI_STAT = '910' 
AND
  SK.SVC_DSL_YMD = ?) 
OR
  (SK.SVC_KEI_STAT = '920' 
AND
  SK.SVC_CANCEL_YMD = ?)) 
AND
  SK.PRC_GRP_CD <> '14' 
AND
  SK.RSV_APLY_YMD || SK.GENE_ADD_DTM = (
  SELECT
    MAX(SUB_SK.RSV_APLY_YMD || SUB_SK.GENE_ADD_DTM) AS SK_MAX 
  FROM
    KK_T_SVC_KEI SUB_SK 
  WHERE
    SUB_SK.SVC_KEI_NO = SK.SVC_KEI_NO 
  AND
    SUB_SK.RSV_APLY_YMD <= ? 
  AND
    SUB_SK.RSV_APLY_CD = '2' 
  AND
    SUB_SK.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_080)
#--指定した申込書番号または同時申込eo光申込書番号の申込明細の申込明細番号から、サービス契約の照査年月日が指定日から指定日までのレコードの照査解約完了コードとSYSIDを検索する。
#-----------------------------------------------------------

--KEY:KK_SELECT_080

SELECT
    SVC_KEI.SHOSA_DSL_FIN_CD,
    SVC_KEI.SYSID
FROM
    KK_T_SVC_KEI SVC_KEI
WHERE
    SVC_KEI.SVC_KEI_NO IN
    (
        SELECT
            SVC_KEI_WK.SVC_KEI_NO
        FROM
            KK_T_SVC_KEI SVC_KEI_WK
        INNER JOIN KK_T_MSKM_DTL MSKM_DTL
            ON SVC_KEI_WK.MSKM_DTL_NO = MSKM_DTL.MSKM_DTL_NO AND
            (MSKM_DTL.MSKMSHO_NO = ? OR (MSKM_DTL.DOJI_MSKM_EOH_MSKMSHO_NO = ? AND SVC_KEI_WK.SVC_CD = '05')) AND
            MSKM_DTL.GENE_ADD_DTM = (
                SELECT MAX(MSKM_DTL_GENE.GENE_ADD_DTM)
                FROM KK_T_MSKM_DTL MSKM_DTL_GENE
                WHERE MSKM_DTL_GENE.MSKM_DTL_NO = MSKM_DTL.MSKM_DTL_NO
                AND MSKM_DTL_GENE.MK_FLG = '0')
        WHERE SVC_KEI_WK.MK_FLG = '0'
    ) AND
    SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM = (
        SELECT MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM)
        FROM KK_T_SVC_KEI SVC_KEI_GENE
        WHERE SVC_KEI_GENE.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
        AND SVC_KEI_GENE.RSV_APLY_YMD <= ?
        AND SVC_KEI_GENE.RSV_APLY_CD = '2'
        AND SVC_KEI_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_081)
#--指定した申込書番号または同時申込eo光申込書番号の申込明細の申込明細番号から、サービス契約の照査年月日とSYSIDを検索する。
#--MVNOサービスは対象外にする。
#-----------------------------------------------------------

--KEY:KK_SELECT_081

SELECT
    SVC_KEI.SHOSA_YMD,
    SVC_KEI.SYSID
FROM
    KK_T_SVC_KEI SVC_KEI
WHERE
    SVC_KEI.SVC_KEI_NO IN
    (
        SELECT
            SVC_KEI_WK.SVC_KEI_NO
        FROM
            KK_T_SVC_KEI SVC_KEI_WK
        INNER JOIN KK_T_MSKM_DTL MSKM_DTL
            ON SVC_KEI_WK.MSKM_DTL_NO = MSKM_DTL.MSKM_DTL_NO AND
            (MSKM_DTL.MSKMSHO_NO = ? OR MSKM_DTL.DOJI_MSKM_EOH_MSKMSHO_NO = ?) AND
            MSKM_DTL.GENE_ADD_DTM = (
                SELECT MAX(MSKM_DTL_GENE.GENE_ADD_DTM)
                FROM KK_T_MSKM_DTL MSKM_DTL_GENE
                WHERE MSKM_DTL_GENE.MSKM_DTL_NO = MSKM_DTL.MSKM_DTL_NO
                AND MSKM_DTL_GENE.MK_FLG = '0')
        WHERE SVC_KEI_WK.MK_FLG = '0'
    ) AND
    SVC_CD != '51' AND
    SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM = (
        SELECT MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM)
        FROM KK_T_SVC_KEI SVC_KEI_GENE
        WHERE SVC_KEI_GENE.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
        AND SVC_KEI_GENE.RSV_APLY_YMD <= ?
        AND SVC_KEI_GENE.RSV_APLY_CD = '2'
        AND SVC_KEI_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_082)
#--モバイルオーダ送信時に必要な料金プランコードを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_082

SELECT KTSK.PCRS_CD,
    KTSK.PPLAN_CD
FROM KK_T_SVC_KEI KTSK
WHERE KTSK.SVC_KEI_NO = ?
AND KTSK.GENE_ADD_DTM = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_083)
#--eo間オプション引き継ぎリスト作成
#--オプションサービス契約を軸に別サービス契約からのオプション引継ぎがされたデータを抽出する
#-----------------------------------------------------------

--KEY:KK_SELECT_083

SELECT
    KK0351.OP_SVC_KEI_NO,
    KK0351.MSKM_DTL_NO AS MSKM_DTL_NO_OP,
    KK0351.OP_SVC_KEI_STAT,
    KK0351.SVC_DLRE_CD,
    KK0351.OP_SVC_CD,
    KK0351_MT.SVC_KEI_NO AS MOTO_SVC_KEI_NO,
    KK0361.KIBO_ML_ACCOUNT_1,
    KK0361.MLAD,
    KK0361.WEB_ID,
    KK0361.KOTEI_IP_AD,
    KK0361.MLLIST_NM,
    KK0081.SVC_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0081.SYSID,
    KK0081.MSKM_DTL_NO,
    KK0081.SHOSA_YMD,
    KK0081.IDO_DIV
FROM KK_T_OP_SVC_KEI KK0351
  INNER JOIN KK_T_OPSVKEI_ISP KK0361
  ON  KK0361.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO 
  AND KK0361.GENE_ADD_DTM = KK0351.GENE_ADD_DTM
  INNER JOIN KK_T_OP_SVC_KEI KK0351_MT
  ON  KK0351_MT.MSKM_DTL_NO = KK0351.MSKM_DTL_NO
  AND KK0351_MT.OP_SVC_KEI_NO <> KK0351.OP_SVC_KEI_NO
  AND KK0351_MT.SVC_KEI_NO <> KK0351.SVC_KEI_NO
  AND KK0351_MT.OP_SVC_KEI_STAT IN ('910','920')
  INNER JOIN KK_T_OPSVKEI_ISP KK0361_MT
  ON  KK0361_MT.OP_SVC_KEI_NO = KK0351_MT.OP_SVC_KEI_NO 
  AND KK0361_MT.GENE_ADD_DTM = KK0351_MT.GENE_ADD_DTM
  AND NVL(KK0361_MT.MLAD, 1) = NVL(KK0361.MLAD, 1)
  AND NVL(KK0361_MT.KIBO_ML_ACCOUNT_1, 1) = NVL(KK0361.KIBO_ML_ACCOUNT_1, 1)
  AND NVL(KK0361_MT.WEB_ID, 1) = NVL(KK0361.WEB_ID, 1)
  AND NVL(KK0361_MT.KOTEI_IP_AD, 1) = NVL(KK0361.KOTEI_IP_AD, 1)
  AND NVL(KK0361_MT.MLLIST_NM, 1) = NVL(KK0361.MLLIST_NM, 1)
  INNER JOIN KK_T_SVC_KEI KK0081
  ON  KK0081.SVC_KEI_NO = KK0351.SVC_KEI_NO
WHERE KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM = (
  SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX
  FROM   KK_T_OP_SVC_KEI KK0351_GENE
  WHERE  KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
  AND    KK0351_GENE.RSV_APLY_YMD <= ?
  AND    KK0351_GENE.RSV_APLY_CD = '2'
  AND    KK0351_GENE.MK_FLG = '0')
AND KK0351_MT.OP_SVC_KEI_STAT IN ('910','920')
AND KK0351_MT.RSV_APLY_YMD || KK0351_MT.GENE_ADD_DTM = (
  SELECT MAX(KK0351_GENE_S.RSV_APLY_YMD || KK0351_GENE_S.GENE_ADD_DTM) AS KK0351_MAX
  FROM   KK_T_OP_SVC_KEI KK0351_GENE_S
  WHERE  KK0351_GENE_S.OP_SVC_KEI_NO = KK0351_MT.OP_SVC_KEI_NO
  AND    KK0351_GENE_S.RSV_APLY_YMD <= ?
  AND    KK0351_GENE_S.RSV_APLY_CD = '2'
  AND    KK0351_GENE_S.MK_FLG = '0')
AND KK0081.SVC_KEI_STAT IN ('020','030','010')
AND KK0081.PRC_GRP_CD IN ('02', '03', '04')
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
  SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_YMD <= ?
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO)
AND EXISTS (
  SELECT 1
  FROM KK_T_OP_SVC_KEI KK0351_MIN
  WHERE KK0351_MIN.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
  AND   KK0351_MIN.IDO_DIV = '00003'
  AND   (KK0351_MIN.OP_SVC_KEI_NO, KK0351_MIN.RSV_APLY_YMD || KK0351_MIN.GENE_ADD_DTM) = (
    SELECT KK0351_M.OP_SVC_KEI_NO, MIN(KK0351_M.RSV_APLY_YMD || KK0351_M.GENE_ADD_DTM) AS MIN_G
    FROM   KK_T_OP_SVC_KEI KK0351_M
    WHERE  KK0351_M.OP_SVC_KEI_NO = KK0351_MIN.OP_SVC_KEI_NO
    AND    KK0351_M.RSV_APLY_YMD <= ?
    AND    KK0351_M.RSV_APLY_CD = '2'
    AND    KK0351_M.MK_FLG = '0'
    GROUP BY KK0351_M.OP_SVC_KEI_NO))
ORDER BY
    KK0351.SVC_KEI_NO,
    KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_084)
#--オプションサービス契約のオプションサービス契約番号を指定し、サービス契約番号が異なる直近データのサービス契約情報を取得する（引継ぎ元情報）。
#-----------------------------------------------------------

--KEY:KK_SELECT_084

SELECT 
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SYSID,
    KK0081.PRC_GRP_CD,
    CK0011.CUST_NM,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    KK0781.PRC_GRP_NM,
    KK0781.GENE_ADD_DTM AS KK0781_GENE_ADD_DTM,
    KK0351.OP_SVC_KEI_NO,
    KK0351.GENE_ADD_DTM AS KK0351_GENE_ADD_DTM
FROM KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD ||CK0011.GENE_ADD_DTM =
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM   CK_T_CUST CK0011_GENE
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID
          AND    CK0011_GENE.RSV_APLY_YMD <= ?
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_M_PRC_GRP KK0781
    ON KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD
    AND KK0781.PRC_GRP_TSTAYMD || KK0781.GENE_ADD_DTM = 
        (SELECT MAX(KK0781_GENE.PRC_GRP_TSTAYMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
         FROM KK_M_PRC_GRP KK0781_GENE
         WHERE KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
         AND   KK0781_GENE.PRC_GRP_TSTAYMD <= ?
         AND   KK0781_GENE.MK_FLG = '0')
    INNER JOIN KK_T_OP_SVC_KEI KK0351
    ON KK0351.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0351.OP_SVC_KEI_NO = ?
    AND KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM =
        (SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) KK0351_MAX
         FROM KK_T_OP_SVC_KEI KK0351_GENE
         WHERE KK0351_GENE.OP_SVC_KEI_NO = ?
         AND   KK0351_GENE.GENE_ADD_DTM < ?
         AND   KK0351_GENE.SVC_KEI_NO <> ?
         AND   KK0351_GENE.RSV_APLY_YMD <= ?
         AND   KK0351_GENE.RSV_APLY_CD = '2'
         AND   KK0351_GENE.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0')
AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_085)
#--KKPRC35401にて使用
#--サービス契約から料金グループが"eo光TV"の予約とカレントレコードを全て取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_085

SELECT 
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0081.RSV_APLY_YMD,
    KK0081.SVC_PAUSE_YMD,
    KK0081.SVC_PAUSE_RLS_YMD,
    KK0081.SVC_DSL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_DLRE_CD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.UPD_DTM
FROM KK_T_SVC_KEI KK0081
WHERE 
  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
            (SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM    KK_T_SVC_KEI KK0081_GENE
            WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0')
AND KK0081.PRC_GRP_CD IN ('11', '13')
AND KK0081.MK_FLG = '0'
AND (
         KK0081.SVC_PAUSE_YMD = ?
      OR KK0081.SVC_DSL_YMD = ?
      OR KK0081.SVC_STP_YMD = ?
      OR KK0081.SVC_STP_RLS_YMD = ?
    )
UNION ALL
SELECT 
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK1681.RSV_APLY_YMD,
    KK0081.SVC_PAUSE_YMD,
    KK1681.RSV_APLY_YMD AS SVC_PAUSE_RLS_YMD,
    KK0081.SVC_DSL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_DLRE_CD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.UPD_DTM
FROM 
KK_T_IDO_RSV KK1681
INNER JOIN KK_T_SVC_KEI KK0081
       ON KK0081.SVC_KEI_NO = KK1681.SVC_KEI_NO
      AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM ) AS KK0081_MAX
                                                          FROM KK_T_SVC_KEI KK0081_GENE
                                                         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                           AND KK0081_GENE.RSV_APLY_YMD <= ?
                                                           AND KK0081_GENE.RSV_APLY_CD = '2'
                                                           AND KK0081_GENE.MK_FLG = '0')
      AND KK0081.PRC_GRP_CD IN ('11', '13')
WHERE KK1681.IDO_DIV = '00025'
   AND KK1681.IDO_RSV_STAT_CD IN ('00', '01', '03')
   AND KK1681.RSV_APLY_YMD IN (?, ?) 
   AND KK1681.MK_FLG='0'
ORDER BY SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_089)
#--KKPRC05802,KKPRC09701
#--サービス契約番号のカレント情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_089

SELECT
 KK0081.GENE_ADD_DTM,
 KK0081.SVC_KEI_STAT,
 KK0081.SYSID,
 KK0081.PRC_GRP_CD
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ?
 AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD = '2'
   AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_090)
#--工事間情報受入確認チェックに必要なサービス契約情報を取得します。
#--KKPRC33701にて使用。
#-----------------------------------------------------------

--KEY:KK_SELECT_090

SELECT
KK0081.SVC_KEI_STAT,
KK0081.IDO_DIV
FROM
KK_T_SVC_KEI KK0081
WHERE
KK0081.SVC_KEI_NO = ? AND
KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD = '2'
   AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_091)
#--KKPRC06301
#--eo光テレビ統計情報ファイル(開通契約ベース)作成
#--KKPRC32101
#--eo光テレビ統計情報ファイル(課金)作成
#-----------------------------------------------------------

--KEY:KK_SELECT_091

SELECT
 KK0081.SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SYSID = ? AND
 KK0081.SVC_CD = '01' AND
 ? BETWEEN KK0081.SVC_STA_YMD AND KK0081.SVC_ENDYMD AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD = '2'
   AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_092)
#--KKPRC68101
#--サービス契約番号から、サービス契約休止に必要な情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_092

SELECT
    SVC.SVC_KEI_NO,
    SVC.SVC_CD,
    SVC.GENE_ADD_DTM,
    SVC.SVC_KEI_STAT,
    SVC.MSKM_DTL_NO,
    SVC.PAUSE_STP_CD,
    SVC.SYSID,
    SVC.SVC_PAUSE_RSN_CD,
    SVC.SVC_PAUSE_RSN_MEMO,
    SVC.SVC_PAUSE_RLS_YMD,
    SVC.WORK_RRK_BIKO
FROM
    KK_T_SVC_KEI SVC
WHERE
    SVC.MK_FLG = '0'
AND
    SVC.SVC_KEI_NO = ?
AND 
    SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM = (SELECT MAX(SUB_SVC.RSV_APLY_YMD) || MAX(SUB_SVC.GENE_ADD_DTM) 
                        FROM KK_T_SVC_KEI SUB_SVC 
                        WHERE SUB_SVC.MK_FLG = '0'
                        AND SUB_SVC.RSV_APLY_YMD <= ?
                        AND SUB_SVC.RSV_APLY_CD = '2'
                        AND SVC.SVC_KEI_NO = SUB_SVC.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_093)
#--サービス契約番号から、回復不可情報抽出に必要な情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_093

SELECT /*+ LEADING (KK0081) */
         KK0081.SVC_KEI_NO,
         KK0081.SVC_ENDYMD,
         KK0081.SVC_CANCEL_YMD,
         KK0081.SVC_KEI_STAT,
         KK0081.SVC_DLRE_CD,
         KK0081.SVC_CD,
         KK0081.PRC_GRP_CD,
         KK0081.PCRS_CD,
         KK0081.PPLAN_CD,
         KK0081.SYSID,
         KK0081.MENKAIHAT_ANKEN_NO,
         KK0081.TK_HOSHIKI_KEI_NO,
         KK0081.UPD_DTM,
         KK0251.SVC_KEI_KAISEN_UCWK_NO,
         KK0251.KAISEN_PLACE_NO,
         KK0251.KAISEN_PLACE_AD_CD,
         KK0251.KAISEN_PLACE_PCD,
         KK0251.KAISEN_PLACE_STATE_NM,
         KK0251.KAISEN_PLACE_CITY_NM,
         KK0251.KAISEN_PLACE_OAZTSU_NM,
         KK0251.KAISEN_PLACE_AZCHO_NM,
         KK0251.KAISEN_PLACE_BNCHIGO,
         KK0251.KAISEN_PLACE_ADRTTM,
         KK0251.KAISEN_PLACE_ADRRM,
         KK0251.KISN_PLC_AD_MI_FIX_FLG,
         KK0251.LGTD,
         KK0251.LTTD,
         KK0251.AD_FORM_CD,
         KK0251.SHUGJ_NYUKYO_FLR_CNT_CD,
         KK0251.KODATE_KCKU_FLR_CNT_CD,
         KK0251.DIRECTION_CD_1,
         KK0251.DIRECTION_CD_2
FROM     KK_T_SVC_KEI KK0081
INNER JOIN KK_M_PRC_GRP KK0781
ON       KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD
INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241
ON       KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
ON       KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
WHERE    KK0081.SVC_KEI_STAT = '910'
AND      KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG = '0'
AND      TO_DATE(KK0081.SVC_ENDYMD) + 1 + KK0781.KAIHK_PSB_PRD <= TO_DATE(?)
AND      KK0781.PRC_GRP_TSTAYMD <= ?
AND      KK0781.PRC_GRP_TENDYMD >= ?
AND      KK0781.PRC_GRP_CD IN ('02','03','04','10','11','12','13')
AND      KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE 
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0')
AND      KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =
         (SELECT MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
          FROM   KK_M_PRC_GRP KK0781_GENE
          WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
          AND    KK0781_GENE.RSV_APLY_YMD <= ?
          AND    KK0781_GENE.MK_FLG = '0')
AND      KK0241.KAISEN_UCWK_USE_STAYMD =
         (SELECT MAX(KK0241_GENE.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
          FROM   KK_T_KAISEN_TG_SVKEI KK0241_GENE
          WHERE  KK0241_GENE.SVC_KEI_NO = KK0241.SVC_KEI_NO
          AND    KK0241_GENE.KAISEN_UCWK_USE_STAYMD <= ?
          AND    KK0241_GENE.KAISEN_UCWK_USE_ENDYMD = KK0081.SVC_DSL_YMD
          AND    KK0241_GENE.MK_FLG = '0')
AND      KK0251.GENE_ADD_DTM =
         (SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
          FROM   KK_T_SVKEI_KAISEN_UW KK0251_GENE
          WHERE  KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
          AND    KK0251_GENE.MK_FLG = '0')
UNION ALL
SELECT /*+ LEADING (KK0081) */
         KK0081.SVC_KEI_NO,
         KK0081.SVC_ENDYMD,
         KK0081.SVC_CANCEL_YMD,
         KK0081.SVC_KEI_STAT,
         KK0081.SVC_DLRE_CD,
         KK0081.SVC_CD,
         KK0081.PRC_GRP_CD,
         KK0081.PCRS_CD,
         KK0081.PPLAN_CD,
         KK0081.SYSID,
         KK0081.MENKAIHAT_ANKEN_NO,
         KK0081.TK_HOSHIKI_KEI_NO,
         KK0081.UPD_DTM,
         KK0251.SVC_KEI_KAISEN_UCWK_NO,
         KK0251.KAISEN_PLACE_NO,
         KK0251.KAISEN_PLACE_AD_CD,
         KK0251.KAISEN_PLACE_PCD,
         KK0251.KAISEN_PLACE_STATE_NM,
         KK0251.KAISEN_PLACE_CITY_NM,
         KK0251.KAISEN_PLACE_OAZTSU_NM,
         KK0251.KAISEN_PLACE_AZCHO_NM,
         KK0251.KAISEN_PLACE_BNCHIGO,
         KK0251.KAISEN_PLACE_ADRTTM,
         KK0251.KAISEN_PLACE_ADRRM,
         KK0251.KISN_PLC_AD_MI_FIX_FLG,
         KK0251.LGTD,
         KK0251.LTTD,
         KK0251.AD_FORM_CD,
         KK0251.SHUGJ_NYUKYO_FLR_CNT_CD,
         KK0251.KODATE_KCKU_FLR_CNT_CD,
         KK0251.DIRECTION_CD_1,
         KK0251.DIRECTION_CD_2
FROM     KK_T_SVC_KEI KK0081
INNER JOIN KK_M_PRC_GRP KK0781
ON       KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD
INNER JOIN KU_T_SVKEI_KOJIAK KU0081
ON       KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241
ON       KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
ON       KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
WHERE    KK0081.SVC_KEI_STAT = '920'
AND      KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG = '0'
AND      TO_DATE(KK0081.SVC_CANCEL_YMD) + 1 + KK0781.CANCEL_CL_PSB_PRD <= TO_DATE(?)
AND      KK0781.PRC_GRP_TSTAYMD <= ?
AND      KK0781.PRC_GRP_TENDYMD >= ?
AND      KK0781.PRC_GRP_CD IN ('02','03','04','10','11','12', '13')
AND      KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
AND      KU0081.SVKEI_KOJIAK_TENDYMD = KK0081.SVC_CANCEL_YMD
AND      KU0081.MK_FLG = '0'
AND      KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE 
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0')
AND      KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =
         (SELECT MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
          FROM   KK_M_PRC_GRP KK0781_GENE
          WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
          AND    KK0781_GENE.RSV_APLY_YMD <= ?
          AND    KK0781_GENE.MK_FLG = '0')
AND      KK0241.KAISEN_UCWK_USE_STAYMD =
         (SELECT MAX(KK0241_GENE.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
          FROM   KK_T_KAISEN_TG_SVKEI KK0241_GENE
          WHERE  KK0241_GENE.SVC_KEI_NO = KK0241.SVC_KEI_NO
          AND    KK0241_GENE.KAISEN_UCWK_USE_STAYMD <= ?
          AND    KK0241_GENE.KAISEN_UCWK_USE_ENDYMD = KK0081.SVC_CANCEL_YMD
          AND    KK0241_GENE.MK_FLG = '0')
AND      KK0251.GENE_ADD_DTM =
         (SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
          FROM   KK_T_SVKEI_KAISEN_UW KK0251_GENE
          WHERE  KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
          AND    KK0251_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_094)
#--KKPRC02403
#--光テレビ（ＫＣＮ）分を抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_094

SELECT   KK0081.SVC_KEI_NO,
         KK0081.SVC_KEI_STAT,
         KK0081.IDO_DIV
FROM     KK_T_SVC_KEI KK0081
WHERE    KK0081.PRC_GRP_CD = '12'
AND      KK0081.SVC_KEI_STAT IN('010','020','030','100','210','220')
AND      KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_095)
#--指定されたサービス契約番号の料金コースコードを取得する。
#--KKPRC35201にて使用
#-----------------------------------------------------------

--KEY:KK_SELECT_095

SELECT
    KK0081.PCRS_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO =?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK_T_SVC_KEI_MAX
            FROM    KK_T_SVC_KEI KK0081_GENE
            WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND     KK0081_GENE.RSV_APLY_YMD <= ?
            AND     KK0081_GENE.RSV_APLY_CD = '2'
            AND     KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_096)
#--KKPRC01102
#--サービス契約番号に紐付くお客様名取得
#-----------------------------------------------------------

--KEY:KK_SELECT_096

SELECT
    CK0011.CUST_NM,
    CK0011.CUST_KANA
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011 ON
        KK0081.SYSID = CK0011.SYSID AND
        CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = 
        (SELECT
            MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
        FROM
            CK_T_CUST CK0011_GENE
        WHERE
            CK0011_GENE.SYSID = CK0011.SYSID AND
            CK0011_GENE.RSV_APLY_YMD <= ? AND
            CK0011_GENE.RSV_APLY_CD = '2' AND
            CK0011_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_097)
#--KKPRC02403
#--サービス契約光テレビ（ＫＣＮ）分とKCN連携契約情報の比較用のデータ抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_097

SELECT  
 KK0081.SVC_KEI_NO, 
 KK0081.SVC_KEI_STAT, 
 KK0081.SVC_STA_YMD, 
 KK0081.SVC_ENDYMD, 
 KK0081.SVC_CHRG_STAYMD, 
 KK0081.SHOSA_YMD,  
 KK0081.SVC_CANCEL_YMD, 
 KK0081.SVC_DSL_YMD, 
 KK0081.SVC_CD, 
 KK0081.IDO_DIV, 
 CK0011.KEISHA_PCD,  
 CK0011.KEISHA_STATE_NM, 
 CK0011.KEISHA_CITY_NM, 
 CK0011.KEISHA_OAZTSU_NM, 
 CK0011.KEISHA_AZCHO_NM, 
 CK0011.KEISHA_BNCHIGO, 
 CK0011.KEISHA_ADRTTM, 
 CK0011.KEISHA_ADRRM, 
 CK0011.CUST_NM, 
 CK0011.KEISHA_TYPE_CD, 
 CK0011.SYSID, 
 KK0021.MSKMSHO_NO,  
 KK0321.SEIKY_KEI_NO,
 CK0201.TELNO 
FROM 
KK_T_SVC_KEI KK0081 
  INNER JOIN KK_T_MSKM_DTL KK0021 
  ON KK0081.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
     AND KK0021.GENE_ADD_DTM =  
     (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX FROM  KK_T_MSKM_DTL KK0021_GENE  
     WHERE KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO AND KK0021_GENE.MK_FLG = '0') 
      
INNER JOIN CK_T_CUST CK0011 ON KK0081.SYSID = CK0011.SYSID AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = 
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX 
          FROM   CK_T_CUST CK0011_GENE 
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID 
          AND    CK0011_GENE.RSV_APLY_YMD <= ? 
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0') 
          AND    CK0011.MK_FLG = '0' 
LEFT OUTER JOIN
(SELECT
    CK0201.TELNO,
    CK0201.SYSID
FROM
    CK_T_RRKS CK0201
WHERE
    CK0201.RRK_WAY_CD = '003' AND CK0201.RSV_APLY_YMD || CK0201.GENE_ADD_DTM = 
         (SELECT MAX(CK0201_GENE.RSV_APLY_YMD || CK0201_GENE.GENE_ADD_DTM) AS CK0201_MAX 
          FROM   CK_T_RRKS CK0201_GENE 
          WHERE  CK0201_GENE.SYSID = CK0201.SYSID 
          AND    CK0201_GENE.RSV_APLY_YMD <= ?
          AND    CK0201_GENE.RSV_APLY_CD = '2'
          AND    CK0201_GENE.MK_FLG = '0') 
) CK0201
ON KK0081.SYSID = CK0201.SYSID 
  INNER JOIN KK_T_KAKINS KK0321 
  ON KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO 
            AND KK0321.MK_FLG = '0' 
WHERE KK0081.SVC_KEI_NO = ? 
AND      KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
          FROM   KK_T_SVC_KEI KK0081_GENE 
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
          AND    KK0081_GENE.RSV_APLY_YMD <= ? 
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 
AND      KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_098)
#--CTI電話番号情報抽出
#--お客様<個人>が基準年月日時分秒より未来に更新/追加されているサービス契約情報を取得する。
#--サービス契約の抽出条件
#--・基準年月日時分秒以前に登録されている
#--・照査が終わっている（照査年月日がNULLでない）
#--・無効フラグが有効
#-----------------------------------------------------------

--KEY:KK_SELECT_098

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.PRC_GRP_CD,
    KK0081.PPLAN_CD,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    CK0011.KEISHA_TYPE_CD,
    CK0011.CUST_NM,
    CK0011.CUST_KANA,
    KK0021.MSKMSHO_NO,
    KK0081.SVC_DLRE_CD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.TK_HOSHIKI_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =
        (SELECT   MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
         FROM     CK_T_CUST CK0011_GENE
         WHERE    CK0011_GENE.SYSID = CK0011.SYSID
         AND      CK0011_GENE.RSV_APLY_YMD <= ?
         AND      CK0011_GENE.RSV_APLY_CD = '2'
         AND      CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_T_MSKM_DTL KK0021
    ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
    AND KK0021.GENE_ADD_DTM =
        (SELECT   MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
         FROM     KK_T_MSKM_DTL KK0021_GENE
         WHERE    KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
         AND      KK0021_GENE.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM     KK_T_SVC_KEI KK0081_GENE
         WHERE    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND      KK0081_GENE.RSV_APLY_YMD <= ?
         AND      KK0081_GENE.RSV_APLY_CD = '2'
         AND      KK0081_GENE.MK_FLG = '0')
AND KK0081.SVC_KEI_NO = ?
AND KK0081.SHOSA_YMD IS NOT NULL

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_099)
#--連絡先が基準年月日より未来に更新/追加されているサービス契約情報を取得する。
#--連絡先種別コードが「自宅」「携帯」「勤務先」のみを対象とする。
#--サービス契約の抽出条件
#--・基準年月日以前に登録されている
#--・照査が終わっている（照査年月日がNULLでない）
#--・無効フラグが有効
#-----------------------------------------------------------

--KEY:KK_SELECT_099

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS KK0081_GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    CK0011.KEISHA_TYPE_CD,
    CK0011.CUST_NM,
    CK0011.CUST_KANA,
    CK0201.UPD_DTM,
    CK0201.RRKS_SBT_CD,
    KK0081.MSKM_DTL_NO,
    KK0021.MSKMSHO_NO,
    KK0081.SHOSA_YMD,
    KK0081.ADD_DTM,
    KK0081.MK_FLG
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD ||CK0011.GENE_ADD_DTM =
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM   CK_T_CUST CK0011_GENE
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID
          AND    CK0011_GENE.RSV_APLY_YMD <= ?
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_T_MSKM_DTL KK0021
    ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
    AND KK0021.GENE_ADD_DTM =
         (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
          FROM   KK_T_MSKM_DTL KK0021_GENE
          WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
          AND    KK0021_GENE.MK_FLG = '0')
    INNER JOIN CK_T_RRKS CK0201
    ON CK0201.SYSID = KK0081.SYSID
    AND CK0201.RSV_APLY_YMD ||CK0201.GENE_ADD_DTM =
         (SELECT MAX(CK0201_GENE.RSV_APLY_YMD || CK0201_GENE.GENE_ADD_DTM) AS CK0201_MAX
          FROM   CK_T_RRKS CK0201_GENE
          WHERE  CK0201_GENE.RRKS_NO = CK0201.RRKS_NO
          AND    CK0201_GENE.RSV_APLY_YMD <= ?
          AND    CK0201_GENE.RSV_APLY_CD = '2'
          AND    CK0201_GENE.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 
AND KK0081.ADD_UNYO_YMD <= ?
AND KK0081.SHOSA_YMD IS NOT NULL
AND CK0201.UPD_UNYO_YMD >= ?
AND CK0201.RRKS_SBT_CD IN ('1','2','3')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_100)
#--サービス契約回線内訳が基準年月日より未来に更新/追加されているサービス契約情報を取得する。
#--回線対象サービス契約は、回線内訳使用開始年月日が運用日以前のMAXデータを対象とすることで一意とする。
#--サービス契約の抽出条件
#--・基準年月日以前に登録されている
#--・照査が終わっている（照査年月日がNULLでない）
#--・無効フラグが有効
#-----------------------------------------------------------

--KEY:KK_SELECT_100

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS KK0081_GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    CK0011.KEISHA_TYPE_CD,
    CK0011.CUST_NM,
    CK0011.CUST_KANA,
    KK0251.UPD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0021.MSKMSHO_NO,
    KK0081.SHOSA_YMD,
    KK0081.ADD_DTM,
    KK0081.MK_FLG
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD ||CK0011.GENE_ADD_DTM =
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM   CK_T_CUST CK0011_GENE
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID
          AND    CK0011_GENE.RSV_APLY_YMD <= ?
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_T_MSKM_DTL KK0021
    ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
    AND KK0021.GENE_ADD_DTM =
         (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
          FROM   KK_T_MSKM_DTL KK0021_GENE
          WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
          AND    KK0021_GENE.MK_FLG = '0')
    INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241
    ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND 
    KK0241.KAISEN_UCWK_USE_STAYMD =
         (SELECT MAX(KK0241_STA.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
          FROM   KK_T_KAISEN_TG_SVKEI KK0241_STA
          WHERE  KK0241_STA.SVC_KEI_NO = KK0241.SVC_KEI_NO
          AND    KK0241_STA.KAISEN_UCWK_USE_STAYMD <= ?
          AND    KK0241_STA.MK_FLG = '0') 
    INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
    ON KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.GENE_ADD_DTM =
         (SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
          FROM  KK_T_SVKEI_KAISEN_UW KK0251_GENE
          WHERE  KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
          AND    KK0251_GENE.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 
AND KK0081.ADD_UNYO_YMD <= ?
AND KK0081.SHOSA_YMD IS NOT NULL
AND KK0251.UPD_UNYO_YMD >= ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_101)
#--サービス契約内訳<ｅｏ光電話>が基準年月日より未来に更新/追加されているサービス契約情報を取得する。
#--サービス契約の抽出条件
#--・基準年月日以前に登録されている
#--・照査が終わっている（照査年月日がNULLでない）
#--・無効フラグが有効
#-----------------------------------------------------------

--KEY:KK_SELECT_101

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS KK0081_GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    CK0011.KEISHA_TYPE_CD,
    CK0011.CUST_NM,
    CK0011.CUST_KANA,
    KK0191.UPD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0021.MSKMSHO_NO,
    KK0081.SHOSA_YMD,
    KK0081.ADD_DTM,
    KK0081.MK_FLG
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD ||CK0011.GENE_ADD_DTM =
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM   CK_T_CUST CK0011_GENE
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID
          AND    CK0011_GENE.RSV_APLY_YMD <= ?
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_T_MSKM_DTL KK0021
    ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
    AND KK0021.GENE_ADD_DTM =
         (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
          FROM   KK_T_MSKM_DTL KK0021_GENE
          WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
          AND    KK0021_GENE.MK_FLG = '0')
    INNER JOIN KK_T_SVC_KEI_UCWK KK0161
    ON KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0161.RSV_APLY_YMD ||KK0161.GENE_ADD_DTM =
         (SELECT MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
          FROM   KK_T_SVC_KEI_UCWK KK0161_GENE
          WHERE  KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
          AND    KK0161_GENE.RSV_APLY_YMD <= ?
          AND    KK0161_GENE.RSV_APLY_CD = '2'
          AND    KK0161_GENE.MK_FLG = '0')
    INNER JOIN KK_T_SVKEIUW_EOH_TEL KK0191
    ON KK0191.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
    AND KK0191.GENE_ADD_DTM =
         (SELECT MAX(KK0191_GENE.GENE_ADD_DTM) AS KK0191_MAX
          FROM   KK_T_SVKEIUW_EOH_TEL KK0191_GENE
          WHERE  KK0191_GENE.SVC_KEI_UCWK_NO = KK0191.SVC_KEI_UCWK_NO
          AND    KK0191_GENE.RSV_APLY_CD = '2'
          AND    KK0191_GENE.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 
AND KK0081.ADD_UNYO_YMD <= ?
AND KK0081.SHOSA_YMD IS NOT NULL
AND KK0191.UPD_UNYO_YMD >= ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_102)
#--請求契約が基準年月日より未来に更新/追加されているサービス契約情報を取得する。
#--課金先は、課金適用開始年月日が運用日以前のMAXデータを対象とすることで一意とする。
#--サービス契約の抽出条件
#--・基準年月日以前に登録されている
#--・照査が終わっている（照査年月日がNULLでない）
#--・無効フラグが有効
#-----------------------------------------------------------

--KEY:KK_SELECT_102

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS KK0081_GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    CK0011.KEISHA_TYPE_CD,
    CK0011.CUST_NM,
    CK0011.CUST_KANA,
    KK0491.UPD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0021.MSKMSHO_NO,
    KK0081.SHOSA_YMD,
    KK0081.ADD_DTM,
    KK0081.MK_FLG
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD ||CK0011.GENE_ADD_DTM =
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM   CK_T_CUST CK0011_GENE
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID
          AND    CK0011_GENE.RSV_APLY_YMD <= ?
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_T_MSKM_DTL KK0021
    ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
    AND KK0021.GENE_ADD_DTM =
         (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
          FROM   KK_T_MSKM_DTL KK0021_GENE
          WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
          AND    KK0021_GENE.MK_FLG = '0')
    INNER JOIN KK_T_KAKINS KK0321
    ON  KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0321.KAKINS_TSTAYMD <= ?
    AND KK0321.KAKINS_TENDYMD >= ?
    AND KK0321.MK_FLG = '0'
    INNER JOIN KK_T_SEIKY_KEI KK0491
    ON KK0321.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
    AND KK0491.RSV_APLY_YMD ||KK0491.GENE_ADD_DTM =
         (SELECT MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
          FROM   KK_T_SEIKY_KEI KK0491_GENE
          WHERE  KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
          AND    KK0491_GENE.RSV_APLY_YMD <= ?
          AND    KK0491_GENE.RSV_APLY_CD = '2'
          AND    KK0491_GENE.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 
AND KK0081.ADD_UNYO_YMD <= ?
AND KK0081.SHOSA_YMD IS NOT NULL
AND KK0491.UPD_UNYO_YMD >= ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_103)
#--オプションサービス契約<ISP>が基準年月日より未来に更新/追加されているサービス契約情報を取得する。
#--オプションサービスコードが「ｅｏ－ｎｅｔフォン」のレコードのみを対象とする。
#--サービス契約の抽出条件
#--・基準年月日以前に登録されている
#--・照査が終わっている（照査年月日がNULLでない）
#--・無効フラグが有効
#-----------------------------------------------------------

--KEY:KK_SELECT_103

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS KK0081_GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    CK0011.KEISHA_TYPE_CD,
    CK0011.CUST_NM,
    CK0011.CUST_KANA,
    KK0361.UPD_DTM,
    KK0351.OP_SVC_CD,
    KK0081.MSKM_DTL_NO,
    KK0021.MSKMSHO_NO,
    KK0081.SHOSA_YMD,
    KK0081.ADD_DTM,
    KK0081.MK_FLG
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD ||CK0011.GENE_ADD_DTM =
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM   CK_T_CUST CK0011_GENE
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID
          AND    CK0011_GENE.RSV_APLY_YMD <= ?
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_T_MSKM_DTL KK0021
    ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
    AND KK0021.GENE_ADD_DTM =
         (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
          FROM   KK_T_MSKM_DTL KK0021_GENE
          WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
          AND    KK0021_GENE.MK_FLG = '0')
    INNER JOIN KK_T_OP_SVC_KEI KK0351
    ON KK0351.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0351.RSV_APLY_YMD ||KK0351.GENE_ADD_DTM =
         (SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX
          FROM   KK_T_OP_SVC_KEI KK0351_GENE
          WHERE  KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
          AND    KK0351_GENE.RSV_APLY_YMD <= ?
          AND    KK0351_GENE.RSV_APLY_CD = '2'
          AND    KK0351_GENE.MK_FLG = '0')
    INNER JOIN KK_T_OPSVKEI_ISP KK0361
    ON KK0361.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
    AND KK0361.GENE_ADD_DTM =
         (SELECT MAX(KK0361_GENE.GENE_ADD_DTM) ASKK0361_MAX
          FROM   KK_T_OPSVKEI_ISP KK0361_GENE
          WHERE  KK0361_GENE.OP_SVC_KEI_NO = KK0361.OP_SVC_KEI_NO
          AND    KK0361_GENE.RSV_APLY_CD = '2'
          AND    KK0361_GENE.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0') 
AND KK0081.ADD_UNYO_YMD <= ?
AND KK0081.SHOSA_YMD IS NOT NULL
AND KK0361.UPD_UNYO_YMD >= ?
AND KK0351.OP_SVC_CD = 'B014'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_104)
#--KKPRC02403
#--契約区分、eo光電話単独区分、パック種類判定
#-----------------------------------------------------------

--KEY:KK_SELECT_104

SELECT
    KK0081.SVC_KEI_NO ,
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
 WHERE
    KK0081.SVC_KEI_NO IN
        (SELECT
             KK0241_02.SVC_KEI_NO
         FROM
             KK_T_KAISEN_TG_SVKEI KK0241_02
         WHERE
             KK0241_02.SVC_KEI_KAISEN_UCWK_NO IN
             (SELECT
                  KK0241_01.SVC_KEI_KAISEN_UCWK_NO
              FROM
                  KK_T_KAISEN_TG_SVKEI KK0241_01
              WHERE
                  KK0241_01.SVC_KEI_NO = ?
              AND KK0241_01.KAISEN_UCWK_USE_STAYMD <= ?
              AND KK0241_01.KAISEN_UCWK_USE_ENDYMD >= ?
              AND KK0241_01.MK_FLG = '0')
              AND KK0241_02.KAISEN_UCWK_USE_STAYMD <= ?
              AND KK0241_02.KAISEN_UCWK_USE_ENDYMD >= ?
              AND KK0241_02.MK_FLG = '0')
              AND KK0081.SVC_CD IN ('01','02')
              AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
             FROM   KK_T_SVC_KEI KK0081_GENE
             WHERE
                 KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
             AND KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD = '2'
             AND KK0081_GENE.MK_FLG= '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_105)
#--カレントのレコードからサービス契約開始日を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_105

SELECT
SVC_KEI.SVC_KEI_STAT,
SVC_KEI.SYSID,
SVC_KEI.SVC_CD,
SVC_KEI.MSKM_DTL_NO,
SVC_KEI.PRC_GRP_CD,
SVC_KEI.PCRS_CD,
SVC_KEI.PPLAN_CD,
SVC_KEI.SVC_USE_STA_KIBO_YMD,
SVC_KEI.RSV_TSTA_KIBO_YMD,
SVC_KEI.RSV_TSTA_KIBO_YMD,
SVC_KEI.RSV_APLY_YMD,
SVC_KEI.SVC_STA_YMD,
SVC_KEI.SVC_CHRG_STAYMD
FROM
KK_T_SVC_KEI SVC_KEI
WHERE
       SVC_KEI.SVC_KEI_NO = ?
   AND SVC_KEI.GENE_ADD_DTM = 
      (SELECT MAX(SVC_KEI_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVC_KEI SVC_KEI_GENE
       WHERE SVC_KEI_GENE.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
         AND SVC_KEI_GENE.MK_FLG = '0'
       )
   AND SVC_KEI.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_106)
#--KKPRC02202(工事完了データ取込処理） 
#--相関ルール：RULE65課金開始日設定(サービス)の呼出用データ取得。 
#--相関ルール：RULE73開始日設定(サービス)の呼出用データ取得。 
#--KKPRC02202(工事取消データ取込処理） 
#--機器提供サービス契約機器変更手続中止サービスIF呼出用データ取得
#-----------------------------------------------------------

--KEY:KK_SELECT_106

SELECT 
    KK1681.IDO_DIV,
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_CD, 
    KK0081.PRC_GRP_CD, 
    KK0081.CHRG_STA_YMD_HOSEI_UM, 
    KK0251.KAISEN_TK_COMP_CD, 
    KK0251.SVC_KEI_KAISEN_UCWK_NO 
FROM 
KK_T_IDO_RSV KK1681 
INNER JOIN 
KK_T_SVC_KEI KK0081 
ON 
KK1681.SVC_KEI_NO = KK0081.SVC_KEI_NO AND 
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT 
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
    FROM 
        KK_T_SVC_KEI KK0081_GENE 
    WHERE 
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0081_GENE.RSV_APLY_YMD <= ? 
        AND KK0081_GENE.RSV_APLY_CD = '2' 
        AND KK0081_GENE.MK_FLG = '0') 
INNER JOIN 
        KK_T_KAISEN_TG_SVKEI KK0241 
ON 
        KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0241.KAISEN_UCWK_USE_STAYMD = 
        (SELECT
          MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAXYMD
        FROM
          KK_T_KAISEN_TG_SVKEI KK0241_MAX
        WHERE
          KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
          KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
          KK0241_MAX.MK_FLG = '0') 
INNER JOIN 
        KK_T_SVKEI_KAISEN_UW KK0251 
ON 
        KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO 
        AND KK0251.GENE_ADD_DTM = 
        (SELECT 
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX 
        FROM 
            KK_T_SVKEI_KAISEN_UW KK0251_GENE 
        WHERE 
            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO 
            AND KK0251_GENE.MK_FLG = '0') 
WHERE 
KK1681.SVC_KEI_NO = ? AND 
KK1681.IDO_RSV_NO = ? AND 
KK1681.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_107)
#--KKPRC00901
#--相関ルールRULE0073001の結果として、基準日が"配送完了年月日"の場合の「配送完了年月日」を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_107

SELECT
 DK0011.HAISO_FIN_YMD 
FROM 
 KK_T_SVC_KEI KK0081
 INNER JOIN KK_T_KKTK_SVC_KEI KK0341
 ON KK0341.OYA_KEI_SKBT_CD = '01' 
 AND KK0081.SVC_KEI_NO = KK0341.SVC_KEI_NO
 AND KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM =
         (SELECT MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
          FROM   KK_T_KKTK_SVC_KEI KK0341_GENE
          WHERE  KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO AND
                 KK0341_GENE.RSV_APLY_YMD <= ? AND
                 KK0341_GENE.RSV_APLY_CD = '2' AND
                 KK0341_GENE.MK_FLG = '0')
 INNER JOIN DK_T_HAISO_TG_BPIN DK0021
 ON DK0021.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO
 AND DK0021.KIKI_CHG_NO = KK0341.KIKI_CHG_NO
 AND DK0021.MK_FLG = '0'
 INNER JOIN DK_T_HAISO DK0011
 ON DK0011.HAISO_NO = DK0021.HAISO_NO 
 AND DK0011.HAISO_STAT = '004'
 AND DK0011.MK_FLG = '0'
WHERE
 KK0081.SVC_KEI_NO = ? 
 AND ((KK0081.PRC_GRP_CD = '10' AND KK0341.TAKNKIKI_SBT_CD = '50') 
  OR (KK0081.PRC_GRP_CD = '08' AND KK0341.TAKNKIKI_SBT_CD = 'H0') 
  OR (KK0081.PRC_GRP_CD = '09' AND KK0341.TAKNKIKI_SBT_CD = 'J0')) 
 AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                 KK0081_GENE.RSV_APLY_YMD <= ? AND
                 KK0081_GENE.RSV_APLY_CD = '2' AND
                 KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_108)
#--UIA17_バッチ機能仕様書(KKPRC36701_従量分サービス契約情報抽出)
#--3.全体構成/3-3.処理詳細
#--(1) 対象サービス契約抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_108

SELECT K.SVC_KEI_NO,
       K.SVC_CD,
       K.PRC_GRP_CD,
       K.PCRS_CD,
       K.PPLAN_CD,
       K.TK_HOSHIKI_KEI_NO,
       K.SVC_STA_YMD,
       K.SVC_CHRG_STAYMD,
       K.PLAN_CHRG_STAYMD,
       K.PLAN_CHRG_ENDYMD,
       K.SVC_DSL_YMD,
       K.SVC_DLRE_CD,
       K.PNLTY_HASSEI_CD,
       K.PLAN_END_SBT_CD,
       K.KAIHK_YMD,
       K.PAUSE_STP_CD,
       K.SVC_PAUSE_YMD,
       K.SVC_PAUSE_CHRG_STA_YMD,
       K.SVC_PAUSE_RLS_YMD,
       K.SVC_CANCEL_YMD,
       K.SVC_ENDYMD,
       K.SVC_CHRG_ENDYMD,
       K.IDO_DIV,
       K.SEIRI_NO,
       KEOM.JIGYOSHA_KEI_ID,
       K.RSV_APLY_YMD,
       K.GENE_ADD_DTM
FROM   KK_T_SVC_KEI K
         LEFT JOIN
           KK_T_SVC_KEI_EOMOBA KEOM
           ON  K.SVC_KEI_NO = KEOM.SVC_KEI_NO
           AND K.GENE_ADD_DTM = KEOM.GENE_ADD_DTM
           AND KEOM.RSV_APLY_CD = '2'
           AND KEOM.MK_FLG = '0'
WHERE  K.SVC_STA_YMD <= ?
  AND  K.PRC_GRP_CD IN ('08','09')
  AND  K.SVC_KEI_NO = ?
  AND  K.RSV_APLY_YMD || K.GENE_ADD_DTM IN (
       SELECT MAX(G.RSV_APLY_YMD||G.GENE_ADD_DTM)
       FROM   KK_T_SVC_KEI G
       WHERE  G.SVC_KEI_NO = K.SVC_KEI_NO
         AND  G.RSV_APLY_YMD <= ?
         AND  G.RSV_APLY_CD = '2'
         AND  G.MK_FLG = '0'
       GROUP BY
              SVC_KEI_NO,
              PPLAN_CD
       UNION ALL
       SELECT G.RSV_APLY_YMD||G.GENE_ADD_DTM
       FROM   KK_T_SVC_KEI G
       WHERE  G.SVC_KEI_NO = K.SVC_KEI_NO
         AND  G.PLAN_END_SBT_CD = '1'
         AND  G.PLAN_CHRG_ENDYMD = ?
         AND  G.PLAN_CHRG_STAYMD <= G.PLAN_CHRG_ENDYMD
         AND  G.RSV_APLY_YMD <= ?
         AND  G.RSV_APLY_CD = '2'
         AND  G.MK_FLG = '0'
       )
UNION ALL
SELECT K.SVC_KEI_NO,
       K.SVC_CD,
       K.PRC_GRP_CD,
       K.PCRS_CD,
       K.PPLAN_CD,
       K.TK_HOSHIKI_KEI_NO,
       K.SVC_STA_YMD,
       K.SVC_CHRG_STAYMD,
       K.PLAN_CHRG_STAYMD,
       K.PLAN_CHRG_ENDYMD,
       K.SVC_DSL_YMD,
       K.SVC_DLRE_CD,
       K.PNLTY_HASSEI_CD,
       K.PLAN_END_SBT_CD,
       K.KAIHK_YMD,
       K.PAUSE_STP_CD,
       K.SVC_PAUSE_YMD,
       K.SVC_PAUSE_CHRG_STA_YMD,
       K.SVC_PAUSE_RLS_YMD,
       K.SVC_CANCEL_YMD,
       K.SVC_ENDYMD,
       K.SVC_CHRG_ENDYMD,
       K.IDO_DIV,
       K.SEIRI_NO,
       'DUMMY' JIGYOSHA_KEI_ID,
       K.RSV_APLY_YMD,
       K.GENE_ADD_DTM
FROM   KK_T_SVC_KEI K
WHERE  K.SVC_STA_YMD <= ?
  AND  K.PPLAN_CD IN ('PA0311','PA0811','PA5611')
  AND  K.SVC_KEI_NO = ?
  AND  K.RSV_APLY_YMD || K.GENE_ADD_DTM IN (
       SELECT MAX(G.RSV_APLY_YMD||G.GENE_ADD_DTM)
       FROM   KK_T_SVC_KEI G
       WHERE  G.SVC_KEI_NO = K.SVC_KEI_NO
         AND  G.RSV_APLY_YMD <= ?
         AND  G.RSV_APLY_CD = '2'
         AND  G.MK_FLG = '0'
       GROUP BY
              SVC_KEI_NO,
              PPLAN_CD
       UNION ALL
       SELECT G.RSV_APLY_YMD||G.GENE_ADD_DTM
       FROM   KK_T_SVC_KEI G
       WHERE  G.SVC_KEI_NO = K.SVC_KEI_NO
         AND  G.PLAN_END_SBT_CD = '1'
         AND  G.PLAN_CHRG_ENDYMD = ?
         AND  G.PLAN_CHRG_STAYMD <= G.PLAN_CHRG_ENDYMD
         AND  G.RSV_APLY_YMD <= ?
         AND  G.RSV_APLY_CD = '2'
         AND  G.MK_FLG = '0'
       )
ORDER BY
       SVC_KEI_NO,
       RSV_APLY_YMD,
       GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_109)
#--KKPRC11001_継続分サービス契約情報抽出(サービス開始済サービス契約情報抽出)
#-----------------------------------------------------------

--KEY:KK_SELECT_109

SELECT
    SVC.SVC_KEI_NO,
    SVC.SVC_CD,
    SVC.PRC_GRP_CD,
    SVC.PCRS_CD,
    SVC.PPLAN_CD,
    SVC.TK_HOSHIKI_KEI_NO,
    SVC.SVC_STA_YMD,
    SVC.SVC_CHRG_STAYMD,
    SVC.PLAN_CHRG_STAYMD,
    SVC.PLAN_CHRG_ENDYMD,
    SVC.SVC_DSL_YMD,
    SVC.SVC_DLRE_CD,
    SVC.PNLTY_HASSEI_CD,
    SVC.PLAN_END_SBT_CD,
    SVC.KAIHK_YMD,
    SVC.PAUSE_STP_CD,
    SVC.SVC_PAUSE_YMD,
    SVC.SVC_PAUSE_CHRG_STA_YMD,
    SVC.SVC_PAUSE_RLS_YMD,
    SVC.SVC_CANCEL_YMD,
    SVC.SVC_ENDYMD,
    SVC.SVC_CHRG_ENDYMD,
    SVC.IDO_DIV,
    SVC.SEIRI_NO,
    '' JIGYOSHA_KEI_ID,
    DMY.REPLICA_MOTO_TK_HSK_KEI_NO
FROM
     (
       SELECT
          SVC2.SVC_KEI_NO,
          SVC2.SVC_CD,
          SVC2.PRC_GRP_CD,
          SVC2.PCRS_CD,
          SVC2.PPLAN_CD,
          SVC2.TK_HOSHIKI_KEI_NO,
          SVC2.SVC_STA_YMD,
          SVC2.SVC_CHRG_STAYMD,
          SVC2.PLAN_CHRG_STAYMD,
          SVC2.PLAN_CHRG_ENDYMD,
          SVC2.SVC_DSL_YMD,
          SVC2.SVC_DLRE_CD,
          SVC2.PNLTY_HASSEI_CD,
          SVC2.PLAN_END_SBT_CD,
          SVC2.KAIHK_YMD,
          SVC2.PAUSE_STP_CD,
          SVC2.SVC_PAUSE_YMD,
          SVC2.SVC_PAUSE_CHRG_STA_YMD,
          SVC2.SVC_PAUSE_RLS_YMD,
          SVC2.SVC_CANCEL_YMD,
          SVC2.SVC_ENDYMD,
          SVC2.SVC_CHRG_ENDYMD,
          SVC2.IDO_DIV,
          SVC2.SEIRI_NO,
          SVC2.GENE_ADD_DTM,
          ROW_NUMBER() OVER(PARTITION BY SVC_KEI_NO ORDER BY RSV_APLY_YMD DESC, GENE_ADD_DTM DESC) AS ROW_NUM
       FROM
          KK_T_SVC_KEI SVC2
       WHERE
          RSV_APLY_YMD <= ?
       AND
          RSV_APLY_CD = '2'
       AND
          MK_FLG = '0'
     ) SVC
     LEFT JOIN (
        SELECT
           SVC_KEI_NO,
           GENE_ADD_DTM,
           REPLICA_MOTO_TK_HSK_KEI_NO
        FROM
           KK_T_SVC_KEI_DUMMY
        WHERE
           RSV_APLY_CD = '2'
        AND
           MK_FLG = '0'
       ) DMY
     ON  SVC.SVC_KEI_NO = DMY.SVC_KEI_NO
     AND SVC.GENE_ADD_DTM = DMY.GENE_ADD_DTM
WHERE
   SVC.SVC_STA_YMD BETWEEN ? AND ?
AND
   SVC.ROW_NUM = 1
ORDER BY
   SVC.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_110)
#--KKPRC00902
#--対象サービス契約更新（サービス契約基点)
#--対象サービス契約内訳更新（サービス契約内訳基点)
#--サービス契約番号に紐づく料金グループコードの取得
#-----------------------------------------------------------

--KEY:KK_SELECT_110

SELECT
    KK0081.PRC_GRP_CD,
    KK0081.SVC_CHRG_STAYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_111)
#--KKPRC01701
#--異動情報の抽出1(eo光テレビでの異動情報)
#--異動情報の抽出2(eo光テレビ以外での異動情報)
#-----------------------------------------------------------

--KEY:KK_SELECT_111

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.IDO_DIV,
    KK0081.SVC_CD,
    KK0081.PCRS_CD,
    KK0081.TK_HOSHIKI_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE 
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_112)
#--KKPRC00902、KKPRC00903
#--サービス契約のカレント情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_112

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV,
    KK0081.SVC_CANCEL_RSN_CD,
    KK0081.SVC_STP_RSN_CD,
    KK0081.SVC_STP_RLS_RSN_CD,
    KK0081.SVC_PAUSE_RSN_CD,
    KK0081.SVC_PAUSE_RLS_RSN_CD,
    KK0081.SVC_DLRE_CD,
    KK0081.SVC_STA_YMD,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_113)
#--KKPRC01701
#--解約削除情報の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_113

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.IDO_DIV,
    KK1091.PRG_STAT,
    KK0081.SVC_CD,
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SHOSA_CL_YMD,
    KK1091.ADD_DTM,
    KK1091.IDO_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.PCRS_CD,
    KK0101.DMPS_ANKEN_NO,
    KK0081.SVC_DSL_YMD,
    KK0081.SVC_CANCEL_CL_YMD,
    KK0781.KAIHK_PSB_PRD
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK1091.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK1091.PRG_NO =
     (SELECT 
       MAX(KK1091_GENE.PRG_NO) AS KK1091_MAX
      FROM
       KK_T_PRG KK1091_GENE
      WHERE 
       KK1091_GENE.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
       KK1091_GENE.MK_FLG = '0')
INNER JOIN
    KK_T_SVC_KEI_EOH_TV KK0101
ON
    KK0101.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0101.GENE_ADD_DTM = KK0081.GENE_ADD_DTM AND
    KK0101.MK_FLG = '0'
INNER JOIN
    KK_M_PRC_GRP KK0781
ON
    KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD AND
    KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =
    (SELECT
         MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
     FROM
         KK_M_PRC_GRP KK0781_GENE
     WHERE
         KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD AND
         KK0781_GENE.RSV_APLY_YMD <= ? AND
         KK0781_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD IN('11','12','13') AND
    KK0081.IDO_DIV IN('00005','00006','00007','00008','00057','00064') AND
    KK0081.SVC_KEI_STAT = '910' AND
    ? < TO_CHAR(TO_DATE(KK0081.SVC_DSL_YMD, 'YYYYMMDD') + (KK0781.KAIHK_PSB_PRD + 1), 'YYYYMMDD') AND
    ? >= TO_CHAR(TO_DATE(KK0081.SVC_DSL_YMD, 'YYYYMMDD') + (KK0781.KAIHK_PSB_PRD + 1), 'YYYYMMDD') AND
    TRIM(KK0081.SVC_CANCEL_CL_YMD) IS NULL AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')
ORDER BY KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_114)
#--KKPRC00902
#--対象サービス契約更新
#--(サービス契約起点)にてRULE0065結果取得用SQL
#-----------------------------------------------------------

--KEY:KK_SELECT_114

SELECT
  KK0081.IDO_DIV,
  KK0081.SVC_CD,
  KK0081.PRC_GRP_CD,
  KK0081.CHRG_STA_YMD_HOSEI_UM,
  KK0081.SVC_STA_YMD,
  KK0081.SVC_CHRG_STAYMD,
  KK0251.KAISEN_TK_COMP_CD,
  KK0341.KKTK_SBT_CD,
  KK0081.PCRS_CD
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN
    KK_T_KKTK_SVC_KEI KK0341
  ON
    KK0341.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM =
    (SELECT
      MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
    FROM
      KK_T_KKTK_SVC_KEI KK0341_GENE
    WHERE
      KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO
      AND KK0341_GENE.RSV_APLY_YMD <= ?
      AND KK0341_GENE.RSV_APLY_CD = '2'
      AND KK0341_GENE.MK_FLG = '0')
  INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
  ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0241.KAISEN_UCWK_USE_STAYMD = 
    (SELECT
      MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
    FROM
      KK_T_KAISEN_TG_SVKEI KK0241_MAX
    WHERE
      KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
      KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
      KK0241_MAX.MK_FLG = '0') 
  INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
  ON
    KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.GENE_ADD_DTM =
    (SELECT
      MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
    FROM
      KK_T_SVKEI_KAISEN_UW KK0251_GENE
    WHERE
      KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
      AND KK0251_GENE.MK_FLG = '0')
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
  (SELECT
    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
    KK_T_SVC_KEI KK0081_GENE
  WHERE
    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.MK_FLG = '0')
UNION ALL
SELECT
  KK0081.IDO_DIV,
  KK0081.SVC_CD,
  KK0081.PRC_GRP_CD,
  KK0081.CHRG_STA_YMD_HOSEI_UM,
  KK0081.SVC_STA_YMD,
  KK0081.SVC_CHRG_STAYMD,
  KK0251.KAISEN_TK_COMP_CD,
  null,
  KK0081.PCRS_CD
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
  ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0241.KAISEN_UCWK_USE_STAYMD = 
    (SELECT
      MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
    FROM
      KK_T_KAISEN_TG_SVKEI KK0241_MAX
    WHERE
      KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
      KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
      KK0241_MAX.MK_FLG = '0') 
  INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
  ON
    KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.GENE_ADD_DTM =
    (SELECT
      MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
    FROM
      KK_T_SVKEI_KAISEN_UW KK0251_GENE
    WHERE
      KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
      AND KK0251_GENE.MK_FLG = '0')
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
  (SELECT
    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
    KK_T_SVC_KEI KK0081_GENE
  WHERE
    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.MK_FLG = '0')
    AND NOT EXISTS ( 
      SELECT 
        'X'
      FROM
        KK_T_KKTK_SVC_KEI KK0341
      WHERE
        KK0341.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM =
        (SELECT
          MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
        FROM
          KK_T_KKTK_SVC_KEI KK0341_GENE
        WHERE
          KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO
          AND KK0341_GENE.RSV_APLY_YMD <= ?
          AND KK0341_GENE.RSV_APLY_CD = '2'
          AND KK0341_GENE.MK_FLG = '0'))

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_115)
#--KKPRC04604_サービス契約インターフェイス作成
#--3.全体構成/3-3.処理詳細
#--(1)料金プラン変更時ダウングレード判定
#-----------------------------------------------------------

--KEY:KK_SELECT_115

SELECT SVC.PCRS_CD,
       SVC.PPLAN_CD,
       MIN(SVC.GENE_ADD_DTM)
FROM   KK_T_SVC_KEI SVC
         INNER JOIN (
           SELECT SVC_KEI_NO,
                  PCRS_CD,
                  PPLAN_CD,
                  PLAN_ENDYMD
           FROM   KK_T_SVC_KEI SVC_WRK
           WHERE  SVC_KEI_NO = ?
             AND  PLAN_CHRG_STAYMD = ?
             AND  PLAN_CHRG_ENDYMD = ?
             AND  PLAN_END_SBT_CD = ?
         ) SVC_WRK
         ON  SVC.SVC_KEI_NO = SVC_WRK.SVC_KEI_NO
         AND SVC.PCRS_CD <> SVC_WRK.PCRS_CD
         AND SVC.PPLAN_CD <> SVC_WRK.PPLAN_CD
         AND SVC.PLAN_STAYMD >= SVC_WRK.PLAN_ENDYMD
WHERE  SVC.MK_FLG = '0'
GROUP BY
       SVC.PCRS_CD,
       SVC.PPLAN_CD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_116)
#--割引登録条件コードが"01"(条件無し)、または"02"(同一お客様のみ)の場合
#-----------------------------------------------------------

--KEY:KK_SELECT_116

SELECT
    KK0081.SVC_KEI_NO ,
    KK0081.GENE_ADD_DTM ,
    KK0081.SVC_KEI_STAT ,
    KK0081.SYSID ,
    KK0081.SVC_CD ,
    KK0081.MSKM_DTL_NO ,
    KK0081.PRC_GRP_CD ,
    KK0081.PCRS_CD ,
    KK0081.PPLAN_CD ,
    KK0081.PLAN_STAYMD ,
    KK0081.PLAN_ENDYMD ,
    KK0081.PLAN_CHRG_STAYMD ,
    KK0081.PLAN_CHRG_ENDYMD ,
    KK0081.SVC_STA_YMD ,
    KK0081.SVC_CHRG_STAYMD ,
    KK0081.SVC_ENDYMD ,
    KK0081.SVC_CHRG_ENDYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_STAT IN ('010', '020', '030', '100', '210', '220')
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM
              KK_T_SVC_KEI KK0081_GENE
          WHERE
              KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.RSV_APLY_CD = '2'
          AND KK0081_GENE.MK_FLG= '0')
          AND KK0081.SYSID = ?
ORDER BY
    KK0081.SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_117)
#--割引登録条件コードが"03"(同一請求先のみ)、または"05"(同一お客様請求先)の場合
#-----------------------------------------------------------

--KEY:KK_SELECT_117

SELECT
    KK0081.SVC_KEI_NO ,
    KK0081.GENE_ADD_DTM ,
    KK0081.SVC_KEI_STAT ,
    KK0081.SYSID ,
    KK0081.SVC_CD ,
    KK0081.MSKM_DTL_NO ,
    KK0081.PRC_GRP_CD ,
    KK0081.PCRS_CD ,
    KK0081.PPLAN_CD ,
    KK0081.PLAN_STAYMD ,
    KK0081.PLAN_ENDYMD ,
    KK0081.PLAN_CHRG_STAYMD ,
    KK0081.PLAN_CHRG_ENDYMD ,
    KK0081.SVC_STA_YMD ,
    KK0081.SVC_CHRG_STAYMD ,
    KK0081.SVC_ENDYMD ,
    KK0081.SVC_CHRG_ENDYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO IN
    (SELECT
          KK0321_02.SVC_KEI_NO
    FROM
        KK_T_KAKINS KK0321_02
    WHERE
        KK0321_02.SEIKY_KEI_NO IN
        (SELECT
             KK0321_01.SEIKY_KEI_NO
         FROM
             KK_T_KAKINS KK0321_01
         WHERE
             KK0321_01.SVC_KEI_NO = ?
         AND KK0321_01.MK_FLG = '0')
     AND KK0321_02.MK_FLG = '0')
AND KK0081.SVC_KEI_STAT IN ('010', '020', '030', '100', '210', '220')
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
                                 (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                  FROM
                                      KK_T_SVC_KEI KK0081_GENE
                                  WHERE
                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                  AND KK0081_GENE.RSV_APLY_YMD <= ?
                                  AND KK0081_GENE.RSV_APLY_CD = '2'
                                  AND KK0081_GENE.MK_FLG= '0')
AND KK0081.SYSID = ?
ORDER BY
    KK0081.SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_118)
#--割引登録条件コードが"04"(同一回線のみ)の場合
#-----------------------------------------------------------

--KEY:KK_SELECT_118

SELECT
    KK0081.SVC_KEI_NO ,
    KK0081.GENE_ADD_DTM ,
    KK0081.SVC_KEI_STAT ,
    KK0081.SYSID ,
    KK0081.SVC_CD ,
    KK0081.MSKM_DTL_NO ,
    KK0081.PRC_GRP_CD ,
    KK0081.PCRS_CD ,
    KK0081.PPLAN_CD ,
    KK0081.PLAN_STAYMD ,
    KK0081.PLAN_ENDYMD ,
    KK0081.PLAN_CHRG_STAYMD ,
    KK0081.PLAN_CHRG_ENDYMD ,
    KK0081.SVC_STA_YMD ,
    KK0081.SVC_CHRG_STAYMD ,
    KK0081.SVC_ENDYMD ,
    KK0081.SVC_CHRG_ENDYMD
FROM
    KK_T_SVC_KEI KK0081
 WHERE
    KK0081.SVC_KEI_NO IN
        (SELECT
             KK0241_02.SVC_KEI_NO
         FROM
             KK_T_KAISEN_TG_SVKEI KK0241_02
         WHERE
             KK0241_02.SVC_KEI_KAISEN_UCWK_NO IN
             (SELECT
                  KK0241_01.SVC_KEI_KAISEN_UCWK_NO
              FROM
                  KK_T_KAISEN_TG_SVKEI KK0241_01
              WHERE
                  KK0241_01.SVC_KEI_NO = ?
              AND KK0241_01.KAISEN_UCWK_USE_STAYMD IS NOT NULL
              AND KK0241_01.KAISEN_UCWK_USE_ENDYMD >= '20991231'
              AND KK0241_01.MK_FLG = '0')
         AND KK0241_02.KAISEN_UCWK_USE_STAYMD IS NOT NULL
         AND KK0241_02.KAISEN_UCWK_USE_ENDYMD >= '20991231'
         AND KK0241_02.MK_FLG = '0')
AND KK0081.SVC_KEI_STAT IN ('010', '020', '030', '100', '210', '220')
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
             FROM   KK_T_SVC_KEI KK0081_GENE
             WHERE
                 KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
             AND KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD = '2'
             AND KK0081_GENE.MK_FLG= '0')
ORDER BY
    KK0081.SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_119)
#--割引登録条件コードが"06"(同一請求先回線)の場合
#-----------------------------------------------------------

--KEY:KK_SELECT_119

SELECT
    KK0081.SVC_KEI_NO ,
    KK0081.GENE_ADD_DTM ,
    KK0081.SVC_KEI_STAT ,
    KK0081.SYSID ,
    KK0081.SVC_CD ,
    KK0081.MSKM_DTL_NO ,
    KK0081.PRC_GRP_CD ,
    KK0081.PCRS_CD ,
    KK0081.PPLAN_CD ,
    KK0081.PLAN_STAYMD ,
    KK0081.PLAN_ENDYMD ,
    KK0081.PLAN_CHRG_STAYMD ,
    KK0081.PLAN_CHRG_ENDYMD ,
    KK0081.SVC_STA_YMD ,
    KK0081.SVC_CHRG_STAYMD ,
    KK0081.SVC_ENDYMD ,
    KK0081.SVC_CHRG_ENDYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO IN
     (SELECT
          KK0321_02.SVC_KEI_NO
      FROM
          KK_T_KAKINS KK0321_02
      WHERE
          KK0321_02.SEIKY_KEI_NO IN
          (SELECT
               KK0321_01.SEIKY_KEI_NO
           FROM
               KK_T_KAKINS KK0321_01
           WHERE
               KK0321_01.SVC_KEI_NO = ?
           AND KK0321_01.MK_FLG = '0')
      AND KK0321_02.MK_FLG = '0')
AND KK0081.SVC_KEI_NO IN
     (SELECT
          KK0241_02.SVC_KEI_NO
      FROM
          KK_T_KAISEN_TG_SVKEI KK0241_02
      WHERE
          KK0241_02.SVC_KEI_KAISEN_UCWK_NO IN
          (SELECT
               KK0241_01.SVC_KEI_KAISEN_UCWK_NO
           FROM
               KK_T_KAISEN_TG_SVKEI KK0241_01
           WHERE
               KK0241_01.SVC_KEI_NO = ?
           AND KK0241_01.KAISEN_UCWK_USE_STAYMD IS NOT NULL
           AND KK0241_01.KAISEN_UCWK_USE_ENDYMD >= '20991231'
           AND KK0241_01.MK_FLG = '0')
      AND KK0241_02.KAISEN_UCWK_USE_STAYMD IS NOT NULL
      AND KK0241_02.KAISEN_UCWK_USE_ENDYMD >= '20991231'
      AND KK0241_02.MK_FLG = '0')
AND KK0081.SVC_KEI_STAT IN ('010', '020', '030', '100', '210', '220')
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG= '0')
AND KK0081.SYSID = ?
ORDER BY
    KK0081.SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_123)
#--KKPRC01601
#--KCN分の申込書内容の取得
#-----------------------------------------------------------

--KEY:KK_SELECT_123

SELECT
    DISTINCT
    KK0021.SYSID,
    KK0021.MSKMSHO_NO,
    KK0021.MSKM_YMD
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_MSKM_DTL KK0021
ON
    KK0081.SYSID = KK0021.SYSID AND
    KK0081.MSKM_DTL_NO = KK0021.MSKM_DTL_NO AND
    KK0021.MSKM_FORM_CD = '05' AND
    KK0021.GENE_ADD_DTM = (SELECT
                               MAX(GENE_ADD_DTM) GENE_MAX
                           FROM
                               KK_T_MSKM_DTL KK0021_GENE
                           WHERE
                               KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO AND
                               KK0021_GENE.MK_FLG = '0')
WHERE
    KK0081.IDO_DIV IN('00001','00002') AND
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD = '12' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM KK_T_SVC_KEI KK0081_GENE
      WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')
ORDER BY KK0021.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_132)
#--ＳＯＤ発行対象データを取得します。
#--＜抽出条件＞
#--　・ＩＰｖ６オプションが登録されている。
#--　・オプションの契約ステータスが解約済、休止・中断中、キャンセル済、停止中ではないこと。
#--　・オプションの初回SODが未発行であること。
#--     (オーダー設定の最新要求種別コードが「02：新規」「04：変更」「07：回復」でないこと)
#--　・オプションの付加対象となる親サービスの契約ステータスが照査後以降であること。
#--　　ただし、解約済、休止・中断中、キャンセル済、停止中は含めないこと。
#--　・起点変電所コード、または集約局コードが設定されていること。
#-----------------------------------------------------------

--KEY:KK_SELECT_132

SELECT /*+ leading(KK0351) index(KK0351 KK_T_OP_SVC_KEI_IDX_12) */
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.PRC_GRP_CD,
    KK0351.OP_SVC_KEI_NO,
    KK0351.GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        KK_T_OP_SVC_KEI KK0351
    ON
        KK0351.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND
        KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM =
            (SELECT
                MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX
             FROM
                KK_T_OP_SVC_KEI KK0351_GENE
             WHERE
                KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
             AND
                KK0351_GENE.RSV_APLY_YMD <= ?
             AND
                KK0351_GENE.RSV_APLY_CD = '2'
             AND
                KK0351_GENE.MK_FLG = '0')
    AND
        KK0351.OP_SVC_CD = 'B070'
    AND
        KK0351.OP_SVC_KEI_STAT IN ('010', '020', '030', '100')
    INNER JOIN
        (SELECT
            KK0241.SVC_KEI_NO
         FROM
            KK_T_KAISEN_TG_SVKEI KK0241
            INNER JOIN
                KK_T_SVKEI_KAISEN_UW KK0251
            ON
                KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
            AND
                KK0251.GENE_ADD_DTM =
                    (SELECT
                        MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                     FROM
                        KK_T_SVKEI_KAISEN_UW KK0251_GENE
                     WHERE
                        KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                     AND
                        KK0251_GENE.MK_FLG = '0')
            AND
                (TRIM(KK0251.KITEN_HDSHO_CD) IS NOT NULL OR TRIM(KK0251.SHYAKK_CD) IS NOT NULL)
         WHERE
             KK0241.MK_FLG = '0') KK0241_SVC_KEI_NO
    ON
        KK0241_SVC_KEI_NO.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM
            KK_T_SVC_KEI KK0081_GENE
         WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND
            KK0081_GENE.RSV_APLY_YMD <= ?
         AND
            KK0081_GENE.RSV_APLY_CD = '2'
         AND
            KK0081_GENE.MK_FLG = '0')
AND
    KK0081.SVC_KEI_STAT IN ('020', '030', '100')
AND
    (
        NOT EXISTS (
            SELECT 1 FROM KK_T_ODR_SET
            WHERE
                OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
            AND
                SVC_KEI_NO = KK0351.SVC_KEI_NO
            AND
                RCNT_YOKYU_SBT_CD IN('02', '04', '07')
            AND
                SVC_ORDER_CD = '0B'
            AND
                MK_FLG = '0'
        )
    )
ORDER BY
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.PRC_GRP_CD,
    KK0351.OP_SVC_KEI_NO,
    KK0351.GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_133)
#--KKPRC00911
#--サービス制御情報登録
#--課金開始連携対象となるサービス契約を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_133

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_STA_YMD <= ? AND
    KK0081.SVC_CD = '01' AND 
    KK0081.PRC_GRP_CD = '08' AND
    KK0081.SVC_KEI_STAT IN('100','210','220') AND
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
    (SELECT   KK0081_GENE.SVC_KEI_NO,
              MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0'
     GROUP BY KK0081_GENE.SVC_KEI_NO) AND
    NOT EXISTS(SELECT 1 
                 FROM KK_T_ODR_SET KK1041
                WHERE KK1041.SVC_KEI_NO = KK0081.SVC_KEI_NO
                  AND KK1041.SVC_ORDER_CD = '11'
                  AND KK1041.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_134)
#--KKPRC00907
#--対象サービス契約更新
#--マンションのデータの取得
#-----------------------------------------------------------

--KEY:KK_SELECT_134

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SHOSA_YMD,
    KK0241.SVC_KEI_KAISEN_UCWK_NO
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        KK_T_KAISEN_TG_SVKEI KK0241
    ON
        KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0241.KAISEN_UCWK_USE_STAYMD = 
        (SELECT
            MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) MX
        FROM
            KK_T_KAISEN_TG_SVKEI KK0241_MAX
        WHERE
            KK0241_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
            AND KK0241_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO
            AND KK0241_MAX.MK_FLG = '0')
    INNER JOIN
        KK_T_SVKEI_KAISEN_UW KK0251
    ON
        KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
        AND KK0251.GENE_ADD_DTM =
        (SELECT
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
        FROM
            KK_T_SVKEI_KAISEN_UW KK0251_GENE
        WHERE
            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
            AND KK0251_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_STAT = '020'
    AND KK0081.SHOSA_DSL_FIN_CD = '1'
    AND KK0081.SHOSA_YMD IS NOT NULL 
    AND KK0081.SVC_CD = '01' 
    AND KK0081.PRC_GRP_CD IN ('03','04','06','07','08','09') 
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_135)
#--KKPRC00901
#--対象サービス契約抽出
#--マンション基準日の取得
#-----------------------------------------------------------

--KEY:KK_SELECT_135

SELECT
  KK0881.SHOSA_AF_SVC_STA_NISU
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN 
    KK_T_TK_HOSHIKI_KEI KK0891
    ON
      KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO AND
      KK0891.MK_FLG = '0'
  INNER JOIN
      KK_T_KAISEN_USE_KEI KK0881
    ON
      KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO AND
      KK0881.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_138)
#--KKPRC00907
#--対象サービス契約更新
#--工事なしの場合の締結対象情報の取得（eo光ネットホームタイプ、eo光電話）
#--または宅内調査後にサービス追加された工事ありのデータ
#-----------------------------------------------------------

--KEY:KK_SELECT_138

SELECT DISTINCT
  KK0081.SVC_KEI_NO,
  KK0081.SHOSA_YMD,
  KK0241.SVC_KEI_KAISEN_UCWK_NO
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
  ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0241.KAISEN_UCWK_USE_STAYMD = 
    (SELECT
        MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) MX
    FROM
        KK_T_KAISEN_TG_SVKEI KK0241_MAX
    WHERE
        KK0241_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
        AND KK0241_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO
        AND KK0241_MAX.MK_FLG = '0')
WHERE
  KK0081.SVC_KEI_STAT = '020'
  AND KK0081.SHOSA_DSL_FIN_CD = '1'
  AND KK0081.SHOSA_YMD IS NOT NULL 
  AND KK0081.TK_HOSHIKI_KEI_NO IS NULL
  AND KK0081.SVC_CD IN ('01','02') 
  AND KK0081.PRC_GRP_CD IN ('02','10')
  AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT KK0081_GENE.SVC_KEI_NO,
          MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
          KK_T_SVC_KEI KK0081_GENE
        WHERE
          KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.RSV_APLY_CD = '2'
          AND KK0081_GENE.MK_FLG = '0'
        GROUP BY KK0081_GENE.SVC_KEI_NO)
 AND NOT EXISTS (
   SELECT 
     'X'
   FROM
     KU_T_SVKEI_KOJIAK KU0081
   WHERE
     KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
     AND KU0081.SVKEI_KOJIAK_TENDYMD >= ?
        AND KU0081.MK_FLG = '0')
UNION ALL
SELECT DISTINCT
  KK0081.SVC_KEI_NO,
  KK0081.SHOSA_YMD,
  KK0241.SVC_KEI_KAISEN_UCWK_NO
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
  ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0241.KAISEN_UCWK_USE_STAYMD = 
    (SELECT
        MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) MX
    FROM
        KK_T_KAISEN_TG_SVKEI KK0241_MAX
    WHERE
        KK0241_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
        AND KK0241_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO
        AND KK0241_MAX.MK_FLG = '0')
  INNER JOIN
    KU_T_SVKEI_KOJIAK KU0081
  ON
    KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
    AND KU0081.SVKEI_KOJIAK_TENDYMD >= ?
    AND KU0081.MK_FLG = '0'
WHERE
  KK0081.SVC_KEI_STAT = '020'
  AND KK0081.SHOSA_DSL_FIN_CD = '1'
  AND KK0081.SHOSA_YMD IS NOT NULL 
  AND KK0081.TK_HOSHIKI_KEI_NO IS NULL
  AND KK0081.SVC_CD IN ('01','02') 
  AND KK0081.PRC_GRP_CD IN ('02','10')
  AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
  (SELECT KK0081_GENE.SVC_KEI_NO,
    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
    KK_T_SVC_KEI KK0081_GENE
  WHERE
    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_139)
#--KKPRC00907
#--対象サービス契約更新
#--工事なしの場合の締結対象情報の取得（ｅｏ光テレビ（Ｋ－ＣＡＴ））
#-----------------------------------------------------------

--KEY:KK_SELECT_139

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SHOSA_YMD,
    KK0241.SVC_KEI_KAISEN_UCWK_NO
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        KK_T_KAISEN_TG_SVKEI KK0241
    ON
        KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0241.KAISEN_UCWK_USE_STAYMD = 
        (SELECT
            MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) MX
        FROM
            KK_T_KAISEN_TG_SVKEI KK0241_MAX
        WHERE
            KK0241_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
            AND KK0241_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO
            AND KK0241_MAX.MK_FLG = '0')
    INNER JOIN
        KK_T_SVKEI_KAISEN_UW KK0251
    ON
        KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
        AND KK0251.GENE_ADD_DTM =
        (SELECT
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
        FROM
            KK_T_SVKEI_KAISEN_UW KK0251_GENE
        WHERE
            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
            AND KK0251_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_STAT = '020'
    AND KK0081.SHOSA_DSL_FIN_CD = '1'
    AND KK0081.SHOSA_YMD IS NOT NULL 
    AND KK0081.TK_HOSHIKI_KEI_NO IS NOT NULL 
    AND KK0081.SVC_CD IN ('02','03') 
    AND KK0081.PRC_GRP_CD IN ('10','11','12','13') 
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_157)
#--<抽出項目>
#--サービス契約番号
#--世代登録年月日時分秒
#--サービスコード
#--料金グループコード
#--<抽出条件>
#--サービスコード='01'OR'02'
#--「サービス終了年月日」＋「回復可能期間」< 運用日
#--消去処理実施年月日時分秒が未設定
#-----------------------------------------------------------

--KEY:KK_SELECT_157

SELECT
 KEI.SVC_KEI_NO,
 KEI.GENE_ADD_DTM,
 KEI.SVC_CD,
 KEI.PRC_GRP_CD
FROM
 KK_T_SVC_KEI KEI
INNER JOIN 
 KK_M_PRC_GRP GRP
ON
 KEI.PRC_GRP_CD = GRP.PRC_GRP_CD
AND
 KEI.SVC_CD IN ('01','02')
AND
 KEI.SVC_KEI_STAT IN ('910','920')
AND
 TO_DATE(KEI.SVC_ENDYMD) + GRP.KAIHK_PSB_PRD < ?
AND
 KEI.SVCTK_BUT_DEL_TRN_JSSI_DTM IS NULL
AND
 (KEI.SVC_KEI_NO, KEI.RSV_APLY_YMD || KEI.GENE_ADD_DTM) =
   (SELECT KEI_GENE.SVC_KEI_NO, MAX(KEI_GENE.RSV_APLY_YMD || KEI_GENE.GENE_ADD_DTM) AS KEI_MAX
    FROM  KK_T_SVC_KEI KEI_GENE
    WHERE KEI_GENE.SVC_KEI_NO = KEI.SVC_KEI_NO
    AND KEI_GENE.RSV_APLY_YMD <= ?
    AND KEI_GENE.RSV_APLY_CD = '2'
    AND KEI_GENE.MK_FLG = '0'
    GROUP BY KEI_GENE.SVC_KEI_NO)
AND
 (GRP.PRC_GRP_CD, GRP.RSV_APLY_YMD || GRP.GENE_ADD_DTM) =
   (SELECT GRP_GENE.PRC_GRP_CD, MAX(GRP_GENE.RSV_APLY_YMD || GRP_GENE.GENE_ADD_DTM) AS GRP_MAX
    FROM  KK_M_PRC_GRP GRP_GENE
    WHERE GRP_GENE.PRC_GRP_CD = GRP.PRC_GRP_CD
    AND GRP_GENE.RSV_APLY_YMD <= ?
    AND GRP_GENE.MK_FLG = '0'
    GROUP BY GRP_GENE.PRC_GRP_CD)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_158)
#--＜抽出項目＞
#--サービス契約番号
#--サービス契約世代
#--サービス契約内訳番号
#--サービス契約内訳世代
#--サービスコード
#--消去処理実施年月日時分秒
#--料金グループコード
#--＜抽出条件＞
#--サービスコードがインターネットサービスか電話
#--プラン終了種別コードが"1"
#--消去処理実施年月日時分秒が未設定
#-----------------------------------------------------------

--KEY:KK_SELECT_158

SELECT
    SVC_KEI.SVC_KEI_NO,
    SVC_KEI.GENE_ADD_DTM,
    SVC_KEI_UCWK.SVC_KEI_UCWK_NO,
    SVC_KEI_UCWK.GENE_ADD_DTM UCWK_GENE,
    SVC_KEI.SVC_CD,
    SVC_KEI_UCWK.SVC_ENDYMD,
    SVC_KEI.PRC_GRP_CD
FROM KK_T_SVC_KEI SVC_KEI
INNER JOIN KK_T_SVC_KEI_UCWK SVC_KEI_UCWK
ON SVC_KEI.SVC_KEI_NO = SVC_KEI_UCWK.SVC_KEI_NO
AND (SVC_KEI_UCWK.SVC_KEI_UCWK_STAT = '910' OR SVC_KEI_UCWK.SVC_KEI_UCWK_STAT='920')
    AND (
      (SVC_KEI.SVC_CD = '01' AND 
       SVC_KEI_UCWK.PLAN_END_SBT_CD = '1') OR
      SVC_KEI.SVC_CD = '02'
    )
    AND SVC_KEI_UCWK.SVCTK_BUT_DEL_TRN_JSSI_DTM IS NULL
    AND ( SVC_KEI.SVC_KEI_NO, SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM ) = (
        SELECT
            GENE_SVC_KEI.SVC_KEI_NO, MAX(GENE_SVC_KEI.RSV_APLY_YMD || GENE_SVC_KEI.GENE_ADD_DTM) AS MAX_SVC_KEI
        FROM
            KK_T_SVC_KEI GENE_SVC_KEI
        WHERE
            GENE_SVC_KEI.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
            AND GENE_SVC_KEI.RSV_APLY_CD = '2'
            AND GENE_SVC_KEI.RSV_APLY_YMD <= ?
            AND GENE_SVC_KEI.MK_FLG = '0'
            GROUP BY GENE_SVC_KEI.SVC_KEI_NO)
    AND ( SVC_KEI_UCWK.SVC_KEI_NO, SVC_KEI_UCWK.RSV_APLY_YMD || SVC_KEI_UCWK.GENE_ADD_DTM ) = (
        SELECT
            GENE_SVC_KEI_UCWK.SVC_KEI_NO, MAX(GENE_SVC_KEI_UCWK.RSV_APLY_YMD || GENE_SVC_KEI_UCWK.GENE_ADD_DTM) AS MAX_SVC_KEI_UCWK
        FROM
            KK_T_SVC_KEI_UCWK GENE_SVC_KEI_UCWK
        WHERE
            GENE_SVC_KEI_UCWK.SVC_KEI_UCWK_NO = SVC_KEI_UCWK.SVC_KEI_UCWK_NO
            AND GENE_SVC_KEI_UCWK.RSV_APLY_CD = '2'
            AND GENE_SVC_KEI_UCWK.RSV_APLY_YMD <= ?
            AND GENE_SVC_KEI_UCWK.MK_FLG = '0'
            GROUP BY GENE_SVC_KEI_UCWK.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_159)
#--KKPRC14701にて使用
#--サービス契約情報を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_159

SELECT
 KK0081.SVC_KEI_NO,
 KK0081.GENE_ADD_DTM,
 KK0081.SVC_KEI_STAT,
 KK0081.SYSID,
 KK0081.SVC_CD,
 KK0081.MSKM_DTL_NO,
 KK0081.SEIRI_NO,
 KK0081.MENKAIHAT_ANKEN_NO,
 KK0081.PRC_GRP_CD,
 KK0081.PCRS_CD,
 KK0081.PPLAN_CD,
 KK0081.TK_HOSHIKI_KEI_NO,
 KK0081.SVC_USE_STA_KIBO_YMD,
 KK0081.RSV_TSTA_KIBO_YMD,
 KK0081.ID_SOKHOSHO_OUTPUT_YH,
 KK0081.SVC_KEI_KZKWRK_REQYMD,
 KK0081.SHOSA_YMD,
 KK0081.SHOSA_CL_YMD,
 KK0081.SKEKKA_CD,
 KK0081.SKEKKA_DTL_CD,
 KK0081.SKEKKA_HOKI_CD,
 KK0081.SKEKKA_SEND_CD,
 KK0081.PAYWAY_KEIZOKU_FLG,
 KK0081.FTRIAL_KANYU_YMD,
 KK0081.FTRIAL_PRD_ENDYMD,
 KK0081.HONKANYU_YMD,
 KK0081.HONKANYU_IKO_KIGEN_YMD,
 KK0081.KEI_CNC_YMD,
 KK0081.PLAN_STAYMD,
 KK0081.PLAN_ENDYMD,
 KK0081.PLAN_CHRG_STAYMD,
 KK0081.PLAN_CHRG_ENDYMD,
 KK0081.PLAN_END_SBT_CD,
 KK0081.RSV_APLY_YMD,
 KK0081.RSV_CL_YMD,
 KK0081.RSV_APLY_CD,
 KK0081.SVC_CANCEL_YMD,
 KK0081.SVC_CANCEL_RSN_CD,
 KK0081.SVC_STA_YMD,
 KK0081.SVC_CHRG_STAYMD,
 KK0081.KEIZK_SVC_STAYMD,
 KK0081.KEIZK_SVC_CHRG_STAYMD,
 KK0081.LETTER_HASSO_SHIWAKE_DIV,
 KK0081.THNX_LETTER_SHS_CD,
 KK0081.WEB_OP_ADD_FAIL_FLG,
 KK0081.SVC_STP_YMD,
 KK0081.SVC_STP_RSN_CD,
 KK0081.SVC_STP_RLS_YMD,
 KK0081.SVC_STP_RLS_RSN_CD,
 KK0081.PAUSE_STP_CD,
 KK0081.SVC_PAUSE_YMD,
 KK0081.SVC_PAUSE_RSN_CD,
 KK0081.SVC_PAUSE_RSN_MEMO,
 KK0081.SVC_PAUSE_RLS_YMD,
 KK0081.SVC_PAUSE_RLS_RSN_CD,
 KK0081.SVC_PAUSE_RLS_RSN_MEMO,
 KK0081.SVC_ENDYMD,
 KK0081.SVC_CHRG_ENDYMD,
 KK0081.SVC_DSL_KISAN_YMD,
 KK0081.SVC_DSL_YMD,
 KK0081.SVC_DLRE_CD,
 KK0081.SVC_DLRE_MEMO,
 KK0081.SVC_DSL_TTDKI_FIN_FLG,
 KK0081.KAIHK_YMD,
 KK0081.SVC_CANCEL_CL_YMD,
 KK0081.SVC_DSL_CL_YMD,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NO,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NO,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT,
 KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.HOJINSVKEI_HKTGI_SBT_CD,
 KK0081.PNLTY_HASSEI_CD,
 KK0081.PNLTY_CHGE_RSN_CD,
 KK0081.IDO_DIV,
 KK0081.SHK_DFLT_PWD,
 KK0081.CUST_ID_PWD,
 KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG,
 KK0081.INTR_CD,
 KK0081.SHOSA_DSL_FIN_CD,
 KK0081.IDO_NG_STAT_CD,
 KK0081.CHRG_STA_YMD_HOSEI_UM,
 KK0081.SVC_PAUSE_CHRG_STA_YMD,
 KK0081.WORK_RRK_BIKO,
 KK0081.AUTO_SHOSA_TRAN_STAT_CD,
 KK0081.KIKI_MIADD_LIST_OPUTZM_FLG,
 KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG,
 KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM,
 KK0081.JURYO_CHOK_TCHI_YH,
 KK0081.ADD_DTM,
 KK0081.ADD_OPEACNT,
 KK0081.UPD_DTM,
 KK0081.UPD_OPEACNT,
 KK0081.DEL_DTM,
 KK0081.DEL_OPEACNT,
 KK0081.MK_FLG,
 KK0081.ADD_UNYO_YMD,
 KK0081.ADD_TRN_ID,
 KK0081.UPD_UNYO_YMD,
 KK0081.UPD_TRN_ID,
 KK0081.DEL_UNYO_YMD,
 KK0081.DEL_TRN_ID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_STAT = '100' AND
 KK0081.SVC_CD = '03' AND
 KK0081.PRC_GRP_CD IN('11','13') AND
 (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
 (SELECT 
     KK0081_GENE.SVC_KEI_NO, 
     MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM 
     KK_T_SVC_KEI KK0081_GENE
  WHERE 
     KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND KK0081_GENE.RSV_APLY_YMD <= ?
     AND KK0081_GENE.RSV_APLY_CD = '2'
     AND KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO) AND
 KK0081.ADD_DTM <= ?
 ORDER BY KK0081.SVC_KEI_NO, KK0081.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_160)
#--KKPRC14701にて使用
#--サービス契約情報を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_160

SELECT
 KK0081.SVC_KEI_NO,
 KK0081.GENE_ADD_DTM,
 KK0081.SVC_KEI_STAT,
 KK0081.SYSID,
 KK0081.SVC_CD,
 KK0081.MSKM_DTL_NO,
 KK0081.SEIRI_NO,
 KK0081.MENKAIHAT_ANKEN_NO,
 KK0081.PRC_GRP_CD,
 KK0081.PCRS_CD,
 KK0081.PPLAN_CD,
 KK0081.TK_HOSHIKI_KEI_NO,
 KK0081.SVC_USE_STA_KIBO_YMD,
 KK0081.RSV_TSTA_KIBO_YMD,
 KK0081.ID_SOKHOSHO_OUTPUT_YH,
 KK0081.SVC_KEI_KZKWRK_REQYMD,
 KK0081.SHOSA_YMD,
 KK0081.SHOSA_CL_YMD,
 KK0081.SKEKKA_CD,
 KK0081.SKEKKA_DTL_CD,
 KK0081.SKEKKA_HOKI_CD,
 KK0081.SKEKKA_SEND_CD,
 KK0081.PAYWAY_KEIZOKU_FLG,
 KK0081.FTRIAL_KANYU_YMD,
 KK0081.FTRIAL_PRD_ENDYMD,
 KK0081.HONKANYU_YMD,
 KK0081.HONKANYU_IKO_KIGEN_YMD,
 KK0081.KEI_CNC_YMD,
 KK0081.PLAN_STAYMD,
 KK0081.PLAN_ENDYMD,
 KK0081.PLAN_CHRG_STAYMD,
 KK0081.PLAN_CHRG_ENDYMD,
 KK0081.PLAN_END_SBT_CD,
 KK0081.RSV_APLY_YMD,
 KK0081.RSV_CL_YMD,
 KK0081.RSV_APLY_CD,
 KK0081.SVC_CANCEL_YMD,
 KK0081.SVC_CANCEL_RSN_CD,
 KK0081.SVC_STA_YMD,
 KK0081.SVC_CHRG_STAYMD,
 KK0081.KEIZK_SVC_STAYMD,
 KK0081.KEIZK_SVC_CHRG_STAYMD,
 KK0081.LETTER_HASSO_SHIWAKE_DIV,
 KK0081.THNX_LETTER_SHS_CD,
 KK0081.WEB_OP_ADD_FAIL_FLG,
 KK0081.SVC_STP_YMD,
 KK0081.SVC_STP_RSN_CD,
 KK0081.SVC_STP_RLS_YMD,
 KK0081.SVC_STP_RLS_RSN_CD,
 KK0081.PAUSE_STP_CD,
 KK0081.SVC_PAUSE_YMD,
 KK0081.SVC_PAUSE_RSN_CD,
 KK0081.SVC_PAUSE_RSN_MEMO,
 KK0081.SVC_PAUSE_RLS_YMD,
 KK0081.SVC_PAUSE_RLS_RSN_CD,
 KK0081.SVC_PAUSE_RLS_RSN_MEMO,
 KK0081.SVC_ENDYMD,
 KK0081.SVC_CHRG_ENDYMD,
 KK0081.SVC_DSL_KISAN_YMD,
 KK0081.SVC_DSL_YMD,
 KK0081.SVC_DLRE_CD,
 KK0081.SVC_DLRE_MEMO,
 KK0081.SVC_DSL_TTDKI_FIN_FLG,
 KK0081.KAIHK_YMD,
 KK0081.SVC_CANCEL_CL_YMD,
 KK0081.SVC_DSL_CL_YMD,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NO,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NO,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT,
 KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.HOJINSVKEI_HKTGI_SBT_CD,
 KK0081.PNLTY_HASSEI_CD,
 KK0081.PNLTY_CHGE_RSN_CD,
 KK0081.IDO_DIV,
 KK0081.SHK_DFLT_PWD,
 KK0081.CUST_ID_PWD,
 KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG,
 KK0081.INTR_CD,
 KK0081.SHOSA_DSL_FIN_CD,
 KK0081.IDO_NG_STAT_CD,
 KK0081.CHRG_STA_YMD_HOSEI_UM,
 KK0081.SVC_PAUSE_CHRG_STA_YMD,
 KK0081.WORK_RRK_BIKO,
 KK0081.AUTO_SHOSA_TRAN_STAT_CD,
 KK0081.KIKI_MIADD_LIST_OPUTZM_FLG,
 KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG,
 KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM,
 KK0081.JURYO_CHOK_TCHI_YH,
 KK0081.ADD_DTM,
 KK0081.ADD_OPEACNT,
 KK0081.UPD_DTM,
 KK0081.UPD_OPEACNT,
 KK0081.DEL_DTM,
 KK0081.DEL_OPEACNT,
 KK0081.MK_FLG,
 KK0081.ADD_UNYO_YMD,
 KK0081.ADD_TRN_ID,
 KK0081.UPD_UNYO_YMD,
 KK0081.UPD_TRN_ID,
 KK0081.DEL_UNYO_YMD,
 KK0081.DEL_TRN_ID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_STAT = '100' AND
 KK0081.SVC_CD = '03' AND
 KK0081.PRC_GRP_CD IN('11','13') AND
 (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
 (SELECT 
     KK0081_GENE.SVC_KEI_NO, 
     MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM 
     KK_T_SVC_KEI KK0081_GENE
  WHERE 
     KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND KK0081_GENE.RSV_APLY_YMD <= ?
     AND KK0081_GENE.RSV_APLY_CD = '2'
     AND KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO) AND
 KK0081.ADD_DTM >= ? AND
 KK0081.ADD_DTM <= ?
 ORDER BY KK0081.SVC_KEI_NO, KK0081.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_161)
#--KKPRC00912
#--サービス提供中の情報を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_161

SELECT
    KK0081.SVC_CD,
    KK0081.IDO_DIV,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_STA_YMD,
    KK2111.LAST_UPD_DTM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_SVKEI_EXC_CTRL KK2111
ON
    KK2111.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK2111.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.SVC_KEI_STAT IN('100','210','220') AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
         MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM
         KK_T_SVC_KEI KK0081_GENE
     WHERE
         KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
         KK0081_GENE.RSV_APLY_YMD <= ? AND
         KK0081_GENE.RSV_APLY_CD = '2' AND
         KK0081_GENE.MK_FLG = '0') AND
    KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--繧ｵ繝ｼ繝薙せ螂醍ｴ・KK_T_SVC_KEI-KK_SELECT_162)
#--繧ｵ繝ｼ繝薙せ螂醍ｴ・分蜿ｷ縺ｨ繧ｵ繝ｼ繝薙せ螂醍ｴ・屓邱壼・險ｳ逡ｪ蜿ｷ繧貞渕縺ｫ繧ｵ繝ｼ繝薙せ螂醍ｴЮ蟾･莠区｡井ｻｶ繧堤ｵ檎罰縺怜ｷ･莠句ｮ御ｺ・ュ蝣ｱ繧貞叙蠕励☆繧九€・
#-----------------------------------------------------------

--KEY:KK_SELECT_162

SELECT
    SVC_KEI.SVC_KEI_NO AS SVC_KEI_NO,
    SVKEI_KOJIAK.KOJIAK_NO AS KOJIAK_NO,
    SVKEI_KOJIAK.SVC_CD AS SVC_CD,
    SVKEI_KOJIAK.SYSID AS SYSID,
    SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO AS SVC_KEI_KAISEN_UCWK_NO,
    KOJIAK.KOJIAK_JSSI_YMD AS KOJIAK_JSSI_YMD,
    KOJIAK.KOJIAK_FIN_DTM AS KOJIAK_FIN_DTM
FROM
    KK_T_SVC_KEI SVC_KEI
INNER JOIN
    KU_T_SVKEI_KOJIAK SVKEI_KOJIAK
ON
    SVC_KEI.SVC_KEI_NO = SVKEI_KOJIAK.SVC_KEI_NO
AND
    SVC_KEI.SVC_CD = SVKEI_KOJIAK.SVC_CD
AND
    SVC_KEI.SYSID = SVKEI_KOJIAK.SYSID
AND
    SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO = ?
AND
    SVKEI_KOJIAK.MK_FLG = '0'
INNER JOIN
    KU_T_KOJIAK KOJIAK
ON
    SVKEI_KOJIAK.KOJIAK_NO = KOJIAK.KOJIAK_NO
AND
    (
        KOJIAK.KOJIAK_SBT_CD = ?
    OR
        KOJIAK.KOJIAK_SBT_CD = ?
    )
AND
    KOJIAK.KOJIAK_STAT = ?
AND
    SUBSTR(KOJIAK.KOJIAK_FIN_DTM, 1, 8) = ?
AND
    KOJIAK.MK_FLG = '0'
WHERE
    SVC_KEI.SVC_KEI_NO = ?
AND
    SVC_KEI.GENE_ADD_DTM =
    (
        SELECT
            MAX(SVC_KEI_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_SVC_KEI SVC_KEI_GENE
        WHERE
            SVC_KEI.SVC_KEI_NO = SVC_KEI_GENE.SVC_KEI_NO
        AND
            SVC_KEI_GENE.MK_FLG = '0'
    )
AND
    SVC_KEI.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_163)
#--KKPRC00904
#--指定されたサービス契約番号のサービス契約ステータス、サービス契約回線内訳ステータスを取得。
#-----------------------------------------------------------

--KEY:KK_SELECT_163

SELECT
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_STA_YMD,
    KK0251.SVC_KEI_KAISEN_UCWK_STAT,
    KK0251.SVC_KEI_KAISEN_UCWK_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.MK_FLG = '0'
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO AND
    KK0251.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
     FROM
        KK_T_SVKEI_KAISEN_UW KK0251_GENE
     WHERE
        KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
        KK0251_GENE.MK_FLG = '0') AND
    KK0251.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM
        KK_T_SVC_KEI KK0081_GENE
     WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0') AND
    KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_164)
#--KKPRC01601
#--申込年月日が前回バッチ運用日より未来日でバッチ運用日と同日か過去のＫＣＮの情報を取得。
#-----------------------------------------------------------

--KEY:KK_SELECT_164

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV,
    KK1091.PRG_STAT,
    KK1561.KCNRIDODIV,
    KK0021.MSKM_YMD,
    KK0021.KCN_STB_MSKM_CNT,
    KK0021.KCN_STB_KIND_CD,
    KK0011.MSKM_RRKS_TELNO,
    KK0011.KEPCO_CUSTINFO_JUJU_DOI_UM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK0081.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
    KK0081.IDO_DIV = KK1091.IDO_DIV AND
    KK1091.MK_FLG = '0'
INNER JOIN
    KK_M_KCNRIDODIV_CHG KK1561
ON
    KK1561.IDO_DIV = KK0081.IDO_DIV AND
    KK1561.PRG_STAT = KK1091.PRG_STAT AND
    KK1561.KCNRIDODIV = '01000' AND
    ? BETWEEN KK1561.KCNRIDODIV_CHG_TSTAYMD AND
    KK1561.KCNRIDODIV_CHG_TENDYMD AND
    KK1561.MK_FLG = '0'
INNER JOIN
    KK_T_MSKM_DTL KK0021
ON
    KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO AND
    KK0021.MSKM_YMD > ? AND
    KK0021.MSKM_YMD <= ? AND
    KK0021.MSKM_FORM_CD <> '05' AND
    KK0021.GENE_ADD_DTM = 
    (SELECT MAX(KK0021_MAX.GENE_ADD_DTM)
       FROM KK_T_MSKM_DTL KK0021_MAX
      WHERE KK0021.MSKM_DTL_NO = KK0021_MAX.MSKM_DTL_NO AND
            KK0021_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_MSKM KK0011
ON
    KK0011.MSKM_NO = KK0021.MSKM_NO AND
    KK0011.GENE_ADD_DTM = 
    (SELECT MAX(KK0011_MAX.GENE_ADD_DTM)
       FROM KK_T_MSKM KK0011_MAX
      WHERE KK0011_MAX.MSKM_NO = KK0011.MSKM_NO AND
            KK0011_MAX.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM KK_T_SVC_KEI KK0081_GENE
      WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
            KK0081_GENE.RSV_APLY_YMD <= ? AND
            KK0081_GENE.RSV_APLY_CD = '2' AND
            KK0081_GENE.MK_FLG = '0') AND
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD = '12'
ORDER BY KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_165)
#--サービス契約情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_165

SELECT T1.SVC_KEI_NO,
       T1.GENE_ADD_DTM,
       T1.SVC_KEI_STAT,
       T1.SYSID,
       T1.SVC_CD,
       T1.MSKM_DTL_NO,
       T1.SEIRI_NO,
       T1.MENKAIHAT_ANKEN_NO,
       T1.PRC_GRP_CD,
       T1.PCRS_CD,
       T1.PPLAN_CD,
       T1.TK_HOSHIKI_KEI_NO,
       T1.SVC_USE_STA_KIBO_YMD,
       T1.RSV_TSTA_KIBO_YMD,
       T1.ID_SOKHOSHO_OUTPUT_YH,
       T1.SVC_KEI_KZKWRK_REQYMD,
       T1.SHOSA_YMD,
       T1.SHOSA_CL_YMD,
       T1.SKEKKA_CD,
       T1.SKEKKA_DTL_CD,
       T1.SKEKKA_HOKI_CD,
       T1.SKEKKA_SEND_CD,
       T1.PAYWAY_KEIZOKU_FLG,
       T1.FTRIAL_KANYU_YMD,
       T1.FTRIAL_PRD_ENDYMD,
       T1.HONKANYU_YMD,
       T1.HONKANYU_IKO_KIGEN_YMD,
       T1.KEI_CNC_YMD,
       T1.PLAN_STAYMD,
       T1.PLAN_ENDYMD,
       T1.PLAN_CHRG_STAYMD,
       T1.PLAN_CHRG_ENDYMD,
       T1.PLAN_END_SBT_CD,
       T1.RSV_APLY_YMD,
       T1.RSV_CL_YMD,
       T1.RSV_APLY_CD,
       T1.SVC_CANCEL_YMD,
       T1.SVC_CANCEL_RSN_CD,
       T1.SVC_STA_YMD,
       T1.SVC_CHRG_STAYMD,
       T1.LETTER_HASSO_SHIWAKE_DIV,
       T1.THNX_LETTER_SHS_CD,
       T1.WEB_OP_ADD_FAIL_FLG,
       T1.SVC_STP_YMD,
       T1.SVC_STP_RSN_CD,
       T1.SVC_STP_RLS_YMD,
       T1.SVC_STP_RLS_RSN_CD,
       T1.PAUSE_STP_CD,
       T1.SVC_PAUSE_YMD,
       T1.SVC_PAUSE_RSN_CD,
       T1.SVC_PAUSE_RSN_MEMO,
       T1.SVC_PAUSE_RLS_YMD,
       T1.SVC_PAUSE_RLS_RSN_CD,
       T1.SVC_PAUSE_RLS_RSN_MEMO,
       T1.SVC_ENDYMD,
       T1.SVC_CHRG_ENDYMD,
       T1.SVC_DSL_KISAN_YMD,
       T1.SVC_DSL_YMD,
       T1.SVC_DLRE_CD,
       T1.SVC_DLRE_MEMO,
       T1.SVC_DSL_TTDKI_FIN_FLG,
       T1.KAIHK_YMD,
       T1.SVC_CANCEL_CL_YMD,
       T1.SVC_DSL_CL_YMD,
       T1.CHGE_MT_HOJINSVKEI_UK_NO,
       T1.CHGE_MT_HOJINSVKEI_UK_NOPT,
       T1.CHGE_SK_HOJINSVKEI_UK_NO,
       T1.CHGE_SK_HOJINSVKEI_UK_NOPT,
       T1.CHMT_HJIN_EO_YKAE_SVKEI_NO,
       T1.CHSK_HJIN_EO_YKAE_SVKEI_NO,
       T1.HOJINSVKEI_HKTGI_SBT_CD,
       T1.PNLTY_HASSEI_CD,
       T1.PNLTY_CHGE_RSN_CD,
       T1.IDO_DIV,
       T1.SHK_DFLT_PWD,
       T1.CUST_ID_PWD,
       T1.MENKAIHAT_ANKEN_KR_ADD_FLG,
       T1.INTR_CD,
       T1.SHOSA_DSL_FIN_CD,
       T1.IDO_NG_STAT_CD,
       T1.CHRG_STA_YMD_HOSEI_UM,
       T1.SVC_PAUSE_CHRG_STA_YMD,
       T1.WORK_RRK_BIKO,
       T1.AUTO_SHOSA_TRAN_STAT_CD,
       T1.KIKI_MIADD_LIST_OPUTZM_FLG,
       T1.KAIHK_FAIL_KEI_CST_ZM_FLG,
       T1.SVCTK_BUT_DEL_TRN_JSSI_DTM,
       T1.ADD_DTM,
       T1.ADD_OPEACNT,
       T1.UPD_DTM,
       T1.UPD_OPEACNT,
       T1.DEL_DTM,
       T1.DEL_OPEACNT,
       T1.MK_FLG,
       T1.ADD_UNYO_YMD,
       T1.ADD_TRN_ID,
       T1.UPD_UNYO_YMD,
       T1.UPD_TRN_ID,
       T1.DEL_UNYO_YMD,
       T1.DEL_TRN_ID
  FROM KK_T_SVC_KEI T1
 WHERE T1.SVC_KEI_NO = ?
   AND T1.RSV_APLY_YMD || T1.GENE_ADD_DTM = (SELECT MAX(T2.RSV_APLY_YMD || T2.GENE_ADD_DTM) AS T2_MAX
                                               FROM KK_T_SVC_KEI T2
                                              WHERE T2.SVC_KEI_NO    = T1.SVC_KEI_NO
                                                AND T2.RSV_APLY_YMD <= ?
                                                AND T2.RSV_APLY_CD   = '2'
                                                AND T2.MK_FLG        = '0')
   AND T1.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_166)
#--サービス契約番号に紐づくマンション物件コードを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_166

SELECT
    KK0861.MANSION_BUKKEN_CD
FROM   KK_T_SVC_KEI KK0081

  INNER JOIN KK_T_TK_HOSHIKI_KEI KK0891
  ON KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO
  AND   KK0891.MK_FLG = '0'

  INNER JOIN KK_T_KAISEN_USE_KEI KK0881
  ON KK0891.KAISEN_USE_KEI_NO = KK0881.KAISEN_USE_KEI_NO
  AND   KK0881.MK_FLG = '0'

  INNER JOIN KK_T_OWNR_KEI KK0871
  ON KK0881.OWNR_KEI_NO = KK0871.OWNR_KEI_NO
  AND   KK0871.MK_FLG = '0'

  INNER JOIN KK_T_MANSION_BUKKEN KK0861
  ON KK0871.MANSION_BUKKEN_NO = KK0861.MANSION_BUKKEN_NO
  AND   KK0861.MK_FLG = '0'

WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS GENE_M
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_YMD <= ?
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_171)
#--KKPRC00905
#--サービス契約情報の取得。
#-----------------------------------------------------------

--KEY:KK_SELECT_171

SELECT
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.SVC_CD,
    KK0081.IDO_DIV,
    KK0081.TK_HOSHIKI_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
   (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
   (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
    FROM KK_T_SVC_KEI KK0081_GENE 
    WHERE KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_172)
#--KKPRC00906
#--一時金元サービス契約情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_172

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CHRG_STAYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')
        AND KK0081.SVC_KEI_STAT = '100'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_173)
#--KKPRC00906
#--サービス契約「サービス契約ステータス」情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_173

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SVC_KEI_STAT
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_175)
#--KKPRC41001
#--マンション（子）情報について、固定IPアドレスの契約存在の確認を行う。
#-----------------------------------------------------------

--KEY:KK_SELECT_175

SELECT
 KK0251.SHYAKK_CD,
 KK0241.SVC_KEI_KAISEN_UCWK_NO,
 KK0081.SVC_KEI_NO,
 KK0351.OP_SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
 INNER JOIN  
  KK_T_SVC_KEI_UCWK KK0161  
 ON  
  KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND KK0161.SVC_KEI_UCWK_STAT NOT IN ('910','920')
  AND KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM =  
   (SELECT MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX  
   FROM   KK_T_SVC_KEI_UCWK KK0161_GENE  
   WHERE  KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO   
   AND    KK0161_GENE.RSV_APLY_YMD <= ?  
   AND    KK0161_GENE.RSV_APLY_CD = '2'  
   AND    KK0161_GENE.MK_FLG = '0')
 INNER JOIN
  KK_T_KAISEN_TG_SVKEI KK0241
 ON
  KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND KK0241.KAISEN_UCWK_USE_STAYMD =
   (SELECT
    MAX(KK0241_STAYMD_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
   FROM
    KK_T_KAISEN_TG_SVKEI KK0241_STAYMD_MAX
   WHERE
    KK0241_STAYMD_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO
    AND KK0241_STAYMD_MAX.KAISEN_UCWK_USE_STAYMD <= ?
    AND KK0241_STAYMD_MAX.MK_FLG = '0')
   INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
   ON
    KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.SVC_KEI_KAISEN_UCWK_STAT NOT IN ('910','920')
    AND KK0251.GENE_ADD_DTM =
     (SELECT
      MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
     FROM
      KK_T_SVKEI_KAISEN_UW KK0251_GENE
     WHERE
      KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
      AND KK0251_GENE.MK_FLG = '0')
 LEFT OUTER JOIN (
    SELECT *
    FROM   KK_T_OP_SVC_KEI KK0351_1
    WHERE  KK0351_1.OP_SVC_KEI_STAT NOT IN ('910','920')
     AND   KK0351_1.RSV_APLY_YMD || KK0351_1.GENE_ADD_DTM =
           (SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX
            FROM   KK_T_OP_SVC_KEI KK0351_GENE  
            WHERE  KK0351_GENE.OP_SVC_KEI_NO = KK0351_1.OP_SVC_KEI_NO
            AND    KK0351_GENE.RSV_APLY_YMD <= ?  
            AND    KK0351_GENE.MK_FLG = '0')) KK0351
 ON  KK0351.SVC_KEI_NO = KK0081.SVC_KEI_NO 
 AND KK0351.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO 
 AND KK0351.OP_SVC_CD = 'B004'
WHERE
 KK0081.TK_HOSHIKI_KEI_NO = ?
 AND KK0081.SVC_KEI_STAT NOT IN ('210','910')
 AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
  (SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD = '2'
   AND KK0081_GENE.MK_FLG = '0')
 ORDER BY KK0081.SVC_CD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_177)
#--KKPRC05802
#--サービス契約「料金グループコード」情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_177

SELECT
    KK0081.PRC_GRP_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
                (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                FROM
                    KK_T_SVC_KEI KK0081_GENE
                WHERE
                    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND 
                    KK0081_GENE.RSV_APLY_YMD <= ?
                AND 
                    KK0081_GENE.RSV_APLY_CD = '2'
                AND 
                    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_228)
#--サービス契約カレントの予約適用日を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_228

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.MSKM_DTL_NO,
    KK0081.RSV_APLY_YMD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_CD,
    KK0081.SVC_ENDYMD,
    KK0081.SVC_CHRG_ENDYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS GENE_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_001)
#--指定された世代登録年月日時分秒のレコードに対して、審査結果送信コードを編集する。
#-----------------------------------------------------------

--KEY:KK_UPDATE_001

UPDATE KK_T_SVC_KEI KK0081
SET KK0081.SKEKKA_SEND_CD = ?,
    KK0081.UPD_DTM = 'UPD_DTM',
    KK0081.UPD_UNYO_YMD = 'UPD_UNYO',
    KK0081.UPD_TRN_ID = 'UPD_TRN',
    KK0081.UPD_OPEACNT = 'UPD_OPE'
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.GENE_ADD_DTM = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_002)
#--サービス契約のPKをキーに自動照査処理状態を不可に更新します。
#-----------------------------------------------------------

--KEY:KK_UPDATE_002

UPDATE 
    KK_T_SVC_KEI TSK
SET
TSK.AUTO_SHOSA_TRAN_STAT_CD = '2'
WHERE 
    TSK.SVC_KEI_NO = ? 
AND
    TSK.GENE_ADD_DTM = (SELECT MAX(SUB_TSK.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
                        FROM   KK_T_SVC_KEI SUB_TSK
                        WHERE  SUB_TSK.SVC_KEI_NO = TSK.SVC_KEI_NO
                        AND    SUB_TSK.MK_FLG = '0')
AND
    TSK.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_003)
#--自動照査処理結果コードを処理済に更新する。
#-----------------------------------------------------------

--KEY:KK_UPDATE_003

UPDATE 
    KK_T_SVC_KEI TSK
SET
TSK.AUTO_SHOSA_TRAN_STAT_CD = '1'
WHERE 
    TSK.SVC_KEI_NO = ? 
AND
    TSK.GENE_ADD_DTM = (SELECT MAX(SUB_TSK.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
                        FROM   KK_T_SVC_KEI SUB_TSK
                        WHERE  SUB_TSK.SVC_KEI_NO = TSK.SVC_KEI_NO
                        AND    SUB_TSK.MK_FLG = '0')
AND
    TSK.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_004)
#--サービス契約番号に紐づく、プラン終了年月日、プラン課金終了年月日を更新する。
#-----------------------------------------------------------

--KEY:KK_UPDATE_004

UPDATE KK_T_SVC_KEI SK
SET SK.PLAN_ENDYMD = ?,
SK.PLAN_CHRG_ENDYMD = ?,
SK.UPD_UNYO_YMD = 'UPD_UNYO',
SK.UPD_TRN_ID = 'UPD_TRN'
WHERE SK.SVC_KEI_NO = ?
AND SK.GENE_ADD_DTM = 
   (SELECT MAX(SK_GENE.GENE_ADD_DTM) AS UCWK_MAX FROM KK_T_SVC_KEI SK_GENE
    WHERE SK_GENE.SVC_KEI_NO = SK.SVC_KEI_NO
    AND SK_GENE.MK_FLG = '0')
AND SK.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_005)
#--サービス契約番号に紐づく、予約適用年月日、プラン開始年月日、プラン課金開始年月日を更新する。
#-----------------------------------------------------------

--KEY:KK_UPDATE_005

UPDATE KK_T_SVC_KEI SK
SET SK.RSV_APLY_YMD = ?,
SK.PLAN_STAYMD = ?,
SK.SVC_STA_YMD = ?,
SK.PLAN_CHRG_STAYMD = ?,
SK.SVC_CHRG_STAYMD = ?,
SK.UPD_UNYO_YMD = 'UPD_UNYO',
SK.UPD_TRN_ID = 'UPD_TRN'
WHERE SK.SVC_KEI_NO = ?
AND SK.GENE_ADD_DTM = 
   (SELECT MAX(SK_GENE.GENE_ADD_DTM) AS UCWK_MAX FROM KK_T_SVC_KEI SK_GENE
    WHERE SK_GENE.SVC_KEI_NO = SK.SVC_KEI_NO
    AND SK_GENE.MK_FLG = '0')
AND SK.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_006)
#--サービス契約番号から、サービス契約．回復不可契約抽出済フラグに”抽出済”を設定する。
#-----------------------------------------------------------

--KEY:KK_UPDATE_006

UPDATE
    KK_T_SVC_KEI TSK
SET
    TSK.KAIHK_FAIL_KEI_CST_ZM_FLG = '1',
    TSK.UPD_DTM = 'UPD_DTM',
    TSK.UPD_UNYO_YMD = 'UPD_UNYO',
    TSK.UPD_TRN_ID = 'UPD_TRN',
    TSK.UPD_OPEACNT = 'UPD_OPE'
WHERE
    TSK.SVC_KEI_NO = ?
AND
    TSK.RSV_APLY_YMD || TSK.GENE_ADD_DTM >= (
                        SELECT MAX(SUB_TSK.RSV_APLY_YMD || SUB_TSK.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
                        FROM   KK_T_SVC_KEI SUB_TSK
                        WHERE  SUB_TSK.SVC_KEI_NO = TSK.SVC_KEI_NO
                        AND    SUB_TSK.MK_FLG = '0'
                        AND    SUB_TSK.RSV_APLY_YMD <= ?
                        AND    SUB_TSK.RSV_APLY_CD = '2')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_007)
#--サービス契約番号に紐づくサービス契約ステータス、予約適用年月日、プラン開始年月日、プラン課金開始年月日、サービス開始年月日、サービス課金開始年月日
#-----------------------------------------------------------

--KEY:KK_UPDATE_007

UPDATE KK_T_SVC_KEI SK
SET SVC_KEI_STAT = ?, SK.RSV_APLY_YMD = ?,
SK.PLAN_STAYMD = ?,
SK.SVC_STA_YMD = ?,
SK.PLAN_CHRG_STAYMD = ?,
SK.SVC_CHRG_STAYMD = ?
WHERE SK.SVC_KEI_NO = ?
AND SK.GENE_ADD_DTM = 
   (SELECT MAX(SK_GENE.GENE_ADD_DTM) AS UCWK_MAX FROM KK_T_SVC_KEI SK_GENE
    WHERE SK_GENE.SVC_KEI_NO = SK.SVC_KEI_NO
    AND SK_GENE.MK_FLG = '0')
AND SK.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_008)
#--サービス契約番号に紐づくサービス契約ステータス、予約適用年月日、プラン開始年月日、プラン課金開始年月日、サービス開始年月日、サービス課金開始年月日
#-----------------------------------------------------------

--KEY:KK_UPDATE_008

UPDATE KK_T_SVC_KEI SK
SET 
SK.SVC_KEI_STAT = ?,
SK.RSV_APLY_YMD = ?,
SK.PLAN_ENDYMD = ?,
SK.PLAN_CHRG_ENDYMD = ?,
SK.SVC_ENDYMD = ?,
SK.SVC_CHRG_ENDYMD = ?,
SK.SVC_DSL_YMD = ?,
SK.SVC_DSL_KISAN_YMD = ?
WHERE SK.SVC_KEI_NO = ?
AND SK.GENE_ADD_DTM = 
   (SELECT MAX(SK_GENE.GENE_ADD_DTM) AS UCWK_MAX FROM KK_T_SVC_KEI SK_GENE
    WHERE SK_GENE.SVC_KEI_NO = SK.SVC_KEI_NO
    AND SK_GENE.MK_FLG = '0')
AND SK.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_001)
#--料金グループよりSYSIDに紐づく料金グループコードを表示順序の昇順で取得する（月末時点に契約していた料金グループコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_001

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PRC_GRP_CD = C.CD_DIV
WHERE A.SHOSA_YMD < ?
AND A.SVC_KEI_STAT IN('020','030','100','210','220','910')
AND A.SYSID = ?
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_002)
#--料金グループよりSYSIDに紐づく料金グループコードを表示順序の昇順で取得する（翌月以降にサービスが始まる料金グループコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_002

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PRC_GRP_CD = C.CD_DIV
WHERE A.SVC_KEI_STAT IN('020','030','100','210','220')
AND A.SYSID = ?
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_003)
#--料金グループよりSYSIDに紐づく料金グループコードを表示順序の昇順で取得する（キャンセルされた料金グループコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_003

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PRC_GRP_CD = C.CD_DIV
WHERE A.SVC_KEI_STAT = '920'
AND A.SYSID = ?
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_004)
#--料金グループよりサービス契約番号に紐づく料金グループコードを表示順序の昇順で取得する（月末時点に契約していた料金グループコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_004

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PRC_GRP_CD = C.CD_DIV
WHERE A.SHOSA_YMD < ?
AND A.SVC_KEI_STAT IN('020','030','100','210','220','910')
AND A.SVC_KEI_NO = ?
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_005)
#--料金グループよりサービス契約番号に紐づく料金グループコードを表示順序の昇順で取得する（翌月以降にサービスが始まる料金グループコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_005

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PRC_GRP_CD = C.CD_DIV
WHERE A.SVC_KEI_STAT IN('020','030','100','210','220')
AND A.SVC_KEI_NO = ?
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_006)
#--料金グループよりサービス契約番号に紐づく料金グループコードを表示順序の昇順で取得する（キャンセルされた料金グループコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_006

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PRC_GRP_CD = C.CD_DIV
WHERE A.SVC_KEI_STAT = '920'
AND A.SVC_KEI_NO = ?
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_007)
#--料金グループよりSYSIDに紐づく料金グループコードを表示順序の昇順で取得する（集計時点に契約している料金グループコードを取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_007

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PRC_GRP_CD = C.CD_DIV
WHERE A.SYSID = ?
AND A.SHOSA_YMD <= ?
AND A.SVC_ENDYMD >= ?
AND A.SVC_KEI_STAT IN('020','030','100','210','220')
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_008)
#--料金グループより、サービス契約番号に紐づく現在契約されている料金グループコードを取得する。
#-----------------------------------------------------------

--KEY:CN_SELECT_008

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.SVC_KEI_NO ,
                MAX(B.RSV_APLY_YMD || B.GENE_ADD_DTM) AS GENE_ADD_DTM_MAX 
                FROM KK_T_SVC_KEI B 
                WHERE (B.RSV_APLY_CD = '2' OR B.RSV_APLY_CD IS NULL) 
                AND B.MK_FLG = '0' 
                AND B.RSV_APLY_YMD < ?
                AND B.SHOSA_YMD < ?
                AND B.SVC_ENDYMD >= ?
                AND B.SVC_KEI_STAT IN('020','030','100','210','220')
                AND B.SVC_KEI_NO = ? 
                GROUP BY B.SVC_KEI_NO) C
    ON A.SVC_KEI_NO = C.SVC_KEI_NO 
    AND (A.RSV_APLY_YMD || A.GENE_ADD_DTM) = C.GENE_ADD_DTM_MAX

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_009)
#--料金グループより、サービス契約番号に紐づく過去に契約されていた料金グループコードを取得する。
#-----------------------------------------------------------

--KEY:CN_SELECT_009

SELECT
A.PRC_GRP_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.SVC_KEI_NO ,
                MAX(B.RSV_APLY_YMD || B.GENE_ADD_DTM) AS GENE_ADD_DTM_MAX 
                FROM KK_T_SVC_KEI B 
                WHERE (B.RSV_APLY_CD = '2' OR B.RSV_APLY_CD IS NULL) 
                AND B.MK_FLG = '0' 
                AND B.RSV_APLY_YMD < ?
                AND B.SHOSA_YMD < ?
                AND B.SVC_ENDYMD >= ?
                AND B.SVC_ENDYMD < ?
                AND B.SVC_KEI_STAT IN('020','030','100','210','220','910')
                AND B.SVC_KEI_NO = ? 
                GROUP BY B.SVC_KEI_NO) C
    ON A.SVC_KEI_NO = C.SVC_KEI_NO 
    AND (A.RSV_APLY_YMD || A.GENE_ADD_DTM) = C.GENE_ADD_DTM_MAX

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_010)
#--料金グループよりSYSIDに紐づく料金コースコードを表示順序の昇順で取得する（月末時点に契約していた料金コースコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_010

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PCRS_CD = C.CD_DIV
WHERE A.SHOSA_YMD < ?
AND A.SVC_KEI_STAT IN('020','030','100','210','220','910')
AND A.SYSID = ?
AND A.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_011)
#--料金グループよりSYSIDに紐づく料金コースコードを表示順序の昇順で取得する（翌月以降にサービスが始まる料金コースコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_011

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PCRS_CD = C.CD_DIV
WHERE A.SVC_KEI_STAT IN('020','030','100','210','220')
AND A.SYSID = ?
AND A.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_012)
#--料金グループよりSYSIDに紐づく料金コースコードを表示順序の昇順で取得する（キャンセルされた料金コースコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_012

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PCRS_CD = C.CD_DIV
WHERE A.SVC_KEI_STAT = '920'
AND A.SYSID = ?
AND A.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_013)
#--料金グループよりサービス契約番号に紐づく料金コースコードを表示順序の昇順で取得する（月末時点に契約していた料金コースコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_013

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PRC_GRP_CD = C.CD_DIV
WHERE A.SHOSA_YMD < ?
AND A.SVC_KEI_STAT IN('020','030','100','210','220','910')
AND A.SVC_KEI_NO = ?
AND A.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_014)
#--料金グループよりサービス契約番号に紐づく料金コースコードを表示順序の昇順で取得する（翌月以降にサービスが始まる料金コースコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_014

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PCRS_CD = C.CD_DIV
WHERE A.SVC_KEI_STAT IN('020','030','100','210','220')
AND A.SVC_KEI_NO = ?
AND A.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_015)
#--料金グループよりサービス契約番号に紐づく料金コースコードを表示順序の昇順で取得する（キャンセルされた料金コースコード取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_015

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PCRS_CD = C.CD_DIV
WHERE A.SVC_KEI_STAT = '920'
AND A.SVC_KEI_NO = ?
AND A.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_016)
#--料金グループよりSYSIDに紐づく料金コースコードを表示順序の昇順で取得する（集計時点に契約している料金コースコードを取得）。
#-----------------------------------------------------------

--KEY:CN_SELECT_016

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.CD_DIV,
                B.DSP_JUN
                FROM ZM_M_CD_NM_KANRI B
                WHERE B.CD_SBT_CD = 'CD01201'
                AND B.MK_FLG = '0') C
    ON A.PCRS_CD = C.CD_DIV
WHERE A.SYSID = ?
AND A.SHOSA_YMD <= ?
AND A.SVC_ENDYMD >= ?
AND A.SVC_KEI_STAT IN('020','030','100','210','220')
AND A.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
AND A.MK_FLG = '0'
ORDER BY C.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_017)
#--料金グループより、サービス契約番号に紐づく現在契約されている料金コースコードを取得する。
#-----------------------------------------------------------

--KEY:CN_SELECT_017

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.SVC_KEI_NO ,
                MAX(B.RSV_APLY_YMD || B.GENE_ADD_DTM) AS GENE_ADD_DTM_MAX 
                FROM KK_T_SVC_KEI B 
                WHERE (B.RSV_APLY_CD = '2' OR B.RSV_APLY_CD IS NULL) 
                AND B.MK_FLG = '0' 
                AND B.RSV_APLY_YMD < ?
                AND B.SHOSA_YMD < ?
                AND B.SVC_ENDYMD >= ?
                AND B.SVC_KEI_STAT IN('020','030','100','210','220')
                AND B.SVC_KEI_NO = ? 
                AND B.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
                GROUP BY B.SVC_KEI_NO) C
    ON A.SVC_KEI_NO = C.SVC_KEI_NO 
    AND (A.RSV_APLY_YMD || A.GENE_ADD_DTM) = C.GENE_ADD_DTM_MAX

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_018)
#--料金グループより、サービス契約番号に紐づく過去に契約されていた料金コースコードを取得する。
#-----------------------------------------------------------

--KEY:CN_SELECT_018

SELECT
A.PCRS_CD
FROM KK_T_SVC_KEI A
    INNER JOIN (SELECT
                B.SVC_KEI_NO ,
                MAX(B.RSV_APLY_YMD || B.GENE_ADD_DTM) AS GENE_ADD_DTM_MAX 
                FROM KK_T_SVC_KEI B 
                WHERE (B.RSV_APLY_CD = '2' OR B.RSV_APLY_CD IS NULL) 
                AND B.MK_FLG = '0' 
                AND B.RSV_APLY_YMD < ?
                AND B.SHOSA_YMD < ?
                AND B.SVC_ENDYMD >= ?
                AND B.SVC_ENDYMD < ?
                AND B.SVC_KEI_STAT IN('020','030','100','210','220','910')
                AND B.SVC_KEI_NO = ? 
                AND B.PCRS_CD IN('A50','A51','A52','A53','A54','A55','A56','A57')
                GROUP BY B.SVC_KEI_NO) C
    ON A.SVC_KEI_NO = C.SVC_KEI_NO 
    AND (A.RSV_APLY_YMD || A.GENE_ADD_DTM) = C.GENE_ADD_DTM_MAX

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_019)
#--SYSIDに紐づくサービス契約より
#-----------------------------------------------------------

--KEY:CN_SELECT_019

SELECT KK0081.SVC_KEI_NO,
       KK0081.PRC_GRP_CD,
       ZM0171.DSP_JUN 
FROM KK_T_SVC_KEI KK0081
INNER JOIN (SELECT
            L.CD_DIV,
            L.DSP_JUN
            FROM ZM_M_CD_NM_KANRI L
            WHERE L.CD_SBT_CD = 'CD01201'
            AND L.MK_FLG = '0') ZM0171
ON KK0081.PRC_GRP_CD = ZM0171.CD_DIV
WHERE KK0081.SYSID = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2')
   AND KK0081.MK_FLG = '0'
ORDER BY ZM0171.DSP_JUN

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_001)
#--サービス契約番号存在チェック
#--・問合せ履歴取込処理
#-----------------------------------------------------------

--KEY:CR_SELECT_001

SELECT
 COUNT(*) AS CNT
FROM
 KK_T_SVC_KEI SVK,
 CK_T_CUST CUST
WHERE
 SVK.SVC_KEI_NO = ?
 AND SVK.PRC_GRP_CD <> '99'
 AND SVK.RSV_APLY_YMD || SVK.GENE_ADD_DTM =
     (
       SELECT
        MAX(SVK_GENE.RSV_APLY_YMD || SVK_GENE.GENE_ADD_DTM) AS SVK_MAX
       FROM
        KK_T_SVC_KEI SVK_GENE
       WHERE
        SVK_GENE.SVC_KEI_NO = SVK.SVC_KEI_NO
        AND SVK_GENE.RSV_APLY_YMD <= ?
        AND SVK_GENE.RSV_APLY_CD = '2'
        AND SVK_GENE.MK_FLG = '0'
     )
 AND CUST.SYSID = SVK.SYSID
 AND (CUST.KEISHA_TYPE_CD <> '5' OR CUST.KEISHA_TYPE_CD IS NULL)
 AND CUST.RSV_APLY_YMD || CUST.GENE_ADD_DTM =
     (
       SELECT
        MAX(CUST_GENE.RSV_APLY_YMD || CUST_GENE.GENE_ADD_DTM) AS CUST_MAX
       FROM
        CK_T_CUST CUST_GENE
       WHERE
        CUST_GENE.SYSID = CUST.SYSID
        AND CUST_GENE.RSV_APLY_YMD <= ?
        AND CUST_GENE.RSV_APLY_CD = '2'
        AND CUST_GENE.MK_FLG = '0'
     )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_002)
#--SYSIDからサービス契約を取得する
#--(契約中のデータを優先し、契約の新しいものから順番に取得)
#--※　サービス契約ステータス
#--　　　　'100'(サービス提供中)、'030'（締結済）
#--問合せ履歴取込処理
#-----------------------------------------------------------

--KEY:CR_SELECT_002

SELECT
 SVK.SVC_KEI_NO AS SVC_KEI_NO,
 DECODE(SVK.SVC_KEI_STAT, '100', 0, '030', 1, 2)  AS KEIYAKU_JUN
FROM
 KK_T_SVC_KEI SVK
WHERE
 SVK.SYSID = ?
 AND SVK.PRC_GRP_CD <> '99'
 AND SVK.RSV_APLY_YMD || SVK.GENE_ADD_DTM =
     (
       SELECT
        MAX(SVK_GENE.RSV_APLY_YMD || SVK_GENE.GENE_ADD_DTM) AS SVK_MAX
       FROM
        KK_T_SVC_KEI SVK_GENE
       WHERE
        SVK_GENE.SVC_KEI_NO = SVK.SVC_KEI_NO
        AND SVK_GENE.RSV_APLY_YMD <= ?
        AND SVK_GENE.RSV_APLY_CD = '2'
        AND SVK_GENE.MK_FLG = '0'
     )
ORDER BY
 KEIYAKU_JUN,
 SVK.KEI_CNC_YMD DESC,
 SVK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_003)
#--サービス契約番号からサービスコード、SYSIDを取得する。
#--・ホットボイス抽出
#-----------------------------------------------------------

--KEY:CR_SELECT_003

SELECT
  SVK.SVC_CD,
  SVK.SYSID SYSID,
  (
    SELECT
      SVC.SVC_NM
    FROM
      KK_M_SVC SVC
    WHERE
      SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM =
        (
          SELECT
            MAX(SVC_GENE.RSV_APLY_YMD || SVC_GENE.GENE_ADD_DTM) AS MAX_GENE
          FROM
            KK_M_SVC SVC_GENE
          WHERE
            SVC_GENE.SVC_CD = SVC.SVC_CD
            AND SVC_GENE.RSV_APLY_YMD <= SVK.UPD_UNYO_YMD
            AND SVC.MK_FLG = '0'
         )
      AND SVC.SVC_CD = SVK.SVC_CD
      AND SVC.SVC_TSTAYMD <= SVK.UPD_UNYO_YMD
      AND SVC.SVC_TENDYMD >= SVK.UPD_UNYO_YMD
  ) SVC_NM
FROM
 KK_T_SVC_KEI SVK
WHERE
 SVK.SVC_KEI_NO = ?
 AND SVK.PRC_GRP_CD <> '99'
 AND SVK.RSV_APLY_YMD || SVK.GENE_ADD_DTM =
     (
       SELECT
        MAX(SVK_GENE.RSV_APLY_YMD || SVK_GENE.GENE_ADD_DTM) AS SVK_MAX
       FROM
        KK_T_SVC_KEI SVK_GENE
       WHERE
        SVK_GENE.SVC_KEI_NO = SVK.SVC_KEI_NO
        AND SVK_GENE.RSV_APLY_YMD <= ?
        AND SVK_GENE.RSV_APLY_CD = '2'
        AND SVK_GENE.MK_FLG = '0'
     )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_004)
#--サービス契約番号からSYSIDを検索する。
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_004

SELECT DISTINCT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '100', 0, '030', 1, 2)  AS KEIYAKU_JUN
FROM
  KK_T_SVC_KEI SVCK
WHERE
  SVCK.SVC_KEI_NO = ?
  AND SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_005)
#--PPP認証IDからサービス契約情報を検索する。
#--(契約中のデータを優先し、契約の新しいものから順番に取得)
#--※　サービス契約ステータス
#--　　　　'100'(サービス提供中)、'030'（締結済）
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_005

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '100', 0, '030', 1, 2)  AS KEIYAKU_JUN
FROM
  KK_T_SVC_KEI SVCK,
  KK_T_SVC_KEI_EOH_TEL SKET
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND SKET.SVC_KEI_NO = SVCK.SVC_KEI_NO
  AND SKET.GENE_ADD_DTM = SVCK.GENE_ADD_DTM
  AND SKET.PPP_NINSHO_ID = ?
  AND SKET.MK_FLG = '0'
ORDER BY
  KEIYAKU_JUN,
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_006)
#--ISP認証IDからサービス契約情報を検索する。
#--(契約中のデータを優先し、契約の新しいものから順番に取得)
#--※　サービス契約ステータス
#--　　　　'100'(サービス提供中)、'030'（締結済）
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_006

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '100', 0, '030', 1, 2)  AS KEIYAKU_JUN
FROM
  KK_T_SVC_KEI SVCK,
  KK_T_SVC_KEI_UCWK SKUW,
  KK_T_SVKEIUW_EOH_NET SUEN
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND SKUW.SVC_KEI_NO = SVCK.SVC_KEI_NO
  AND SKUW.RSV_APLY_YMD || SKUW.GENE_ADD_DTM =
      (
        SELECT
          MAX(SKUW_GENE.RSV_APLY_YMD || SKUW_GENE.GENE_ADD_DTM) AS SKUW_MAX
        FROM
          KK_T_SVC_KEI_UCWK SKUW_GENE
        WHERE
          SKUW_GENE.SVC_KEI_UCWK_NO = SKUW.SVC_KEI_UCWK_NO
          AND SKUW_GENE.RSV_APLY_YMD <= ?
          AND SKUW_GENE.RSV_APLY_CD = '2'
          AND SKUW_GENE.MK_FLG = '0'
      )
  AND SUEN.SVC_KEI_UCWK_NO = SKUW.SVC_KEI_UCWK_NO
  AND SUEN.GENE_ADD_DTM = SKUW.GENE_ADD_DTM
  AND SUEN.ISP_NINSHO_ID = ?
  AND SUEN.MK_FLG = '0'
ORDER BY
  KEIYAKU_JUN,
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_007)
#--ADSL認証IDからサービス契約情報を検索する。
#--(契約中のデータを優先し、契約の新しいものから順番に取得)
#--※　サービス契約ステータス
#--　　　　'100'(サービス提供中)、'030'（締結済）
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_007

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '100', 0, '030', 1, 2)  AS KEIYAKU_JUN
FROM
  KK_T_SVC_KEI SVCK,
  KK_T_SVC_KEI_UCWK SKUW,
  KK_T_SVKEIUW_EOADSL ADSL
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND SKUW.SVC_KEI_NO = SVCK.SVC_KEI_NO
  AND SKUW.RSV_APLY_YMD || SKUW.GENE_ADD_DTM =
      (
        SELECT
          MAX(SKUW_GENE.RSV_APLY_YMD || SKUW_GENE.GENE_ADD_DTM) AS SKUW_MAX
        FROM
          KK_T_SVC_KEI_UCWK SKUW_GENE
        WHERE
          SKUW_GENE.SVC_KEI_UCWK_NO = SKUW.SVC_KEI_UCWK_NO
          AND SKUW_GENE.RSV_APLY_YMD <= ?
          AND SKUW_GENE.RSV_APLY_CD = '2'
          AND SKUW_GENE.MK_FLG = '0'
      )
  AND ADSL.SVC_KEI_UCWK_NO = SKUW.SVC_KEI_UCWK_NO
  AND ADSL.GENE_ADD_DTM = SKUW.GENE_ADD_DTM
  AND ADSL.ADSL_NINSHO_ID = ?
  AND ADSL.MK_FLG = '0'
ORDER BY
  KEIYAKU_JUN,
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_008)
#--UQ認証IDからサービス契約情報を検索する。
#--(契約中のデータを優先し、契約の新しいものから順番に取得)
#--※　サービス契約ステータス
#--　　　　'100'(サービス提供中)、'030'（締結済）
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_008

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '100', 0, '030', 1, 2)  AS KEIYAKU_JUN
FROM
  KK_T_SVC_KEI SVCK,
  KK_T_SVC_KEI_UCWK SKUW,
  KK_T_SVKEIUW_EOMOBA SUEM
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND SKUW.SVC_KEI_NO = SVCK.SVC_KEI_NO
  AND SKUW.RSV_APLY_YMD || SKUW.GENE_ADD_DTM =
      (
        SELECT
          MAX(SKUW_GENE.RSV_APLY_YMD || SKUW_GENE.GENE_ADD_DTM) AS SKUW_MAX
        FROM
          KK_T_SVC_KEI_UCWK SKUW_GENE
        WHERE
          SKUW_GENE.SVC_KEI_UCWK_NO = SKUW.SVC_KEI_UCWK_NO
          AND SKUW_GENE.RSV_APLY_YMD <= ?
          AND SKUW_GENE.RSV_APLY_CD = '2'
          AND SKUW_GENE.MK_FLG = '0'
      )
  AND SUEM.SVC_KEI_UCWK_NO = SKUW.SVC_KEI_UCWK_NO
  AND SUEM.GENE_ADD_DTM = SKUW.GENE_ADD_DTM
  AND SUEM.UQ_NINSHO_ID = ?
  AND SUEM.MK_FLG = '0'
ORDER BY
  KEIYAKU_JUN,
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_009)
#--ダイアルアップ接続用認証IDからサービス契約情報を検索する。
#--(契約中のデータを優先し、契約の新しいものから順番に取得)
#--※　サービス契約ステータス
#--　　　　'100'(サービス提供中)、'030'（締結済）
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_009

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '100', 0, '030', 1, 2)  AS KEIYAKU_JUN
FROM
  KK_T_SVC_KEI SVCK,
  KK_T_SVC_KEI_UCWK SKUW,
  KK_T_OP_SVC_KEI OPSK,
  KK_T_OPSVKEI_ISP OSKI
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND SKUW.SVC_KEI_NO = SVCK.SVC_KEI_NO
  AND SKUW.RSV_APLY_YMD || SKUW.GENE_ADD_DTM =
      (
        SELECT
          MAX(SKUW_GENE.RSV_APLY_YMD || SKUW_GENE.GENE_ADD_DTM) AS SKUW_MAX
        FROM
          KK_T_SVC_KEI_UCWK SKUW_GENE
        WHERE
          SKUW_GENE.SVC_KEI_UCWK_NO = SKUW.SVC_KEI_UCWK_NO
          AND SKUW_GENE.RSV_APLY_YMD <= ?
          AND SKUW_GENE.RSV_APLY_CD = '2'
          AND SKUW_GENE.MK_FLG = '0'
      )
  AND OPSK.SVC_KEI_NO = SKUW.SVC_KEI_NO
  AND OPSK.SVC_KEI_UCWK_NO = SKUW.SVC_KEI_UCWK_NO
  AND OPSK.RSV_APLY_YMD || OPSK.GENE_ADD_DTM =
      (
        SELECT
          MAX(OPSK_GENE.RSV_APLY_YMD || OPSK_GENE.GENE_ADD_DTM) AS OPSK_MAX
        FROM
          KK_T_OP_SVC_KEI OPSK_GENE
        WHERE
          OPSK_GENE.OP_SVC_KEI_NO = OPSK.OP_SVC_KEI_NO
          AND OPSK_GENE.RSV_APLY_YMD <= ?
          AND OPSK_GENE.RSV_APLY_CD = '2'
          AND OPSK_GENE.MK_FLG = '0'
      )
  AND OSKI.OP_SVC_KEI_NO = OPSK.OP_SVC_KEI_NO
  AND OSKI.GENE_ADD_DTM = OPSK.GENE_ADD_DTM
  AND OSKI.DUPCON_NINSHO_ID = ?
  AND OSKI.MK_FLG = '0'
ORDER BY
  KEIYAKU_JUN,
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_010)
#--eoIDからサービス契約情報を検索する。
#--(料金グループ・契約ステータスの組み合わせにて
#--データを優先し、契約の新しいものから順番に取得)
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_010

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '010', 1, '020' , 1, '030', 0, '100', 0, '210', 0, '220', 0, 99) AS KEIYAKU_JUN,
  DECODE(SVCK.PRC_GRP_CD, '02' , 1, '03', 1, '04', 1, '07', 5, '08', 5, '09' , 5 , '10' , 3 , '11' , 2 , '12' , 2 , '13' , 2 , '14' , 6 , '51' , 4 , 7) AS SVC_JUN
FROM
  KK_T_SVC_KEI SVCK,
  CK_T_CUST CUST
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND CUST.SYSID = SVCK.SYSID
  AND (CUST.KEISHA_TYPE_CD <> '5' OR CUST.KEISHA_TYPE_CD IS NULL)
  AND CUST.EOID = ?
  AND CUST.RSV_APLY_YMD || CUST.GENE_ADD_DTM =
      (
        SELECT
          MAX(CUST_GENE.RSV_APLY_YMD || CUST_GENE.GENE_ADD_DTM) AS CUST_MAX
        FROM
          CK_T_CUST CUST_GENE
        WHERE
          CUST_GENE.SYSID = CUST.SYSID
          AND CUST_GENE.RSV_APLY_YMD <= ?
          AND CUST_GENE.RSV_APLY_CD = '2'
          AND CUST_GENE.MK_FLG = '0'
      )
ORDER BY
  to_number(SVC_JUN || KEIYAKU_JUN),
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_011)
#--連絡先メールアドレスからサービス契約情報を検索する。
#--(料金グループ・契約ステータスの組み合わせにて
#--データを優先し、契約の新しいものから順番に取得)
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_011

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '010', 1, '020' , 1, '030', 0, '100', 0, '210', 0, '220', 0, 99) AS KEIYAKU_JUN ,
  DECODE(SVCK.PRC_GRP_CD, '02' , 1, '03', 1, '04', 1, '07', 5, '08', 5, '09' , 5 , '10' , 3 , '11' , 2 , '12' , 2 , '13' , 2 , '14' , 6 , '51' , 4 , 7) AS SVC_JUN
FROM
  KK_T_SVC_KEI SVCK,
  CK_T_RRKS RRKS
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND RRKS.SYSID = SVCK.SYSID
  AND RRKS.MLAD = ?
  AND RRKS.RSV_APLY_YMD || RRKS.GENE_ADD_DTM =
      (
        SELECT
          MAX(RRKS_GENE.RSV_APLY_YMD || RRKS_GENE.GENE_ADD_DTM) AS RRKS_MAX
        FROM
          CK_T_RRKS RRKS_GENE
        WHERE
          RRKS_GENE.RRKS_NO = RRKS.RRKS_NO
          AND RRKS_GENE.RSV_APLY_YMD <= ?
          AND RRKS_GENE.RSV_APLY_CD = '2'
          AND RRKS_GENE.MK_FLG = '0'
      )
ORDER BY
  to_number(SVC_JUN || KEIYAKU_JUN),
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_012)
#--オプションサービス契約<ISP>のメールアドレスからサービス契約情報を検索する。
#--(料金グループ・契約ステータスの組み合わせにて
#--データを優先し、契約の新しいものから順番に取得)
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_012

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '010', 1, '020' , 1, '030', 0, '100', 0, '210', 0, '220', 0, 99) AS KEIYAKU_JUN ,
  DECODE(SVCK.PRC_GRP_CD, '02' , 1, '03', 1, '04', 1, '07', 5, '08', 5, '09' , 5 , '10' , 3 , '11' , 2 , '12' , 2 , '13' , 2 , '14' , 6 , '51' , 4 , 7) AS SVC_JUN
FROM
  KK_T_SVC_KEI SVCK,
  KK_T_OP_SVC_KEI OPSK,
  KK_T_OPSVKEI_ISP OSKI
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND OPSK.SVC_KEI_NO = SVCK.SVC_KEI_NO
  AND OPSK.RSV_APLY_YMD || OPSK.GENE_ADD_DTM =
      (
        SELECT
          MAX(OPSK_GENE.RSV_APLY_YMD || OPSK_GENE.GENE_ADD_DTM) AS OPSK_MAX
        FROM
          KK_T_OP_SVC_KEI OPSK_GENE
        WHERE
          OPSK_GENE.OP_SVC_KEI_NO = OPSK.OP_SVC_KEI_NO
          AND OPSK_GENE.RSV_APLY_YMD <= ?
          AND OPSK_GENE.RSV_APLY_CD = '2'
          AND OPSK_GENE.MK_FLG = '0'
      )
  AND OSKI.OP_SVC_KEI_NO = OPSK.OP_SVC_KEI_NO
  AND OSKI.GENE_ADD_DTM = OPSK.GENE_ADD_DTM
  AND OSKI.MLAD = ?
  AND OSKI.MK_FLG = '0'
ORDER BY
  to_number(SVC_JUN || KEIYAKU_JUN),
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_013)
#--サブオプションサービス契約<ISP>のエイリアスからサービス契約情報を検索する。
#-- 引数1：予約適用年月日
#-- 引数2：予約適用年月日
#-- 引数3：'%@ドメイン'
#-- 引数4：予約適用年月日
#-- 引数5：メールアカウント(@以下を含まない)
#--(料金グループ・契約ステータスの組み合わせにて
#--データを優先し、契約の新しいものから順番に取得)
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_013

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '010', 1, '020' , 1, '030', 0, '100', 0, '210', 0, '220', 0, 99) AS KEIYAKU_JUN ,
  DECODE(SVCK.PRC_GRP_CD, '02' , 1, '03', 1, '04', 1, '07', 5, '08', 5, '09' , 5 , '10' , 3 , '11' , 2 , '12' , 2 , '13' , 2 , '14' , 6 , '51' , 4 , 7) AS SVC_JUN
FROM
  KK_T_SVC_KEI SVCK,
  KK_T_OP_SVC_KEI OPSK,
  KK_T_SBOP_SVC_KEI SOSK,
  KK_T_SBOPSVKEI_ISP SOSI
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND OPSK.SVC_KEI_NO = SVCK.SVC_KEI_NO
  AND OPSK.RSV_APLY_YMD || OPSK.GENE_ADD_DTM =
      (
        SELECT
          MAX(OPSK_GENE.RSV_APLY_YMD || OPSK_GENE.GENE_ADD_DTM) AS OPSK_MAX
        FROM
          KK_T_OP_SVC_KEI OPSK_GENE
        WHERE
          OPSK_GENE.OP_SVC_KEI_NO = OPSK.OP_SVC_KEI_NO
          AND OPSK_GENE.RSV_APLY_YMD <= ?
          AND OPSK_GENE.RSV_APLY_CD = '2'
          AND OPSK_GENE.MK_FLG = '0'
      )
  AND EXISTS
      (
        SELECT
          1
        FROM
          KK_T_OPSVKEI_ISP OSKI
        WHERE
          OSKI.OP_SVC_KEI_NO = OPSK.OP_SVC_KEI_NO
          AND OSKI.GENE_ADD_DTM = OPSK.GENE_ADD_DTM
          AND OSKI.MLAD LIKE ? ESCAPE '\'
          AND OSKI.MK_FLG = '0'
       )
  AND SOSK.OP_SVC_KEI_NO = OPSK.OP_SVC_KEI_NO
  AND SOSK.RSV_APLY_YMD || SOSK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SOSK_GENE.RSV_APLY_YMD || SOSK_GENE.GENE_ADD_DTM) AS SOSK_MAX
        FROM
          KK_T_SBOP_SVC_KEI SOSK_GENE
        WHERE
          SOSK_GENE.OP_SVC_KEI_NO = SOSK.OP_SVC_KEI_NO
          AND SOSK_GENE.SBOP_SVC_KEI_NO = SOSK.SBOP_SVC_KEI_NO
          AND SOSK_GENE.RSV_APLY_YMD <= ?
          AND SOSK_GENE.RSV_APLY_CD = '2'
          AND SOSK_GENE.MK_FLG = '0'
      )
  AND SOSI.OP_SVC_KEI_NO = SOSK.OP_SVC_KEI_NO
  AND SOSI.GENE_ADD_DTM = SOSK.GENE_ADD_DTM
  AND SOSI.ALIAS = ?
  AND SOSI.MK_FLG = '0'
ORDER BY
  to_number(SVC_JUN || KEIYAKU_JUN),
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_014)
#--申込連絡先メールアドレスからサービス契約情報を検索する。
#--(料金グループ・契約ステータスの組み合わせにて
#--データを優先し、契約の新しいものから順番に取得)
#--・問合せメール取込
#-----------------------------------------------------------

--KEY:CR_SELECT_014

SELECT
  SVCK.SVC_KEI_NO,
  SVCK.SYSID,
  SVCK.SVC_KEI_STAT,
  SVCK.KEI_CNC_YMD,
  SVCK.ADD_DTM,
  DECODE(SVCK.SVC_KEI_STAT, '010', 1, '020' , 1, '030', 0, '100', 0, '210', 0, '220', 0, 99) AS KEIYAKU_JUN ,
  DECODE(SVCK.PRC_GRP_CD, '02' , 1, '03', 1, '04', 1, '07', 5, '08', 5, '09' , 5 , '10' , 3 , '11' , 2 , '12' , 2 , '13' , 2 , '14' , 6 , '51' , 4 , 7) AS SVC_JUN
FROM
  KK_T_SVC_KEI SVCK,
  KK_T_MSKM_DTL MKDL
WHERE
  SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
  AND MKDL.SYSID = SVCK.SYSID
  AND MKDL.MSKM_RRKS_MLAD = ?
  AND MKDL.GENE_ADD_DTM =
      (
        SELECT
          MAX(MKDL_GENE.GENE_ADD_DTM) AS MKDL_MAX
        FROM
          KK_T_MSKM_DTL MKDL_GENE
        WHERE
          MKDL_GENE.MSKM_DTL_NO = MKDL.MSKM_DTL_NO
          AND MKDL_GENE.MK_FLG = '0'
      )
ORDER BY
  to_number(SVC_JUN || KEIYAKU_JUN),
  SVCK.KEI_CNC_YMD DESC,
  SVCK.ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_015)
#--SYSIDからサービス契約番号を取得する。
#--※ 取得順 契約締結日(昇順)、登録年月日時分秒(昇順)
#--・問合せ顧客紐付変更処理
#-----------------------------------------------------------

--KEY:CR_SELECT_015

SELECT
  SVCK.SVC_KEI_NO
FROM
  KK_T_SVC_KEI SVCK
WHERE
  SVCK.SYSID = ?
  AND SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
ORDER BY
 SVCK.KEI_CNC_YMD ASC,
 SVCK.ADD_DTM ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_016)
#--サービス契約番号からサービス契約テーブルに登録されている最新世代のサービス契約情報を取得する。
#--・Abuse抽出
#-----------------------------------------------------------

--KEY:CR_SELECT_016

SELECT
  SVC_KEI.SVC_KEI_NO,
  SVC_KEI.SVC_KEI_STAT,
  SVC_KEI.SVC_STA_YMD,
  SVC_KEI.SVC_ENDYMD,
  SVC_KEI.PRC_GRP_CD,
  SVC_KEI.SYSID,
  SVC_KEI.MK_FLG,
  (
    SELECT
      CDNM.CD_DIV_NM
    FROM
      ZM_M_CD_NM_KANRI CDNM
    WHERE
      CDNM.CD_SBT_CD = 'CD00037'
      AND CDNM.CD_DIV = SVC_KEI.SVC_KEI_STAT
      AND CDNM.CD_TSTAYMD <= ?
      AND CDNM.CD_TENDYMD >= ?
      AND CDNM.MK_FLG = '0'
  ) CD_DIV_NM
FROM
  KK_T_SVC_KEI SVC_KEI 
WHERE
  SVC_KEI.SVC_KEI_NO = ?
  AND SVC_KEI.PRC_GRP_CD <> '99'
  AND SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX
        FROM
          KK_T_SVC_KEI SVC_KEI_GENE
        WHERE
          SVC_KEI_GENE.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
          AND SVC_KEI_GENE.RSV_APLY_YMD <= ?
          AND SVC_KEI_GENE.RSV_APLY_CD = '2'
      )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CR_SELECT_017)
#--SYSIDと申込明細番号からサービス契約番号を取得する。
#--※ 取得順 契約締結日(昇順)、登録年月日時分秒(昇順)
#--・問合せ顧客紐付変更処理
#-----------------------------------------------------------

--KEY:CR_SELECT_017

SELECT
  SVCK.SVC_KEI_NO
FROM
  KK_T_SVC_KEI SVCK
WHERE
  SVCK.SYSID = ?
  AND SVCK.MSKM_DTL_NO = ?
  AND SVCK.PRC_GRP_CD <> '99'
  AND SVCK.RSV_APLY_YMD || SVCK.GENE_ADD_DTM =
      (
        SELECT
          MAX(SVCK_GENE.RSV_APLY_YMD || SVCK_GENE.GENE_ADD_DTM) AS SVCK_MAX
        FROM
          KK_T_SVC_KEI SVCK_GENE
        WHERE
          SVCK_GENE.SVC_KEI_NO = SVCK.SVC_KEI_NO
          AND SVCK_GENE.RSV_APLY_YMD <= ?
          AND SVCK_GENE.RSV_APLY_CD = '2'
          AND SVCK_GENE.MK_FLG = '0'
      )
ORDER BY
 SVCK.KEI_CNC_YMD ASC,
 SVCK.ADD_DTM ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_112)
#--KKPRC00902
#--対象機器提供サービス契約更新
#--サービス契約の主キー情報（サービス契約番号,世代登録年月日時分秒）を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_112

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV,
    KK0081.SVC_CANCEL_RSN_CD,
    KK0081.SVC_STP_RSN_CD,
    KK0081.SVC_STP_RLS_RSN_CD,
    KK0081.SVC_PAUSE_RSN_CD,
    KK0081.SVC_PAUSE_RLS_RSN_CD,
    KK0081.SVC_DLRE_CD,
    KK0081.SVC_STA_YMD,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO =?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_122)
#--サービス契約情報を取得する（引継ぎ元情報）。
#-----------------------------------------------------------

--KEY:KK_SELECT_122

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SYSID,
    KK0081.PRC_GRP_CD,
    CK0011.CUST_NM,
    CK0011.GENE_ADD_DTM AS CK0011_GENE_ADD_DTM,
    KK0781.PRC_GRP_NM,
    KK0781.GENE_ADD_DTM AS KK0781_GENE_ADD_DTM
FROM KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD ||CK0011.GENE_ADD_DTM =
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
          FROM   CK_T_CUST CK0011_GENE
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID
          AND    CK0011_GENE.RSV_APLY_YMD <= ?
          AND    CK0011_GENE.RSV_APLY_CD = '2'
          AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_M_PRC_GRP KK0781
    ON KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD
    AND KK0781.PRC_GRP_TSTAYMD || KK0781.GENE_ADD_DTM = 
        (SELECT MAX(KK0781_GENE.PRC_GRP_TSTAYMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
         FROM KK_M_PRC_GRP KK0781_GENE
         WHERE KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
         AND   KK0781_GENE.PRC_GRP_TSTAYMD <= ?
         AND   KK0781_GENE.MK_FLG = '0')
WHERE  KK0081.SVC_KEI_NO = ?
AND    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
         (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_124)
#--UIA17_バッチ機能仕様書(KKPRC04601_サービス契約差分情報抽出)
#--3.全体構成/3-3.処理詳細
#-- (1)サービス契約取得(キャンセル)
#-----------------------------------------------------------

--KEY:KK_SELECT_124

SELECT SVC.SVC_KEI_NO,
       SVC.SEIRI_NO,
       SVC.SVC_CD,
       SVC.PRC_GRP_CD,
       SVC.PCRS_CD,
       SVC.PPLAN_CD,
       SVC.TK_HOSHIKI_KEI_NO,
       SVC.SVC_STA_YMD,
       SVC.SVC_CHRG_STAYMD,
       SVC.PLAN_CHRG_STAYMD,
       SVC.PLAN_CHRG_ENDYMD,
       SVC.SVC_DSL_YMD,
       SVC.SVC_DLRE_CD,
       SVC.PNLTY_HASSEI_CD,
       SVC.PLAN_END_SBT_CD,
       SVC.KAIHK_YMD,
       SVC.PAUSE_STP_CD,
       SVC.SVC_PAUSE_YMD,
       SVC.SVC_PAUSE_CHRG_STA_YMD,
       SVC.SVC_PAUSE_RLS_YMD,
       SVC.SVC_CANCEL_YMD,
       SVC.SVC_ENDYMD,
       SVC.SVC_CHRG_ENDYMD,
       SVC.IDO_DIV,
       SVC.GENE_ADD_DTM,
       DMY.REPLICA_MOTO_TK_HSK_KEI_NO
FROM   KK_T_SVC_KEI SVC
         INNER JOIN
           (SELECT SVC_KEI_NO,
                   SVC_CD,
                   PRC_GRP_CD,
                   PCRS_CD,
                   PPLAN_CD,
                   MAX(RSV_APLY_YMD||GENE_ADD_DTM) AS MAX_GENE
            FROM   KK_T_SVC_KEI
            WHERE  RSV_APLY_CD = ?
              AND  MK_FLG = '0'
            GROUP BY
                   SVC_KEI_NO,
                   SVC_CD,
                   PRC_GRP_CD,
                   PCRS_CD,
                   PPLAN_CD
           ) SVC_GENE
           ON  SVC.SVC_KEI_NO = SVC_GENE.SVC_KEI_NO
           AND SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM = SVC_GENE.MAX_GENE
         LEFT JOIN
           (SELECT SVC_KEI_NO,
                   GENE_ADD_DTM,
                   REPLICA_MOTO_TK_HSK_KEI_NO
            FROM   KK_T_SVC_KEI_DUMMY
            WHERE  RSV_APLY_CD = ?
              AND  MK_FLG = '0'
           ) DMY
           ON  SVC.SVC_KEI_NO = DMY.SVC_KEI_NO
           AND SVC.GENE_ADD_DTM = DMY.GENE_ADD_DTM
WHERE  SVC.SVC_KEI_NO = ?
  AND  SVC.SVC_CANCEL_YMD = ?
ORDER BY
       SVC.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_125)
#--光ハイブリットの不整合状態のデータを取得する。
#--5種類のデータを一括取得するため（１）から（５）のSQL文を結合しています。
#--（１）不整合エラー：光ネット（サービス提供中）　の対象取得
#--（２）不整合エラー：光ネット（休止・中断中、停止中、解約済、キャンセル済）　の対象取得
#--（３）不整合エラー：光ネット（受付済、照査済、締結済）　の対象取得
#--（４）不整合エラー：光ネット契約なし　の対象取得
#--（５）プラン変更エラー　の対象取得
#--（１）から（３）は、光ハイブリットの契約数を集計した情報と同一請求番号の光ネットの情報とを結合しています。
#-----------------------------------------------------------

--KEY:KK_SELECT_125

SELECT 
  SEIKY_KEI_NO,
  GYO_KBN,
  ERR_TYPE,
  SYSID,
  EOMOBA_SVC_KEI_NO,
  JIGYOSHA_KEI_ID,
  KEI_CNT,
  EOHNT_SVC_KEI_NO,
  SVKEI_STAT,
  KIKNISU
FROM
(
    SELECT
      KK0091_1_NET.SEIKY_KEI_NO          AS SEIKY_KEI_NO,
      '1'                                AS GYO_KBN,
      '不整合'                           AS ERR_TYPE,
      KK0321_1_HYB.HYB_SYSID             AS SYSID,
      '－'                               AS EOMOBA_SVC_KEI_NO,
      '－'                               AS JIGYOSHA_KEI_ID,
      TO_CHAR(KK0321_1_HYB.HYB_KEI_CNT)  AS KEI_CNT,
      KK0091_1_NET.SVC_KEI_NO            AS EOHNT_SVC_KEI_NO,
      (SELECT ZM0171_1.CD_DIV_NM
       FROM   ZM_M_CD_NM_KANRI  ZM0171_1
       WHERE  ZM0171_1.CD_SBT_CD   = 'CD00037'
       AND    ZM0171_1.CD_DIV      = KK0091_1_NET.SVC_KEI_STAT
       AND    ZM0171_1.CD_TSTAYMD  <= ?
       AND    ZM0171_1.CD_TENDYMD  >= ?
       AND    ZM0171_1.MK_FLG      = '0'
      )     AS SVKEI_STAT,
      '－'  AS KIKNISU
    FROM 
    (
      SELECT /*+ index(KK0081_1_HYB KK_T_SVC_KEI_IDX_06) */
        KK0321_1_1.SEIKY_KEI_NO       AS  SEIKY_KEI_NO,
        COUNT(KK0121_1.SVC_KEI_NO)    AS  HYB_KEI_CNT,
        MIN(KK0081_1_HYB.SYSID)       AS  HYB_SYSID,
        MIN(KK0121_1.JGS_CHRG_STAYMD) AS  HYB_JGS_CHRG_STAYMD
      FROM 
        KK_T_SVC_KEI  KK0081_1_HYB
      INNER JOIN
        KK_T_SVC_KEI_EOMOBA  KK0121_1
        ON   KK0081_1_HYB.SVC_KEI_NO      =  KK0121_1.SVC_KEI_NO
        AND  KK0081_1_HYB.GENE_ADD_DTM    =  KK0121_1.GENE_ADD_DTM
      INNER JOIN  KK_T_KAKINS  KK0321_1_1
        ON   KK0321_1_1.SVC_KEI_NO      =  KK0121_1.SVC_KEI_NO
      WHERE
             KK0081_1_HYB.PCRS_CD         IN ('A59', 'A60')
        AND  (KK0081_1_HYB.SVC_KEI_STAT IN ('020', '030', '100', '210', '220')
              OR  (KK0081_1_HYB.SVC_KEI_STAT = '910'
                    AND
                  NVL(KK0121_1.KYOSEI_DSL_FIX_FLG,' ')  <>  '1')
             )
        AND (KK0081_1_HYB.SVC_KEI_NO, KK0081_1_HYB.RSV_APLY_YMD || KK0081_1_HYB.GENE_ADD_DTM) =
            (SELECT KK0081_1_HYB_GENE.SVC_KEI_NO, MAX(KK0081_1_HYB_GENE.RSV_APLY_YMD || KK0081_1_HYB_GENE.GENE_ADD_DTM) AS KK0081_MAX_1
             FROM  KK_T_SVC_KEI KK0081_1_HYB_GENE 
             WHERE KK0081_1_HYB_GENE.SVC_KEI_NO = KK0081_1_HYB.SVC_KEI_NO
             AND   KK0081_1_HYB_GENE.RSV_APLY_YMD <= ?
             AND   KK0081_1_HYB_GENE.RSV_APLY_CD = '2'
             AND   KK0081_1_HYB_GENE.MK_FLG = '0'
             GROUP BY KK0081_1_HYB_GENE.SVC_KEI_NO)
        AND  KK0121_1.RSV_APLY_CD = '2'
        AND  KK0121_1.MK_FLG      = '0'
        AND  KK0321_1_1.KAKINS_TSTAYMD  <=  ?
        AND  KK0321_1_1.KAKINS_TENDYMD  >=  ?
        AND  KK0321_1_1.MK_FLG          = '0'
      GROUP BY KK0321_1_1.SEIKY_KEI_NO
    ) KK0321_1_HYB
    INNER JOIN 
    (
      SELECT  KK0091_1.SVC_KEI_NO, KK0081_1_NET.SVC_KEI_STAT, KK0321_1_2.SEIKY_KEI_NO
      FROM
        KK_T_SVC_KEI KK0081_1_NET
      INNER JOIN  
        KK_T_SVC_KEI_EOH_NET  KK0091_1
        ON   KK0081_1_NET.SVC_KEI_NO      =  KK0091_1.SVC_KEI_NO
        AND  KK0081_1_NET.GENE_ADD_DTM    =  KK0091_1.GENE_ADD_DTM
      INNER JOIN  KK_T_KAKINS KK0321_1_2
        ON   KK0321_1_2.SVC_KEI_NO      =   KK0091_1.SVC_KEI_NO
      WHERE 
            KK0081_1_NET.SVC_KEI_STAT    = '100'
        AND (KK0081_1_NET.SVC_KEI_NO, KK0081_1_NET.RSV_APLY_YMD || KK0081_1_NET.GENE_ADD_DTM) =
            (SELECT KK0081_1_NET_GENE.SVC_KEI_NO, MAX(KK0081_1_NET_GENE.RSV_APLY_YMD || KK0081_1_NET_GENE.GENE_ADD_DTM) AS KK0081_MAX_2
             FROM    KK_T_SVC_KEI KK0081_1_NET_GENE
             WHERE   KK0081_1_NET_GENE.SVC_KEI_NO  = KK0081_1_NET.SVC_KEI_NO
             AND     KK0081_1_NET_GENE.RSV_APLY_YMD <= ?
             AND     KK0081_1_NET_GENE.RSV_APLY_CD = '2'
             AND     KK0081_1_NET_GENE.MK_FLG      = '0'
             GROUP BY KK0081_1_NET_GENE.SVC_KEI_NO)
        AND  KK0091_1.RSV_APLY_CD = '2'
        AND  KK0091_1.MK_FLG      = '0'
        AND  KK0321_1_2.KAKINS_TSTAYMD  <=  ?
        AND  KK0321_1_2.KAKINS_TENDYMD  >=  ?
        AND  KK0321_1_2.MK_FLG = '0'
    ) KK0091_1_NET
    ON   KK0321_1_HYB.SEIKY_KEI_NO = KK0091_1_NET.SEIKY_KEI_NO
UNION ALL
    SELECT
      KK0091_2_NET.SEIKY_KEI_NO          AS SEIKY_KEI_NO,
      '2'                                AS GYO_KBN,
      '不整合'                           AS ERR_TYPE,
      KK0321_2_HYB.HYB_SYSID             AS SYSID,
      '－'                               AS EOMOBA_SVC_KEI_NO,
      '－'                               AS JIGYOSHA_KEI_ID,
      TO_CHAR(KK0321_2_HYB.HYB_KEI_CNT)  AS KEI_CNT,
      KK0091_2_NET.SVC_KEI_NO            AS EOHNT_SVC_KEI_NO,
      (SELECT ZM0171_2.CD_DIV_NM
       FROM   ZM_M_CD_NM_KANRI  ZM0171_2
       WHERE  ZM0171_2.CD_SBT_CD   = 'CD00037'
       AND    ZM0171_2.CD_DIV      = KK0091_2_NET.SVC_KEI_STAT
       AND    ZM0171_2.CD_TSTAYMD  <= ?
       AND    ZM0171_2.CD_TENDYMD  >= ?
       AND    ZM0171_2.MK_FLG      = '0'
      )      AS SVKEI_STAT,
      '－'   AS KIKNISU
    FROM 
    (
      SELECT /*+ index(KK0081_2_HYB KK_T_SVC_KEI_IDX_06) */
        KK0321_2_1.SEIKY_KEI_NO       AS  SEIKY_KEI_NO,
        COUNT(KK0121_2.SVC_KEI_NO)    AS  HYB_KEI_CNT,
        MIN(KK0081_2_HYB.SYSID)       AS  HYB_SYSID,
        MIN(KK0121_2.JGS_CHRG_STAYMD) AS  HYB_JGS_CHRG_STAYMD
      FROM 
        KK_T_SVC_KEI  KK0081_2_HYB
      INNER JOIN
        KK_T_SVC_KEI_EOMOBA  KK0121_2
        ON   KK0081_2_HYB.SVC_KEI_NO      =  KK0121_2.SVC_KEI_NO
        AND  KK0081_2_HYB.GENE_ADD_DTM    =  KK0121_2.GENE_ADD_DTM
      INNER JOIN  KK_T_KAKINS  KK0321_2_1
        ON   KK0321_2_1.SVC_KEI_NO      =  KK0121_2.SVC_KEI_NO
      WHERE
             KK0081_2_HYB.PCRS_CD         IN ('A59', 'A60')
        AND  KK0081_2_HYB.SVC_KEI_STAT IN ('020', '030', '100', '210', '220')
        AND (KK0081_2_HYB.SVC_KEI_NO, KK0081_2_HYB.RSV_APLY_YMD || KK0081_2_HYB.GENE_ADD_DTM) =
            (SELECT KK0081_2_HYB_GENE.SVC_KEI_NO, MAX(KK0081_2_HYB_GENE.RSV_APLY_YMD || KK0081_2_HYB_GENE.GENE_ADD_DTM) AS KK0081_MAX_3
             FROM    KK_T_SVC_KEI  KK0081_2_HYB_GENE
             WHERE   KK0081_2_HYB_GENE.SVC_KEI_NO  = KK0081_2_HYB.SVC_KEI_NO
             AND     KK0081_2_HYB_GENE.RSV_APLY_YMD <= ?
             AND     KK0081_2_HYB_GENE.RSV_APLY_CD = '2'
             AND     KK0081_2_HYB_GENE.MK_FLG      = '0'
             GROUP BY KK0081_2_HYB_GENE.SVC_KEI_NO)
        AND  KK0121_2.RSV_APLY_CD  = '2'
        AND  KK0121_2.MK_FLG       = '0'
        AND  KK0321_2_1.KAKINS_TSTAYMD  <=  ?
        AND  KK0321_2_1.KAKINS_TENDYMD  >=  ?
        AND  KK0321_2_1.MK_FLG          = '0'
      GROUP BY KK0321_2_1.SEIKY_KEI_NO
    ) KK0321_2_HYB
    INNER JOIN 
    (
      SELECT  KK0091_2.SVC_KEI_NO, KK0081_2_NET.SVC_KEI_STAT, KK0321_2_2.SEIKY_KEI_NO
      FROM
        KK_T_SVC_KEI KK0081_2_NET
      INNER JOIN
        KK_T_SVC_KEI_EOH_NET  KK0091_2
        ON   KK0081_2_NET.SVC_KEI_NO      =  KK0091_2.SVC_KEI_NO
        AND  KK0081_2_NET.GENE_ADD_DTM    =  KK0091_2.GENE_ADD_DTM
      INNER JOIN  KK_T_KAKINS KK0321_2_2
        ON   KK0321_2_2.SVC_KEI_NO      =   KK0091_2.SVC_KEI_NO
      WHERE
             KK0081_2_NET.SVC_KEI_STAT IN ('210', '220', '910', '920')
        AND (KK0081_2_NET.SVC_KEI_NO, KK0081_2_NET.RSV_APLY_YMD || KK0081_2_NET.GENE_ADD_DTM) =
            (SELECT KK0081_2_NET_GENE.SVC_KEI_NO, MAX(KK0081_2_NET_GENE.RSV_APLY_YMD || KK0081_2_NET_GENE.GENE_ADD_DTM) AS KK0081_MAX_4
             FROM    KK_T_SVC_KEI  KK0081_2_NET_GENE
             WHERE   KK0081_2_NET_GENE.SVC_KEI_NO  = KK0081_2_NET.SVC_KEI_NO
             AND     KK0081_2_NET_GENE.RSV_APLY_YMD <= ?
             AND     KK0081_2_NET_GENE.RSV_APLY_CD = '2'
             AND     KK0081_2_NET_GENE.MK_FLG      = '0'
             GROUP BY KK0081_2_NET_GENE.SVC_KEI_NO)
        AND  KK0091_2.RSV_APLY_CD = '2'
        AND  KK0091_2.MK_FLG      = '0'
        AND  KK0321_2_2.KAKINS_TSTAYMD  <=  ?
        AND  KK0321_2_2.KAKINS_TENDYMD  >=  ?
        AND  KK0321_2_2.MK_FLG           = '0'
    ) KK0091_2_NET
    ON   KK0321_2_HYB.SEIKY_KEI_NO = KK0091_2_NET.SEIKY_KEI_NO
UNION ALL
    SELECT
      KK0091_3_NET.SEIKY_KEI_NO          AS SEIKY_KEI_NO,
      '3'                                AS GYO_KBN,
      '不整合'                           AS ERR_TYPE,
      KK0321_3_HYB.HYB_SYSID             AS SYSID,
      '－'                               AS EOMOBA_SVC_KEI_NO,
      '－'                               AS JIGYOSHA_KEI_ID,
      TO_CHAR(KK0321_3_HYB.HYB_KEI_CNT)  AS KEI_CNT,
      KK0091_3_NET.SVC_KEI_NO            AS EOHNT_SVC_KEI_NO,
      (SELECT ZM0171_3.CD_DIV_NM
       FROM   ZM_M_CD_NM_KANRI  ZM0171_3
       WHERE  ZM0171_3.CD_SBT_CD   = 'CD00037'
       AND    ZM0171_3.CD_DIV      = KK0091_3_NET.SVC_KEI_STAT
       AND    ZM0171_3.CD_TSTAYMD  <= ?
       AND    ZM0171_3.CD_TENDYMD  >= ?
       AND    ZM0171_3.MK_FLG      = '0'
      )                                  AS SVKEI_STAT,
      KK0321_3_HYB.HYB_JGS_CHRG_STAYMD   AS KIKNISU
    FROM 
    (
      SELECT /*+ index(KK0081_3_HYB KK_T_SVC_KEI_IDX_06) */
        KK0321_3_1.SEIKY_KEI_NO       AS  SEIKY_KEI_NO,
        COUNT(KK0121_3.SVC_KEI_NO)    AS  HYB_KEI_CNT,
        MIN(KK0081_3_HYB.SYSID)       AS  HYB_SYSID,
        MIN(KK0121_3.JGS_CHRG_STAYMD) AS  HYB_JGS_CHRG_STAYMD
      FROM 
        KK_T_SVC_KEI  KK0081_3_HYB
      INNER JOIN
        KK_T_SVC_KEI_EOMOBA  KK0121_3
        ON   KK0081_3_HYB.SVC_KEI_NO      =  KK0121_3.SVC_KEI_NO
        AND  KK0081_3_HYB.GENE_ADD_DTM    =  KK0121_3.GENE_ADD_DTM
      INNER JOIN  KK_T_KAKINS  KK0321_3_1
        ON   KK0321_3_1.SVC_KEI_NO      =  KK0121_3.SVC_KEI_NO
      WHERE
             KK0081_3_HYB.PCRS_CD         IN ('A59', 'A60')
        AND  KK0081_3_HYB.SVC_KEI_STAT IN ('020', '030', '100', '210', '220')
        AND (KK0081_3_HYB.SVC_KEI_NO, KK0081_3_HYB.RSV_APLY_YMD || KK0081_3_HYB.GENE_ADD_DTM) =
            (SELECT KK0081_3_HYB_GENE.SVC_KEI_NO, MAX(KK0081_3_HYB_GENE.RSV_APLY_YMD || KK0081_3_HYB_GENE.GENE_ADD_DTM) AS KK0081_MAX_5
             FROM    KK_T_SVC_KEI  KK0081_3_HYB_GENE
             WHERE   KK0081_3_HYB_GENE.SVC_KEI_NO  = KK0081_3_HYB.SVC_KEI_NO
             AND     KK0081_3_HYB_GENE.RSV_APLY_YMD <= ?
             AND     KK0081_3_HYB_GENE.RSV_APLY_CD = '2'
             AND     KK0081_3_HYB_GENE.MK_FLG      = '0'
             GROUP BY KK0081_3_HYB_GENE.SVC_KEI_NO)
        AND  KK0121_3.JGS_CHRG_STAYMD IS NOT NULL
        AND  KK0121_3.RSV_APLY_CD  = '2'
        AND  KK0121_3.MK_FLG       = '0'
        AND  KK0321_3_1.KAKINS_TSTAYMD  <=  ?
        AND  KK0321_3_1.KAKINS_TENDYMD  >=  ?
        AND  KK0321_3_1.MK_FLG          = '0'
      GROUP BY KK0321_3_1.SEIKY_KEI_NO
    ) KK0321_3_HYB
    INNER JOIN 
    (
      SELECT  KK0091_3.SVC_KEI_NO, KK0081_3_NET.SVC_KEI_STAT, KK0321_3_2.SEIKY_KEI_NO
      FROM
        KK_T_SVC_KEI KK0081_3_NET
      INNER JOIN
        KK_T_SVC_KEI_EOH_NET  KK0091_3
        ON   KK0081_3_NET.SVC_KEI_NO      =  KK0091_3.SVC_KEI_NO
        AND  KK0081_3_NET.GENE_ADD_DTM    =  KK0091_3.GENE_ADD_DTM
      INNER JOIN  KK_T_KAKINS KK0321_3_2
        ON   KK0321_3_2.SVC_KEI_NO      =   KK0091_3.SVC_KEI_NO
      WHERE
             KK0081_3_NET.SVC_KEI_STAT IN ('010', '020', '030')
        AND (KK0081_3_NET.SVC_KEI_NO, KK0081_3_NET.RSV_APLY_YMD || KK0081_3_NET.GENE_ADD_DTM) =
            (SELECT KK0081_3_2.SVC_KEI_NO, MAX(KK0081_3_2.RSV_APLY_YMD || KK0081_3_2.GENE_ADD_DTM) AS KK0081_MAX_6
             FROM    KK_T_SVC_KEI  KK0081_3_2
             WHERE   KK0081_3_2.SVC_KEI_NO  = KK0081_3_NET.SVC_KEI_NO
             AND     KK0081_3_2.RSV_APLY_YMD <= ?
             AND     KK0081_3_2.RSV_APLY_CD = '2'
             AND     KK0081_3_2.MK_FLG      = '0'
             GROUP BY KK0081_3_2.SVC_KEI_NO)
        AND  KK0091_3.RSV_APLY_CD  = '2'
        AND  KK0091_3.MK_FLG      = '0'
        AND  KK0321_3_2.KAKINS_TSTAYMD  <=  ?
        AND  KK0321_3_2.KAKINS_TENDYMD  >=  ?
        AND  KK0321_3_2.MK_FLG           = '0'
    ) KK0091_3_NET
    ON   KK0321_3_HYB.SEIKY_KEI_NO = KK0091_3_NET.SEIKY_KEI_NO
UNION ALL
    SELECT
      'ZZZZZZZZZY'                       AS SEIKY_KEI_NO,
      '4'                                AS GYO_KBN,
      '不整合'                           AS ERR_TYPE,
      KK0321_4_HYB.HYB_SYSID             AS SYSID,
      '－'                               AS EOMOBA_SVC_KEI_NO,
      '－'                               AS JIGYOSHA_KEI_ID,
      TO_CHAR(KK0321_4_HYB.HYB_KEI_CNT)  AS KEI_CNT,
      '－'                               AS EOHNT_SVC_KEI_NO,
      '契約なし'                         AS SVKEI_STAT,
      '－'                               AS KIKNISU
    FROM 
    (
      SELECT /*+ index(KK0081_4_HYB KK_T_SVC_KEI_IDX_06) */
        KK0321_4_1.SEIKY_KEI_NO           AS  SEIKY_KEI_NO,
        COUNT(KK0121_4.SVC_KEI_NO)    AS  HYB_KEI_CNT,
        MIN(KK0081_4_HYB.SYSID)           AS  HYB_SYSID,
        MIN(KK0121_4.JGS_CHRG_STAYMD) AS  HYB_JGS_CHRG_STAYMD
      FROM 
        KK_T_SVC_KEI  KK0081_4_HYB
      INNER JOIN
        KK_T_SVC_KEI_EOMOBA  KK0121_4
        ON   KK0081_4_HYB.SVC_KEI_NO      =  KK0121_4.SVC_KEI_NO
        AND  KK0081_4_HYB.GENE_ADD_DTM    =  KK0121_4.GENE_ADD_DTM
      INNER JOIN  KK_T_KAKINS  KK0321_4_1
        ON   KK0321_4_1.SVC_KEI_NO      =  KK0121_4.SVC_KEI_NO
      WHERE
             KK0081_4_HYB.PCRS_CD         IN ('A59', 'A60')
        AND  KK0081_4_HYB.SVC_KEI_STAT IN ('020', '030', '100', '210', '220')
        AND (KK0081_4_HYB.SVC_KEI_NO, KK0081_4_HYB.RSV_APLY_YMD || KK0081_4_HYB.GENE_ADD_DTM) =
            (SELECT KK0081_4_2.SVC_KEI_NO, MAX(KK0081_4_2.RSV_APLY_YMD || KK0081_4_2.GENE_ADD_DTM) AS KK0081_MAX_7
             FROM    KK_T_SVC_KEI  KK0081_4_2
             WHERE   KK0081_4_2.SVC_KEI_NO  = KK0081_4_HYB.SVC_KEI_NO
             AND     KK0081_4_2.RSV_APLY_YMD <= ?
             AND     KK0081_4_2.RSV_APLY_CD = '2'
             AND     KK0081_4_2.MK_FLG      = '0'
             GROUP BY KK0081_4_2.SVC_KEI_NO)
        AND  KK0121_4.RSV_APLY_CD  = '2'
        AND  KK0121_4.MK_FLG       = '0'
        AND  KK0321_4_1.KAKINS_TSTAYMD  <=  ?
        AND  KK0321_4_1.KAKINS_TENDYMD  >=  ?
        AND  KK0321_4_1.MK_FLG          = '0'
      GROUP BY KK0321_4_1.SEIKY_KEI_NO
    ) KK0321_4_HYB
    WHERE NOT EXISTS( SELECT 1 FROM
        (
          SELECT  KK0091_4.SVC_KEI_NO, KK0081_4_NET.SVC_KEI_STAT, KK0321_4_2.SEIKY_KEI_NO
          FROM
            KK_T_SVC_KEI KK0081_4_NET
          INNER JOIN
                KK_T_SVC_KEI_EOH_NET  KK0091_4
            ON   KK0081_4_NET.SVC_KEI_NO      =  KK0091_4.SVC_KEI_NO
            AND  KK0081_4_NET.GENE_ADD_DTM    =  KK0091_4.GENE_ADD_DTM
          INNER JOIN  KK_T_KAKINS KK0321_4_2
            ON   KK0321_4_2.SVC_KEI_NO      =   KK0091_4.SVC_KEI_NO
          WHERE
                 KK0081_4_NET.PRC_GRP_CD IN ('02', '03', '04')
            AND (KK0081_4_NET.SVC_KEI_NO, KK0081_4_NET.RSV_APLY_YMD || KK0081_4_NET.GENE_ADD_DTM) =
                (SELECT KK0081_4_3.SVC_KEI_NO, MAX(KK0081_4_3.RSV_APLY_YMD || KK0081_4_3.GENE_ADD_DTM) AS KK0081_MAX_8
                 FROM    KK_T_SVC_KEI KK0081_4_3
                 WHERE   KK0081_4_3.SVC_KEI_NO  = KK0091_4.SVC_KEI_NO
                 AND     KK0081_4_3.RSV_APLY_YMD <= ?
                 AND     KK0081_4_3.RSV_APLY_CD = '2'
                 AND     KK0081_4_3.MK_FLG      = '0'
                 GROUP BY KK0081_4_3.SVC_KEI_NO)
            AND  KK0091_4.RSV_APLY_CD = '2'
            AND  KK0091_4.MK_FLG      = '0'
            AND  KK0321_4_2.KAKINS_TSTAYMD  <=  ?
            AND  KK0321_4_2.KAKINS_TENDYMD  >=  ?
            AND  KK0321_4_2.MK_FLG           = '0'
        ) KK0091_4_NET
        WHERE   KK0321_4_HYB.SEIKY_KEI_NO = KK0091_4_NET.SEIKY_KEI_NO
    )
UNION ALL
    SELECT
      'ZZZZZZZZZZ'              AS SEIKY_KEI_NO,
      '5'                       AS GYO_KBN,
      'プラン変更'              AS ERR_TYPE,
      KK0081_5.SYSID            AS SYSID,
      KK0121_5.SVC_KEI_NO       AS EOMOBA_SVC_KEI_NO,
      KK0121_5.JIGYOSHA_KEI_ID  AS JIGYOSHA_KEI_ID,
      '－'                      AS KEI_CNT,
      '－'                      AS EOHNT_SVC_KEI_NO,
      '－'                      AS SVKEI_STAT,
      '－'                      AS KIKNISU
    FROM
      KK_T_SVC_KEI  KK0081_5
    INNER  JOIN
      KK_T_SVC_KEI_EOMOBA  KK0121_5
      ON     KK0121_5.SVC_KEI_NO      = KK0081_5.SVC_KEI_NO
      AND    KK0121_5.GENE_ADD_DTM    = KK0081_5.GENE_ADD_DTM
    WHERE
     (KK0081_5.SVC_KEI_NO, KK0081_5.RSV_APLY_YMD || KK0081_5.GENE_ADD_DTM) =
         (SELECT KK0081_5_2.SVC_KEI_NO, MAX(KK0081_5_2.RSV_APLY_YMD || KK0081_5_2.GENE_ADD_DTM) AS KK0081_MAX_9
      FROM   KK_T_SVC_KEI  KK0081_5_2
      WHERE  KK0081_5_2.SVC_KEI_NO  = KK0081_5.SVC_KEI_NO
      AND    KK0081_5_2.RSV_APLY_YMD <= ?
      AND    KK0081_5_2.RSV_APLY_CD = '2'
      AND    KK0081_5_2.MK_FLG    = '0'
      GROUP BY KK0081_5_2.SVC_KEI_NO)
      AND   KK0121_5.COURSECHG_NG_STAT_CD  = '1'
)
ORDER BY SEIKY_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_126)
#--オプションサービスコード(メールアドレス・Myホームページ・メーリングリスト・固定グローバルID・050ナンバープラス・IPv6)を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_126

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS SVKEI_GADTM,
    KK0351_BASE.OP_SVC_KEI_NO,
    KK0351_BASE.OPSVKEI_GADTM,
    KK0351_BASE.OP_SVC_CD,
    KK0401_BASE.ALIAS,
    KK0351_BASE.MLAD,
    KK0351_BASE.POP_ID,
    KK0351_BASE.URL,
    KK0351_BASE.WEB_ID,
    CASE
        WHEN KK0351_BASE.MLLIST_NM IS NOT NULL THEN KK0351_BASE.MLLIST_NM || '@' || ZM0321.WORK_PARAM_SETTE_VALUE
        ELSE NULL
    END AS MLLIST_NM,
    KK0351_BASE.KOTEI_IP_AD,
    KK0351_BASE.N_050_OP_TELNO,
    CASE
        WHEN KK0351_BASE.OP_SVC_CD = 'B001' THEN KK1041_MLAD_BASE.ODR_CNT
        ELSE KK1041_BASE.ODR_CNT
    END AS ORDER_UM_FLG
FROM (
    SELECT
        KK0351.SVC_KEI_NO,
        '01' AS SVC_CD,
        '1' AS ORDER_SBT_CD,
        CASE
            WHEN KK0351.OP_SVC_CD = 'B001' THEN '03'
            WHEN KK0351.OP_SVC_CD = 'B002' THEN '04'
            WHEN KK0351.OP_SVC_CD = 'B003' THEN '05'
            ELSE ''
        END AS SVC_ORDER_CD,
        KK0351.OP_SVC_KEI_NO,
        KK0351.GENE_ADD_DTM AS OPSVKEI_GADTM,
        KK0351.OP_SVC_CD,
        KK0351.SVC_ENDYMD,
        KK0361.MLAD,
        KK0361.POP_ID,
        KK0361.WEB_ID,
        KK0361.URL_DOMAIN || KK0361.URL_ACCOUNT AS URL,
        KK0361.MLLIST_NM,
        KK0361.KOTEI_IP_AD,
        NULL AS N_050_OP_TELNO
    FROM
        KK_T_OP_SVC_KEI KK0351
    INNER JOIN
        KK_T_OPSVKEI_ISP KK0361
        ON  KK0361.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
        AND KK0361.GENE_ADD_DTM  = KK0351.GENE_ADD_DTM
        AND KK0361.MK_FLG        = '0'
    WHERE
        (KK0351.OP_SVC_KEI_NO, KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM)  = (
        SELECT
            KK0351_GENE.OP_SVC_KEI_NO, MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) as KK0351_MAX
        FROM
            KK_T_OP_SVC_KEI KK0351_GENE
        WHERE
            KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
        AND KK0351_GENE.RSV_APLY_YMD <= ?
        AND KK0351_GENE.RSV_APLY_CD = '2'
        AND KK0351_GENE.MK_FLG = '0'
        GROUP BY KK0351_GENE.OP_SVC_KEI_NO)
    AND KK0351.OP_SVC_CD IN ('B001', 'B002', 'B003', 'B004', 'B070')
    AND KK0351.OP_SVC_KEI_STAT IN ('910', '920')
    AND KK0351.SVCTK_BUT_DEL_TRN_JSSI_DTM IS NULL
    AND KK0351.SVC_ENDYMD IS NOT NULL
    AND KK0351.MK_FLG = '0'
    UNION ALL
    SELECT
        KK0161.SVC_KEI_NO,
        '02' AS SVC_CD,
        '2' AS ORDER_SBT_CD,
        '' AS SVC_ORDER_CD,
        KK0351.OP_SVC_KEI_NO,
        KK0351.GENE_ADD_DTM AS OPSVKEI_GADTM,
        KK0351.OP_SVC_CD,
        KK0351.SVC_ENDYMD,
        NULL AS MLAD,
        NULL AS POP_ID,
        NULL AS WEB_ID,
        NULL AS URL,
        NULL AS MLLIST_NM,
        NULL AS KOTEI_IP_AD,
        KK0371.N_050_OP_TELNO
    FROM
        KK_T_OP_SVC_KEI KK0351
    INNER JOIN
        KK_T_OPSVKEI_TEL KK0371
        ON  KK0371.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
        AND KK0371.GENE_ADD_DTM  = KK0351.GENE_ADD_DTM
        AND KK0371.MK_FLG        = '0'
    INNER JOIN
        KK_T_SVC_KEI_UCWK KK0161
        ON  KK0161.SVC_KEI_UCWK_NO = KK0351.SVC_KEI_UCWK_NO
        AND KK0161.MK_FLG          = '0'
    WHERE
        (KK0351.OP_SVC_KEI_NO, KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM ) = (
        SELECT
            KK0351_GENE.OP_SVC_KEI_NO, MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX
        FROM
            KK_T_OP_SVC_KEI KK0351_GENE
        WHERE
            KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
        AND KK0351_GENE.RSV_APLY_YMD <= ?
        AND KK0351_GENE.RSV_APLY_CD = '2'
        AND KK0351_GENE.MK_FLG = '0'
        GROUP BY OP_SVC_KEI_NO)
    AND KK0351.OP_SVC_CD = 'B029'
    AND KK0351.OP_SVC_KEI_STAT IN ('910', '920')
    AND KK0351.SVCTK_BUT_DEL_TRN_JSSI_DTM IS NULL
    AND KK0351.SVC_ENDYMD IS NOT NULL
    AND KK0351.MK_FLG = '0'
    AND (KK0161.SVC_KEI_UCWK_NO, KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM ) = (
        SELECT
            KK0161_GENE.SVC_KEI_UCWK_NO, MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM)  AS KK0161_MAX
        FROM
            KK_T_SVC_KEI_UCWK KK0161_GENE
        WHERE
            KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
        AND KK0161_GENE.RSV_APLY_YMD <= ?
        AND KK0161_GENE.RSV_APLY_CD = '2'
        AND KK0161_GENE.MK_FLG = '0'
        GROUP BY SVC_KEI_UCWK_NO)
) KK0351_BASE
INNER JOIN  KK_T_SVC_KEI KK0081
    ON  KK0081.SVC_KEI_NO = KK0351_BASE.SVC_KEI_NO
    AND KK0081.SVC_CD = KK0351_BASE.SVC_CD
INNER JOIN  KK_M_OP_SVC KK0821
    ON  KK0821.OP_SVC_CD = KK0351_BASE.OP_SVC_CD
    AND KK0821.KAIHK_PSB_PRD IS NOT NULL
INNER JOIN  ZM_M_WORK_PARAM_KNRI ZM0321
    ON  ZM0321.WORK_PARAM_ID = 'KK_MLLIST_NM_DOMAIN'
    AND ZM0321.MK_FLG        = '0'
LEFT OUTER JOIN (
    SELECT
        KK0401.OP_SVC_KEI_NO,
        KK0411.ALIAS
    FROM
        KK_T_SBOP_SVC_KEI KK0401
    INNER JOIN
        KK_T_SBOPSVKEI_ISP KK0411
        ON  KK0411.OP_SVC_KEI_NO   = KK0401.OP_SVC_KEI_NO
        AND KK0411.SBOP_SVC_KEI_NO = KK0401.SBOP_SVC_KEI_NO
        AND KK0411.GENE_ADD_DTM    = KK0401.GENE_ADD_DTM
        AND KK0411.MK_FLG          = '0'
    WHERE
        (KK0401.OP_SVC_KEI_NO, KK0401.RSV_APLY_YMD || KK0401.GENE_ADD_DTM ) = (
        SELECT
            KK0401_GENE.OP_SVC_KEI_NO,  MAX(KK0401_GENE.RSV_APLY_YMD || KK0401_GENE.GENE_ADD_DTM) AS KK0401_MAX
        FROM
            KK_T_SBOP_SVC_KEI KK0401_GENE
        WHERE
            KK0401_GENE.OP_SVC_KEI_NO = KK0401.OP_SVC_KEI_NO
        AND KK0401_GENE.RSV_APLY_YMD <= ?
        AND KK0401_GENE.RSV_APLY_CD = '2'
        AND KK0401_GENE.MK_FLG = '0'
        GROUP BY KK0401_GENE.OP_SVC_KEI_NO )
    AND KK0401.SBOP_SVC_CD = 'D01'
    AND KK0401.MK_FLG      = '0'
) KK0401_BASE
    ON  KK0401_BASE.OP_SVC_KEI_NO = KK0351_BASE.OP_SVC_KEI_NO
LEFT OUTER JOIN (
    SELECT
        KK1041.SVC_KEI_NO,
        KK1041.OP_SVC_KEI_NO,
        KK1041.ORDER_SBT_CD,
        KK1041.SVC_ORDER_CD,
        COUNT(*) AS ODR_CNT
    FROM
        KK_T_ODR_SET KK1041
    WHERE
        KK1041.OP_SVC_KEI_NO IS NOT NULL
    AND KK1041.ADD_SOD_SEND_YMD IS NOT NULL
    AND KK1041.MK_FLG = '0'
    GROUP BY
        KK1041.SVC_KEI_NO,
        KK1041.OP_SVC_KEI_NO,
        KK1041.ORDER_SBT_CD,
        KK1041.SVC_ORDER_CD
) KK1041_BASE
    ON  KK1041_BASE.SVC_KEI_NO    = KK0351_BASE.SVC_KEI_NO
    AND KK1041_BASE.OP_SVC_KEI_NO = KK0351_BASE.OP_SVC_KEI_NO
    AND KK1041_BASE.ORDER_SBT_CD  = KK0351_BASE.ORDER_SBT_CD
    AND KK1041_BASE.SVC_ORDER_CD  = KK0351_BASE.SVC_ORDER_CD
LEFT OUTER JOIN (
    SELECT
        KK1041.SVC_KEI_NO,
        KK1041.OP_SVC_KEI_NO,
        KK1041.ORDER_SBT_CD,
        KK1041.SVC_ORDER_CD,
        KK1041.MLAD,
        COUNT(*) AS ODR_CNT
    FROM
        KK_T_ODR_SET KK1041
    WHERE
        KK1041.OP_SVC_KEI_NO IS NOT NULL
    AND KK1041.ADD_DTM IS NOT NULL
    AND KK1041.MK_FLG = '0'
    GROUP BY
        KK1041.SVC_KEI_NO,
        KK1041.OP_SVC_KEI_NO,
        KK1041.ORDER_SBT_CD,
        KK1041.SVC_ORDER_CD,
        KK1041.MLAD
) KK1041_MLAD_BASE
    ON  KK1041_MLAD_BASE.SVC_KEI_NO    = KK0351_BASE.SVC_KEI_NO
    AND KK1041_MLAD_BASE.OP_SVC_KEI_NO = KK0351_BASE.OP_SVC_KEI_NO
    AND KK1041_MLAD_BASE.ORDER_SBT_CD  = KK0351_BASE.ORDER_SBT_CD
    AND KK1041_MLAD_BASE.SVC_ORDER_CD  = KK0351_BASE.SVC_ORDER_CD
    AND KK1041_MLAD_BASE.MLAD          = KK0351_BASE.MLAD
WHERE
   (KK0081.SVC_KEI_NO,KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
    SELECT
        KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO )
AND (KK0821.OP_SVC_CD, KK0821.RSV_APLY_YMD|| KK0821.GENE_ADD_DTM) = (
    SELECT
        KK0821_GENE.OP_SVC_CD,MAX(KK0821_GENE.RSV_APLY_YMD|| KK0821_GENE.GENE_ADD_DTM) AS KK0821_MAX
    FROM
        KK_M_OP_SVC KK0821_GENE
    WHERE
        KK0821_GENE.OP_SVC_CD = KK0821.OP_SVC_CD
    AND KK0821_GENE.RSV_APLY_YMD <= ?
    AND KK0821_GENE.MK_FLG = '0'
    GROUP BY KK0821_GENE.OP_SVC_CD )
AND TO_DATE(?) >= (TO_DATE(KK0351_BASE.SVC_ENDYMD) + KK0821.KAIHK_PSB_PRD)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_127)
#--KKPRC04604_サービス契約インターフェイス作成
#--3.全体構成/3-3.処理詳細
#--(1)居住者契約数取得(継続分) ※9/28 TG1-2012-0000211対応にて不要化
#-----------------------------------------------------------

--KEY:KK_SELECT_127

SELECT COUNT(*) AS KEI_COUNT
FROM   KK_T_SVC_KEI K
         INNER JOIN (
           SELECT SVC_KEI_NO,
                  MAX(RSV_APLY_YMD || GENE_ADD_DTM) AS K_MAX
           FROM   KK_T_SVC_KEI
           WHERE  RSV_APLY_YMD < ?
             AND  RSV_APLY_CD = '2'
             AND  MK_FLG = '0'
           GROUP BY
                  SVC_KEI_NO
           ) K_GENE
         ON  K.SVC_KEI_NO = K_GENE.SVC_KEI_NO
         AND K.RSV_APLY_YMD || K.GENE_ADD_DTM = K_GENE.K_MAX
         INNER JOIN (
           SELECT HKP.TK_HOSHIKI_KEI_NO,
                  HKP.KANYU_KEI_AITAI_PPLAN_CD
           FROM   KK_T_TK_HSK_KEI_PRC HKP
           WHERE  HKP.TK_HOSHIKI_KEI_NO = ?
             AND  HKP.KANYU_KEI_AITAI_PPLAN_CD = ?
             AND  HKP.SEIKY_AMNT_TSTAYMD <  ?
             AND  HKP.SEIKY_AMNT_TENDYMD >= ?
             AND  HKP.MK_FLG = '0'
           GROUP BY
                  HKP.TK_HOSHIKI_KEI_NO,
                  HKP.KANYU_KEI_AITAI_PPLAN_CD
         ) HKP_WRK
         ON  K.TK_HOSHIKI_KEI_NO = HKP_WRK.TK_HOSHIKI_KEI_NO
         AND K.PPLAN_CD = HKP_WRK.KANYU_KEI_AITAI_PPLAN_CD
WHERE  K.PLAN_STAYMD < ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_128)
#--KKPRC04604_サービス契約インターフェイス作成
#--3.全体構成/3-3.処理詳細
#--(1)居住者契約数取得
#-----------------------------------------------------------

--KEY:KK_SELECT_128

SELECT COUNT(*) AS KEI_COUNT
FROM   ( SELECT SVC_KEI_NO
         FROM   KK_T_SVC_KEI K
                  INNER JOIN (
                    SELECT HKP.TK_HOSHIKI_KEI_NO,
                           HKP.KANYU_KEI_AITAI_PPLAN_CD
                    FROM   KK_T_TK_HSK_KEI_PRC HKP
                    WHERE  HKP.TK_HOSHIKI_KEI_NO = ?
                      AND  HKP.KANYU_KEI_AITAI_PPLAN_CD = ?
                      AND  HKP.SEIKY_AMNT_TSTAYMD <= ?
                      AND  HKP.SEIKY_AMNT_TENDYMD >= ?
                      AND  HKP.MK_FLG = '0'
                    GROUP BY
                           HKP.TK_HOSHIKI_KEI_NO,
                           HKP.KANYU_KEI_AITAI_PPLAN_CD
                  ) HKP_WRK
                  ON  K.TK_HOSHIKI_KEI_NO = HKP_WRK.TK_HOSHIKI_KEI_NO
                  AND K.PPLAN_CD = HKP_WRK.KANYU_KEI_AITAI_PPLAN_CD
               ,(SELECT ? STA_YMD, ? END_YMD FROM DUAL) DUAL
         WHERE  K.PLAN_CHRG_STAYMD <= DUAL.END_YMD
           AND  K.PLAN_CHRG_ENDYMD >= DUAL.STA_YMD
           AND  K.RSV_APLY_CD = '2'
           AND  K.MK_FLG = '0'
         GROUP BY
                SVC_KEI_NO
       )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_129)
#--KKPRC37301  
#--オプションチャンネル重複契約情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_129

SELECT /*+ LEADING(KK0351_SD KK0161 KK0351_HD KK0081 KK0341 ZM0471) */
       KK0081.SVC_KEI_NO,
       KK0081.SYSID,
       KK0161.SVC_KEI_UCWK_NO,
       ZM0471.STB_ID,
       KK0341.KIKI_SEIZO_NO KIKI_SEIZO_NO,
       KK0351_SD.SVC_STAYMD SVC_STA_YMD_SD,
       KK0351_SD.SVC_ENDYMD SVC_ENDYMD_SD,
       KK0351_SD.OP_SVC_CD OP_SVC_CD_SD,
       KK0351_SD.MSKM_DTL_NO MSKM_DTL_NO_SD,
       KK0351_SD.RSV_APLY_CD RSV_APLY_CD_SD,
       KK0351_HD.SVC_STAYMD SVC_STA_YMD_HD,
       KK0351_HD.SVC_ENDYMD SVC_ENDYMD_HD,
       KK0351_HD.OP_SVC_CD OP_SVC_CD_HD,
       KK0351_HD.MSKM_DTL_NO MSKM_DTL_NO_HD,
       KK0351_HD.RSV_APLY_CD RSV_APLY_CD_HD
  FROM ZM_T_TAKNKIKI_WK ZM0471
       INNER JOIN KK_T_KKTK_SVC_KEI KK0341
               ON KK0341.TAKNKIKI_MODEL_CD = ZM0471.TAKNKIKI_MODEL_CD
              AND KK0341.KIKI_SEIZO_NO = ZM0471.KIKI_SEIZO_NO
              AND KK0341.KKTK_SVC_CD = 'C009'
              AND (KK0341.KKTK_SVC_KEI_NO, KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM) = (SELECT KK0341_GENE.KKTK_SVC_KEI_NO, MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
                                                                  FROM KK_T_KKTK_SVC_KEI KK0341_GENE
                                                                 WHERE KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO
                                                                   AND KK0341_GENE.RSV_APLY_YMD <= ?
                                                                   AND KK0341_GENE.RSV_APLY_CD = '2'
                                                                   AND KK0341_GENE.MK_FLG = '0'
                                                                   GROUP BY KK0341_GENE.KKTK_SVC_KEI_NO)
       INNER JOIN KK_T_SVC_KEI_UCWK KK0161
               ON KK0161.SVC_KEI_UCWK_NO = KK0341.SVC_KEI_UCWK_NO
              AND KK0161.SVC_STA_YMD <= ?
              AND NVL(KK0161.SVC_ENDYMD, '20991231') >= ?
              AND (KK0161.SVC_KEI_UCWK_NO, KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM) = (SELECT KK0161_GENE.SVC_KEI_UCWK_NO, MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
                                                                  FROM KK_T_SVC_KEI_UCWK KK0161_GENE
                                                                 WHERE KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
                                                                   AND KK0161_GENE.RSV_APLY_YMD <= ?
                                                                   AND KK0161_GENE.RSV_APLY_CD = '2'
                                                                   AND KK0161_GENE.MK_FLG = '0'
                                                                   GROUP BY KK0161_GENE.SVC_KEI_UCWK_NO)
       INNER JOIN KK_T_SVC_KEI KK0081
               ON KK0081.SVC_KEI_NO = KK0161.SVC_KEI_NO
              AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                                  FROM KK_T_SVC_KEI KK0081_GENE
                                                                 WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                                   AND KK0081_GENE.RSV_APLY_YMD <= ?
                                                                   AND KK0081_GENE.RSV_APLY_CD = '2'
                                                                   AND KK0081_GENE.MK_FLG = '0'
                                                                   GROUP BY KK0081_GENE.SVC_KEI_NO)
       INNER JOIN KK_T_OP_SVC_KEI KK0351_HD
               ON KK0351_HD.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
              AND KK0351_HD.OP_SVC_CD = ?
              AND (KK0351_HD.OP_SVC_KEI_NO, KK0351_HD.RSV_APLY_YMD || KK0351_HD.GENE_ADD_DTM) = (SELECT KK0351_HD_GENE.OP_SVC_KEI_NO, MAX(KK0351_HD_GENE.RSV_APLY_YMD || KK0351_HD_GENE.GENE_ADD_DTM) AS KK0351_HD_MAX
                                                                        FROM KK_T_OP_SVC_KEI KK0351_HD_GENE
                                                                       WHERE KK0351_HD_GENE.OP_SVC_KEI_NO = KK0351_HD.OP_SVC_KEI_NO
                                                                         AND KK0351_HD_GENE.RSV_APLY_YMD <= ?
                                                                         AND KK0351_HD_GENE.RSV_APLY_CD = '2'
                                                                         AND KK0351_HD_GENE.MK_FLG = '0'
                                                                         GROUP BY KK0351_HD_GENE.OP_SVC_KEI_NO)
       INNER JOIN KK_T_OP_SVC_KEI KK0351_SD
               ON KK0351_SD.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
              AND KK0351_SD.OP_SVC_CD = ?
              AND (KK0351_SD.OP_SVC_KEI_NO, KK0351_SD.RSV_APLY_YMD || KK0351_SD.GENE_ADD_DTM) = (SELECT KK0351_SD_GENE.OP_SVC_KEI_NO, MAX(KK0351_SD_GENE.RSV_APLY_YMD || KK0351_SD_GENE.GENE_ADD_DTM) AS KK0351_SD_MAX
                                                                        FROM KK_T_OP_SVC_KEI KK0351_SD_GENE
                                                                       WHERE KK0351_SD_GENE.OP_SVC_KEI_NO = KK0351_SD.OP_SVC_KEI_NO
                                                                         AND KK0351_SD_GENE.RSV_APLY_YMD <= ?
                                                                         AND KK0351_SD_GENE.RSV_APLY_CD = '2'
                                                                         AND KK0351_SD_GENE.MK_FLG = '0'
                                                                         GROUP BY KK0351_SD_GENE.OP_SVC_KEI_NO)
 WHERE ZM0471.MK_FLG = '0'
 ORDER BY KK0081.SVC_KEI_NO

#-


#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_130)
#--消去可否チェック(PPP認証ID)
#-----------------------------------------------------------

--KEY:KK_SELECT_130

SELECT '1' AS EXIST
FROM DUAL
WHERE EXISTS(
   SELECT *
   FROM   KK_T_SVC_KEI SVC_KEI
   INNER  JOIN KK_T_SVC_KEI_EOH_TEL SVC_KEI_EOH_TEL
       ON  SVC_KEI.SVC_KEI_NO   = SVC_KEI_EOH_TEL.SVC_KEI_NO
       AND SVC_KEI.GENE_ADD_DTM = SVC_KEI_EOH_TEL.GENE_ADD_DTM
   WHERE SVC_KEI.SVC_KEI_NO            <> ?
   AND   SVC_KEI_EOH_TEL.PPP_NINSHO_ID  = ?
   AND   SVC_KEI.SVCTK_BUT_DEL_TRN_JSSI_DTM IS NULL
   AND   (SVC_KEI.SVC_KEI_NO, SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM) = (
       SELECT GENE_SVC_KEI.SVC_KEI_NO, MAX(GENE_SVC_KEI.RSV_APLY_YMD || GENE_SVC_KEI.GENE_ADD_DTM) AS MAX_SVC_KEI
       FROM   KK_T_SVC_KEI GENE_SVC_KEI
       WHERE  GENE_SVC_KEI.SVC_KEI_NO    = SVC_KEI.SVC_KEI_NO
       AND    GENE_SVC_KEI.RSV_APLY_YMD <= ?
       AND    GENE_SVC_KEI.RSV_APLY_CD   = '2'
       AND    GENE_SVC_KEI.MK_FLG        = '0'
       GROUP BY GENE_SVC_KEI.SVC_KEI_NO
   )
)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_131)
#--サービス契約番号からマンション物件コードを抽出する
#-----------------------------------------------------------

--KEY:KK_SELECT_131

SELECT
    KK0861.MANSION_BUKKEN_CD
FROM
    KK_T_SVC_KEI KK0081
  INNER JOIN
    KK_T_TK_HOSHIKI_KEI KK0891
  ON
    KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO
  AND
    KK0891.MK_FLG = '0'
  INNER JOIN
    KK_T_KAISEN_USE_KEI KK0881
  ON
    KK0891.KAISEN_USE_KEI_NO = KK0881.KAISEN_USE_KEI_NO
  AND
    KK0881.MK_FLG = '0'
  INNER JOIN
   KK_T_OWNR_KEI KK0871
  ON
   KK0881.OWNR_KEI_NO = KK0871.OWNR_KEI_NO
  AND
   KK0871.MK_FLG = '0'
  INNER JOIN
   KK_T_MANSION_BUKKEN KK0861
  ON
   KK0871.MANSION_BUKKEN_NO = KK0861.MANSION_BUKKEN_NO
  AND
   KK0861.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT
       MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS GENE_MAX
  FROM
       KK_T_SVC_KEI KK0081_GENE
  WHERE
       KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND
       KK0081_GENE.RSV_APLY_YMD <= ?
  AND
       KK0081_GENE.RSV_APLY_CD = '2'
  AND
       KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_136)
#--KKPRC01601
#--指定されたサービス契約番号で指定された日付以前のMAXの情報の取得
#-----------------------------------------------------------

--KEY:KK_SELECT_136

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
         MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM
         KK_T_SVC_KEI KK0081_GENE
     WHERE
         KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
         KK0081_GENE.RSV_APLY_YMD <= ? AND
         KK0081_GENE.RSV_APLY_CD = '2' AND
         KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_137)
#--KKPRC06401
#--期間内に手続き中の強制解約・手続き中の強制解約の回復の異動が発生したサービス
#-----------------------------------------------------------

--KEY:KK_SELECT_137

SELECT
 KK0081.SVC_KEI_NO
,KK0081.GENE_ADD_DTM
,KK0081.SYSID
,KK0081.SVC_CD
,KK0081.PRC_GRP_CD
,KK0081.PCRS_CD
,KK0081.PPLAN_CD
,KK0081.SHOSA_YMD
,KK0081.SVC_STA_YMD
,KK0081.SVC_ENDYMD
,KK0081.IDO_DIV
,KK0081.ADD_DTM
,KK0081.ADD_OPEACNT
,KK0081.ADD_TRN_ID
,KK0081.UPD_DTM
,KK0081.UPD_OPEACNT
,KK0081.UPD_TRN_ID
,KK0081.MK_FLG
,CH0231.TOKUSOKU_STAT 
,CH0231.SEIKY_KEI_NO
,CH0361.TOKUSOKU_STAT AS IDO_TOKUSOKU_STAT
,KK0081.SVC_KEI_STAT 
FROM
 CH_T_TOKUSOKU CH0231
 INNER JOIN
  KK_T_KAKINS KK0321
 ON
  KK0321.SEIKY_KEI_NO = CH0231.SEIKY_KEI_NO
  AND KK0321.KAKINS_TSTAYMD <= ?
  AND KK0321.KAKINS_TENDYMD >= ?
  AND KK0321.MK_FLG = '0'
 INNER JOIN
  KK_T_SVC_KEI KK0081
 ON
  KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
  AND KK0081.SVC_KEI_STAT IN('020','030')
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
   (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
          WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2' 
           AND KK0081_GENE.MK_FLG = '0')
INNER JOIN
 CH_T_TOKUSOKU_IDO CH0361
ON
  CH0361.TOKUSOKU_NO = CH0231.TOKUSOKU_NO
  AND CH0361.TOKUSOKU_IDO_NO = 
   (SELECT MAX(TOKUSOKU_IDO_NO) AS CH0361_MAX
          FROM CH_T_TOKUSOKU_IDO CH0361_GENE
          WHERE CH0361_GENE.TOKUSOKU_NO = CH0361.TOKUSOKU_NO
           AND CH0361_GENE.MK_FLG = '0')
  AND CH0361.MK_FLG = '0'
WHERE
 CH0231.TOKUSOKU_IDO_YMD BETWEEN ? AND ?
 AND 
CH0231.TOKUSOKU_STAYMD <= ?
 AND CH0231.TOKUSOKU_ENDYMD >= ?
 AND CH0231.MK_FLG = '0'
ORDER BY KK0081.SYSID,KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_140)
#--顧客情報を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_140

SELECT
    PRC_GRP_INFO.PRC_GRP_NM AS PRC_GRP_NM,                                      /* ( 1)料金グループ.料金グル―プ名 */
    SVC_KEI_INFO.SVC_KEI_NO AS SVC_KEI_NO,                                      /* ( 2)サービス契約.サービス契約番号 */
    KTS_SKU_INFO.SVC_KEI_KAISEN_UCWK_NO AS SVC_KEI_KAISEN_UCWK_NO,              /* ( 3)サービス契約回線内訳.サービス契約回線内訳番号 */
    MD_MA_A_INFO.MSKMSHO_DTL_NO AS MSKMSHO_DTL_NO,                              /* ( 4)申込明細.申込書明細番号 */
    MD_MA_A_INFO.MSKM_YMD AS MSKM_YMD,                                          /* ( 5)申込明細.申込年月日 */
    SVC_KEI_INFO.PLAN_STAYMD AS PLAN_STAYMD,                                    /* ( 6)サービス契約.プラン開始年月日 */
    SVC_KEI_INFO.SVC_DSL_YMD AS SVC_DSL_YMD,                                    /* ( 7)サービス契約.サービス解約年月日 */
    (SELECT SVC_KEI_STAT_CNK.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI SVC_KEI_STAT_CNK 
     WHERE  SVC_KEI_STAT_CNK.CD_SBT_CD = 'CD00037'
       AND  SVC_KEI_STAT_CNK.CD_DIV = SVC_KEI_INFO.SVC_KEI_STAT 
       AND  SVC_KEI_STAT_CNK.CD_TSTAYMD <= ?
       AND  SVC_KEI_STAT_CNK.CD_TENDYMD >= ?
       AND  SVC_KEI_STAT_CNK.MK_FLG = '0') AS SVC_KEI_STAT_NM,                  /* ( 8)サービス契約.サービス契約ステータス */
    (SELECT SKEKKA_CD_CNK.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI SKEKKA_CD_CNK 
     WHERE  SKEKKA_CD_CNK.CD_SBT_CD = 'CD00281'
       AND  SKEKKA_CD_CNK.CD_DIV = SVC_KEI_INFO.SKEKKA_CD 
       AND  SKEKKA_CD_CNK.CD_TSTAYMD <= ?
       AND  SKEKKA_CD_CNK.CD_TENDYMD >= ?
       AND  SKEKKA_CD_CNK.MK_FLG = '0') AS SKEKKA_CD_NM,                        /* ( 9)サービス契約.審査結果コード */
    (SELECT KEISHA_TYPE_CD_CNK.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI KEISHA_TYPE_CD_CNK 
     WHERE  KEISHA_TYPE_CD_CNK.CD_SBT_CD = 'CD00036'
       AND  KEISHA_TYPE_CD_CNK.CD_DIV = CUST_KOJIN_HOJIN_INFO.KEISHA_TYPE_CD 
       AND  KEISHA_TYPE_CD_CNK.CD_TSTAYMD <= ?
       AND  KEISHA_TYPE_CD_CNK.CD_TENDYMD >= ?
       AND  KEISHA_TYPE_CD_CNK.MK_FLG = '0') AS KEISHA_TYPE_CD_NM,              /* (10)お客様.契約者タイプコード */
    CUST_KOJIN_HOJIN_INFO.CUST_NM AS CUST_NM,                                   /* (11)お客様.お客様名 */
    (SELECT SHOKUGYO_CD_CNK.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI SHOKUGYO_CD_CNK 
     WHERE  SHOKUGYO_CD_CNK.CD_SBT_CD = 'CD00243'
       AND  SHOKUGYO_CD_CNK.CD_DIV = CUST_KOJIN_HOJIN_INFO.SHOKUGYO_CD 
       AND  SHOKUGYO_CD_CNK.CD_TSTAYMD <= ?
       AND  SHOKUGYO_CD_CNK.CD_TENDYMD >= ?
       AND  SHOKUGYO_CD_CNK.MK_FLG = '0') AS SHOKUGYO_CD_NM,                    /* (12)お客様<個人>.職業コード */
    (SELECT CUST_SEX_CD_CNK.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI CUST_SEX_CD_CNK 
     WHERE  CUST_SEX_CD_CNK.CD_SBT_CD = 'CD00245'
       AND  CUST_SEX_CD_CNK.CD_DIV = CUST_KOJIN_HOJIN_INFO.CUST_SEX_CD 
       AND  CUST_SEX_CD_CNK.CD_TSTAYMD <= ?
       AND  CUST_SEX_CD_CNK.CD_TENDYMD >= ?
       AND  CUST_SEX_CD_CNK.MK_FLG = '0') AS CUST_SEX_CD_NM,                    /* (13)お客様.お客様性別コード */
    CUST_KOJIN_HOJIN_INFO.CUST_BIRTHD AS CUST_BIRTHD,                           /* (14)お客様.お客様生年月日 */
    SVC_KEI_INFO.SVC_KEI_STAT AS SVC_KEI_STAT,                                  /* (15)サービス契約.サービス契約ステータス */
    SVC_KEI_INFO.SVC_STA_YMD AS SVC_STA_YMD,                                    /* (16)サービス契約.サービス開始年月日 */
    SVC_KEI_INFO.SVC_ENDYMD AS SVC_ENDYMD,                                      /* (17)サービス契約.サービス終了年月日 */
    KTS_SKU_INFO.XZAHYO AS XZAHYO,                                              /* (18)サービス契約回線内訳.X座標 */
    KTS_SKU_INFO.YZAHYO AS YZAHYO,                                              /* (19)サービス契約回線内訳.Y座標 */
    KTS_SKU_INFO.KAISEN_PLACE_PCD AS KAISEN_PLACE_PCD,                          /* (20)サービス契約回線内訳.回線場所郵便番号 */
    KTS_SKU_INFO.KAISEN_PLACE_STATE_NM AS KAISEN_PLACE_STATE_NM,                /* (21)サービス契約回線内訳.回線場所都道府県名 */
    KTS_SKU_INFO.KAISEN_PLACE_CITY_NM AS KAISEN_PLACE_CITY_NM,                  /* (22)サービス契約回線内訳.回線場所市区町村名 */
    KTS_SKU_INFO. KAISEN_PLACE_OAZTSU_NM AS KAISEN_PLACE_OAZTSU_NM,             /* (23)サービス契約回線内訳.回線場所大字通称名 */
    KTS_SKU_INFO.KAISEN_PLACE_AZCHO_NM AS KAISEN_PLACE_AZCHO_NM,                /* (24)サービス契約回線内訳.回線場所字丁目名 */
    KTS_SKU_INFO.KAISEN_PLACE_BNCHIGO AS KAISEN_PLACE_BNCHIGO,                  /* (25)サービス契約回線内訳.回線場所番地号 */
    KTS_SKU_INFO.KAISEN_PLACE_ADRTTM AS KAISEN_PLACE_ADRTTM,                    /* (26)サービス契約回線内訳.回線場所住所補記・建物名 */
    KTS_SKU_INFO.KAISEN_PLACE_ADRRM AS KAISEN_PLACE_ADRRM,                      /* (27)サービス契約回線内訳.回線場所住所補記・部屋番号 */
    MD_MA_A_INFO.AGNT_CD_1 AS AGNT_CD_1,                                        /* (28-1)申込代理店.代理店コード(1) */
    MD_MA_A_INFO.AGNT_NM_1 AS AGNT_NM_1,                                        /* (29-1)代理店.代理店名(1) */
    MD_MA_A_INFO.AGNT_CD_2 AS AGNT_CD_2,                                        /* (28-2)申込代理店.代理店コード(2) */
    MD_MA_A_INFO.AGNT_NM_2 AS AGNT_NM_2,                                        /* (29-2)代理店.代理店名(2) */
    MD_MA_A_INFO.AGNT_CD_3 AS AGNT_CD_3,                                        /* (28-3)申込代理店.代理店コード(3) */
    MD_MA_A_INFO.AGNT_NM_3 AS AGNT_NM_3,                                        /* (29-3)代理店.代理店名(3) */
    MD_MA_A_INFO.AGNT_CD_4 AS AGNT_CD_4,                                        /* (28-4)申込代理店.代理店コード(4) */
    MD_MA_A_INFO.AGNT_NM_4 AS AGNT_NM_4,                                        /* (29-4)代理店.代理店名(4) */
    (SELECT ZM0171_1.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI ZM0171_1 
     WHERE  ZM0171_1.CD_SBT_CD = 'CD01462'
       AND  ZM0171_1.CD_DIV = MD_MA_A_INFO.TRAT_CD_YO_MKM_CHANNEL_CD 
       AND  ZM0171_1.CD_TSTAYMD <= ?
       AND  ZM0171_1.CD_TENDYMD >= ?
       AND  ZM0171_1.MK_FLG = '0') AS TRAT_CD_YO_MKM_CHANNEL_NM,                /* (30)代理店.申込チャネル */
    (SELECT ZM0171_2.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI ZM0171_2 
     WHERE  ZM0171_2.CD_SBT_CD = 'CD01430'
       AND  ZM0171_2.CD_DIV = MD_MA_A_INFO.TRAT_CD_BRI_CD 
       AND  ZM0171_2.CD_TSTAYMD <= ?
       AND  ZM0171_2.CD_TENDYMD >= ?
       AND  ZM0171_2.MK_FLG = '0') AS TRAT_CD_BRI_NM,                           /* (31)代理店.申込区分１ */
    (SELECT ZM0171_3.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI ZM0171_3 
     WHERE  ZM0171_3.CD_SBT_CD = 'CD01431'
       AND  ZM0171_3.CD_DIV = MD_MA_A_INFO.TRAT_CD_BRI_DTL_CD 
       AND  ZM0171_3.CD_TSTAYMD <= ?
       AND  ZM0171_3.CD_TENDYMD >= ?
       AND  ZM0171_3.MK_FLG = '0') AS TRAT_CD_BRI_DTL_NM,                       /* (32)代理店.申込区分２ */
    CUST_KOJIN_HOJIN_INFO.COMP_NM AS COMP_NM,                                   /* (33)お客様<法人>.会社名 */
    CUST_KOJIN_HOJIN_INFO.HOJIN_ZENGO_SHITEI_CD AS HOJIN_ZENGO_SHITEI_CD,       /* (34)お客様<法人>.法人格前後指定コード */
    (SELECT HOJIN_SBT_CD_CNK.CD_DIV_NM  
     FROM   ZM_M_CD_NM_KANRI HOJIN_SBT_CD_CNK 
     WHERE  HOJIN_SBT_CD_CNK.CD_SBT_CD = 'CD00246'
       AND  HOJIN_SBT_CD_CNK.CD_DIV = CUST_KOJIN_HOJIN_INFO.HOJIN_SBT_CD 
       AND  HOJIN_SBT_CD_CNK.CD_TSTAYMD <= ?
       AND  HOJIN_SBT_CD_CNK.CD_TENDYMD >= ?
       AND  HOJIN_SBT_CD_CNK.MK_FLG = '0') AS HOJIN_SBT_CD_NM,                  /* (35)お客様<法人>.法人格種別コード */
    PPLAN_INFO.PPLAN_NM AS PPLAN_NM,                                            /* (36)料金プラン.料金プラン名 */
    THK_KUK_OK_MB_INFO.MANSION_ID AS MANSION_ID,                                /* (37)回線使用契約.マンションID */
    THK_KUK_OK_MB_INFO.MANSION_NM AS MANSION_NM,                                /* (38)マンション物件.マンション名 */
    THK_KUK_OK_MB_INFO.PID AS PID                                               /* (39)オーナー契約.P-ID */
FROM
(
    /* サービス契約 */
    SELECT
        SVC_KEI.SVC_KEI_NO AS SVC_KEI_NO,
        SVC_KEI.GENE_ADD_DTM AS GENE_ADD_DTM,
        SVC_KEI.SYSID AS SYSID,
        SVC_KEI.MSKM_DTL_NO AS MSKM_DTL_NO,
        SVC_KEI.TK_HOSHIKI_KEI_NO AS TK_HOSHIKI_KEI_NO,
        SVC_KEI.PRC_GRP_CD AS PRC_GRP_CD,
        SVC_KEI.PCRS_CD AS PCRS_CD,
        SVC_KEI.PPLAN_CD AS PPLAN_CD,
        SVC_KEI.PLAN_STAYMD AS PLAN_STAYMD,
        SVC_KEI.SVC_DSL_YMD AS SVC_DSL_YMD,
        SVC_KEI.SVC_KEI_STAT AS SVC_KEI_STAT,
        SVC_KEI.SKEKKA_CD AS SKEKKA_CD,
        SVC_KEI.SVC_STA_YMD AS SVC_STA_YMD,
        SVC_KEI.SVC_ENDYMD AS SVC_ENDYMD
    FROM
        KK_T_SVC_KEI SVC_KEI
    WHERE
        (
            SVC_KEI.SVC_KEI_STAT = '010' /* 受付済("010") */
        OR
            SVC_KEI.SVC_KEI_STAT = '020' /* 照査済("020") */
        OR
            SVC_KEI.SVC_KEI_STAT = '030' /* 締結済("030") */
        OR
            SVC_KEI.SVC_KEI_STAT = '100' /* サービス提供中("100") */
        OR
            SVC_KEI.SVC_KEI_STAT = '210' /* 休止・中断中("210") */
        OR
            SVC_KEI.SVC_KEI_STAT = '220' /* 停止中("220") */
        OR
            SVC_KEI.SVC_KEI_STAT = '910' /* 解約済("910") */
        OR
            SVC_KEI.SVC_KEI_STAT = '920' /* キャンセル済("920") */
        )    
    AND
            SVC_KEI.GENE_ADD_DTM = 
            (
                SELECT
                    MAX(SVC_KEI_GENE.GENE_ADD_DTM) AS SVC_KEI_GENE_ADD_DTM_MAX
                FROM
                    KK_T_SVC_KEI SVC_KEI_GENE
                WHERE
                    SVC_KEI.SVC_KEI_NO = SVC_KEI_GENE.SVC_KEI_NO
                AND
                    SVC_KEI_GENE.RSV_APLY_CD IN ('1', '2')
                AND
                    SVC_KEI_GENE.MK_FLG = '0'
            )
) SVC_KEI_INFO
/* ---------------------------------------------------- */
INNER JOIN
(
    SELECT
        /* お客様 ／ お客様<個人> ／ お客様<法人> */
        CUST_INFO.SYSID AS SYSID,
        CUST_INFO.KEISHA_TYPE_CD AS KEISHA_TYPE_CD,
        CUST_INFO.CUST_NM AS CUST_NM,
        CUST_KOJIN_INFO.SHOKUGYO_CD AS SHOKUGYO_CD,
        CUST_INFO.CUST_SEX_CD AS CUST_SEX_CD,
        CUST_INFO.CUST_BIRTHD AS CUST_BIRTHD,
        CUST_INFO.KEISHA_PCD AS KEISHA_PCD,
        CUST_INFO.KEISHA_STATE_NM AS KEISHA_STATE_NM,
        CUST_INFO.KEISHA_CITY_NM AS KEISHA_CITY_NM,
        CUST_INFO.KEISHA_OAZTSU_NM AS KEISHA_OAZTSU_NM,
        CUST_INFO.KEISHA_AZCHO_NM AS KEISHA_AZCHO_NM,
        CUST_INFO.KEISHA_BNCHIGO AS KEISHA_BNCHIGO,
        CUST_INFO.KEISHA_ADRTTM AS KEISHA_ADRTTM,
        CUST_INFO.KEISHA_ADRRM AS KEISHA_ADRRM,
        CUST_HOJIN_INFO.COMP_NM AS COMP_NM,
        CUST_HOJIN_INFO.HOJIN_ZENGO_SHITEI_CD AS HOJIN_ZENGO_SHITEI_CD,
        CUST_HOJIN_INFO.HOJIN_SBT_CD AS HOJIN_SBT_CD
    FROM
    (
        /* お客様 */
        SELECT
            CUST.SYSID AS SYSID,
            CUST.GENE_ADD_DTM AS GENE_ADD_DTM,
            CUST.KEISHA_TYPE_CD AS KEISHA_TYPE_CD,
            CUST.CUST_NM AS CUST_NM,
            CUST.CUST_SEX_CD AS CUST_SEX_CD,
            CUST.CUST_BIRTHD AS CUST_BIRTHD,
            CUST.KEISHA_PCD AS KEISHA_PCD,
            CUST.KEISHA_STATE_NM AS KEISHA_STATE_NM,
            CUST.KEISHA_CITY_NM AS KEISHA_CITY_NM,
            CUST.KEISHA_OAZTSU_NM AS KEISHA_OAZTSU_NM,
            CUST.KEISHA_AZCHO_NM AS KEISHA_AZCHO_NM,
            CUST.KEISHA_BNCHIGO AS KEISHA_BNCHIGO,
            CUST.KEISHA_ADRTTM AS KEISHA_ADRTTM,
            CUST.KEISHA_ADRRM AS KEISHA_ADRRM
        FROM
            CK_T_CUST CUST
        WHERE
            CUST.GENE_ADD_DTM =
            (
                SELECT
                    MAX(CUST_GENE.GENE_ADD_DTM) AS CUST_GENE_ADD_DTM_MAX
                FROM
                    CK_T_CUST CUST_GENE
                WHERE
                    CUST.SYSID = CUST_GENE.SYSID
                AND
                    CUST_GENE.RSV_APLY_CD  IN ('1', '2')
                AND
                    CUST_GENE.MK_FLG = '0'
            )
    ) CUST_INFO
    LEFT OUTER JOIN
    (
        /* お客様<個人> */
        SELECT
            CUST_KOJIN.SYSID AS SYSID,
            CUST_KOJIN.GENE_ADD_DTM AS GENE_ADD_DTM,
            CUST_KOJIN.SHOKUGYO_CD AS SHOKUGYO_CD
        FROM
            CK_T_CUST_KOJIN CUST_KOJIN
        WHERE
            CUST_KOJIN.GENE_ADD_DTM =
            (
                SELECT
                    MAX(CUST_KOJIN_GENE.GENE_ADD_DTM) AS CUST_KOJIN_GENE_ADD_DTM_MAX
                FROM
                    CK_T_CUST_KOJIN CUST_KOJIN_GENE
                WHERE
                    CUST_KOJIN.SYSID = CUST_KOJIN_GENE.SYSID
                AND
                    CUST_KOJIN_GENE.RSV_APLY_CD  IN ('1', '2')
                AND
                    CUST_KOJIN_GENE.MK_FLG = '0'
            )
    ) CUST_KOJIN_INFO
    ON
        CUST_INFO.SYSID = CUST_KOJIN_INFO.SYSID
    AND
        CUST_INFO.GENE_ADD_DTM = CUST_KOJIN_INFO.GENE_ADD_DTM
    LEFT OUTER JOIN
    (
        /* お客様<法人> */
        SELECT
            CUST_HOJIN.SYSID AS SYSID,
            CUST_HOJIN.GENE_ADD_DTM AS GENE_ADD_DTM,
            CUST_HOJIN.COMP_NM AS COMP_NM,
            CUST_HOJIN.HOJIN_ZENGO_SHITEI_CD AS HOJIN_ZENGO_SHITEI_CD,
            CUST_HOJIN.HOJIN_SBT_CD AS HOJIN_SBT_CD
        FROM
            CK_T_CUST_HOJIN CUST_HOJIN
        WHERE
            CUST_HOJIN.GENE_ADD_DTM =
            (
                SELECT
                    MAX(CUST_HOJIN_GENE.GENE_ADD_DTM) AS CUST_HOJIN_GENE_ADD_DTM_MAX
                FROM
                    CK_T_CUST_HOJIN CUST_HOJIN_GENE
                WHERE
                    CUST_HOJIN.SYSID = CUST_HOJIN_GENE.SYSID
                AND
                    CUST_HOJIN_GENE.RSV_APLY_CD  IN ('1', '2')
                AND
                    CUST_HOJIN_GENE.MK_FLG = '0'
            )
    ) CUST_HOJIN_INFO
    ON
        CUST_INFO.SYSID = CUST_HOJIN_INFO.SYSID
    AND
        CUST_INFO.GENE_ADD_DTM = CUST_HOJIN_INFO.GENE_ADD_DTM
) CUST_KOJIN_HOJIN_INFO
ON
   SVC_KEI_INFO.SYSID =  CUST_KOJIN_HOJIN_INFO.SYSID
/* ---------------------------------------------------- */
LEFT OUTER JOIN
(
    /* 回線対象サービス契約 ／ サービス契約回線内訳 */
    SELECT
        KAISEN_TG_SVKEI_INFO.SVC_KEI_NO AS SVC_KEI_NO,
        SVKEI_KAISEN_UW_INFO.SVC_KEI_KAISEN_UCWK_NO AS SVC_KEI_KAISEN_UCWK_NO,
        SVKEI_KAISEN_UW_INFO.XZAHYO AS XZAHYO,
        SVKEI_KAISEN_UW_INFO.YZAHYO AS YZAHYO,
        SVKEI_KAISEN_UW_INFO.KAISEN_PLACE_PCD AS KAISEN_PLACE_PCD,
        SVKEI_KAISEN_UW_INFO.KAISEN_PLACE_STATE_NM AS KAISEN_PLACE_STATE_NM,
        SVKEI_KAISEN_UW_INFO.KAISEN_PLACE_CITY_NM AS KAISEN_PLACE_CITY_NM,
        SVKEI_KAISEN_UW_INFO.KAISEN_PLACE_OAZTSU_NM AS KAISEN_PLACE_OAZTSU_NM,
        SVKEI_KAISEN_UW_INFO.KAISEN_PLACE_AZCHO_NM AS KAISEN_PLACE_AZCHO_NM,
        SVKEI_KAISEN_UW_INFO.KAISEN_PLACE_BNCHIGO AS KAISEN_PLACE_BNCHIGO,
        SVKEI_KAISEN_UW_INFO.KAISEN_PLACE_ADRTTM AS KAISEN_PLACE_ADRTTM,
        SVKEI_KAISEN_UW_INFO.KAISEN_PLACE_ADRRM AS KAISEN_PLACE_ADRRM
    FROM
    (
        /* 回線対象サービス契約 */
        SELECT
            KAISEN_TG_SVKEI.SVC_KEI_NO AS SVC_KEI_NO,
            KAISEN_TG_SVKEI.SVC_KEI_KAISEN_UCWK_NO AS SVC_KEI_KAISEN_UCWK_NO
        FROM
            KK_T_KAISEN_TG_SVKEI KAISEN_TG_SVKEI
        WHERE
            KAISEN_TG_SVKEI.MK_FLG = '0'
    ) KAISEN_TG_SVKEI_INFO
    INNER JOIN
    (
        /* サービス契約回線内訳 */
        SELECT
            SVKEI_KAISEN_UW.SVC_KEI_KAISEN_UCWK_NO AS SVC_KEI_KAISEN_UCWK_NO,
            SVKEI_KAISEN_UW.GENE_ADD_DTM AS GENE_ADD_DTM,
            SVKEI_KAISEN_UW.XZAHYO AS XZAHYO,
            SVKEI_KAISEN_UW.YZAHYO AS YZAHYO,
            SVKEI_KAISEN_UW.KAISEN_PLACE_PCD AS KAISEN_PLACE_PCD,
            SVKEI_KAISEN_UW.KAISEN_PLACE_STATE_NM AS KAISEN_PLACE_STATE_NM,
            SVKEI_KAISEN_UW.KAISEN_PLACE_CITY_NM AS KAISEN_PLACE_CITY_NM,
            SVKEI_KAISEN_UW.KAISEN_PLACE_OAZTSU_NM AS KAISEN_PLACE_OAZTSU_NM,
            SVKEI_KAISEN_UW.KAISEN_PLACE_AZCHO_NM AS KAISEN_PLACE_AZCHO_NM,
            SVKEI_KAISEN_UW.KAISEN_PLACE_BNCHIGO AS KAISEN_PLACE_BNCHIGO,
            SVKEI_KAISEN_UW.KAISEN_PLACE_ADRTTM AS KAISEN_PLACE_ADRTTM,
            SVKEI_KAISEN_UW.KAISEN_PLACE_ADRRM AS KAISEN_PLACE_ADRRM
        FROM
            KK_T_SVKEI_KAISEN_UW SVKEI_KAISEN_UW
        WHERE
            SVKEI_KAISEN_UW.GENE_ADD_DTM =
            (
                SELECT
                    MAX(SVKEI_KAISEN_UW_GENE.GENE_ADD_DTM) AS SKU_GENE_ADD_DTM_MAX
                FROM
                    KK_T_SVKEI_KAISEN_UW SVKEI_KAISEN_UW_GENE
                WHERE
                    SVKEI_KAISEN_UW.SVC_KEI_KAISEN_UCWK_NO = SVKEI_KAISEN_UW_GENE.SVC_KEI_KAISEN_UCWK_NO
                AND
                    SVKEI_KAISEN_UW_GENE.MK_FLG = '0'
            )
    ) SVKEI_KAISEN_UW_INFO
    ON
        KAISEN_TG_SVKEI_INFO.SVC_KEI_KAISEN_UCWK_NO = SVKEI_KAISEN_UW_INFO.SVC_KEI_KAISEN_UCWK_NO
    WHERE
    SVKEI_KAISEN_UW_INFO.GENE_ADD_DTM =
    (
        SELECT
            MAX(SKU_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_KAISEN_TG_SVKEI KTS_GENE
        INNER JOIN
            KK_T_SVKEI_KAISEN_UW SKU_GENE
        ON
            SKU_GENE.SVC_KEI_KAISEN_UCWK_NO = KTS_GENE.SVC_KEI_KAISEN_UCWK_NO
        AND
            SKU_GENE.MK_FLG = '0'
        WHERE
            KTS_GENE.SVC_KEI_NO = KAISEN_TG_SVKEI_INFO.SVC_KEI_NO
        AND
            KTS_GENE.MK_FLG = '0'
    )
) KTS_SKU_INFO
ON
    SVC_KEI_INFO.SVC_KEI_NO = KTS_SKU_INFO.SVC_KEI_NO
/* ---------------------------------------------------- */
INNER JOIN
(
    /* 申込明細 */
    SELECT
        MSKM_DTL.MSKMSHO_DTL_NO AS MSKMSHO_DTL_NO,
        MSKM_DTL.MSKM_YMD AS MSKM_YMD,
        MSKM_DTL.MSKM_DTL_NO AS MSKM_DTL_NO,
        MAX(CASE MA_ROW_NUM WHEN 1 THEN MSKM_AGNT_INFO.AGNT_CD ELSE '' END) AS AGNT_CD_1,
        MAX(CASE MA_ROW_NUM WHEN 1 THEN  
         ( SELECT AGNT.AGNT_NM FROM KK_M_AGNT AGNT  /* 代理店(1) */
             WHERE AGNT.AGNT_CD = MSKM_AGNT_INFO.AGNT_CD
               AND AGNT.GENE_ADD_DTM =
                ( SELECT MAX(AGNT_GENE.GENE_ADD_DTM) AS AGNT_GENE_ADD_DTM_MAX
                     FROM KK_M_AGNT AGNT_GENE
                    WHERE AGNT.AGNT_CD = AGNT_GENE.AGNT_CD
                      AND AGNT_GENE.MK_FLG = '0'
                )
          ) ELSE '' END) AS AGNT_NM_1,
        MAX(CASE MA_ROW_NUM WHEN 1 THEN  
         ( SELECT AGNT.TRAT_CD_YO_MKM_CHANNEL_CD AS TRAT_CD_YO_MKM_CHANNEL_CD FROM KK_M_AGNT AGNT  /* 代理店(1) */
             WHERE AGNT.AGNT_CD = MSKM_AGNT_INFO.AGNT_CD
               AND AGNT.GENE_ADD_DTM =
                ( SELECT MAX(AGNT_GENE.GENE_ADD_DTM) AS AGNT_GENE_ADD_DTM_MAX
                     FROM KK_M_AGNT AGNT_GENE
                    WHERE AGNT.AGNT_CD = AGNT_GENE.AGNT_CD
                      AND AGNT_GENE.MK_FLG = '0'
                )
          ) ELSE '' END) AS TRAT_CD_YO_MKM_CHANNEL_CD,
        MAX(CASE MA_ROW_NUM WHEN 1 THEN  
         ( SELECT AGNT.TRAT_CD_BRI_CD AS TRAT_CD_BRI_CD FROM KK_M_AGNT AGNT  /* 代理店(1) */
             WHERE AGNT.AGNT_CD = MSKM_AGNT_INFO.AGNT_CD
               AND AGNT.GENE_ADD_DTM =
                ( SELECT MAX(AGNT_GENE.GENE_ADD_DTM) AS AGNT_GENE_ADD_DTM_MAX
                     FROM KK_M_AGNT AGNT_GENE
                    WHERE AGNT.AGNT_CD = AGNT_GENE.AGNT_CD
                      AND AGNT_GENE.MK_FLG = '0'
                )
          ) ELSE '' END) AS TRAT_CD_BRI_CD,
        MAX(CASE MA_ROW_NUM WHEN 1 THEN  
         ( SELECT AGNT.TRAT_CD_BRI_DTL_CD AS TRAT_CD_BRI_DTL_CD FROM KK_M_AGNT AGNT  /* 代理店(1) */
             WHERE AGNT.AGNT_CD = MSKM_AGNT_INFO.AGNT_CD
               AND AGNT.GENE_ADD_DTM =
                ( SELECT MAX(AGNT_GENE.GENE_ADD_DTM) AS AGNT_GENE_ADD_DTM_MAX
                     FROM KK_M_AGNT AGNT_GENE
                    WHERE AGNT.AGNT_CD = AGNT_GENE.AGNT_CD
                      AND AGNT_GENE.MK_FLG = '0'
                )
          ) ELSE '' END) AS TRAT_CD_BRI_DTL_CD,
        MAX(CASE MA_ROW_NUM WHEN 2 THEN MSKM_AGNT_INFO.AGNT_CD ELSE '' END) AS AGNT_CD_2,
        MAX(CASE MA_ROW_NUM WHEN 2 THEN  
         ( SELECT AGNT.AGNT_NM FROM KK_M_AGNT AGNT  /* 代理店(2) */
             WHERE AGNT.AGNT_CD = MSKM_AGNT_INFO.AGNT_CD
               AND AGNT.GENE_ADD_DTM =
                ( SELECT MAX(AGNT_GENE.GENE_ADD_DTM) AS AGNT_GENE_ADD_DTM_MAX
                     FROM KK_M_AGNT AGNT_GENE
                    WHERE AGNT.AGNT_CD = AGNT_GENE.AGNT_CD
                      AND AGNT_GENE.MK_FLG = '0'
                )
          ) ELSE '' END) AS AGNT_NM_2,
        MAX(CASE MA_ROW_NUM WHEN 3 THEN MSKM_AGNT_INFO.AGNT_CD ELSE '' END) AS AGNT_CD_3,
        MAX(CASE MA_ROW_NUM WHEN 3 THEN  
         ( SELECT AGNT.AGNT_NM FROM KK_M_AGNT AGNT  /* 代理店(3) */
             WHERE AGNT.AGNT_CD = MSKM_AGNT_INFO.AGNT_CD
               AND AGNT.GENE_ADD_DTM =
                ( SELECT MAX(AGNT_GENE.GENE_ADD_DTM) AS AGNT_GENE_ADD_DTM_MAX
                     FROM KK_M_AGNT AGNT_GENE
                    WHERE AGNT.AGNT_CD = AGNT_GENE.AGNT_CD
                      AND AGNT_GENE.MK_FLG = '0'
                )
          ) ELSE '' END) AS AGNT_NM_3,
        MAX(CASE MA_ROW_NUM WHEN 4 THEN MSKM_AGNT_INFO.AGNT_CD ELSE '' END) AS AGNT_CD_4,
        MAX(CASE MA_ROW_NUM WHEN 4 THEN  
         ( SELECT AGNT.AGNT_NM FROM KK_M_AGNT AGNT  /* 代理店(4) */
             WHERE AGNT.AGNT_CD = MSKM_AGNT_INFO.AGNT_CD
               AND AGNT.GENE_ADD_DTM =
                ( SELECT MAX(AGNT_GENE.GENE_ADD_DTM) AS AGNT_GENE_ADD_DTM_MAX
                     FROM KK_M_AGNT AGNT_GENE
                    WHERE AGNT.AGNT_CD = AGNT_GENE.AGNT_CD
                      AND AGNT_GENE.MK_FLG = '0'
                )
          ) ELSE '' END) AS AGNT_NM_4
    FROM KK_T_MSKM_DTL MSKM_DTL
    LEFT OUTER JOIN
    (
        /* 申込_代理店 */
        SELECT
            MSKM_AGNT.MSKM_NO AS MSKM_NO,
            MSKM_AGNT.AGNT_CD AS AGNT_CD,
            ROW_NUMBER() OVER(PARTITION BY MSKM_AGNT.MSKM_NO ORDER BY MSKM_AGNT.AGNT_CD ASC) AS MA_ROW_NUM
        FROM
            KK_T_MSKM_AGNT MSKM_AGNT
    ) MSKM_AGNT_INFO
    ON MSKM_DTL.MSKM_NO = MSKM_AGNT_INFO.MSKM_NO
    WHERE MSKM_DTL.GENE_ADD_DTM =
            (
                SELECT MAX(MSKM_DTL_GENE.GENE_ADD_DTM) AS MSKM_DTL_GENE_ADD_DTM_MAX
                  FROM KK_T_MSKM_DTL MSKM_DTL_GENE
                 WHERE MSKM_DTL.MSKM_DTL_NO = MSKM_DTL_GENE.MSKM_DTL_NO
                   AND MSKM_DTL_GENE.MK_FLG = '0'
            )
  GROUP BY MSKM_DTL.MSKMSHO_DTL_NO, MSKM_DTL.MSKM_YMD, MSKM_DTL.MSKM_DTL_NO 
) MD_MA_A_INFO
ON
    SVC_KEI_INFO.MSKM_DTL_NO = MD_MA_A_INFO.MSKM_DTL_NO
/* ---------------------------------------------------- */
LEFT OUTER JOIN
(
    /* 提供方式契約 ／ 回線使用契約 ／ オーナー契約 ／ マンション物件 */
    SELECT
        TK_HOSHIKI_KEI_INFO.TK_HOSHIKI_KEI_NO AS TK_HOSHIKI_KEI_NO,
        KAISEN_USE_KEI_INFO.MANSION_ID AS MANSION_ID,
        MANSION_BUKKEN_INFO.MANSION_NM AS MANSION_NM,
        OWNR_KEI_INFO.PID AS PID
    FROM
    (
        /* 提供方式契約 */
        SELECT
            TK_HOSHIKI_KEI.TK_HOSHIKI_KEI_NO AS TK_HOSHIKI_KEI_NO,
            TK_HOSHIKI_KEI.KAISEN_USE_KEI_NO AS KAISEN_USE_KEI_NO
        FROM
            KK_T_TK_HOSHIKI_KEI TK_HOSHIKI_KEI
        WHERE
            TK_HOSHIKI_KEI.MK_FLG = '0'
    ) TK_HOSHIKI_KEI_INFO
    LEFT OUTER JOIN
    (
        /* 回線使用契約 */
        SELECT
            KAISEN_USE_KEI.KAISEN_USE_KEI_NO AS KAISEN_USE_KEI_NO,
            KAISEN_USE_KEI.OWNR_KEI_NO AS OWNR_KEI_NO,
            KAISEN_USE_KEI.MANSION_ID AS MANSION_ID
        FROM
            KK_T_KAISEN_USE_KEI KAISEN_USE_KEI
        WHERE
            KAISEN_USE_KEI.MK_FLG = '0'
    ) KAISEN_USE_KEI_INFO
    ON
        TK_HOSHIKI_KEI_INFO.KAISEN_USE_KEI_NO = KAISEN_USE_KEI_INFO.KAISEN_USE_KEI_NO
    LEFT OUTER JOIN
    (
        /* オーナー契約 */
        SELECT
            OWNR_KEI.OWNR_KEI_NO AS OWNR_KEI_NO,
            OWNR_KEI.MANSION_BUKKEN_NO AS MANSION_BUKKEN_NO,
            OWNR_KEI.PID AS PID
        FROM
            KK_T_OWNR_KEI OWNR_KEI
        WHERE
            OWNR_KEI.MK_FLG = '0'
    ) OWNR_KEI_INFO
    ON
        KAISEN_USE_KEI_INFO.OWNR_KEI_NO = OWNR_KEI_INFO.OWNR_KEI_NO
    LEFT OUTER JOIN
    (
        /* マンション物件 */
        SELECT
            MANSION_BUKKEN.MANSION_BUKKEN_NO AS MANSION_BUKKEN_NO,
            MANSION_BUKKEN.MANSION_NM AS MANSION_NM
        FROM
            KK_T_MANSION_BUKKEN MANSION_BUKKEN
        WHERE
            MANSION_BUKKEN.MK_FLG = '0'
    ) MANSION_BUKKEN_INFO
    ON
        OWNR_KEI_INFO.MANSION_BUKKEN_NO = MANSION_BUKKEN_INFO.MANSION_BUKKEN_NO
) THK_KUK_OK_MB_INFO
ON
    SVC_KEI_INFO.TK_HOSHIKI_KEI_NO = THK_KUK_OK_MB_INFO.TK_HOSHIKI_KEI_NO
/* ---------------------------------------------------- */
INNER JOIN
(
    /* 料金グループ */
    SELECT
        PRC_GRP.PRC_GRP_CD AS PRC_GRP_CD,
        PRC_GRP.PRC_GRP_NM AS PRC_GRP_NM
    FROM
        KK_M_PRC_GRP PRC_GRP
    WHERE
        PRC_GRP.GENE_ADD_DTM = 
        (
            SELECT
                MAX(FG_GENE.GENE_ADD_DTM) AS FG_GENE_ADD_DTM_MAX
            FROM
                KK_M_PRC_GRP FG_GENE
            WHERE
                PRC_GRP.PRC_GRP_CD = FG_GENE.PRC_GRP_CD
            AND
                FG_GENE.MK_FLG = '0'
        )
) PRC_GRP_INFO
ON
    SVC_KEI_INFO.PRC_GRP_CD = PRC_GRP_INFO.PRC_GRP_CD
/* ---------------------------------------------------- */
INNER JOIN
(
    /* 料金プラン */
    SELECT
        PPLAN.PCRS_CD AS PCRS_CD,
        PPLAN.PPLAN_CD AS PPLAN_CD,
        PPLAN.PPLAN_NM AS PPLAN_NM
    FROM
        KK_M_PPLAN PPLAN
    WHERE
        PPLAN.MK_FLG = '0'
) PPLAN_INFO
ON
    SVC_KEI_INFO.PCRS_CD = PPLAN_INFO.PCRS_CD
AND
    SVC_KEI_INFO.PPLAN_CD = PPLAN_INFO.PPLAN_CD
ORDER BY
    SVC_KEI_INFO.SVC_KEI_NO,
    SVC_KEI_INFO.GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_141)
#--光モバイルのコース変更通知メールを送信する対象を抽出する
#-----------------------------------------------------------

--KEY:KK_SELECT_141
SELECT KK0081.SVC_KEI_NO, KK0081.GENE_ADD_DTM, KK0081.SYSID, CK0011.CUST_NM, KK0081.PPLAN_CD, KK0591.PPLAN_NM,
       KK1681.NEW_PPLAN_CD, KK1681.OLD_PPLAN_CD
FROM   KK_T_IDO_RSV KK1681
INNER JOIN 
    KK_T_SVC_KEI  KK0081
    ON  KK0081.SVC_KEI_NO = KK1681.SVC_KEI_NO
    AND KK0081.SVC_CD = '01'
    AND KK0081.PRC_GRP_CD = '08'
INNER JOIN 
    KK_T_SVC_KEI_EOMOBA  KK0121
    ON   KK0121.SVC_KEI_NO    = KK0081.SVC_KEI_NO
    AND  KK0121.GENE_ADD_DTM  = KK0081.GENE_ADD_DTM
    AND  KK0121.RSV_APLY_CD           = '2'
    AND  KK0121.MK_FLG                = '0'
    AND  KK0121.JGS_COURSECHG_RNK_YMD IS NOT NULL
    AND  (KK0121.COURSECHG_NG_STAT_CD = '0' or KK0121.COURSECHG_NG_STAT_CD is null)
    AND  KK0121.COURSECHG_TCH_ML_SKSI_YMD IS NULL
LEFT JOIN 
    CK_T_CUST CK0011
    ON   CK0011.SYSID    = KK0081.SYSID
LEFT JOIN 
     KK_M_PPLAN KK0591
    ON   KK0591.PCRS_CD        = KK1681.NEW_PCRS_CD
    AND  KK0591.PPLAN_CD       = KK1681.NEW_PPLAN_CD
    AND  KK0591.PPLAN_TSTAYMD  <= KK1681.RSV_APLY_YMD
    AND  KK0591.PPLAN_TENDYMD  >= KK1681.RSV_APLY_YMD
    AND  KK0591.MK_FLG         = '0'
WHERE
      KK1681.IDO_DIV         = '00009'
AND   KK1681.IDO_RSV_STAT_CD = '03'
AND   KK1681.RSV_APLY_YMD    = TO_CHAR(TO_DATE(?) + 1,'YYYYMMDD')
AND   KK1681.MK_FLG          = '0'
AND   (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
        SELECT   KK0081_1.SVC_KEI_NO, MAX(KK0081_1.RSV_APLY_YMD || KK0081_1.GENE_ADD_DTM)
        FROM     KK_T_SVC_KEI KK0081_1
        WHERE    KK0081_1.SVC_KEI_NO  = KK0081.SVC_KEI_NO
        AND      KK0081_1.RSV_APLY_YMD <= KK1681.RSV_APLY_YMD
        AND      KK0081_1.RSV_APLY_CD = '2'
        AND      KK0081_1.MK_FLG      = '0'
        GROUP BY KK0081_1.SVC_KEI_NO)
AND   (CK0011.SYSID, CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM) = (
        SELECT CK0011_1.SYSID, MAX(CK0011_1.RSV_APLY_YMD || CK0011_1.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM     CK_T_CUST CK0011_1
        WHERE    CK0011_1.SYSID = CK0011.SYSID
        AND      CK0011_1.RSV_APLY_YMD <= KK1681.RSV_APLY_YMD
        AND      CK0011_1.RSV_APLY_CD = '2'
        AND      CK0011_1.MK_FLG = '0'
        GROUP BY CK0011_1.SYSID)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_142)
#--サービス契約番号から料金グループコードを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_142

SELECT SVC_KEI.PRC_GRP_CD, SVC_KEI.SVC_CD
FROM KK_T_SVC_KEI SVC_KEI
WHERE SVC_KEI.SVC_KEI_NO = ?
AND GENE_ADD_DTM = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_143)
#--料金インターフェイス共通処理
#--従属契約の連携情報に付与する基本契約の情報を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_143

SELECT SVC.SVC_KEI_NO,
       SVC.SEIRI_NO,
       SVC.SVC_CD,
       SVC.PRC_GRP_CD,
       SVC.PCRS_CD,
       SVC.PPLAN_CD,
       SVC.PLAN_CHRG_STAYMD,
       SVC.PLAN_CHRG_ENDYMD,
       SVC.GENE_ADD_DTM,
       SVC.SVC_DSL_YMD,
       SVC.SVC_CHRG_ENDYMD,
       SVC.SVC_DLRE_CD,
       SVC.TK_HOSHIKI_KEI_NO,
       SVC.PNLTY_HASSEI_CD
FROM       (SELECT SVC_SUB.SVC_KEI_NO,
                   SVC_SUB.SEIRI_NO,
                   SVC_SUB.SVC_CD,
                   SVC_SUB.PRC_GRP_CD,
                   SVC_SUB.PCRS_CD,
                   SVC_SUB.PPLAN_CD,
                   SVC_SUB.PLAN_CHRG_STAYMD,
                   SVC_SUB.PLAN_CHRG_ENDYMD,
                   SVC_SUB.GENE_ADD_DTM,
                   SVC_SUB.SVC_DSL_YMD,
                   SVC_SUB.SVC_CHRG_ENDYMD,
                   SVC_SUB.SVC_DLRE_CD,
                   SVC_SUB.TK_HOSHIKI_KEI_NO,
                   SVC_SUB.PNLTY_HASSEI_CD,
                   ROW_NUMBER() OVER (PARTITION BY SVC_KEI_NO, SVC_CD, PRC_GRP_CD, PCRS_CD, PPLAN_CD ORDER BY RSV_APLY_YMD DESC, GENE_ADD_DTM DESC) AS ROW_NUM
            FROM   KK_T_SVC_KEI SVC_SUB
            WHERE  SVC_SUB.SVC_KEI_NO = ?
              AND  SVC_SUB.RSV_APLY_YMD <= ?
              AND  SVC_SUB.RSV_APLY_CD = '2'
              AND  SVC_SUB.MK_FLG = '0'
           ) SVC
WHERE SVC.ROW_NUM = 1
OR   (SVC.PLAN_CHRG_STAYMD <= SVC.PLAN_CHRG_ENDYMD
      AND SVC.PLAN_CHRG_ENDYMD >= ?
      AND SVC.PLAN_CHRG_ENDYMD <> '20991231')
ORDER BY
      SVC.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--繧ｵ繝ｼ繝薙せ螂醍ｴ・ｽKK_T_SVC_KEI-KK_SELECT_144)
#--SYSID蜿門ｾ・ｽ
#-----------------------------------------------------------

--KEY:KK_SELECT_144

SELECT  A.SYSID
FROM    KK_T_SVC_KEI A
WHERE
    A.SVC_KEI_NO = ?
AND A.RSV_APLY_YMD || A.GENE_ADD_DTM = (
    SELECT  MAX(G.RSV_APLY_YMD || G.GENE_ADD_DTM)
    FROM    KK_T_SVC_KEI G
    WHERE   G.SVC_KEI_NO   = A.SVC_KEI_NO
    AND     G.RSV_APLY_YMD <= ?
    AND     G.RSV_APLY_CD  = '2'
    AND     G.MK_FLG       = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_145)
#--KKPRC09701（料金コース・料金プラン変更判定情報取得）
#-----------------------------------------------------------

--KEY:KK_SELECT_145

SELECT
　　KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.MK_FLG = '0'
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_146)
#--KKPRC09701、KKPRC01701(料金コース・料金プラン変更情報（ホームタイプ、メゾンタイプ、マンションタイプ判定)
#-----------------------------------------------------------

--KEY:KK_SELECT_146

SELECT
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0861.MANSION_BUKKEN_CD
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
KK_T_TK_HOSHIKI_KEI KK0891
ON
  KK0891.TK_HOSHIKI_KEI_NO = KK0081.TK_HOSHIKI_KEI_NO
  AND KK0891.MK_FLG = '0'
INNER JOIN
KK_T_KAISEN_USE_KEI KK0881
ON
  KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
  AND KK0881.MK_FLG = '0'
INNER JOIN
KK_T_OWNR_KEI KK0871
ON
  KK0871.OWNR_KEI_NO = KK0881.OWNR_KEI_NO
  AND KK0871.MK_FLG = '0'
INNER JOIN
KK_T_MANSION_BUKKEN KK0861
ON
  KK0861.MANSION_BUKKEN_NO = KK0871.MANSION_BUKKEN_NO
  AND KK0861.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.MK_FLG = '0'
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_147)
#--Clarisオプション情報反映
#--有効なサービス契約が存在するかチェック＆ステータス取得
#-----------------------------------------------------------

--KEY:KK_SELECT_147

SELECT
  KK0081.GENE_ADD_DTM
 ,KK0081.SYSID
 ,KK0081.PRC_GRP_CD
 ,KK0081.SVC_KEI_STAT
 ,KK0081.SVC_CHRG_STAYMD
FROM  KK_T_SVC_KEI KK0081
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM) AS MAX_G
  FROM  KK_T_SVC_KEI KK0081_G
  WHERE KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND   KK0081_G.RSV_APLY_YMD <= ?
  AND   KK0081_G.RSV_APLY_CD = '2'
  AND   KK0081_G.MK_FLG = '0')
FOR UPDATE

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_148)
#--サービス契約が解約又はキャンセルされている
#-----------------------------------------------------------

--KEY:KK_SELECT_148

SELECT COUNT(*) AS CNT 
  FROM KK_T_SVC_KEI T1 
 WHERE ? = T1.SVC_KEI_NO 
   AND T1.RSV_APLY_YMD || T1.GENE_ADD_DTM = (SELECT MAX(T2.RSV_APLY_YMD || T2.GENE_ADD_DTM) AS T2_MAX 
                                               FROM KK_T_SVC_KEI T2 
                                              WHERE T2.SVC_KEI_NO    = T1.SVC_KEI_NO 
                                                AND T2.RSV_APLY_YMD <= ? 
                                                AND T2.RSV_APLY_CD   = '2' 
                                                AND T2.MK_FLG        = '0') 
   AND T1.SVC_KEI_STAT IN ('910','920') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_149)
#--サービス契約がプラン変更されている
#-----------------------------------------------------------

--KEY:KK_SELECT_149

SELECT COUNT(*) AS CNT 
  FROM KK_T_SVC_KEI T1 
 WHERE ? = T1.SVC_KEI_NO 
   AND T1.RSV_APLY_YMD || T1.GENE_ADD_DTM = (SELECT MAX(T2.RSV_APLY_YMD || T2.GENE_ADD_DTM) AS T2_MAX 
                                               FROM KK_T_SVC_KEI T2 
                                              WHERE T2.SVC_KEI_NO    = T1.SVC_KEI_NO 
                                                AND T2.RSV_APLY_YMD <= ? 
                                                AND T2.RSV_APLY_CD   = '2' 
                                                AND T2.MK_FLG        = '0') 
   AND T1.SVC_KEI_STAT = '5' 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_150)
#--カレントの各種項目を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_150

SELECT T1.SVC_KEI_NO,
       T1.GENE_ADD_DTM,
       T1.SVC_KEI_STAT,
       T1.SYSID,
       T1.SVC_CD,
       T1.MSKM_DTL_NO,
       T1.SEIRI_NO,
       T1.MENKAIHAT_ANKEN_NO,
       T1.PRC_GRP_CD,
       T1.PCRS_CD,
       T1.PPLAN_CD,
       T1.TK_HOSHIKI_KEI_NO,
       T1.SVC_USE_STA_KIBO_YMD,
       T1.RSV_TSTA_KIBO_YMD,
       T1.ID_SOKHOSHO_OUTPUT_YH,
       T1.SVC_KEI_KZKWRK_REQYMD,
       T1.SHOSA_YMD,
       T1.SHOSA_CL_YMD,
       T1.SKEKKA_CD,
       T1.SKEKKA_DTL_CD,
       T1.SKEKKA_HOKI_CD,
       T1.SKEKKA_SEND_CD,
       T1.PAYWAY_KEIZOKU_FLG,
       T1.FTRIAL_KANYU_YMD,
       T1.FTRIAL_PRD_ENDYMD,
       T1.HONKANYU_YMD,
       T1.HONKANYU_IKO_KIGEN_YMD,
       T1.KEI_CNC_YMD,
       T1.PLAN_STAYMD,
       T1.PLAN_ENDYMD,
       T1.PLAN_CHRG_STAYMD,
       T1.PLAN_CHRG_ENDYMD,
       T1.PLAN_END_SBT_CD,
       T1.RSV_APLY_YMD,
       T1.RSV_CL_YMD,
       T1.RSV_APLY_CD,
       T1.SVC_CANCEL_YMD,
       T1.SVC_CANCEL_RSN_CD,
       T1.SVC_STA_YMD,
       T1.SVC_CHRG_STAYMD,
       T1.LETTER_HASSO_SHIWAKE_DIV,
       T1.THNX_LETTER_SHS_CD,
       T1.WEB_OP_ADD_FAIL_FLG,
       T1.SVC_STP_YMD,
       T1.SVC_STP_RSN_CD,
       T1.SVC_STP_RLS_YMD,
       T1.SVC_STP_RLS_RSN_CD,
       T1.PAUSE_STP_CD,
       T1.SVC_PAUSE_YMD,
       T1.SVC_PAUSE_RSN_CD,
       T1.SVC_PAUSE_RSN_MEMO,
       T1.SVC_PAUSE_RLS_YMD,
       T1.SVC_PAUSE_RLS_RSN_CD,
       T1.SVC_PAUSE_RLS_RSN_MEMO,
       T1.SVC_ENDYMD,
       T1.SVC_CHRG_ENDYMD,
       T1.SVC_DSL_KISAN_YMD,
       T1.SVC_DSL_YMD,
       T1.SVC_DLRE_CD,
       T1.SVC_DLRE_MEMO,
       T1.SVC_DSL_TTDKI_FIN_FLG,
       T1.KAIHK_YMD,
       T1.SVC_CANCEL_CL_YMD,
       T1.SVC_DSL_CL_YMD,
       T1.CHGE_MT_HOJINSVKEI_UK_NO,
       T1.CHGE_MT_HOJINSVKEI_UK_NOPT,
       T1.CHGE_SK_HOJINSVKEI_UK_NO,
       T1.CHGE_SK_HOJINSVKEI_UK_NOPT,
       T1.CHMT_HJIN_EO_YKAE_SVKEI_NO,
       T1.CHSK_HJIN_EO_YKAE_SVKEI_NO,
       T1.HOJINSVKEI_HKTGI_SBT_CD,
       T1.PNLTY_HASSEI_CD,
       T1.PNLTY_CHGE_RSN_CD,
       T1.IDO_DIV,
       T1.SHK_DFLT_PWD,
       T1.CUST_ID_PWD,
       T1.MENKAIHAT_ANKEN_KR_ADD_FLG,
       T1.INTR_CD,
       T1.SHOSA_DSL_FIN_CD,
       T1.IDO_NG_STAT_CD,
       T1.CHRG_STA_YMD_HOSEI_UM,
       T1.SVC_PAUSE_CHRG_STA_YMD,
       T1.WORK_RRK_BIKO,
       T1.AUTO_SHOSA_TRAN_STAT_CD,
       T1.KIKI_MIADD_LIST_OPUTZM_FLG,
       T1.KAIHK_FAIL_KEI_CST_ZM_FLG,
       T1.SVCTK_BUT_DEL_TRN_JSSI_DTM,
       T1.ADD_DTM,
       T1.ADD_OPEACNT,
       T1.UPD_DTM,
       T1.UPD_OPEACNT,
       T1.DEL_DTM,
       T1.DEL_OPEACNT,
       T1.MK_FLG,
       T1.ADD_UNYO_YMD,
       T1.ADD_TRN_ID,
       T1.UPD_UNYO_YMD,
       T1.UPD_TRN_ID,
       T1.DEL_UNYO_YMD,
       T1.DEL_TRN_ID
  FROM KK_T_SVC_KEI T1
 WHERE ? = T1.SVC_KEI_NO
   AND T1.RSV_APLY_YMD || T1.GENE_ADD_DTM = (SELECT MAX(T2.RSV_APLY_YMD || T2.GENE_ADD_DTM) AS T2_MAX
                                               FROM KK_T_SVC_KEI T2
                                              WHERE T2.SVC_KEI_NO    = T1.SVC_KEI_NO
                                                AND T2.RSV_APLY_YMD <= ?
                                                AND T2.RSV_APLY_CD   = '2'
                                                AND T2.MK_FLG        = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_151)
#--回復不可契約情報更新用排他ロック処理
#-----------------------------------------------------------

--KEY:KK_SELECT_151

SELECT
    UPD_DTM
FROM
    KK_T_SVC_KEI TSK
WHERE
    TSK.SVC_KEI_NO = ?
AND
    TSK.RSV_APLY_YMD || TSK.GENE_ADD_DTM = (SELECT MAX(SUB_TSK.RSV_APLY_YMD || SUB_TSK.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
                        FROM   KK_T_SVC_KEI SUB_TSK
                        WHERE  SUB_TSK.SVC_KEI_NO = TSK.SVC_KEI_NO
                        AND    SUB_TSK.MK_FLG = '0'
                        AND    SUB_TSK.RSV_APLY_YMD <= ?
                        AND    SUB_TSK.RSV_APLY_CD = '2')
FOR UPDATE


#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_152)
#--サービス契約、お客様、進捗から、運用日当日にサービス契約、お客様の情報更新、または特定の異動（中断受付／中断解除／解約／強制解約など）が発生した対象となるサービス契約番号を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_152

SELECT DISTINCT
     KTSK.SVC_KEI_NO AS SVC_KEI_NO
    ,KTSK.IDO_DIV AS IDO_DIV
    ,KTSK.MSKM_DTL_NO AS MSKM_DTL_NO
    ,KTSK.SYSID AS SYSID
    ,KTSK.PCRS_CD AS PCRS_CD
    ,KTSK.SVC_CD AS SVC_CD
    ,KTSK.SVC_PAUSE_YMD AS SVC_PAUSE_YMD
    ,KTSK.SVC_PAUSE_RLS_YMD AS SVC_PAUSE_RLS_YMD
    ,KTSK.SVC_STP_YMD AS SVC_STP_YMD
    ,KTSK.SVC_STP_RLS_YMD AS SVC_STP_RLS_YMD
    ,KTSK.SVC_DSL_KISAN_YMD AS SVC_DSL_KISAN_YMD
    ,KTSK.SVC_STA_YMD AS SVC_STA_YMD
    ,KTSK.UPD_UNYO_YMD AS UPD_UNYO_YMD
    ,KTSK.KAIHK_YMD AS KAIHK_YMD
FROM (
    SELECT
         KTSK.SVC_KEI_NO AS SVC_KEI_NO
        ,KTP.IDO_DIV AS IDO_DIV
        ,KTSK.MSKM_DTL_NO AS MSKM_DTL_NO
        ,KTSK.SYSID AS SYSID
        ,KTSK.PCRS_CD AS PCRS_CD
        ,KTSK.SVC_CD AS SVC_CD
        ,KTSK.SVC_PAUSE_YMD AS SVC_PAUSE_YMD
        ,KTSK.SVC_PAUSE_RLS_YMD AS SVC_PAUSE_RLS_YMD
        ,KTSK.SVC_STP_YMD AS SVC_STP_YMD
        ,KTSK.SVC_STP_RLS_YMD AS SVC_STP_RLS_YMD
        ,KTSK.SVC_DSL_KISAN_YMD AS SVC_DSL_KISAN_YMD
        ,KTSK.SVC_STA_YMD AS SVC_STA_YMD
        ,KTSK.KAIHK_YMD AS KAIHK_YMD
        ,SUBSTR(KTP.PRG_DTM, 1, 8) AS UPD_UNYO_YMD
    FROM
        KK_T_SVC_KEI KTSK
    INNER JOIN
        KK_T_PRG KTP
    ON
        KTSK.SVC_KEI_NO = KTP.SVC_KEI_NO
    WHERE
        KTP.IDO_DIV IN ('00004', '00005', '00006', '00007', '00008', '00009', '00010', '00011', '00012', '00013', '00014', '00019', '00024', '00025', '00032', '00033', '00039', '00041', '00043', '00044', '00062', '00063', '00064')
    AND
        KTP.IDO_DTM >= ?
    AND
        KTP.MK_FLG = '0'
    AND
        KTSK.PRC_GRP_CD IN ('02', '03', '04')
    AND
        KTSK.MK_FLG = '0'
    AND
        KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM = (
            SELECT
                MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
            FROM
                KK_T_SVC_KEI KTSK_GENE
            WHERE
                KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
            AND
                KTSK_GENE.RSV_APLY_YMD <= ?
            AND
                KTSK_GENE.RSV_APLY_CD = '2'
            AND
                KTSK_GENE.MK_FLG = '0'
        )
     ) KTSK
ORDER BY KTSK.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_153)
#--該当のサービス契約回線内訳番号に紐づくサービス契約番号を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_153

SELECT
    SVC_KEI.SVC_KEI_NO,
    SVC_KEI.SVC_KEI_STAT,
    SVC_KEI.SVC_DSL_YMD
FROM
    KK_T_SVKEI_KAISEN_UW SVKEI_KAISEN_UW
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KAISEN_TG_SVKEI
ON
    SVKEI_KAISEN_UW.SVC_KEI_KAISEN_UCWK_NO = KAISEN_TG_SVKEI.SVC_KEI_KAISEN_UCWK_NO
INNER JOIN
    KK_T_SVC_KEI SVC_KEI
ON
    KAISEN_TG_SVKEI.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
WHERE
    SVKEI_KAISEN_UW.SVC_KEI_KAISEN_UCWK_NO = ?
AND
    SVKEI_KAISEN_UW.GENE_ADD_DTM =
        (
            SELECT MAX(KK_T_SVKEI_KAISEN_UW_RCNT.GENE_ADD_DTM) AS KK_T_SVKEI_KAISEN_UW_MAX
            FROM  KK_T_SVKEI_KAISEN_UW KK_T_SVKEI_KAISEN_UW_RCNT
            WHERE  KK_T_SVKEI_KAISEN_UW_RCNT.SVC_KEI_KAISEN_UCWK_NO = SVKEI_KAISEN_UW.SVC_KEI_KAISEN_UCWK_NO
            AND    KK_T_SVKEI_KAISEN_UW_RCNT.MK_FLG = '0'
        )
AND
    KAISEN_TG_SVKEI.MK_FLG = '0'
AND
    SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM =
            (SELECT MAX(KK_T_SVC_KEI_RCNT.RSV_APLY_YMD || KK_T_SVC_KEI_RCNT.GENE_ADD_DTM) AS KK_T_SVC_KEI_MAX
            FROM    KK_T_SVC_KEI KK_T_SVC_KEI_RCNT
            WHERE   KK_T_SVC_KEI_RCNT.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
            AND     KK_T_SVC_KEI_RCNT.RSV_APLY_YMD <= ?
            AND     KK_T_SVC_KEI_RCNT.RSV_APLY_CD = '2'
            AND     KK_T_SVC_KEI_RCNT.MK_FLG = '0')
ORDER BY
    SVC_KEI.SVC_CD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_154)
#--契約情報連携プラン変更情報の出力対象となるサービス契約情報を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_154

SELECT DISTINCT
     KTSK.SVC_KEI_NO
    ,KTSK.MSKM_DTL_NO
    ,KTSK.SYSID
    ,KTSK.PCRS_CD
    ,KTSK.SVC_CD
    ,KTSK.SVC_STA_YMD
FROM
    KK_T_OP_SVC_KEI KTOSK
INNER JOIN
    KK_T_SVC_KEI KTSK
ON
    KTOSK.SVC_KEI_NO = KTSK.SVC_KEI_NO
WHERE
    KTOSK.SVC_KEI_NO = ?
AND
    KTOSK.OP_SVC_CD IN ('B004', 'B005')
AND
    KTOSK.OP_SVC_KEI_STAT NOT IN ('910', '920')
AND
    KTOSK.RSV_APLY_YMD || KTOSK.GENE_ADD_DTM = (
        SELECT
            MAX(KTOSK_GENE.RSV_APLY_YMD || KTOSK_GENE.GENE_ADD_DTM) AS KTOSK_MAX
        FROM
            KK_T_OP_SVC_KEI KTOSK_GENE
        WHERE
            KTOSK_GENE.OP_SVC_KEI_NO = KTOSK.OP_SVC_KEI_NO
        AND
            KTOSK_GENE.RSV_APLY_YMD <= ?
        AND
            KTOSK_GENE.RSV_APLY_CD = '2'
        AND
            KTOSK_GENE.MK_FLG = '0')
AND
    KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM = (
        SELECT
            MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
        FROM
            KK_T_SVC_KEI KTSK_GENE
        WHERE
            KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
        AND
            KTSK_GENE.RSV_APLY_YMD <= ?
        AND
            KTSK_GENE.RSV_APLY_CD = '2'
        AND
            KTSK_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_159)
#--KKPRC14701にて使用
#--サービス契約情報を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_159

SELECT
 KK0081.SVC_KEI_NO,
 KK0081.GENE_ADD_DTM,
 KK0081.SVC_KEI_STAT,
 KK0081.SYSID,
 KK0081.SVC_CD,
 KK0081.MSKM_DTL_NO,
 KK0081.SEIRI_NO,
 KK0081.MENKAIHAT_ANKEN_NO,
 KK0081.PRC_GRP_CD,
 KK0081.PCRS_CD,
 KK0081.PPLAN_CD,
 KK0081.TK_HOSHIKI_KEI_NO,
 KK0081.SVC_USE_STA_KIBO_YMD,
 KK0081.RSV_TSTA_KIBO_YMD,
 KK0081.ID_SOKHOSHO_OUTPUT_YH,
 KK0081.SVC_KEI_KZKWRK_REQYMD,
 KK0081.SHOSA_YMD,
 KK0081.SHOSA_CL_YMD,
 KK0081.SKEKKA_CD,
 KK0081.SKEKKA_DTL_CD,
 KK0081.SKEKKA_HOKI_CD,
 KK0081.SKEKKA_SEND_CD,
 KK0081.PAYWAY_KEIZOKU_FLG,
 KK0081.FTRIAL_KANYU_YMD,
 KK0081.FTRIAL_PRD_ENDYMD,
 KK0081.HONKANYU_YMD,
 KK0081.HONKANYU_IKO_KIGEN_YMD,
 KK0081.KEI_CNC_YMD,
 KK0081.PLAN_STAYMD,
 KK0081.PLAN_ENDYMD,
 KK0081.PLAN_CHRG_STAYMD,
 KK0081.PLAN_CHRG_ENDYMD,
 KK0081.PLAN_END_SBT_CD,
 KK0081.RSV_APLY_YMD,
 KK0081.RSV_CL_YMD,
 KK0081.RSV_APLY_CD,
 KK0081.SVC_CANCEL_YMD,
 KK0081.SVC_CANCEL_RSN_CD,
 KK0081.SVC_STA_YMD,
 KK0081.SVC_CHRG_STAYMD,
 KK0081.KEIZK_SVC_STAYMD,
 KK0081.KEIZK_SVC_CHRG_STAYMD,
 KK0081.LETTER_HASSO_SHIWAKE_DIV,
 KK0081.THNX_LETTER_SHS_CD,
 KK0081.WEB_OP_ADD_FAIL_FLG,
 KK0081.SVC_STP_YMD,
 KK0081.SVC_STP_RSN_CD,
 KK0081.SVC_STP_RLS_YMD,
 KK0081.SVC_STP_RLS_RSN_CD,
 KK0081.PAUSE_STP_CD,
 KK0081.SVC_PAUSE_YMD,
 KK0081.SVC_PAUSE_RSN_CD,
 KK0081.SVC_PAUSE_RSN_MEMO,
 KK0081.SVC_PAUSE_RLS_YMD,
 KK0081.SVC_PAUSE_RLS_RSN_CD,
 KK0081.SVC_PAUSE_RLS_RSN_MEMO,
 KK0081.SVC_ENDYMD,
 KK0081.SVC_CHRG_ENDYMD,
 KK0081.SVC_DSL_KISAN_YMD,
 KK0081.SVC_DSL_YMD,
 KK0081.SVC_DLRE_CD,
 KK0081.SVC_DLRE_MEMO,
 KK0081.SVC_DSL_TTDKI_FIN_FLG,
 KK0081.KAIHK_YMD,
 KK0081.SVC_CANCEL_CL_YMD,
 KK0081.SVC_DSL_CL_YMD,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NO,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NO,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT,
 KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.HOJINSVKEI_HKTGI_SBT_CD,
 KK0081.PNLTY_HASSEI_CD,
 KK0081.PNLTY_CHGE_RSN_CD,
 KK0081.IDO_DIV,
 KK0081.SHK_DFLT_PWD,
 KK0081.CUST_ID_PWD,
 KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG,
 KK0081.INTR_CD,
 KK0081.SHOSA_DSL_FIN_CD,
 KK0081.IDO_NG_STAT_CD,
 KK0081.CHRG_STA_YMD_HOSEI_UM,
 KK0081.SVC_PAUSE_CHRG_STA_YMD,
 KK0081.WORK_RRK_BIKO,
 KK0081.AUTO_SHOSA_TRAN_STAT_CD,
 KK0081.KIKI_MIADD_LIST_OPUTZM_FLG,
 KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG,
 KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM,
 KK0081.ADD_DTM,
 KK0081.ADD_OPEACNT,
 KK0081.UPD_DTM,
 KK0081.UPD_OPEACNT,
 KK0081.DEL_DTM,
 KK0081.DEL_OPEACNT,
 KK0081.MK_FLG,
 KK0081.ADD_UNYO_YMD,
 KK0081.ADD_TRN_ID,
 KK0081.UPD_UNYO_YMD,
 KK0081.UPD_TRN_ID,
 KK0081.DEL_UNYO_YMD,
 KK0081.DEL_TRN_ID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_STAT = '100' AND
 KK0081.SVC_CD = '03' AND
 KK0081.PRC_GRP_CD IN('11','13') AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') AND
 KK0081.ADD_DTM <= ?
 ORDER BY KK0081.SVC_KEI_NO, KK0081.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_160)
#--KKPRC14701にて使用
#--サービス契約情報を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_160

SELECT
 KK0081.SVC_KEI_NO,
 KK0081.GENE_ADD_DTM,
 KK0081.SVC_KEI_STAT,
 KK0081.SYSID,
 KK0081.SVC_CD,
 KK0081.MSKM_DTL_NO,
 KK0081.SEIRI_NO,
 KK0081.MENKAIHAT_ANKEN_NO,
 KK0081.PRC_GRP_CD,
 KK0081.PCRS_CD,
 KK0081.PPLAN_CD,
 KK0081.TK_HOSHIKI_KEI_NO,
 KK0081.SVC_USE_STA_KIBO_YMD,
 KK0081.RSV_TSTA_KIBO_YMD,
 KK0081.ID_SOKHOSHO_OUTPUT_YH,
 KK0081.SVC_KEI_KZKWRK_REQYMD,
 KK0081.SHOSA_YMD,
 KK0081.SHOSA_CL_YMD,
 KK0081.SKEKKA_CD,
 KK0081.SKEKKA_DTL_CD,
 KK0081.SKEKKA_HOKI_CD,
 KK0081.SKEKKA_SEND_CD,
 KK0081.PAYWAY_KEIZOKU_FLG,
 KK0081.FTRIAL_KANYU_YMD,
 KK0081.FTRIAL_PRD_ENDYMD,
 KK0081.HONKANYU_YMD,
 KK0081.HONKANYU_IKO_KIGEN_YMD,
 KK0081.KEI_CNC_YMD,
 KK0081.PLAN_STAYMD,
 KK0081.PLAN_ENDYMD,
 KK0081.PLAN_CHRG_STAYMD,
 KK0081.PLAN_CHRG_ENDYMD,
 KK0081.PLAN_END_SBT_CD,
 KK0081.RSV_APLY_YMD,
 KK0081.RSV_CL_YMD,
 KK0081.RSV_APLY_CD,
 KK0081.SVC_CANCEL_YMD,
 KK0081.SVC_CANCEL_RSN_CD,
 KK0081.SVC_STA_YMD,
 KK0081.SVC_CHRG_STAYMD,
 KK0081.KEIZK_SVC_STAYMD,
 KK0081.KEIZK_SVC_CHRG_STAYMD,
 KK0081.LETTER_HASSO_SHIWAKE_DIV,
 KK0081.THNX_LETTER_SHS_CD,
 KK0081.WEB_OP_ADD_FAIL_FLG,
 KK0081.SVC_STP_YMD,
 KK0081.SVC_STP_RSN_CD,
 KK0081.SVC_STP_RLS_YMD,
 KK0081.SVC_STP_RLS_RSN_CD,
 KK0081.PAUSE_STP_CD,
 KK0081.SVC_PAUSE_YMD,
 KK0081.SVC_PAUSE_RSN_CD,
 KK0081.SVC_PAUSE_RSN_MEMO,
 KK0081.SVC_PAUSE_RLS_YMD,
 KK0081.SVC_PAUSE_RLS_RSN_CD,
 KK0081.SVC_PAUSE_RLS_RSN_MEMO,
 KK0081.SVC_ENDYMD,
 KK0081.SVC_CHRG_ENDYMD,
 KK0081.SVC_DSL_KISAN_YMD,
 KK0081.SVC_DSL_YMD,
 KK0081.SVC_DLRE_CD,
 KK0081.SVC_DLRE_MEMO,
 KK0081.SVC_DSL_TTDKI_FIN_FLG,
 KK0081.KAIHK_YMD,
 KK0081.SVC_CANCEL_CL_YMD,
 KK0081.SVC_DSL_CL_YMD,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NO,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NO,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT,
 KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.HOJINSVKEI_HKTGI_SBT_CD,
 KK0081.PNLTY_HASSEI_CD,
 KK0081.PNLTY_CHGE_RSN_CD,
 KK0081.IDO_DIV,
 KK0081.SHK_DFLT_PWD,
 KK0081.CUST_ID_PWD,
 KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG,
 KK0081.INTR_CD,
 KK0081.SHOSA_DSL_FIN_CD,
 KK0081.IDO_NG_STAT_CD,
 KK0081.CHRG_STA_YMD_HOSEI_UM,
 KK0081.SVC_PAUSE_CHRG_STA_YMD,
 KK0081.WORK_RRK_BIKO,
 KK0081.AUTO_SHOSA_TRAN_STAT_CD,
 KK0081.KIKI_MIADD_LIST_OPUTZM_FLG,
 KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG,
 KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM,
 KK0081.ADD_DTM,
 KK0081.ADD_OPEACNT,
 KK0081.UPD_DTM,
 KK0081.UPD_OPEACNT,
 KK0081.DEL_DTM,
 KK0081.DEL_OPEACNT,
 KK0081.MK_FLG,
 KK0081.ADD_UNYO_YMD,
 KK0081.ADD_TRN_ID,
 KK0081.UPD_UNYO_YMD,
 KK0081.UPD_TRN_ID,
 KK0081.DEL_UNYO_YMD,
 KK0081.DEL_TRN_ID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_STAT = '100' AND
 KK0081.SVC_CD = '03' AND
 KK0081.PRC_GRP_CD IN('11','13') AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') AND
 KK0081.ADD_DTM >= ? AND
 KK0081.ADD_DTM <= ?
 ORDER BY KK0081.SVC_KEI_NO, KK0081.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_170)
#--請求契約番号に紐付くサービス契約情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_170

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SVC_ENDYMD,
    KK0081.SVC_CHRG_ENDYMD
FROM
    KK_T_KAKINS KK0321
    INNER JOIN KK_T_SVC_KEI KK0081
        ON  KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
    KK0321.SEIKY_KEI_NO = ?
AND
    KK0321.MK_FLG = '0'
AND 
    KK0081.SVC_CHRG_STAYMD IS NOT NULL
AND 
    KK0081.SVC_CHRG_ENDYMD IS NOT NULL
AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_177)
#--KKPRC05802
#--サービス契約「料金グループコード」情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_177

SELECT
    KK0081.PRC_GRP_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
                (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                FROM
                    KK_T_SVC_KEI KK0081_GENE
                WHERE
                    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND 
                    KK0081_GENE.RSV_APLY_YMD <= ?
                AND 
                    KK0081_GENE.RSV_APLY_CD = '2'
                AND 
                    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_178)
#--KKPRC06401
#--期限までに「サービス解約」（キャンセル、契約者併合・分割、コース変更[多チャンネル⇒再送信]）、「サービス回復」の異動が異動が発生した対象サービス契約を検索します。
#-----------------------------------------------------------

--KEY:KK_SELECT_178

SELECT
  KK0081_TMP.SVC_KEI_NO,
  KK0081_TMP.GENE_ADD_DTM,
  KK0081_TMP.SYSID,
  KK0081_TMP.PRC_GRP_CD,
  KK0081_TMP.PCRS_CD,
  KK0081_TMP.IDO_DIV,
  KK0081_TMP.ADD_DTM,
  KK0081_TMP.ADD_OPEACNT,
  KK0081_TMP.ADD_TRN_ID,
  KK0081_TMP.UPD_DTM,
  KK0081_TMP.UPD_OPEACNT,
  KK0081_TMP.UPD_TRN_ID,
  KK0081_TMP.MK_FLG,
  KK0081_TMP.TOKUSOKU_STAT,
  KK0081_TMP.SEIKY_KEI_NO
FROM
  (
 SELECT
     KK0081.SVC_KEI_NO,
     KK0081.GENE_ADD_DTM,
     KK0081.SYSID,
     KK0081.PRC_GRP_CD,
     KK0081.PCRS_CD,
     KK0081.IDO_DIV,
     KK0081.ADD_DTM,
     KK0081.ADD_OPEACNT,
     KK0081.ADD_TRN_ID,
     KK0081.UPD_DTM,
     KK0081.UPD_OPEACNT,
     KK0081.UPD_TRN_ID,
     KK0081.MK_FLG,
     CH0231.TOKUSOKU_STAT,
     CH0231.SEIKY_KEI_NO
 FROM
     KK_T_KAKINS KK0321
 LEFT OUTER JOIN
     CH_T_TOKUSOKU CH0231
 ON
     KK0321.SEIKY_KEI_NO = CH0231.SEIKY_KEI_NO
     AND CH0231.TOKUSOKU_IDO_YMD <= ?
     AND CH0231.TOKUSOKU_STAYMD <= ?
     AND CH0231.TOKUSOKU_ENDYMD >= ?
     AND CH0231.MK_FLG = '0'
 INNER JOIN
     KK_T_SVC_KEI KK0081
 ON
     KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
     AND KK0081.IDO_DIV IN('00005','00004','00006','00008','00013','00014','00064')
     AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
     (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0') 
     AND KK0081.UPD_DTM <= ? 
 WHERE
     KK0321.KAKINS_TSTAYMD <= ?
     AND KK0321.KAKINS_TENDYMD >= ?
     AND KK0321.MK_FLG = '0'
 UNION
 SELECT
     KK0081.SVC_KEI_NO,
     KK0081.GENE_ADD_DTM,
     KK0081.SYSID,
     KK0081.PRC_GRP_CD,
     KK0081.OLD_PCRS_CD,
     KK0081.IDO_DIV,
     KK0081.ADD_DTM,
     KK0081.ADD_OPEACNT,
     KK0081.ADD_TRN_ID,
     KK0081.UPD_DTM,
     KK0081.UPD_OPEACNT,
     KK0081.UPD_TRN_ID,
     KK0081.MK_FLG,
     CH0231.TOKUSOKU_STAT,
     CH0231.SEIKY_KEI_NO
 FROM
     KK_T_KAKINS KK0321
 INNER JOIN
     CH_T_TOKUSOKU CH0231
 ON
     KK0321.SEIKY_KEI_NO = CH0231.SEIKY_KEI_NO
     AND CH0231.TOKUSOKU_IDO_YMD <= ?
     AND CH0231.TOKUSOKU_STAYMD <= ?
     AND CH0231.TOKUSOKU_ENDYMD >= ?
     AND CH0231.MK_FLG = '0'
 INNER JOIN
     (SELECT
         LAG(KK0081_TMP.PCRS_CD,1,'0') OVER(PARTITION BY KK0081_TMP.SVC_KEI_NO ORDER BY KK0081_TMP.RSV_APLY_YMD || KK0081_TMP.GENE_ADD_DTM) OLD_PCRS_CD,
         KK0081_TMP.PCRS_CD NEW_PCRS_CD,
         ROW_NUMBER() OVER(PARTITION BY KK0081_TMP.SVC_KEI_NO ORDER BY KK0081_TMP.GENE_ADD_DTM DESC) RNUM,
         KK0081_TMP.SVC_KEI_NO,
         KK0081_TMP.GENE_ADD_DTM,
         KK0081_TMP.SYSID,
         KK0081_TMP.IDO_DIV,
         KK0081_TMP.PRC_GRP_CD,
         KK0081_TMP.PCRS_CD,
         KK0081_TMP.RSV_APLY_YMD,
         KK0081_TMP.ADD_DTM,
         KK0081_TMP.ADD_OPEACNT,
         KK0081_TMP.ADD_TRN_ID,
         KK0081_TMP.UPD_DTM,
         KK0081_TMP.UPD_OPEACNT,
         KK0081_TMP.UPD_TRN_ID,
         KK0081_TMP.MK_FLG
     FROM
         KK_T_SVC_KEI KK0081_TMP
     WHERE
         KK0081_TMP.RSV_APLY_YMD <= ?
         AND KK0081_TMP.RSV_APLY_CD = '2'
         AND KK0081_TMP.MK_FLG = '0'
     ) KK0081
 ON
     KK0081.IDO_DIV IN('00009') 
     AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
     (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) KK0081_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0')
     AND    KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
     AND    KK0081.OLD_PCRS_CD = 'A24'
     AND    KK0081.NEW_PCRS_CD = 'A23'
     AND    KK0081.UPD_DTM <= ? 
     AND    RNUM = 1
 WHERE
     KK0321.KAKINS_TSTAYMD <= ?
     AND KK0321.KAKINS_TENDYMD >= ?
     AND KK0321.MK_FLG = '0'
)KK0081_TMP
ORDER BY KK0081_TMP.GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_179)
#--KKPRC06401
#--期限までに手続き中の強制解約・手続き中の強制解約の回復の異動が発生した
#-----------------------------------------------------------

--KEY:KK_SELECT_179

SELECT
 KK0081.SVC_KEI_NO
,KK0081.GENE_ADD_DTM
,KK0081.SYSID
,KK0081.SVC_CD
,KK0081.PRC_GRP_CD
,KK0081.PCRS_CD
,KK0081.PPLAN_CD
,KK0081.SHOSA_YMD
,KK0081.SVC_STA_YMD
,KK0081.SVC_ENDYMD
,KK0081.IDO_DIV
,KK0081.ADD_DTM
,KK0081.ADD_OPEACNT
,KK0081.ADD_TRN_ID
,KK0081.UPD_DTM
,KK0081.UPD_OPEACNT
,KK0081.UPD_TRN_ID
,KK0081.MK_FLG
,CH0231.TOKUSOKU_STAT
,CH0231.SEIKY_KEI_NO
,CH0361.TOKUSOKU_STAT AS IDO_TOKUSOKU_STAT
,KK0081.SVC_KEI_STAT 
FROM
 CH_T_TOKUSOKU CH0231
 INNER JOIN
  KK_T_KAKINS KK0321
 ON
  KK0321.SEIKY_KEI_NO = CH0231.SEIKY_KEI_NO
  AND KK0321.KAKINS_TSTAYMD <= ?
  AND KK0321.KAKINS_TENDYMD >= ?
  AND KK0321.MK_FLG = '0'
 INNER JOIN
  KK_T_SVC_KEI KK0081
 ON
  KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
  AND KK0081.SVC_KEI_STAT IN('020','030')
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
   (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
          WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2' 
           AND KK0081_GENE.MK_FLG = '0')
INNER JOIN
 CH_T_TOKUSOKU_IDO CH0361
ON
  CH0361.TOKUSOKU_NO = CH0231.TOKUSOKU_NO
  AND CH0361.TOKUSOKU_IDO_NO = 
   (SELECT MAX(TOKUSOKU_IDO_NO) AS CH0361_MAX
          FROM CH_T_TOKUSOKU_IDO CH0361_GENE
          WHERE CH0361_GENE.TOKUSOKU_NO = CH0361.TOKUSOKU_NO
           AND CH0361_GENE.MK_FLG = '0')
  AND CH0361.MK_FLG = '0'
WHERE
 CH0231.TOKUSOKU_IDO_YMD <= ?
 AND CH0231.TOKUSOKU_STAYMD <= ?
 AND CH0231.TOKUSOKU_ENDYMD >= ?
 AND CH0231.MK_FLG = '0'
ORDER BY KK0081.SYSID,KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_180)
#--該当のサービス契約番号に紐づく料金コース等情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_180

SELECT
     SVC_KEI.SVC_KEI_NO
    ,SVC_KEI.PRC_GRP_CD
    ,SVC_KEI.PCRS_CD
    ,SVC_KEI.PPLAN_CD
FROM
    KK_T_SVC_KEI SVC_KEI
WHERE
    SVC_KEI.SVC_KEI_NO = ?
AND
    SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM = (
    SELECT MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS SVC_KEI_GENE_MAX
    FROM KK_T_SVC_KEI SVC_KEI_GENE
    WHERE SVC_KEI_GENE.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
    AND SVC_KEI_GENE.RSV_APLY_YMD <= ?
    AND SVC_KEI_GENE.RSV_APLY_CD = '2'
    AND SVC_KEI_GENE.MK_FLG = '0'
)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_181)
#--KKPRC33701
#--サービス契約＿工事案件に紐付くサービス契約情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_181

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.TK_HOSHIKI_KEI_NO,
    KU0081.SVC_KEI_KAISEN_UCWK_NO,
    KK0251.KAISEN_CD,
    KK0251.TEL_VLAN_ID_TRKM_YMD
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KU_T_SVKEI_KOJIAK KU0081
ON
    KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KU0081.KOJIAK_NO = ?
    AND KU0081.MK_FLG = '0'
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KU0081.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.KAISEN_CD IN ('1001','1004')
    AND KK0251.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
    FROM
        KK_T_SVKEI_KAISEN_UW KK0251_GENE
    WHERE
        KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
        AND KK0251_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_CD = '02'
    AND KK0081.SVC_KEI_STAT NOT IN ('910','920')
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_182)
#--KKPRC01601
#--住所変更新設、撤去情報の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_182

SELECT
    DISTINCT 
    KK0081.SVC_KEI_NO,
    KK1091.IDO_DIV,
    KK1091.PRG_STAT,
    MAX(KK1091.PRG_DTM) PRG_DTM,
    KK2101.ADCHG_NO,
    KK2101.CHBF_SKBT_NO,
    KK2101.CHAF_SKBT_NO,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK0081.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
    KK1091.PRG_STAT = '9500' 
    AND
    KK1091.PRG_DTM > ? 
    AND
    KK1091.PRG_DTM <= ? 
    AND
    KK1091.MK_FLG = '0'
INNER JOIN
(
    SELECT 
        KK2101.ADCHG_NO,
        KK2101.CHBF_SKBT_NO,
        KK2101.CHAF_SKBT_NO,
        KK2091.ITNM_SVKEI_KISUW_NO 
    FROM
        KK_T_ADCHG_DTL KK2101
    INNER JOIN
        KK_T_ADCHG KK2091
    ON
        KK2091.ADCHG_NO = KK2101.ADCHG_NO AND
        KK2101.ADCHG_DTL_SBT_CD = '01' AND
        KK2091.ADCHG_STAT = '001' AND 
        KK2101.ADCHG_NO = 
        (SELECT MAX(KK2101_MAX.ADCHG_NO) ADCHG_NO_MAX
           FROM KK_T_ADCHG_DTL KK2101_MAX
          WHERE KK2101.CHAF_SKBT_NO = KK2101_MAX.CHAF_SKBT_NO AND
                KK2101_MAX.MK_FLG = '0')
) KK2101
ON
    KK2101.CHBF_SKBT_NO = KK0081.SVC_KEI_NO 
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK2101.ITNM_SVKEI_KISUW_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND 
    KK0251.GENE_ADD_DTM = (SELECT
                               MAX(KK0251_MAX.GENE_ADD_DTM)
                             FROM
                               KK_T_SVKEI_KAISEN_UW KK0251_MAX
                            WHERE
                               KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                               KK0251_MAX.MK_FLG = '0')
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD = '12' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM KK_T_SVC_KEI KK0081_GENE
      WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
            KK0081_GENE.RSV_APLY_YMD <= ? AND
            KK0081_GENE.RSV_APLY_CD = '2' AND
            KK0081_GENE.MK_FLG = '0')
GROUP BY KK0081.SVC_KEI_NO,
    KK1091.IDO_DIV,
    KK1091.PRG_STAT,
    KK2101.ADCHG_NO,
    KK2101.CHBF_SKBT_NO,
    KK2101.CHAF_SKBT_NO,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_183)
#--KKPRC01601
#--住所変更確定情報の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_183

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.IDO_DIV,
    KK1091.PRG_DTM,
    KK1091.PRG_STAT,
    KK2101.ADCHG_NO,
    KK2101.CHBF_SKBT_NO,
    KK2101.CHAF_SKBT_NO,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK0081.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
    KK1091.PRG_STAT = '6100' AND
    KK1091.PRG_DTM > ? AND
    KK1091.PRG_DTM <= ? AND
    KK1091.MK_FLG = '0'
INNER JOIN
    KK_T_ADCHG_DTL KK2101
ON
    KK2101.CHAF_SKBT_NO = KK0081.SVC_KEI_NO AND
    KK2101.ADCHG_DTL_SBT_CD = '01' AND
    KK2101.ADCHG_NO = 
    (SELECT MAX(KK2101_MAX.ADCHG_NO) ADCHG_NO_MAX
       FROM KK_T_ADCHG_DTL KK2101_MAX
      WHERE KK2101.CHAF_SKBT_NO = KK2101_MAX.CHAF_SKBT_NO AND
            KK2101_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.KAISEN_UCWK_USE_STAYMD = (SELECT
                                         MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
                                       FROM
                                         KK_T_KAISEN_TG_SVKEI KK0241_MAX
                                      WHERE
                                         KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
                                         KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
                                         KK0241_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
    KK0251.GENE_ADD_DTM = (SELECT
                               MAX(KK0251_MAX.GENE_ADD_DTM)
                             FROM
                               KK_T_SVKEI_KAISEN_UW KK0251_MAX
                            WHERE
                               KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                               KK0251_MAX.MK_FLG = '0')
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD = '12' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM KK_T_SVC_KEI KK0081_GENE
      WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
            KK0081_GENE.RSV_APLY_YMD <= ? AND
            KK0081_GENE.RSV_APLY_CD = '2' AND
            KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_185)
#--KKPRC39601
#--主契約判断情報（eo光テレビ主従料金設定候補）の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_185

SELECT KK0081.SVC_KEI_NO,
       KK0081.SVC_STA_YMD,
       (SELECT COUNT(KK0161.SVC_KEI_UCWK_NO)
          FROM KK_T_SVC_KEI_UCWK KK0161  
         WHERE KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0161.SVC_KEI_UCWK_STAT IN ('100','210','220','910')
           AND (KK0161.SVC_KEI_UCWK_NO, KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM) =
                      (SELECT KK0161_GENE.SVC_KEI_UCWK_NO, MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
                         FROM KK_T_SVC_KEI_UCWK KK0161_GENE
                        WHERE KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
                          AND KK0161_GENE.RSV_APLY_YMD <= ?
                          AND KK0161_GENE.RSV_APLY_CD = '2'
                          AND KK0161_GENE.MK_FLG = '0'
                        GROUP BY KK0161_GENE.SVC_KEI_UCWK_NO)
           AND EXISTS(SELECT 1
                        FROM KK_M_PCRS KK0791
                       WHERE KK0791.PRC_GRP_CD IN (?)
                         AND KK0791.PCRS_CD = KK0161.PCRS_CD
                         AND KK0791.PCRS_SBT_CD = '2'
                         AND ? BETWEEN KK0791.PCRS_TSTAYMD AND KK0791.PCRS_TENDYMD
                         AND (KK0791.PCRS_CD, KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM) =
                                (SELECT KK0791_GENE.PCRS_CD, MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX
                                   FROM KK_M_PCRS KK0791_GENE 
                                  WHERE KK0791_GENE.PCRS_CD = KK0791.PCRS_CD
                                    AND KK0791_GENE.RSV_APLY_YMD <= ?
                                    AND KK0791_GENE.MK_FLG = '0'
                                  GROUP BY KK0791_GENE.PCRS_CD))) UCWK_CNT
  FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_STAT = '100'
   AND KK0081.SVC_CD='03'
   AND KK0081.PRC_GRP_CD IN (?)
   AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
            (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
               FROM KK_T_SVC_KEI KK0081_GENE
              WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND KK0081_GENE.RSV_APLY_YMD <= ?
                AND KK0081_GENE.RSV_APLY_CD = '2'
                AND KK0081_GENE.MK_FLG = '0'
              GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_186)
#--指定されたサービス契約番号に紐づくサービス契約回線内訳．回線場所番号、サービス契約回線内訳．回線場所住所未確定フラグを取得する。
#--KKPRC35201にて使用
#-----------------------------------------------------------

--KEY:KK_SELECT_186

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_NO,
    KK0251.KISN_PLC_AD_MI_FIX_FLG
FROM
KK_T_SVC_KEI KK0081
    INNER JOIN 
        KK_T_KAISEN_TG_SVKEI KK0241
    ON
        KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
        KK0241.KAISEN_UCWK_USE_STAYMD <= ? AND
        KK0241.MK_FLG = '0'
    INNER JOIN
        KK_T_SVKEI_KAISEN_UW KK0251
    ON
        KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
        KK0251.GENE_ADD_DTM =
        (SELECT
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
        FROM
           KK_T_SVKEI_KAISEN_UW KK0251_GENE
        WHERE
           KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
            AND KK0251_GENE.MK_FLG = '0') 
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_187)
#--KKPRC41301
#--利用場所住所上書きデータ抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_187

SELECT
    KK0251.SVC_KEI_KAISEN_UCWK_NO,
    KK0081.SYSID,
    KK0081.SVC_KEI_NO,
    KK0081.PCRS_CD,
    KK0251.GENE_ADD_DTM,
    KK0251.KAISEN_PLACE_AD_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.SKS_SHS_AD_CHG_KIBO_YMD,
    KK0251.KSHAD_CHG_KIBO_YMD,
    KK0251.SKS_SHS_AD_CHG_UM,
    KK0251.KSHAD_CHG_UM,
    KK0251.USE_STAYMD
FROM
    KK_T_SVKEI_KAISEN_UW KK0251
    INNER JOIN
        KK_T_KAISEN_TG_SVKEI KK0241
    ON
        KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
    AND 
        KK0241.KAISEN_UCWK_USE_STAYMD = 
 (SELECT
     MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
  FROM
     KK_T_KAISEN_TG_SVKEI KK0241_MAX
  WHERE
     KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
     KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
     KK0241_MAX.MK_FLG = '0')
    AND 
        KK0241.MK_FLG = '0'
    INNER JOIN
        KK_T_SVC_KEI KK0081
    ON
        KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
                    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                        FROM   KK_T_SVC_KEI KK0081_GENE
                        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
                        AND    KK0081_GENE.RSV_APLY_YMD <= ?
                        AND    KK0081_GENE.RSV_APLY_CD = '2'
                        AND    KK0081_GENE.MK_FLG = '0')
WHERE 
    (KK0251.KSHAD_CHG_UM = '1'
OR KK0251.SKS_SHS_AD_CHG_UM = '1')
AND
    KK0251.GENE_ADD_DTM = (SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                                FROM KK_T_SVKEI_KAISEN_UW KK0251_GENE
                                WHERE
                                    KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                                AND 
                                    KK0251_GENE.MK_FLG = '0')
ORDER BY     
    KK0251.SVC_KEI_KAISEN_UCWK_NO,
    KK0081.SYSID,
    KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_188)
#--整理番号が同じサービス契約番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_188

SELECT
    SVC.SVC_KEI_NO
FROM
    KK_T_SVC_KEI SVC
WHERE
    SVC.SEIRI_NO = (
        SELECT
            SVC_KEI.SEIRI_NO
        FROM
            KK_T_SVC_KEI SVC_KEI
        WHERE
            SVC_KEI.SVC_KEI_NO = ?
        AND
            SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM = (
                SELECT
                    MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS MAX_SVC_KEI_GENE
                FROM
                    KK_T_SVC_KEI SVC_KEI_GENE
                WHERE
                    SVC_KEI.SVC_KEI_NO = SVC_KEI_GENE.SVC_KEI_NO
                AND
                    SVC_KEI_GENE.RSV_APLY_YMD <= ?
                AND
                    SVC_KEI_GENE.RSV_APLY_CD = '2'
                AND
                    SVC_KEI_GENE.MK_FLG = '0'
            )
    )
AND
    SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM = (
        SELECT
            MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS MAX_SVC_KEI_GENE
        FROM
            KK_T_SVC_KEI SVC_KEI_GENE
        WHERE
            SVC.SVC_KEI_NO = SVC_KEI_GENE.SVC_KEI_NO
        AND
            SVC_KEI_GENE.RSV_APLY_YMD <= ?
        AND
            SVC_KEI_GENE.RSV_APLY_CD = '2'
        AND
            SVC_KEI_GENE.MK_FLG = '0'
    )
AND
    SVC.SVC_KEI_STAT IN ('020','030','100','210','220')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_189) 
#--UIA17_バッチ機能仕様書(KKPRC42701_割賦契約割引設定対象抽出) 
#--3.全体構成/3-3.処理詳細
#-- (1)割賦契約割引設定対象情報抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_189
SELECT
    KK0081.SVC_KEI_NO            AS KK0081_SVC_KEI_NO,
    KK0081.SYSID                 AS KK0081_SYSID,
    KK0081.IDO_DIV               AS KK0081_IDO_DIV,
    KK0081.PRC_GRP_CD            AS KK0081_PRC_GRP_CD,
    KK0341.KKTK_SVC_KEI_NO       AS KK0341_KKTK_SVC_KEI_NO,
    KK0341.IDO_DIV               AS KK0341_IDO_DIV,
    KK0341.SVC_STA_YMD           AS KK0341_SVC_STA_YMD,
    KK0341.SVC_ENDYMD            AS KK0341_SVC_ENDYMD,
    KK0341.KKTK_SVC_CD           AS KK0341_KKTK_SVC_CD,
    KK0351.OP_SVC_KEI_NO         AS KK0351_OP_SVC_KEI_NO,
    KK0351.IDO_DIV               AS KK0351_IDO_DIV,
    KK2541.KAP_KEI_CHRG_STAYMD   AS KK2541_KAP_KEI_CHRG_STAYMD,
    KK2521.TAKNKIKI_MODEL_CD     AS KK2521_TAKNKIKI_MODEL_CD,
    KK2521.KAP_HAMBAI_FORM_CD    AS KK2521_KAP_HAMBAI_FORM_CD,
    TO_CHAR(ROW_NUMBER() OVER ( PARTITION BY KK0081.SVC_KEI_NO ORDER BY KK2541.KAP_KEI_CHRG_STAYMD )) AS KIKI_KEI_CNT
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_OP_SVC_KEI KK0351     ON  KK0081.SVC_KEI_NO         = KK0351.SVC_KEI_NO
    INNER JOIN KK_T_KKTK_SVC_KEI KK0341   ON  KK0081.SVC_KEI_NO         = KK0341.SVC_KEI_NO
    INNER JOIN KK_T_KAP_KEI KK2541        ON  KK0341.KKTK_SVC_KEI_NO    = KK2541.KKTK_SVC_KEI_NO
    INNER JOIN CK_T_CUST CK0011           ON  KK0081.SYSID              = CK0011.SYSID
    INNER JOIN KK_T_KAKINS KK0321_SVC     ON  KK0081.SVC_KEI_NO         = KK0321_SVC.SVC_KEI_NO
    INNER JOIN KK_T_KAKINS KK0321_OPSVC   ON  KK0351.OP_SVC_KEI_NO      = KK0321_OPSVC.OP_SVC_KEI_NO
    INNER JOIN KK_T_KAKINS KK0321_KKSVC   ON  KK0341.KKTK_SVC_KEI_NO    = KK0321_KKSVC.KKTK_SVC_KEI_NO
    INNER JOIN KK_T_SEIKY_KEI KK0491      ON  KK0321_SVC.SEIKY_KEI_NO   = KK0491.SEIKY_KEI_NO
                                          AND KK0321_OPSVC.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
                                          AND KK0321_KKSVC.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
    INNER JOIN KK_M_KAP_PLAN KK2521       ON  KK2541.KAP_PLAN_CD        = KK2521.KAP_PLAN_CD
WHERE
    (KK0081.SVC_KEI_NO , KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =  (SELECT
    												   KK0081_GENE.SVC_KEI_NO,
                                                       MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                   FROM
                                                       KK_T_SVC_KEI KK0081_GENE
                                                   WHERE
                                                       KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                   AND KK0081_GENE.RSV_APLY_YMD <= ?
                                                   AND KK0081_GENE.RSV_APLY_CD = '2'
                                                   AND KK0081_GENE.MK_FLG = '0'
                                                   GROUP BY
                                                   		KK0081_GENE.SVC_KEI_NO
                                                  )
AND (KK0341.KKTK_SVC_KEI_NO , KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM ) =  (SELECT
													   KK0341_GENE.KKTK_SVC_KEI_NO,
                                                       MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
                                                   FROM
                                                       KK_T_KKTK_SVC_KEI KK0341_GENE
                                                   WHERE
                                                       KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO
                                                   AND KK0341_GENE.RSV_APLY_YMD <= ?
                                                   AND KK0341_GENE.RSV_APLY_CD = '2'
                                                   AND KK0341_GENE.MK_FLG = '0'
                                                   GROUP BY
                                                   		KK0341_GENE.KKTK_SVC_KEI_NO
                                                  )
AND (CK0011.SYSID , CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM ) =  (SELECT
													   CK0011_GENE.SYSID,
                                                       MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
                                                   FROM
                                                       CK_T_CUST CK0011_GENE
                                                   WHERE
                                                       CK0011_GENE.SYSID = CK0011.SYSID
                                                   AND CK0011_GENE.RSV_APLY_YMD <= ?
                                                   AND CK0011_GENE.RSV_APLY_CD = '2'
                                                   AND CK0011_GENE.MK_FLG = '0'
                                                   GROUP BY
                                                   		CK0011_GENE.SYSID
                                                  )
AND (KK0351.OP_SVC_KEI_NO , KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM) =  (SELECT
													   KK0351_GENE.OP_SVC_KEI_NO,
                                                       MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX
                                                   FROM 
                                                       KK_T_OP_SVC_KEI KK0351_GENE
                                                   WHERE
                                                       KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
                                                   AND KK0351_GENE.RSV_APLY_YMD <= ?
                                                   AND KK0351_GENE.RSV_APLY_CD = '2'
                                                   AND KK0351_GENE.MK_FLG = '0'
                                                   GROUP BY
                                                   		KK0351_GENE.OP_SVC_KEI_NO
                                                  )
AND (KK2541.KAP_KEI_NO , KK2541.RSV_APLY_YMD || KK2541.GENE_ADD_DTM) =  (SELECT
													   KK2541.KAP_KEI_NO,
                                                       MAX(KK2541_GENE.RSV_APLY_YMD || KK2541_GENE.GENE_ADD_DTM) AS KK2541_MAX
                                                   FROM 
                                                       KK_T_KAP_KEI KK2541_GENE
                                                   WHERE  
                                                       KK2541_GENE.KAP_KEI_NO = KK2541.KAP_KEI_NO
                                                   AND KK2541_GENE.RSV_APLY_YMD <= ?
                                                   AND KK2541_GENE.RSV_APLY_CD = '2'
                                                   AND KK2541_GENE.MK_FLG = '0'
                                                   GROUP BY
                                                   		KK2541_GENE.KAP_KEI_NO
                                                  )
AND (KK0491.SEIKY_KEI_NO , KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM) = (SELECT
													   KK0491_GENE.SEIKY_KEI_NO,
                                                       MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
                                                   FROM 
                                                       KK_T_SEIKY_KEI KK0491_GENE
                                                   WHERE  
                                                       KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
                                                   AND KK0491_GENE.RSV_APLY_YMD <= ?
                                                   AND KK0491_GENE.RSV_APLY_CD = '2'
                                                   AND KK0491_GENE.MK_FLG = '0'
                                                   GROUP BY
                                                   		KK0491_GENE.SEIKY_KEI_NO
                                                  )
AND KK2521.RSV_APLY_YMD || KK2521.GENE_ADD_DTM = (SELECT
                                                       MAX(KK2521_GENE.RSV_APLY_YMD || KK2521_GENE.GENE_ADD_DTM) AS KK2521_MAX
                                                   FROM
                                                       KK_M_KAP_PLAN KK2521_GENE
                                                   WHERE
                                                       KK2521_GENE.KAP_PLAN_CD = KK2521.KAP_PLAN_CD
                                                   AND KK2521_GENE.RSV_APLY_YMD <= ?
                                                   AND KK2521_GENE.MK_FLG = '0'
                                                 )
AND KK0081.PRC_GRP_CD IN ('02','03','04')
AND KK0351.SVC_STAYMD  <=  ?
AND TO_CHAR(LAST_DAY(TO_DATE(KK0351.SVC_ENDYMD, 'yyyyMMdd')), 'yyyyMMdd') >= ?
AND KK0351.OP_SVC_CD = 'B077'
AND NOT EXISTS (
        SELECT
            KK2541_CSL.KAP_KEI_NO
        FROM
            KK_T_KAP_KEI KK2541_CSL
        WHERE
            KK2541.KAP_KEI_NO       = KK2541_CSL.KAP_KEI_NO
        AND KK2541.GENE_ADD_DTM     = KK2541_CSL.GENE_ADD_DTM
        AND KK2541_CSL.KAP_KEI_STAT IN ('910', '920')
    )
AND KK0321_SVC.KAKINS_TSTAYMD <= ?
AND KK0321_SVC.KAKINS_TENDYMD >= ?
AND KK0321_SVC.MK_FLG = '0'
AND KK0321_OPSVC.KAKINS_TSTAYMD <= ?
AND KK0321_OPSVC.KAKINS_TENDYMD >= ?
AND KK0321_OPSVC.MK_FLG = '0'
AND KK0321_KKSVC.KAKINS_TSTAYMD <= ?
AND KK0321_KKSVC.KAKINS_TENDYMD >= ?
AND KK0321_KKSVC.MK_FLG = '0'
AND KK2521.KAP_PLAN_TSTAYMD <= ?
AND KK2521.KAP_PLAN_TENDYMD >= ?
AND KK0351.OP_SVC_KEI_STAT = '100'
AND KK0341.KKTK_SVC_CD = 'C021'
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_190) 
#--UIA17_バッチ機能仕様書(KKPRC42703_ハイブリッド割引設定対象抽出)
#-- 3.全体構成/3-3.処理詳細 
#-- (1)ハイブリッド割引設定対象情報抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_190

SELECT
    DISTINCT KK0491.SEIKY_KEI_NO  AS KK0491_SEIKY_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_OP_SVC_KEI KK0351       ON  KK0081.SVC_KEI_NO         = KK0351.SVC_KEI_NO
    INNER JOIN CK_T_CUST CK0011             ON  KK0081.SYSID              = CK0011.SYSID
    INNER JOIN KK_T_KAKINS KK0321_SVC       ON  KK0081.SVC_KEI_NO         = KK0321_SVC.SVC_KEI_NO
    INNER JOIN KK_T_KAKINS KK0321_OPSVC     ON  KK0351.OP_SVC_KEI_NO      = KK0321_OPSVC.OP_SVC_KEI_NO
    INNER JOIN KK_T_SEIKY_KEI KK0491        ON  KK0321_SVC.SEIKY_KEI_NO   = KK0491.SEIKY_KEI_NO
                                            AND KK0321_OPSVC.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
WHERE
    (CK0011.SYSID, CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM) = (SELECT
                                                      CK0011_RCNT.SYSID, MAX(CK0011_RCNT.RSV_APLY_YMD || CK0011_RCNT.GENE_ADD_DTM) AS CK_T_CUST_MAX
                                                  FROM
                                                      CK_T_CUST CK0011_RCNT
                                                  WHERE
                                                      CK0011_RCNT.SYSID = CK0011.SYSID
                                                  AND CK0011_RCNT.RSV_APLY_YMD <= ?
                                                  AND CK0011_RCNT.RSV_APLY_CD = '2'
                                                  AND CK0011_RCNT.MK_FLG = '0'
                                                  GROUP BY CK0011_RCNT.SYSID
                                                 ) 
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (SELECT
                                                      KK0081_RCNT.SVC_KEI_NO, MAX(KK0081_RCNT.RSV_APLY_YMD || KK0081_RCNT.GENE_ADD_DTM) AS KK_T_SVC_KEI_MAX
                                                  FROM
                                                       KK_T_SVC_KEI KK0081_RCNT
                                                  WHERE
                                                        KK0081_RCNT.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND   KK0081_RCNT.RSV_APLY_YMD <= ?
                                                  AND   KK0081_RCNT.RSV_APLY_CD = '2'
                                                  AND   KK0081_RCNT.MK_FLG = '0'
                                                  GROUP BY KK0081_RCNT.SVC_KEI_NO
                                                 )
AND (KK0351.OP_SVC_KEI_NO, KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM) = (SELECT
                                                        KK0351_GENE.OP_SVC_KEI_NO, MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX
                                                  FROM 
                                                        KK_T_OP_SVC_KEI KK0351_GENE
                                                  WHERE
                                                        KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
                                                  AND   KK0351_GENE.RSV_APLY_YMD <= ?
                                                  AND   KK0351_GENE.RSV_APLY_CD = '2'
                                                  AND   KK0351_GENE.MK_FLG = '0'
                                                  GROUP BY KK0351_GENE.OP_SVC_KEI_NO
                                                 )
AND (KK0491.SEIKY_KEI_NO, KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM) = (SELECT
                                                       KK0491_GENE.SEIKY_KEI_NO, MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
                                                   FROM 
                                                       KK_T_SEIKY_KEI KK0491_GENE
                                                   WHERE  
                                                       KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
                                                   AND KK0491_GENE.RSV_APLY_YMD <= ?
                                                   AND KK0491_GENE.RSV_APLY_CD = '2'
                                                   AND KK0491_GENE.MK_FLG = '0'
                                                   GROUP BY KK0491_GENE.SEIKY_KEI_NO
                                                  )
AND KK0081.PRC_GRP_CD IN ('02','03','04')
AND KK0351.OP_SVC_CD = 'B077'
AND KK0351.SVC_STAYMD  <=  ?
AND TO_CHAR(LAST_DAY(TO_DATE(KK0351.SVC_ENDYMD, 'yyyyMMdd')), 'yyyyMMdd') >= ?
AND KK0321_SVC.KAKINS_TSTAYMD <= ?
AND KK0321_SVC.KAKINS_TENDYMD >= ?
AND KK0321_SVC.MK_FLG ='0'
AND KK0321_OPSVC.KAKINS_TSTAYMD <= ?
AND KK0321_OPSVC.KAKINS_TENDYMD >= ?
AND KK0321_OPSVC.MK_FLG ='0'
AND Exists (SELECT
                1
            FROM
                KK_T_KAKINS KK0321_K
            INNER JOIN  KK_T_SVC_KEI KK0081_K 
                ON KK0321_K.SVC_KEI_NO = KK0081_K.SVC_KEI_NO
            WHERE
                KK0321_K.KAKINS_TSTAYMD <= ? AND
                KK0321_K.KAKINS_TENDYMD >= ? AND
                KK0321_K.MK_FLG ='0' AND
                (KK0081_K.SVC_KEI_NO , KK0081_K.RSV_APLY_YMD || KK0081_K.GENE_ADD_DTM) =  (SELECT
                                                                    KK0081_GENE.SVC_KEI_NO,
                                                                    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                               FROM
                                                                    KK_T_SVC_KEI KK0081_GENE
                                                               WHERE
                                                                    KK0081_GENE.SVC_KEI_NO = KK0081_K.SVC_KEI_NO AND
                                                                    KK0081_GENE.RSV_APLY_YMD <= ? AND
                                                                    KK0081_GENE.RSV_APLY_CD = '2' AND
                                                                    KK0081_GENE.MK_FLG = '0'
                                                               GROUP BY KK0081_GENE.SVC_KEI_NO
                                                                )  AND
                KK0081_K.PCRS_CD = 'A60' AND
                KK0081_K.SVC_KEI_STAT IN ('010', '020', '030', '100')
                AND KK0081_K.SYSID = KK0081.SYSID
                AND KK0321_K.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_191)
#--サービス契約番号に紐づく情報がはぴｅポイント積算対象であるか判定するための情報取得
#--使用ジョブ
#--EO2900110J0_はぴｅ会員有効契約チェック
#-----------------------------------------------------------

--KEY:KK_SELECT_191

SELECT
    SVK.SVC_KEI_NO               AS SVK_SVC_KEI_NO,
    SVK.SVC_KEI_STAT             AS SVK_SVC_KEI_STAT,
    SVK.SVC_CD                   AS SVK_SVC_C,
    SVK.PRC_GRP_CD               AS SVK_PRC_GRP_CD,
    SVK.PCRS_CD                  AS SVK_PCRS_CD,
    SVK.PPLAN_CD                 AS SVK_PPLAN_CD,
    SVK.SHOSA_DSL_FIN_CD         AS SVK_SHOSA_DSL_FIN_CD,
    SVK.SHOSA_YMD                AS SVK_SHOSA_YMD,
    SVK.SVC_DSL_KISAN_YMD        AS SVK_SVC_DSL_KISAN_YMD,
    PPL.HPPSSTG_FLG              AS PPL_HPPSSTG_FLG,
    KKN.SEIKY_KEI_NO             AS KKN_SEIKY_KEI_NO,
    TKH.KANYU_KEI_PAY_HOSHIKI_CD AS TKH_KANYU_KEI_PAY_HOSHIKI_CD,
    CK0011.SYSID                 AS CK0011_SYSID,
    CK0011.EOID                  AS CK0011_EOID,
    SVK.SVC_CHRG_STAYMD          AS SVK_SVC_CHRG_STAYMD
FROM
    KK_T_SVC_KEI SVK
    INNER JOIN  CK_T_CUST CK0011 ON  CK0011.SYSID = SVK.SYSID
    INNER JOIN KK_T_KAKINS KKN ON
        KKN.SVC_KEI_NO = SVK.SVC_KEI_NO
        AND
        KKN.MK_FLG = '0'
        AND
        KKN.KAKINS_TSTAYMD <= ?
        AND
        KKN.KAKINS_TENDYMD >= ?
    LEFT JOIN KK_T_TK_HOSHIKI_KEI TKH ON
        TKH.TK_HOSHIKI_KEI_NO = SVK.TK_HOSHIKI_KEI_NO 
        AND
        TKH.SVC_CHRG_STAYMD <= ?
        AND
        TKH.SVC_CHRG_ENDYMD >= ?
        AND
        TKH.MK_FLG = '0'
    INNER JOIN KK_M_PPLAN PPL ON
        PPL.PCRS_CD = SVK.PCRS_CD
        AND
        PPL.PPLAN_CD = SVK.PPLAN_CD
        AND
        PPL.PPLAN_TSTAYMD <= ?
        AND
        PPL.PPLAN_TENDYMD >= ?
        AND
        PPL.MK_FLG = '0'
WHERE
    SVK.SVC_KEI_NO = ?
    AND
    CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = 
            (SELECT MAX(CK0011_SUB.RSV_APLY_YMD || CK0011_SUB.GENE_ADD_DTM) AS CK_T_CUST_MAX
                          FROM
                              CK_T_CUST CK0011_SUB
                          WHERE
                              CK0011_SUB.SYSID = CK0011.SYSID
                          AND CK0011_SUB.RSV_APLY_YMD <= ?
                          AND CK0011_SUB.RSV_APLY_CD = '2'
                          AND CK0011_SUB.MK_FLG = '0')
    AND
    SVK.RSV_APLY_YMD || SVK.GENE_ADD_DTM =
            (SELECT MAX(SUB.RSV_APLY_YMD || SUB.GENE_ADD_DTM) AS SUB_GENE_MAX
                        FROM KK_T_SVC_KEI SUB 
                        WHERE SUB.SVC_KEI_NO =  SVK.SVC_KEI_NO
                        AND   SUB.RSV_APLY_YMD <= ?
                        AND   SUB.RSV_APLY_CD = '2'
                        AND   SUB.MK_FLG = '0')
ORDER BY
    KKN_SEIKY_KEI_NO,
    SVK_SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_192)
#--KKPRC02204(コース変更進捗登録でスマートバリュー対応情報取得)
#-----------------------------------------------------------

--KEY:KK_SELECT_192

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM, 
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD 
FROM 
    KK_T_SVC_KEI KK0081 
WHERE 
    KK0081.SVC_KEI_NO = ? AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT 
                                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
                            FROM 
                                KK_T_SVC_KEI KK0081_GENE 
                            WHERE 
                                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO  AND
                                KK0081_GENE.GENE_ADD_DTM < ?  AND
                                KK0081_GENE.RSV_APLY_YMD <= ? AND
                                KK0081_GENE.RSV_APLY_CD = '2' AND
                                KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_193)
#--はぴｅポイント積算対象の追加、審査結果の補正対象となる情報の取得
#--使用ジョブ
#--EO2900120J0_はぴｅ会員補正対象チェック
#-----------------------------------------------------------

--KEY:KK_SELECT_193

SELECT
    SVK.SVC_KEI_NO                    AS SVK_SVC_KEI_NO,
    SVK.SVC_KEI_STAT                  AS SVK_SVC_KEI_STAT,
    PPL.HPPSSTG_FLG                   AS PPL_HPPSSTG_FLG,
    PPL.PPLAN_NM                      AS PPL_PPLAN_NM,
    PGR.PRC_GRP_NM                    AS PGR_PRC_GRP_NM,
    HPK.HAPIE_POINT_KEI_NO            AS HPK_HAPIE_POINT_KEI_NO,
    HPK.POINT_KEI_JDG_REQ_YMD         AS HPK_POINT_KEI_JDG_REQ_YMD,
    HPK.POINT_KEI_JDG_REQ_TG_JK_CD    AS HPK_POINT_KEI_JDG_REQ_TG_JK_CD,
    HPK.SYSID                         AS HPK_SYSID,
    HPK.HAPIEK_JDG_REQ_JI_STI_ID      AS HPK_HAPIEK_JDG_REQ_JI_STI_ID,
    HPK.HAPIE_NO                      AS HPK_HAPIE_NO,
    HPK.POINT_KEI_SKEKKA_CD           AS HPK_POINT_KEI_SKEKKA_CD,
    HPK.POINT_KEI_SKEKKA_RSN_CD       AS HPK_POINT_KEI_SKEKKA_RSN_CD,
    HPK.HAPIE_MEMBER_CARD_NM_KANA     AS HPK_HAPIE_MEMBER_CARD_NM_KANA,
    HPK.HAPIE_MEMBER_CARD_NM          AS HPK_HAPIE_MEMBER_CARD_NM,
    HPK.HAPIE_MEMBER_PCD              AS HPK_HAPIE_MEMBER_PCD,
    HPK.HAPIE_MEMBER_AD_KANA          AS HPK_HAPIE_MEMBER_AD_KANA,
    HPK.HAPIE_MEMBER_AD               AS HPK_HAPIE_MEMBER_AD,
    HPK.HAPIE_MEMBER_TELNO            AS HPK_HAPIE_MEMBER_TELNO,
    HPK.HAPIE_MEMBER_BIRTHD           AS HPK_HAPIE_MEMBER_BIRTHD,
    HTS.SKSN_TRGT_SVC_KEI_NO          AS HTS_SKSN_TRGT_SVC_KEI_NO,
    HTS.SKSN_TRGT_SVKEI_SKEKKA_CD     AS HTS_SKSN_TRGT_SVKEI_SKEKKA_CD,
    HTS.SKSN_TRGT_SVKEI_SKA_RSN_CD    AS HTS_SKSN_TRGT_SVKEI_SKA_RSN_CD,
    SKU.KAISEN_PLACE_PCD              AS SKU_KAISEN_PLACE_PCD,
    SKU.KAISEN_PLACE_STATE_NM         AS SKU_KAISEN_PLACE_STATE_NM,
    SKU.KAISEN_PLACE_CITY_NM          AS SKU_KAISEN_PLACE_CITY_NM,
    SKU.KAISEN_PLACE_OAZTSU_NM        AS SKU_KAISEN_PLACE_OAZTSU_NM,
    SKU.KAISEN_PLACE_AZCHO_NM         AS SKU_KAISEN_PLACE_AZCHO_NM,
    SKU.KAISEN_PLACE_BNCHIGO          AS SKU_KAISEN_PLACE_BNCHIGO,
    SKU.KAISEN_PLACE_ADRTTM           AS SKU_KAISEN_PLACE_ADRTTM,
    SKU.KAISEN_PLACE_ADRRM            AS SKU_KAISEN_PLACE_ADRRM,
    CUS.SYSID                         AS CUS_SYSID,
    CUS.EOID                          AS CUS_EOID,
    CUS.CUST_KANA                     AS CUS_CUST_KANA,
    CUS.CUST_NM                       AS CUS_CUST_NM,
    CUS.KEISHA_TELNO                  AS CUS_KEISHA_TELNO,
    CUS.CUST_BIRTHD                   AS CUS_CUST_BIRTHD
FROM
    KK_T_SVC_KEI SVK
    INNER JOIN KK_T_KAISEN_TG_SVKEI KTS ON
        SVK.SVC_KEI_NO = KTS.SVC_KEI_NO
        AND
        KTS.KAISEN_UCWK_USE_STAYMD <= ?
        AND
        KTS.KAISEN_UCWK_USE_ENDYMD >= ?
        AND
        KTS.MK_FLG = '0'
    INNER JOIN KK_T_SVKEI_KAISEN_UW SKU ON
        SKU.SVC_KEI_KAISEN_UCWK_NO = KTS.SVC_KEI_KAISEN_UCWK_NO
        AND
        SKU.GENE_ADD_DTM = (SELECT MAX(SUB_SKU.GENE_ADD_DTM) AS SUB_GENE_ADD_DTM 
                            FROM KK_T_SVKEI_KAISEN_UW SUB_SKU
                            WHERE SUB_SKU.SVC_KEI_KAISEN_UCWK_NO = KTS.SVC_KEI_KAISEN_UCWK_NO AND SUB_SKU.MK_FLG = '0')
    INNER JOIN CK_T_CUST CUS ON
        CUS.SYSID = SVK.SYSID
        AND
        CUS.RSV_APLY_YMD || CUS.GENE_ADD_DTM =
                (SELECT MAX(SUB_CUS.RSV_APLY_YMD || SUB_CUS.GENE_ADD_DTM) AS SUB_GENE_MAX
                            FROM CK_T_CUST SUB_CUS
                            WHERE SUB_CUS.SYSID = SVK.SYSID
                            AND   SUB_CUS.RSV_APLY_YMD <= ?
                            AND   SUB_CUS.RSV_APLY_CD = '2'
                            AND SUB_CUS.MK_FLG = '0')
    LEFT OUTER JOIN KK_T_HAPIE_POINT_KEI HPK ON
        HPK.SYSID = SVK.SYSID
        AND HPK.MK_FLG = '0'
    LEFT OUTER JOIN KK_T_HAPIEK_TG_SVKEI HTS ON
        HTS.HAPIE_POINT_KEI_NO = HPK.HAPIE_POINT_KEI_NO
        AND HTS.SKSN_TRGT_SVC_KEI_NO = SVK.SVC_KEI_NO
        AND HTS.MK_FLG = '0'
    INNER JOIN KK_M_PPLAN PPL ON
        PPL.PCRS_CD = SVK.PCRS_CD
        AND PPL.PPLAN_CD = SVK.PPLAN_CD
        AND PPL.PPLAN_TSTAYMD <= ?
        AND PPL.PPLAN_TENDYMD >= ?
        AND PPL.MK_FLG = '0'
    INNER JOIN KK_M_PRC_GRP PGR ON
        PGR.PRC_GRP_CD = SVK.PRC_GRP_CD
        AND
        PGR.GENE_ADD_DTM = (SELECT MAX(SUB_PGR.GENE_ADD_DTM) AS SUB_GENE_ADD_DTM 
                            FROM KK_M_PRC_GRP SUB_PGR
                            WHERE SUB_PGR.PRC_GRP_CD = SVK.PRC_GRP_CD 
                            AND SUB_PGR.PRC_GRP_TSTAYMD <= ?
                            AND SUB_PGR.PRC_GRP_TENDYMD >= ?
                            AND SUB_PGR.MK_FLG = '0')
WHERE
    SVK.SYSID = ?
    AND
    SVK.RSV_APLY_YMD || SVK.GENE_ADD_DTM =
            (SELECT MAX(SUB.RSV_APLY_YMD || SUB.GENE_ADD_DTM) AS SUB_GENE_MAX
                        FROM KK_T_SVC_KEI SUB 
                        WHERE SUB.SVC_KEI_NO =  SVK.SVC_KEI_NO
                        AND   SUB.RSV_APLY_YMD <= ?
                        AND   SUB.RSV_APLY_CD = '2'
                        AND   SUB.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_194)
#--フェムトセル申込情報時のサービス契約関連チェック用情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_194

SELECT
 KK0081.SVC_KEI_NO,
 KK0081.SVC_CD,
 KK0081.PRC_GRP_CD,
 KK0081.PCRS_CD,
 KK0081.SYSID,
 KK0081.SVC_KEI_STAT,
 KK0161.SVC_KEI_UCWK_NO,
 KK0171.ISP_NINSHO_ID,
 KK0241.SVC_KEI_KAISEN_UCWK_NO,
 KK0251.SVC_KEI_KAISEN_UCWK_STAT,
 KK0251.KAISEN_PLACE_TELNO,
 KK0251.KAISEN_PLACE_STATE_NM,
 KK0251.KAISEN_PLACE_CITY_NM,
 KK0251.KAISEN_PLACE_OAZTSU_NM,
 KK0251.KAISEN_PLACE_AZCHO_NM,
 KK0251.KAISEN_PLACE_BNCHIGO,
 KK0251.KAISEN_PLACE_ADRTTM,
 KK0251.KAISEN_PLACE_ADRRM,
 KK0351_OP.OP_SVC_KEI_NO,
 KK0351_OP.OP_SVC_KEI_STAT,
 KK0351B_OP.OPTION_COUNT,
 CH0231_TOKUSOKU.TOKUSOKU_STAT,
 KK1681_IDO.YOYAKU,
 KU0081L.IP_HRADSI_CD
FROM
 KK_T_SVC_KEI KK0081
INNER JOIN
 KK_T_SVC_KEI_UCWK KK0161
ON
 KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN
 KK_T_SVKEIUW_EOH_NET KK0171
ON
 KK0171.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
 AND KK0171.GENE_ADD_DTM = KK0161.GENE_ADD_DTM
INNER JOIN
 KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
AND (KK0241.SVC_KEI_NO, KK0241.KAISEN_UCWK_USE_ENDYMD) = 
        (SELECT KK0241_01.SVC_KEI_NO, MAX(KK0241_01.KAISEN_UCWK_USE_ENDYMD)
         FROM   KK_T_KAISEN_TG_SVKEI KK0241_01
         WHERE  KK0241_01.SVC_KEI_NO = KK0241.SVC_KEI_NO
         AND    KK0241_01.KAISEN_UCWK_USE_STAYMD <= ?
         AND    KK0241_01.MK_FLG = '0'
         GROUP BY KK0241_01.SVC_KEI_NO)
AND  KK0241.MK_FLG = '0'
INNER JOIN
 KK_T_SVKEI_KAISEN_UW KK0251
ON
 KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
LEFT JOIN
(
 SELECT
  KK0351.SVC_KEI_NO,
  KK0351.OP_SVC_KEI_NO,
  KK0351.OP_SVC_KEI_STAT
 FROM
  KK_T_OP_SVC_KEI KK0351
 INNER JOIN
  KK_T_OPSVKEI_ISP KK0361
 ON
     KK0361.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
 AND KK0361.GENE_ADD_DTM = KK0351.GENE_ADD_DTM
 WHERE
     KK0351.SVC_KEI_NO = ?
 AND KK0361.FMTCEL_JGS_CD = ?
 AND KK0351.OP_SVC_CD = 'B075'
 AND KK0351.PCRS_CD = ?
 AND KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM = 
       (SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS A_MAX
        FROM   KK_T_OP_SVC_KEI KK0351_GENE
        WHERE  KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
        AND    KK0351_GENE.RSV_APLY_YMD <= ?
        AND    KK0351_GENE.RSV_APLY_CD = '2'
        AND    KK0351_GENE.MK_FLG = '0')
) KK0351_OP
ON
 KK0081.SVC_KEI_NO = KK0351_OP.SVC_KEI_NO
LEFT JOIN
(
 SELECT
  KK0351B.SVC_KEI_NO,
  count(*) AS OPTION_COUNT
 FROM
  KK_T_OP_SVC_KEI KK0351B
 LEFT JOIN
  KK_T_OPSVKEI_ISP KK0361B
 ON
     KK0361B.OP_SVC_KEI_NO = KK0351B.OP_SVC_KEI_NO
 AND KK0361B.GENE_ADD_DTM = KK0351B.GENE_ADD_DTM
 WHERE
     KK0351B.SVC_KEI_NO = ?
 AND KK0361B.FMTCEL_JGS_CD = ?
 AND KK0351B.OP_SVC_CD = 'B075'
 AND KK0351B.PCRS_CD = ?
 AND KK0351B.OP_SVC_KEI_STAT <> '910'
 AND KK0351B.RSV_APLY_YMD || KK0351B.GENE_ADD_DTM = 
       (SELECT MAX(KK0351B_GENE.RSV_APLY_YMD || KK0351B_GENE.GENE_ADD_DTM) AS A_MAX
        FROM   KK_T_OP_SVC_KEI KK0351B_GENE
        WHERE  KK0351B_GENE.OP_SVC_KEI_NO = KK0351B.OP_SVC_KEI_NO
        AND    KK0351B_GENE.RSV_APLY_YMD <= ?
        AND    KK0351B_GENE.RSV_APLY_CD = '2'
        AND    KK0351B_GENE.MK_FLG = '0')
 GROUP BY KK0351B.SVC_KEI_NO
) KK0351B_OP
ON
 KK0081.SVC_KEI_NO = KK0351B_OP.SVC_KEI_NO
LEFT JOIN
 (
  SELECT
   CH0231.TOKUSOKU_STAT,
   KK0321_KAKINS.SVC_KEI_NO
  FROM
   CH_T_TOKUSOKU CH0231
  INNER JOIN
  (
   SELECT
      KK0321.SVC_KEI_NO
     ,KK0321.SEIKY_KEI_NO
   FROM
       KK_T_KAKINS KK0321
   WHERE
       KK0321.SVC_KEI_NO = ?
   AND KK0321.KAKINS_TSTAYMD <= ?
   AND KK0321.KAKINS_TENDYMD >= ?
   AND KK0321.MK_FLG = '0'
   ) KK0321_KAKINS
   ON
     CH0231.SEIKY_KEI_NO = KK0321_KAKINS.SEIKY_KEI_NO
   WHERE
       CH0231.TOKUSOKU_STAYMD <= ?
   AND CH0231.TOKUSOKU_ENDYMD >= ?
   AND CH0231.MK_FLG = '0'
  ) CH0231_TOKUSOKU
ON
 KK0081.SVC_KEI_NO = CH0231_TOKUSOKU.SVC_KEI_NO
LEFT JOIN
(
 SELECT
  1 AS YOYAKU,
  KK1681.SVC_KEI_NO
 FROM
  KK_T_IDO_RSV KK1681
 WHERE
     KK1681.SVC_KEI_NO = ?
 AND KK1681.IDO_RSV_STAT_CD = '00'
 AND KK1681.IDO_RSV_DTL_CD = '005'
 AND KK1681.MK_FLG = '0'
) KK1681_IDO
ON
 KK0081.SVC_KEI_NO = KK1681_IDO.SVC_KEI_NO
LEFT JOIN 
(
 SELECT
  KU0081.SVC_KEI_NO,
  KU0061.IP_HRADSI_CD
 FROM
  KU_T_SVKEI_KOJIAK KU0081
 LEFT JOIN
  KU_T_KJAK_EOH_NTMANS KU0061
 ON
  KU0061.KOJIAK_NO = KU0081.KOJIAK_NO
 WHERE
     KU0081.SVC_KEI_NO = ?
 AND KU0081.SVKEI_KOJIAK_TSTAYMD <= ? 
 AND KU0081.SVKEI_KOJIAK_TENDYMD >= ?
 AND KU0081.MK_FLG = '0'
) KU0081L
ON
 KK0081.SVC_KEI_NO = KU0081L.SVC_KEI_NO
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0')
AND KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM = 
     (SELECT MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
      FROM   KK_T_SVC_KEI_UCWK KK0161_GENE
      WHERE  KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
      AND    KK0161_GENE.RSV_APLY_YMD <= ?
      AND    KK0161_GENE.RSV_APLY_CD = '2'
      AND    KK0161_GENE.MK_FLG = '0')
AND KK0251.GENE_ADD_DTM = 
      (SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
       FROM   KK_T_SVKEI_KAISEN_UW KK0251_GENE
       WHERE  KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
       AND    KK0251_GENE.MK_FLG = '0')
ORDER BY KK0351_OP.OP_SVC_KEI_NO DESC,
          KK0161.SVC_KEI_UCWK_NO DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_195)
#--指定したSYSIDのサービス契約<eo光電話>情報を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_195

SELECT
 KK0191.TELNO,
 KK0161.SVC_KEI_UCWK_STAT
FROM
 KK_T_SVC_KEI KK0081
INNER JOIN
 KK_T_SVC_KEI_UCWK KK0161
ON
 KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN
 KK_T_SVKEIUW_EOH_TEL KK0191
ON
 KK0191.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
 AND KK0191.GENE_ADD_DTM = KK0161.GENE_ADD_DTM
WHERE
    KK0081.SYSID = ?
AND KK0081.SVC_CD = '02'
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS A_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0')
AND KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM = 
     (SELECT MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
      FROM   KK_T_SVC_KEI_UCWK KK0161_GENE
      WHERE  KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
      AND    KK0161_GENE.RSV_APLY_YMD <= ?
      AND    KK0161_GENE.RSV_APLY_CD = '2'
      AND    KK0161_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_196)
#--eo間オプション引き継ぎファイル作成
#--異動予約を軸にオプション引き継ぎ情報を抽出する
#-----------------------------------------------------------

--KEY:KK_SELECT_196

SELECT
    KK0351.OP_SVC_KEI_NO, 
    KK0351.MSKM_DTL_NO AS MSKM_DTL_NO_OP, 
    KK0351.OP_SVC_KEI_STAT, 
    KK0351.SVC_DLRE_CD, 
    KK0351.OP_SVC_CD, 
    KK0351.SVC_KEI_NO AS MOTO_SVC_KEI_NO,
    KK0361.KIBO_ML_ACCOUNT_1, 
    KK0361.MLAD, 
    KK0361.WEB_ID, 
    KK0361.KOTEI_IP_AD, 
    KK0361.MLLIST_NM, 
    KK0081.SVC_KEI_NO, 
    KK0081.PRC_GRP_CD, 
    KK0081.SYSID, 
    KK0081.MSKM_DTL_NO,
    KK0081.SHOSA_YMD,
    KK0081.IDO_DIV
FROM KK_T_IDO_RSV KK1681
  INNER JOIN KK_T_SVC_KEI KK0081
  ON KK0081.SVC_KEI_NO = KK1681.OP_HKTGI_SK_SVC_KEI_NO
  INNER JOIN KK_T_OP_SVC_KEI KK0351
  ON KK0351.OP_SVC_KEI_NO = KK1681.OP_SVC_KEI_NO
  INNER JOIN KK_T_OPSVKEI_ISP KK0361
  ON  KK0351.OP_SVC_KEI_NO = KK0361.OP_SVC_KEI_NO 
  AND KK0351.GENE_ADD_DTM = KK0361.GENE_ADD_DTM
WHERE KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM = (
  SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) KK0351_MAX
  FROM KK_T_OP_SVC_KEI KK0351_GENE
  WHERE KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
  AND   KK0351_GENE.RSV_APLY_YMD <= ?
  AND   KK0351_GENE.RSV_APLY_CD = '2'
  AND   KK0351_GENE.MK_FLG = '0')
AND KK0081.SVC_KEI_STAT IN ('020','030','010')
AND KK0081.PRC_GRP_CD IN ('02','03','04')
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_YMD <= ?
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0')
AND  KK1681.IDO_DIV = '00003'
AND  KK1681.IDO_RSV_DTL_CD = '016'
AND  KK1681.MK_FLG = '0'
ORDER BY
    KK0351.SVC_KEI_NO,
    KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_197)
#--ファイル項目「eoID」に格納されている値にてサービス契約番号にあてて検索し、対象を取得する
#--使用ジョブ
#--EO28Z0240J0_はぴｅポイント会員登録
#-----------------------------------------------------------

--KEY:KK_SELECT_197

SELECT
    CK0011.SYSID,
    CK0011.EOID,
    CK0011.CUST_BIRTHD,
    CK0011.CUST_KANA
FROM
    KK_T_SVC_KEI KK0081
    JOIN CK_T_CUST CK0011 ON
        CK0011.SYSID = KK0081.SYSID
        AND
        CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =
                (SELECT MAX(SUB_CK0011.RSV_APLY_YMD || SUB_CK0011.GENE_ADD_DTM) AS SUB_GENE_MAX
                            FROM CK_T_CUST SUB_CK0011
                            WHERE SUB_CK0011.SYSID = KK0081.SYSID
                            AND   SUB_CK0011.RSV_APLY_YMD <= ?
                            AND   SUB_CK0011.RSV_APLY_CD = '2'
                            AND   SUB_CK0011.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_NO = ?
    AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT MAX(SUB.RSV_APLY_YMD || SUB.GENE_ADD_DTM) AS SUB_GENE_MAX
                        FROM KK_T_SVC_KEI SUB 
                        WHERE SUB.SVC_KEI_NO =  KK0081.SVC_KEI_NO
                        AND   SUB.RSV_APLY_YMD <= ?
                        AND   SUB.RSV_APLY_CD = '2'
                        AND   SUB.MK_FLG = '0')
ORDER BY
    CK0011.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_198)
#--SYSID配下のサービス契約番号を取得する
#--使用ジョブ
#--EO28Z0240J0_はぴｅポイント会員登録
#-----------------------------------------------------------

--KEY:KK_SELECT_198

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0591.HPPSSTG_FLG
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_M_PPLAN KK0591 ON
        KK0591.PCRS_CD = KK0081.PCRS_CD
        AND
        KK0591.PPLAN_CD = KK0081.PPLAN_CD
        AND
        KK0591.PPLAN_TSTAYMD <= ?
        AND
        KK0591.PPLAN_TENDYMD >= ?
        AND
        KK0591.MK_FLG = '0'
        AND
        KK0591.HPPSSTG_FLG = '1'
WHERE
    KK0081.SYSID = ?
    AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT MAX(SUB.RSV_APLY_YMD || SUB.GENE_ADD_DTM) AS SUB_GENE_MAX
                        FROM KK_T_SVC_KEI SUB 
                        WHERE SUB.SVC_KEI_NO =  KK0081.SVC_KEI_NO
                        AND   SUB.RSV_APLY_YMD <= ?
                        AND   SUB.RSV_APLY_CD = '2'
                        AND   SUB.MK_FLG = '0')
ORDER BY
    KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_199)
#--指定したサービス契約番号の排他処理
#-----------------------------------------------------------

--KEY:KK_SELECT_199

SELECT
 KK0081.SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS A_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0')
FOR UPDATE NOWAIT

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_200)
#--サービス回線内訳番号を元に、サービス契約回線内訳および紐づくサービス契約のデータを取得
#-----------------------------------------------------------

--KEY:KK_SELECT_200

SELECT KK0081.SVC_KEI_NO, 
    KK0081.SVC_KEI_STAT, 
    KK0081.SYSID, 
    KK0081.SVC_CD, 
    KK0081.PCRS_CD 
FROM 
    KK_T_KAISEN_TG_SVKEI KK0241, 
    KK_T_SVC_KEI KK0081 
WHERE 
    KK0241.SVC_KEI_KAISEN_UCWK_NO = ? 
    AND KK0241.MK_FLG = '0' 
    AND KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
       FROM KK_T_SVC_KEI KK0081_GENE
       WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND KK0081_GENE.RSV_APLY_YMD <= ?
       AND KK0081_GENE.RSV_APLY_CD = '2'
       AND KK0081_GENE.MK_FLG = '0')
    AND (KK0081.SVC_CD = '02' 
        OR KK0081.PCRS_CD IN ('A50','A51','A52','A53','A54','A55','A69','A70')) 
    AND KK0081.SVC_KEI_STAT NOT IN ('010', '910', '920') 
ORDER BY KK0081.SVC_CD DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_201)
#--KKPRC44501
#--サービス開始時配送対象情報を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_201

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0081.PCRS_CD,
    KK0081.SHOSA_DSL_FIN_CD,
    KK0341.KKTK_SVC_KEI_NO,
    KK0341.HAISO_REQ_SHITEI_YMD,
    KK0341.HAISO_DIV,
    KK0341.KIKI_HKAT_SHITEI_SOKO_CD,
    KK0341.KIKI_HKAT_SHITEI_SKDN_CD,
    KK0341.TAKNKIKI_SBT_CD,
    KK0341.TAKNKIKI_MODEL_CD,
    KK0341.TAKNKIKI_SETHIN_MODEL_CD,
    KK0341.KIKI_HUKA_INFO_CD,
    KK0341.KIKI_SOHUS_NM,
    KK0341.KIKI_SOHUS_AD_CD,
    KK0341.KIKI_SOHUS_PCD,
    KK0341.KIKI_SOHUS_STATE_NM,
    KK0341.KIKI_SOHUS_CITY_NM,
    KK0341.KIKI_SOHUS_OAZTSU_NM,
    KK0341.KIKI_SOHUS_AZCHO_NM,
    KK0341.KIKI_SOHUS_BNCHIGO,
    KK0341.KIKI_SOHUS_ADRTTM,
    KK0341.KIKI_SOHUS_ADRRM,
    KK0341.KIKI_SOHUS_TELNO,
    KK0341.KIKI_CHG_NO,
    KK0341.KIKI_STI_JI_KRIPLACE_SKCD,
    KK0341.KIKI_STI_JI_KOCOMP_CD,
    KK0341.KIKI_STI_JI_KOCOMP_SLF_CD,
    KK0341.KIKI_STI_JI_YTKSKOF_CD,
    KK0341.KIKI_STI_JI_YTKSKOF_SLF_CD,
    KK0341.KKTK_SVC_CD,
    KK0341.KKTK_SVC_KEI_STAT
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KKTK_SVC_KEI KK0341
  ON
    KK0341.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0341.SVC_STA_JI_HIS_JOKYO_SKCD = '1'
    AND KK0341.KKTK_SVC_CD IN('C021','C022','C023')
    AND KK0341.KKTK_SVC_KEI_STAT NOT IN('910','920')
    AND KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
    FROM
        KK_T_KKTK_SVC_KEI KK0341_GENE
    WHERE
        KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO
        AND KK0341_GENE.RSV_APLY_YMD <= ?
        AND KK0341_GENE.RSV_APLY_CD = '2'
        AND KK0341_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_STAT IN('020','030','100')
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_202)
#--KKPRC44501
#--同一請求契約のハイブリッドのサービス契約番号取得
#-----------------------------------------------------------

--KEY:KK_SELECT_202

SELECT 
    DISTINCT KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAKINS KK0321
  ON
    KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0321.SEIKY_KEI_NO = ?
    AND KK0321.KAKINS_TSTAYMD <= ?
    AND KK0321.KAKINS_TENDYMD >= ?
  AND KK0321.MK_FLG = '0'
INNER JOIN
    KK_M_WRISVC_TG_SVC KK0851
  ON
    KK0851.PPLAN_CD = KK0081.PPLAN_CD
    AND KK0851.WRIB_SVC_CD = ?
    AND KK0851.WRIB_SVC_TRGT_SVC_TSTAYMD <= ?
    AND KK0851.WRIB_SVC_TRGT_SVC_TENDYMD >= ?
    AND KK0851.GENE_ADD_DTM =
         (SELECT MAX(KK0851_GENE.GENE_ADD_DTM) AS KK0851_MAX
          FROM   KK_M_WRISVC_TG_SVC KK0851_GENE
          WHERE  KK0851_GENE.WRIB_SVC_TRGT_SVC_CD = KK0851.WRIB_SVC_TRGT_SVC_CD
          AND    KK0851_GENE.MK_FLG = '0') 
WHERE
    KK0081.SVC_KEI_STAT IN('020','030','100')
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')
#-
#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_203)
#--申込書番号をもとに、カレントのサービス契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_203

SELECT
      KK0081_GENE_MAX.SVC_KEI_NO
     ,KK0081_GENE_MAX.GENE_ADD_DTM
     ,KK0081_GENE_MAX.SVC_KEI_STAT
     ,KK0081_GENE_MAX.SYSID
     ,KK0081_GENE_MAX.SVC_CD
     ,KK0081_GENE_MAX.PRC_GRP_CD
     ,KK0081_GENE_MAX.PCRS_CD
     ,KK0081_GENE_MAX.PPLAN_CD
     ,KK0081_GENE_MAX.SHOSA_YMD
     ,KK0081_GENE_MAX.SVC_CHRG_STAYMD
     ,KK0081_GENE_MAX.PAUSE_STP_CD
     ,KK0081_GENE_MAX.SHOSA_DSL_FIN_CD
     ,(SELECT KK0591.EOHNT_PPLAN_TIKI_SKCD
         FROM KK_M_PPLAN KK0591
         WHERE KK0591.PCRS_CD = KK0081_GENE_MAX.PCRS_CD
           AND KK0591.PPLAN_CD = KK0081_GENE_MAX.PPLAN_CD
           AND KK0591.MK_FLG = '0'
           AND KK0591.PPLAN_TSTAYMD <= ?
           AND KK0591.PPLAN_TENDYMD >= ?) AS EOHNT_PPLAN_TIKI_SKCD
     ,(SELECT KK0241.SVC_KEI_KAISEN_UCWK_NO
         FROM KK_T_KAISEN_TG_SVKEI KK0241
         INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
            ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
         WHERE  KK0241.SVC_KEI_NO = KK0081_GENE_MAX.SVC_KEI_NO
           AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
           AND KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
           AND KK0241.MK_FLG = '0'
           AND KK0251.SVC_KEI_KAISEN_UCWK_STAT IN ('010','100')
           AND KK0251.GENE_ADD_DTM =
                (SELECT MAX(KK0251_GENE.GENE_ADD_DTM)
                 FROM KK_T_SVKEI_KAISEN_UW KK0251_GENE
                 WHERE KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                   AND KK0251_GENE.MK_FLG = '0')
      ) AS SVC_KEI_KAISEN_UCWK_NO
     ,(SELECT KK2091.ITENS_SVKEI_KISUW_NO 
       FROM  KK_T_ADCHG  KK2091
       INNER JOIN  KK_T_ADCHG_DTL  KK2101
           ON KK2091.ADCHG_NO = KK2101.ADCHG_NO 
       WHERE KK2091.ADCHG_STAT = '001'
         AND KK2101.ADCHG_DTL_SBT_CD = '01' 
         AND KK2101.CHAF_SKBT_NO = KK0081_GENE_MAX.SVC_KEI_NO
         AND KK2101.MK_FLG = '0' 
         AND KK2091.MK_FLG = '0'
      ) AS ITENS_SVKEI_KISUW_NO
FROM
	KK_T_SVC_KEI KK0081_GENE_MAX
WHERE
	KK0081_GENE_MAX.SVC_KEI_NO IN (SELECT KK0081.SVC_KEI_NO
									FROM KK_T_SVC_KEI KK0081
									WHERE
										EXISTS (SELECT 1
												FROM   KK_T_MSKM_DTL KK0021
												WHERE  KK0021.MSKMSHO_NO = ?
												   AND    KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
												   AND    KK0021.MK_FLG = '0'))
	AND (KK0081_GENE_MAX.SVC_KEI_NO, KK0081_GENE_MAX.RSV_APLY_YMD || KK0081_GENE_MAX.GENE_ADD_DTM) =
		(SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
		 FROM  KK_T_SVC_KEI KK0081_GENE
		 WHERE KK0081_GENE.SVC_KEI_NO = KK0081_GENE_MAX.SVC_KEI_NO
		 AND KK0081_GENE.RSV_APLY_YMD <= ?
		 AND KK0081_GENE.RSV_APLY_CD = '2'
		 AND KK0081_GENE.MK_FLG = '0'
		 GROUP BY KK0081_GENE.SVC_KEI_NO)
ORDER BY SVC_CD, SVC_KEI_STAT, ITENS_SVKEI_KISUW_NO DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_204)
#--申込書明細番号をもとにカレントのサービス契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_204

SELECT
      KK0081_GENE_MAX.SVC_KEI_NO
     ,KK0081_GENE_MAX.GENE_ADD_DTM
     ,KK0081_GENE_MAX.SVC_KEI_STAT
     ,KK0081_GENE_MAX.SYSID
     ,KK0081_GENE_MAX.SVC_CD
     ,KK0081_GENE_MAX.PRC_GRP_CD
     ,KK0081_GENE_MAX.PCRS_CD
     ,KK0081_GENE_MAX.PPLAN_CD
     ,KK0081_GENE_MAX.SHOSA_YMD
     ,KK0081_GENE_MAX.SVC_CHRG_STAYMD
     ,KK0081_GENE_MAX.PAUSE_STP_CD
     ,KK0081_GENE_MAX.SHOSA_DSL_FIN_CD
     ,(SELECT KK0591.EOHNT_PPLAN_TIKI_SKCD
         FROM KK_M_PPLAN KK0591
         WHERE KK0591.PCRS_CD = KK0081_GENE_MAX.PCRS_CD
           AND KK0591.PPLAN_CD = KK0081_GENE_MAX.PPLAN_CD
           AND KK0591.MK_FLG = '0'
           AND KK0591.PPLAN_TSTAYMD <= ?
           AND KK0591.PPLAN_TENDYMD >= ?) AS EOHNT_PPLAN_TIKI_SKCD
     ,(SELECT KK0241.SVC_KEI_KAISEN_UCWK_NO
         FROM KK_T_KAISEN_TG_SVKEI KK0241
         INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
            ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
         WHERE  KK0241.SVC_KEI_NO = KK0081_GENE_MAX.SVC_KEI_NO
           AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
           AND KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
           AND KK0241.MK_FLG = '0'
           AND KK0251.SVC_KEI_KAISEN_UCWK_STAT IN ('010','100')
           AND KK0251.GENE_ADD_DTM =
                (SELECT MAX(KK0251_GENE.GENE_ADD_DTM)
                 FROM KK_T_SVKEI_KAISEN_UW KK0251_GENE
                 WHERE KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                   AND KK0251_GENE.MK_FLG = '0')
      ) AS SVC_KEI_KAISEN_UCWK_NO
     ,(SELECT KK2091.ITENS_SVKEI_KISUW_NO 
       FROM  KK_T_ADCHG  KK2091
       INNER JOIN  KK_T_ADCHG_DTL  KK2101
           ON KK2091.ADCHG_NO = KK2101.ADCHG_NO 
       WHERE KK2091.ADCHG_STAT = '001'
         AND KK2101.ADCHG_DTL_SBT_CD = '01' 
         AND KK2101.CHAF_SKBT_NO = KK0081_GENE_MAX.SVC_KEI_NO
         AND KK2101.MK_FLG = '0' 
         AND KK2091.MK_FLG = '0'
      ) AS ITENS_SVKEI_KISUW_NO
FROM
	KK_T_SVC_KEI KK0081_GENE_MAX
WHERE
	KK0081_GENE_MAX.SVC_KEI_NO IN (SELECT KK0081.SVC_KEI_NO
									FROM KK_T_SVC_KEI KK0081
									WHERE
										EXISTS (SELECT 1
												FROM   KK_T_MSKM_DTL KK0021
												WHERE  KK0021.MSKMSHO_DTL_NO = ?
												   AND    KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
												   AND    KK0021.MK_FLG = '0'))
	AND (KK0081_GENE_MAX.SVC_KEI_NO, KK0081_GENE_MAX.RSV_APLY_YMD || KK0081_GENE_MAX.GENE_ADD_DTM) =
		(SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
		 FROM  KK_T_SVC_KEI KK0081_GENE
		 WHERE KK0081_GENE.SVC_KEI_NO = KK0081_GENE_MAX.SVC_KEI_NO
		 AND KK0081_GENE.RSV_APLY_YMD <= ?
		 AND KK0081_GENE.RSV_APLY_CD = '2'
		 AND KK0081_GENE.MK_FLG = '0'
		 GROUP BY KK0081_GENE.SVC_KEI_NO)
ORDER BY SVC_CD, SVC_KEI_STAT, ITENS_SVKEI_KISUW_NO DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_205)
#--サービス契約番号に紐づくサービス提供物消去処理実施年月日時分秒を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_205

SELECT
 KTSK.SVCTK_BUT_DEL_TRN_JSSI_DTM
FROM
 KK_T_SVC_KEI KTSK
WHERE
 KTSK.SVC_KEI_NO = ?
AND
 KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM =
 (SELECT
   MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
  FROM
   KK_T_SVC_KEI KTSK_GENE
  WHERE
   KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
  AND
   KTSK_GENE.RSV_APLY_YMD <= ?
  AND
   KTSK_GENE.RSV_APLY_CD = '2'
  AND
   KTSK_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_206)
#--サービス契約.SYSIDが入力パラメータ.SYSIDと紐づくデータを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_206

SELECT
    COUNT(*) AS KK0081_CNT
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SYSID = ?
AND
    KK0081.MK_FLG = '0'
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
   (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE 
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_207)
#--バリューコードをもとに有効な他事業者割引契約に紐づくカレントのサービス契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_207

SELECT 
    KK0081.SVC_KEI_NO
   ,KK0081.GENE_ADD_DTM
   ,KK0081.SVC_KEI_STAT
   ,KK0081.SYSID
   ,KK0081.SVC_CD
   ,KK0081.PRC_GRP_CD
   ,KK0081.PCRS_CD
   ,KK0081.PPLAN_CD
   ,KK0081.SHOSA_YMD
   ,KK0081.SVC_CHRG_STAYMD
   ,KK0081.PAUSE_STP_CD
   ,KK0081.SHOSA_DSL_FIN_CD
   ,(SELECT KK0591.EOHNT_PPLAN_TIKI_SKCD
        FROM KK_M_PPLAN KK0591
        WHERE  KK0081.PCRS_CD = KK0591.PCRS_CD
               AND KK0081.PPLAN_CD = KK0591.PPLAN_CD
               AND KK0591.PPLAN_TSTAYMD <= ?
               AND KK0591.PPLAN_TENDYMD >= ?
               AND KK0591.MK_FLG = '0'
     ) AS EOHNT_PPLAN_TIKI_SKCD
   ,(SELECT KK0241.SVC_KEI_KAISEN_UCWK_NO
        FROM KK_T_KAISEN_TG_SVKEI KK0241
        INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
           ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
        WHERE  KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
          AND KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
          AND KK0241.MK_FLG = '0'
          AND KK0251.SVC_KEI_KAISEN_UCWK_STAT IN ('010','100')
          AND KK0251.GENE_ADD_DTM =
               (SELECT MAX(KK0251_GENE.GENE_ADD_DTM)
                FROM KK_T_SVKEI_KAISEN_UW KK0251_GENE
                WHERE KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                  AND KK0251_GENE.MK_FLG = '0')
     ) AS SVC_KEI_KAISEN_UCWK_NO
     ,(SELECT KK2091.ITENS_SVKEI_KISUW_NO 
       FROM  KK_T_ADCHG  KK2091
       INNER JOIN  KK_T_ADCHG_DTL  KK2101
           ON KK2091.ADCHG_NO = KK2101.ADCHG_NO 
       WHERE KK2091.ADCHG_STAT = '001'
         AND KK2101.ADCHG_DTL_SBT_CD = '01' 
         AND KK2101.CHAF_SKBT_NO = KK0081.SVC_KEI_NO
         AND KK2101.CHBF_SKBT_NO <> KK2101.CHAF_SKBT_NO
         AND KK2101.MK_FLG = '0' 
         AND KK2091.MK_FLG = '0'
      ) AS ITENS_SVKEI_KISUW_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO
    IN( 
        SELECT KK2451.SVC_KEI_NO
        FROM
            KK_T_TAJGSWKEI_TGKEI KK2451
        WHERE
            KK2451.TAJGS_WRIB_KEI_NO
            IN (
                SELECT KK2441.TAJGS_WRIB_KEI_NO
                FROM   KK_T_TAJGS_WRIB_KEI KK2441
                WHERE  KK2441.KDDI_VAL_CD = ?
                AND    (KK2441.TAJGS_WRIB_KEI_CNCL_YMD IS NULL OR KK2441.TAJGS_WRIB_KEI_CNCL_YMD = '20991231')
                AND    KK2441.GENE_ADD_DTM =
                           (SELECT MAX(KK2441_GENE.GENE_ADD_DTM) AS KK2441_MAX
                            FROM   KK_T_TAJGS_WRIB_KEI KK2441_GENE
                            WHERE  KK2441_GENE.TAJGS_WRIB_KEI_NO = KK2441.TAJGS_WRIB_KEI_NO
                            AND    KK2441_GENE.MK_FLG = '0')
           )
           AND KK2451.TAJGSWKEI_TGKEI_TSTAYMD <= ?
           AND KK2451.TAJGSWKEI_TGKEI_TENDYMD >= ?
           AND KK2451.GENE_ADD_DTM =
               (SELECT MAX(KK2451_GENE.GENE_ADD_DTM) AS KK2451_MAX
                FROM   KK_T_TAJGSWKEI_TGKEI KK2451_GENE
                WHERE  KK2451_GENE.TAJGS_WRIB_KEI_NO = KK2451.TAJGS_WRIB_KEI_NO
                AND    KK2451_GENE.TAJGSWKEI_TGKEI_NO = KK2451.TAJGSWKEI_TGKEI_NO
                AND    KK2451_GENE.MK_FLG = '0' )
    )
    AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM  KK_T_SVC_KEI KK0081_GENE
          WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
           GROUP BY KK0081_GENE.SVC_KEI_NO)
ORDER BY SVC_CD, SVC_KEI_STAT, ITENS_SVKEI_KISUW_NO DESC
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_208)
#--指定したSYSIDをもつサービス契約を取得する。（指定したサービス契約番号は除く）
#-----------------------------------------------------------

--KEY:KK_SELECT_208

SELECT
    KK0081.SVC_KEI_NO
   ,KK0081.GENE_ADD_DTM
   ,KK0081.SVC_KEI_STAT
   ,KK0081.SYSID
   ,KK0081.SVC_CD
   ,KK0081.PRC_GRP_CD
   ,KK0081.PCRS_CD
   ,KK0081.PPLAN_CD
   ,KK0081.SHOSA_YMD
   ,KK0081.SVC_CHRG_STAYMD
   ,KK0081.PAUSE_STP_CD
   ,KK0081.SHOSA_DSL_FIN_CD
   ,(SELECT KK0591.EOHNT_PPLAN_TIKI_SKCD
        FROM KK_M_PPLAN KK0591
        WHERE  KK0081.PCRS_CD = KK0591.PCRS_CD
               AND KK0081.PPLAN_CD = KK0591.PPLAN_CD
               AND KK0591.PPLAN_TSTAYMD <= ?
               AND KK0591.PPLAN_TENDYMD >= ?
               AND KK0591.MK_FLG = '0'
     ) AS EOHNT_PPLAN_TIKI_SKCD
   ,(SELECT KK0241.SVC_KEI_KAISEN_UCWK_NO
        FROM KK_T_KAISEN_TG_SVKEI KK0241
        INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
           ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
        WHERE  KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
          AND KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
          AND KK0241.MK_FLG = '0'
          AND KK0251.SVC_KEI_KAISEN_UCWK_STAT IN ('010','100')
          AND KK0251.GENE_ADD_DTM =
               (SELECT MAX(KK0251_GENE.GENE_ADD_DTM)
                FROM KK_T_SVKEI_KAISEN_UW KK0251_GENE
                WHERE KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                  AND KK0251_GENE.MK_FLG = '0')
     ) AS SVC_KEI_KAISEN_UCWK_NO
   ,(SELECT KK2091.ITENS_SVKEI_KISUW_NO 
       FROM  KK_T_ADCHG  KK2091
       INNER JOIN  KK_T_ADCHG_DTL  KK2101
           ON KK2091.ADCHG_NO = KK2101.ADCHG_NO 
       WHERE KK2091.ADCHG_STAT = '001'
         AND KK2101.ADCHG_DTL_SBT_CD = '01' 
         AND KK2101.CHAF_SKBT_NO = KK0081.SVC_KEI_NO
         AND KK2101.MK_FLG = '0' 
         AND KK2091.MK_FLG = '0'
      ) AS ITENS_SVKEI_KISUW_NO
FROM KK_T_SVC_KEI KK0081
WHERE
    KK0081.SYSID = ?
    AND KK0081.SVC_KEI_NO <> ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0')
ORDER BY SVC_CD, SVC_KEI_STAT, ITENS_SVKEI_KISUW_NO DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_287)
#--申込書番号に紐づく住所変更の申込書番号、申込書明細番号を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_287

SELECT
    DISTINCT KK0021.MSKMSHO_NO, KK0021.MSKMSHO_DTL_NO
FROM
    KK_T_MSKM_DTL KK0021
INNER JOIN
    KK_T_SVC_KEI KK0081
ON
    KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
WHERE
    EXISTS (
        SELECT
            1
        FROM
            KK_T_SVC_KEI KK0081_GENE_MAX
        WHERE
            EXISTS (
                SELECT
                    1
                FROM
                    KK_T_SVC_KEI KK0081_MSKM
                WHERE
                    EXISTS (
                        SELECT
                            1
                        FROM
                            KK_T_MSKM_DTL KK0021_EX
                        WHERE
                            KK0021_EX.MSKMSHO_NO = ?
                            AND KK0021_EX.MSKM_DTL_NO = KK0081_MSKM.MSKM_DTL_NO
                            AND KK0021_EX.MK_FLG = '0'
                    )
                    AND KK0081_GENE_MAX.SVC_KEI_NO = KK0081_MSKM.SVC_KEI_NO
                    AND KK0081_MSKM.SVC_CD IN ('01', '02')
                )
            AND EXISTS (
                 SELECT
                     1
                 FROM
                     KK_T_ADCHG  KK2091
                 INNER JOIN
                     KK_T_ADCHG_DTL KK2101
                 ON
                     KK2091.ADCHG_NO = KK2101.ADCHG_NO
                 WHERE
                     KK0021.MSKM_NO = KK2091.MSKM_NO
                     AND KK2091.ADCHG_STAT = '001'
                     AND KK2101.ADCHG_DTL_SBT_CD = '01'
                     AND KK2101.CHBF_SKBT_NO = KK0081_GENE_MAX.SVC_KEI_NO
                     AND KK2101.MK_FLG = '0' 
                     AND KK2091.MK_FLG = '0'
                )
            AND (KK0081_GENE_MAX.SVC_KEI_NO, KK0081_GENE_MAX.RSV_APLY_YMD || KK0081_GENE_MAX.GENE_ADD_DTM) =
                (
                    SELECT
                        KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                    FROM
                        KK_T_SVC_KEI KK0081_GENE
                    WHERE
                        KK0081_GENE_MAX.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
                        AND KK0081_GENE.RSV_APLY_YMD <= ?
                        AND KK0081_GENE.RSV_APLY_CD = '2'
                        AND KK0081_GENE.MK_FLG = '0'
                    GROUP BY KK0081_GENE.SVC_KEI_NO
            )
            AND KK0081_GENE_MAX.MK_FLG = '0'
    )
AND KK0081.SVC_CD IN ('01', '02')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_289)
#--申込書明細番号に紐づく住所変更の申込書番号、申込書明細番号を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_289

SELECT
    DISTINCT KK0021.MSKMSHO_NO, KK0021.MSKMSHO_DTL_NO
FROM
    KK_T_MSKM_DTL KK0021
INNER JOIN
    KK_T_SVC_KEI KK0081
ON
    KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
WHERE
    EXISTS (
        SELECT
            1
        FROM
            KK_T_SVC_KEI KK0081_GENE_MAX
        WHERE
            EXISTS (
                SELECT
                    1
                FROM
                    KK_T_SVC_KEI KK0081_MSKM
                WHERE
                    EXISTS (
                        SELECT
                            1
                        FROM
                            KK_T_MSKM_DTL KK0021_EX
                        WHERE
                            KK0021_EX.MSKMSHO_DTL_NO = ?
                            AND KK0021_EX.MSKM_DTL_NO = KK0081_MSKM.MSKM_DTL_NO
                            AND KK0021_EX.MK_FLG = '0'
                    )
                    AND KK0081_GENE_MAX.SVC_KEI_NO = KK0081_MSKM.SVC_KEI_NO
                    AND KK0081_MSKM.SVC_CD IN ('01', '02')
                )
            AND EXISTS (
                 SELECT
                     1
                 FROM
                     KK_T_ADCHG  KK2091
                 INNER JOIN
                     KK_T_ADCHG_DTL KK2101
                 ON
                     KK2091.ADCHG_NO = KK2101.ADCHG_NO
                 WHERE
                     KK0021.MSKM_NO = KK2091.MSKM_NO
                     AND KK2091.ADCHG_STAT = '001'
                     AND KK2101.ADCHG_DTL_SBT_CD = '01'
                     AND KK2101.CHBF_SKBT_NO = KK0081_GENE_MAX.SVC_KEI_NO
                     AND KK2101.MK_FLG = '0' 
                     AND KK2091.MK_FLG = '0'
                )
            AND (KK0081_GENE_MAX.SVC_KEI_NO, KK0081_GENE_MAX.RSV_APLY_YMD || KK0081_GENE_MAX.GENE_ADD_DTM) =
                (
                    SELECT
                        KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                    FROM
                        KK_T_SVC_KEI KK0081_GENE
                    WHERE
                        KK0081_GENE_MAX.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
                        AND KK0081_GENE.RSV_APLY_YMD <= ?
                        AND KK0081_GENE.RSV_APLY_CD = '2'
                        AND KK0081_GENE.MK_FLG = '0'
                    GROUP BY KK0081_GENE.SVC_KEI_NO
            )
            AND KK0081_GENE_MAX.MK_FLG = '0'
    )
AND KK0081.SVC_CD IN ('01', '02')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_209)
#--ＳＹＳＩＤに関連する現在適用中のサービス契約の件数を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_209

SELECT
 COUNT(*) AS SVC_KEI_CNT
FROM
 KK_T_SVC_KEI KTSK
WHERE
 KTSK.SYSID = ?
AND
 KTSK.MK_FLG = '0'
AND
 KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM =
 (SELECT
   MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
  FROM
   KK_T_SVC_KEI KTSK_GENE
  WHERE
   KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
  AND
   KTSK_GENE.RSV_APLY_YMD <= ?
  AND
   KTSK_GENE.RSV_APLY_CD = '2'
  AND
   KTSK_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_210)
#--サービス契約番号取得処理（課金後解約データ）
#-----------------------------------------------------------

--KEY:KK_SELECT_210

SELECT
 KTSK.SVC_KEI_NO
 ,KTSK.SYSID
 ,KTSK.SVC_CD
 ,KTSK.PRC_GRP_CD
 ,KTSK.PCRS_CD
 ,KTSK.SVC_DSL_KISAN_YMD
 ,KTSK.SVC_CANCEL_YMD
 ,KTSK.SVC_DSL_YMD
 ,KTSK.SVC_ENDYMD
 ,KTSK.UPD_DTM
 ,KTSK.RSV_APLY_YMD
FROM
 KK_T_SVC_KEI KTSK
WHERE
 KTSK.SVC_KEI_STAT = ?
AND
 KTSK.SVC_ENDYMD <= ?
AND
 LENGTH(TRIM(KTSK.SVC_CHRG_STAYMD)) IS NOT NULL
AND
 KTSK.SVC_CD <> ?
AND
 KTSK.MK_FLG = '0'
AND
 KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM =
 (SELECT
   MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
  FROM
   KK_T_SVC_KEI KTSK_GENE
  WHERE
   KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
  AND
   KTSK_GENE.RSV_APLY_YMD <= ?
  AND
   KTSK_GENE.RSV_APLY_CD = '2'
  AND
   KTSK_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_211)
#--サービス契約番号取得処理（課金前解約データ）
#-----------------------------------------------------------

--KEY:KK_SELECT_211

SELECT
 KTSK.SVC_KEI_NO
 ,KTSK.SYSID
 ,KTSK.SVC_CD
 ,KTSK.PRC_GRP_CD
 ,KTSK.PCRS_CD
 ,KTSK.SVC_DSL_KISAN_YMD
 ,KTSK.SVC_CANCEL_YMD
 ,KTSK.SVC_DSL_YMD
 ,KTSK.SVC_ENDYMD
 ,KTSK.UPD_DTM
 ,KTSK.RSV_APLY_YMD
FROM
 KK_T_SVC_KEI KTSK
WHERE
 KTSK.SVC_KEI_STAT = ?
AND
 KTSK.SVC_ENDYMD <= ?
AND
 LENGTH(TRIM(KTSK.SVC_CHRG_STAYMD)) IS NULL
AND
 KTSK.SVC_CD <> ?
AND
 KTSK.MK_FLG = '0'
AND
 KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM =
 (SELECT
   MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
  FROM
   KK_T_SVC_KEI KTSK_GENE
  WHERE
   KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
  AND
   KTSK_GENE.RSV_APLY_YMD <= ?
  AND
   KTSK_GENE.RSV_APLY_CD = '2'
  AND
   KTSK_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_212)
#--サービス契約番号取得処理（課金後キャンセルデータ）
#-----------------------------------------------------------

--KEY:KK_SELECT_212

SELECT
 KTSK.SVC_KEI_NO
 ,KTSK.SYSID
 ,KTSK.SVC_CD
 ,KTSK.PRC_GRP_CD
 ,KTSK.PCRS_CD
 ,KTSK.SVC_DSL_KISAN_YMD
 ,KTSK.SVC_CANCEL_YMD
 ,KTSK.SVC_DSL_YMD
 ,KTSK.SVC_ENDYMD
 ,KTSK.UPD_DTM
 ,KTSK.RSV_APLY_YMD
FROM
 KK_T_SVC_KEI KTSK
WHERE
 KTSK.SVC_KEI_STAT = ?
AND
 KTSK.SVC_CANCEL_YMD <= ?
AND
 KTSK.SVC_CHRG_STAYMD <= KTSK.SVC_CANCEL_YMD
AND
 KTSK.SVC_CD <> ?
AND
 KTSK.MK_FLG = '0'
AND
 KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM =
 (SELECT
   MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
  FROM
   KK_T_SVC_KEI KTSK_GENE
  WHERE
   KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
  AND
   KTSK_GENE.RSV_APLY_YMD <= ?
  AND
   KTSK_GENE.RSV_APLY_CD = '2'
  AND
   KTSK_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_213)
#--サービス契約番号取得処理（課金前キャンセルデータ）
#-----------------------------------------------------------

--KEY:KK_SELECT_213

SELECT
 KTSK.SVC_KEI_NO
 ,KTSK.SYSID
 ,KTSK.SVC_CD
 ,KTSK.PRC_GRP_CD
 ,KTSK.PCRS_CD
 ,KTSK.SVC_DSL_KISAN_YMD
 ,KTSK.SVC_CANCEL_YMD
 ,KTSK.SVC_DSL_YMD
 ,KTSK.SVC_ENDYMD
 ,KTSK.UPD_DTM
 ,KTSK.RSV_APLY_YMD
FROM
 KK_T_SVC_KEI KTSK
WHERE
 KTSK.SVC_KEI_STAT = ?
AND
 KTSK.SVC_CANCEL_YMD < ?
AND
 LENGTH(TRIM(KTSK.SVC_CHRG_STAYMD)) IS NULL
AND
 KTSK.SVC_CD <> ?
AND
 KTSK.MK_FLG = '0'
AND
 KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM =
 (SELECT
   MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
  FROM
   KK_T_SVC_KEI KTSK_GENE
  WHERE
   KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
  AND
   KTSK_GENE.RSV_APLY_YMD <= ?
  AND
   KTSK_GENE.RSV_APLY_CD = '2'
  AND
   KTSK_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_214)
#--サービス契約番号に紐づく履歴情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_214

SELECT
 KTSK.SVC_KEI_NO
 ,KTSK.SYSID
 ,KTSK.SVC_CD
 ,KTSK.PRC_GRP_CD
 ,KTSK.PCRS_CD
 ,KTSK.SVC_DSL_KISAN_YMD
 ,KTSK.SVC_CANCEL_YMD
 ,KTSK.SVC_DSL_YMD
 ,KTSK.SVC_ENDYMD
 ,KTSK.UPD_DTM
 ,KTSK.RSV_APLY_YMD
FROM
 KK_T_SVC_KEI KTSK
WHERE
 KTSK.SVC_KEI_NO = ?
AND
 KTSK.SYSID <> ?
AND
 KTSK.MK_FLG = '0'
ORDER BY
 KTSK.RSV_APLY_YMD DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_215)
#--サービス契約番号に紐づく申込明細番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_215

SELECT
 KTSK.MSKM_DTL_NO
FROM
 KK_T_SVC_KEI  KTSK
WHERE
 KTSK.SVC_KEI_NO = ?
AND
 KTSK.MK_FLG = '0'
AND
 KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM =
 (SELECT
   MIN(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
  FROM
   KK_T_SVC_KEI KTSK_GENE
  WHERE
   KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
  AND
   KTSK_GENE.IDO_DIV IN(?,?)
  AND
   KTSK_GENE.RSV_APLY_YMD <= ?
  AND
   KTSK_GENE.RSV_APLY_CD = '2'
  AND
   KTSK_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_217)
#--【保存期間経過データ物理削除】
#--削除対象の申込明細番号を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_217

SELECT DISTINCT
    KK0081.MSKM_DTL_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_218)
#--KKPRC02204(プラン開始年月日・プラン課金開始年月日取得)
#-----------------------------------------------------------

--KEY:KK_SELECT_218

SELECT
　　KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.PLAN_STAYMD,
    KK0081.PLAN_CHRG_STAYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <=  TO_CHAR(TO_DATE(?) + 1, 'YYYYMMDD')
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_219)
#--紹介者情報登録対象抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_219

SELECT
    KK0081.SVC_CD,
    KK0081.MSKM_DTL_NO,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.IDO_DIV,
    KK0081.INTR_CD,
    KK0081.SYSID 
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 
  AND KK0081.INTR_CD IS NOT NULL

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_220)
#--KKPRC00906
#--「契約一時金」に紐付くサービス契約情報を取得
#--KKPRC00915
#--紹介者情報登録対象抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_220

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_DSL_KISAN_YMD,
    KK0081.SVC_DSL_YMD,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_221)
#--サービス契約番号に紐ずく最新の異動区分を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_221

SELECT
    KK0081.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.MK_FLG = '0'
AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS A_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_222)
#--サービス契約番号と、料金グループ、コース、プランを基に予約でないサービス契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_222

SELECT
    KK0081.SVC_KEI_NO AS SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.PRC_GRP_CD = ?
AND
    KK0081.PCRS_CD = ?
AND
    KK0081.PPLAN_CD = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (
        SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND
            KK0081_GENE.PRC_GRP_CD = KK0081.PRC_GRP_CD
        AND
            KK0081_GENE.PCRS_CD = KK0081.PCRS_CD
        AND
            KK0081_GENE.PPLAN_CD = KK0081.PPLAN_CD
        AND
            KK0081_GENE.RSV_APLY_YMD <= ?
        AND
            KK0081_GENE.RSV_APLY_CD = ?
        AND
            KK0081_GENE.MK_FLG = ?
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_223)
#--地図情報差分抽出--サービス契約
#--対象日付に登録・更新のあったサービス契約を抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_223

SELECT
    KK0081.SYSID,
    KK0081.SVC_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_ENDYMD,
    KK0081.SKEKKA_CD,
    KK0081.SVC_KEI_STAT,
    KK0781.PRC_GRP_NM,
    KK0081.IDO_NG_STAT_CD,
    KK0081.SHOSA_DSL_FIN_CD,
    KK0081.SHOSA_YMD,
    KK0081.SHOSA_CL_YMD
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN CK_T_CUST CK0011
    ON CK0011.SYSID = KK0081.SYSID
    AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =
        (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
         FROM   CK_T_CUST CK0011_GENE
         WHERE  CK0011_GENE.SYSID = CK0011.SYSID
         AND    CK0011_GENE.RSV_APLY_YMD <= ?
         AND    CK0011_GENE.RSV_APLY_CD = '2'
         AND    CK0011_GENE.MK_FLG = '0')
    INNER JOIN KK_M_PRC_GRP KK0781
    ON KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD
    AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM = 
        (SELECT MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
         FROM   KK_M_PRC_GRP KK0781_GENE
         WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
         AND    KK0781_GENE.RSV_APLY_YMD <= ?
         AND    KK0781_GENE.MK_FLG = '0')
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
        (SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM    KK_T_SVC_KEI KK0081_GENE
         WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND     KK0081_GENE.RSV_APLY_YMD <= ?
         AND     KK0081_GENE.RSV_APLY_CD = '2'
         AND     KK0081_GENE.MK_FLG = '0')
AND (KK0081.ADD_UNYO_YMD = ? OR KK0081.UPD_UNYO_YMD = ?)
AND KK0081.PRC_GRP_CD IN ('02', '03', '04', '10', '11', '12', '13')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_224)
#--KKPRC44501
#--工事完了時配送対象抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_224

SELECT KK0081.SVC_KEI_NO,
       KK0081.SVC_KEI_STAT,
       KK0081.PCRS_CD,
       KK0081.TK_HOSHIKI_KEI_NO,
       KK0341.KKTK_SVC_KEI_NO,
       KK0341.HAISO_REQ_SHITEI_YMD,
       KK0341.HAISO_DIV,
       KK0341.KIKI_HKAT_SHITEI_SOKO_CD,
       KK0341.KIKI_HKAT_SHITEI_SKDN_CD,
       KK0341.TAKNKIKI_SBT_CD,
       KK0341.TAKNKIKI_MODEL_CD,
       KK0341.TAKNKIKI_SETHIN_MODEL_CD,
       KK0341.KIKI_HUKA_INFO_CD,
       KK0341.KIKI_SOHUS_NM,
       KK0341.KIKI_SOHUS_AD_CD,
       KK0341.KIKI_SOHUS_PCD,
       KK0341.KIKI_SOHUS_STATE_NM,
       KK0341.KIKI_SOHUS_CITY_NM,
       KK0341.KIKI_SOHUS_OAZTSU_NM,
       KK0341.KIKI_SOHUS_AZCHO_NM,
       KK0341.KIKI_SOHUS_BNCHIGO,
       KK0341.KIKI_SOHUS_ADRTTM,
       KK0341.KIKI_SOHUS_ADRRM,
       KK0341.KIKI_SOHUS_TELNO,
       KK0341.KIKI_CHG_NO,
       KK0341.KIKI_STI_JI_KRIPLACE_SKCD,
       KK0341.KIKI_STI_JI_KOCOMP_CD,
       KK0341.KIKI_STI_JI_KOCOMP_SLF_CD,
       KK0341.KIKI_STI_JI_YTKSKOF_CD,
       KK0341.KIKI_STI_JI_YTKSKOF_SLF_CD
  FROM KK_T_SVC_KEI KK0081
       INNER JOIN KK_T_KKTK_SVC_KEI KK0341
               ON KK0341.SVC_KEI_NO = KK0081.SVC_KEI_NO
              AND KK0341.SVC_STA_JI_HIS_JOKYO_SKCD = '3'
              AND KK0341.KKTK_SVC_KEI_STAT IN('020','030','100')
              AND (KK0341.KKTK_SVC_KEI_NO, KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM) = 
                       (SELECT KK0341_GENE.KKTK_SVC_KEI_NO, MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
                          FROM KK_T_KKTK_SVC_KEI KK0341_GENE
                         WHERE KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO
                           AND KK0341_GENE.RSV_APLY_YMD <= ?
                           AND KK0341_GENE.RSV_APLY_CD = '2'
                           AND KK0341_GENE.MK_FLG = '0'
                         GROUP BY KK0341_GENE.KKTK_SVC_KEI_NO)
 WHERE KK0081.SVC_KEI_STAT IN('020','030','100')
   AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
                 (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                    FROM KK_T_SVC_KEI KK0081_GENE
                   WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                     AND KK0081_GENE.RSV_APLY_YMD <= ?
                     AND KK0081_GENE.RSV_APLY_CD = '2'
                     AND KK0081_GENE.MK_FLG = '0'
                   GROUP BY KK0081_GENE.SVC_KEI_NO)
UNION ALL
SELECT /*+ LEADING(KK0341) */ KK0081.SVC_KEI_NO,
       KK0081.SVC_KEI_STAT,
       KK0081.PCRS_CD,
       KK0081.TK_HOSHIKI_KEI_NO,
       KK0341.KKTK_SVC_KEI_NO,
       KK0341.HAISO_REQ_SHITEI_YMD,
       KK0341.HAISO_DIV,
       KK0341.KIKI_HKAT_SHITEI_SOKO_CD,
       KK0341.KIKI_HKAT_SHITEI_SKDN_CD,
       KK0341.TAKNKIKI_SBT_CD,
       KK0341.TAKNKIKI_MODEL_CD,
       KK0341.TAKNKIKI_SETHIN_MODEL_CD,
       KK0341.KIKI_HUKA_INFO_CD,
       KK0341.KIKI_SOHUS_NM,
       KK0341.KIKI_SOHUS_AD_CD,
       KK0341.KIKI_SOHUS_PCD,
       KK0341.KIKI_SOHUS_STATE_NM,
       KK0341.KIKI_SOHUS_CITY_NM,
       KK0341.KIKI_SOHUS_OAZTSU_NM,
       KK0341.KIKI_SOHUS_AZCHO_NM,
       KK0341.KIKI_SOHUS_BNCHIGO,
       KK0341.KIKI_SOHUS_ADRTTM,
       KK0341.KIKI_SOHUS_ADRRM,
       KK0341.KIKI_SOHUS_TELNO,
       KK0341.KIKI_CHG_NO,
       KK0341.KIKI_STI_JI_KRIPLACE_SKCD,
       KK0341.KIKI_STI_JI_KOCOMP_CD,
       KK0341.KIKI_STI_JI_KOCOMP_SLF_CD,
       KK0341.KIKI_STI_JI_YTKSKOF_CD,
       KK0341.KIKI_STI_JI_YTKSKOF_SLF_CD 
FROM KK_T_KKTK_SVC_KEI KK0341
        INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251
            ON KK0341.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
            AND SVC_KEI_KAISEN_UCWK_STAT IN ('010','100')
            AND KK0251.GENE_ADD_DTM = 
                            (SELECT
                               MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                             FROM KK_T_SVKEI_KAISEN_UW KK0251_GENE
                             WHERE
                                 KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                                 KK0251_GENE.MK_FLG = '0')
        INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241
            ON KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
            AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
            AND KK0241.KAISEN_UCWK_USE_ENDYMD > ?
            AND KK0241.MK_FLG = '0'
        INNER JOIN KK_T_SVC_KEI KK0081
            ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081.SVC_KEI_STAT IN('020','030','100')
            AND KK0081.SVC_CD =
                            (SELECT MIN(KK0081_A.SVC_CD)
                               FROM KK_T_SVC_KEI KK0081_A
                                WHERE KK0081_A.SVC_KEI_NO IN (SELECT KK0241.SVC_KEI_NO FROM KK_T_KAISEN_TG_SVKEI KK0241
                                                                WHERE KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
                                                                AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
                                                                AND KK0241.KAISEN_UCWK_USE_ENDYMD > ?
                                                                AND KK0241.MK_FLG = '0')
                                      AND KK0081_A.MK_FLG = '0')
           AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
                         (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                            FROM KK_T_SVC_KEI KK0081_GENE
                           WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                             AND KK0081_GENE.RSV_APLY_YMD <= ?
                             AND KK0081_GENE.RSV_APLY_CD = '2'
                             AND KK0081_GENE.MK_FLG = '0'
                           GROUP BY KK0081_GENE.SVC_KEI_NO)
WHERE KK0341.SVC_STA_JI_HIS_JOKYO_SKCD = '3'
AND KK0341.KKTK_SVC_KEI_STAT IN('020','030','100')
AND (KK0341.KKTK_SVC_KEI_NO, KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM) = 
       (SELECT KK0341_GENE.KKTK_SVC_KEI_NO, MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
          FROM KK_T_KKTK_SVC_KEI KK0341_GENE
         WHERE KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO
           AND KK0341_GENE.RSV_APLY_YMD <= ?
           AND KK0341_GENE.RSV_APLY_CD = '2'
           AND KK0341_GENE.MK_FLG = '0'
         GROUP BY KK0341_GENE.KKTK_SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_225)
#--サービス契約番号をキーとし，相関ルールRULE0087001のパラメータ値を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_225

SELECT 
KK0081.SVC_KEI_NO,
KK0081.TK_HOSHIKI_KEI_NO,
KK0891.KANYU_KEI_PAY_HOSHIKI_CD,
KK0881.MANSION_ID,
KK0911.IP_HRADSI_CD,
KK0911.MANS_TUSHIN_EQUIP_CD
FROM
KK_T_SVC_KEI KK0081
INNER JOIN KK_T_TK_HOSHIKI_KEI KK0891
ON KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO
AND KK0891.MK_FLG = '0'
INNER JOIN KK_T_KAISEN_USE_KEI KK0881
ON KK0891.KAISEN_USE_KEI_NO = KK0881.KAISEN_USE_KEI_NO
AND KK0881.MK_FLG ='0'
INNER JOIN KK_M_MANSION_COURSE KK0911
ON KK0881.MANSION_COURSE_CD = KK0911.MANSION_COURSE_CD
    AND KK0911.RSV_APLY_YMD || KK0911.GENE_ADD_DTM =
        (SELECT
            MAX(KK0911_GENE.RSV_APLY_YMD || KK0911_GENE.GENE_ADD_DTM)
        FROM
            KK_M_MANSION_COURSE KK0911_GENE
        WHERE
            KK0911_GENE.MANSION_COURSE_CD = KK0911.MANSION_COURSE_CD
            AND KK0911_GENE.RSV_APLY_YMD <= ?
            AND KK0911_GENE.MK_FLG = '0'
        )
WHERE KK0081.SVC_KEI_NO = ?
    AND  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI KK0081_GENE
                WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                    AND    KK0081_GENE.RSV_APLY_YMD <= ?
                    AND    KK0081_GENE.RSV_APLY_CD = '2'
                    AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_229)
#--KKPRC00902
#--サービス契約内訳の最も履歴の古いレコードからサービス契約情報取得。
#-----------------------------------------------------------

--KEY:KK_SELECT_229

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0161.SVC_KEI_UCWK_NO,
    KK0161.IDO_DIV,
    KK0161.MSKM_DTL_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_SVC_KEI_UCWK KK0161
ON
    KK0081.SVC_KEI_NO = KK0161.SVC_KEI_NO
    AND KK0161.IDO_DIV = '00041'
    AND KK0161.GENE_ADD_DTM =
    (SELECT
        MIN(KK0161_GENE.GENE_ADD_DTM) AS KK0161_MIN
    FROM
        KK_T_SVC_KEI_UCWK KK0161_GENE
    WHERE
        KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
        AND KK0161_GENE.RSV_APLY_YMD <= ?
        AND KK0161_GENE.RSV_APLY_CD = '2'
        AND KK0161_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0161.SVC_KEI_UCWK_NO = ?
    AND KK0081.SVC_KEI_STAT = '100'
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT 
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM   
        KK_T_SVC_KEI KK0081_GENE
    WHERE  
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')  

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_233)
#--KKPRC00904
#--指定されたサービス契約番号のサービス開始日、変更元法人eo読替サービス契約番号、サービス利用希望年月日を取得。
#-----------------------------------------------------------

--KEY:KK_SELECT_233

SELECT
    KK0081.SVC_STA_YMD,
    KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO,
    KK0081.SVC_USE_STA_KIBO_YMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM
        KK_T_SVC_KEI KK0081_GENE
     WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_236)
#--KKPRC00907
#--ネット、電話の宅内調査結果なし、工事ありを対象とする。
#-----------------------------------------------------------

--KEY:KK_SELECT_236

SELECT DISTINCT
  KK0081.SVC_KEI_NO,
  KK0081.SHOSA_YMD,
  KK0241.SVC_KEI_KAISEN_UCWK_NO
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
  ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0241.KAISEN_UCWK_USE_STAYMD = 
    (SELECT
        MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) MX
    FROM
        KK_T_KAISEN_TG_SVKEI KK0241_MAX
    WHERE
        KK0241_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
        AND KK0241_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO
        AND KK0241_MAX.MK_FLG = '0')
  INNER JOIN
    KU_T_SVKEI_KOJIAK KU0081
  ON
    KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
    AND KU0081.SVKEI_KOJIAK_TENDYMD >= ?
    AND KU0081.MK_FLG = '0'
  INNER JOIN
    KU_T_KOJIAK KU0011
  ON
    KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
    AND KU0011.KOJIAK_STAT = '200'
    AND KU0011.MK_FLG = '0'  
WHERE
  KK0081.SVC_KEI_STAT = '020'
  AND KK0081.SHOSA_DSL_FIN_CD = '1'
  AND KK0081.SHOSA_YMD IS NOT NULL 
  AND KK0081.TK_HOSHIKI_KEI_NO IS NULL
  AND KK0081.SVC_CD IN ('01','02') 
  AND KK0081.PRC_GRP_CD IN ('02','10')
  AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
  (SELECT KK0081_GENE.SVC_KEI_NO,
    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
    KK_T_SVC_KEI KK0081_GENE
  WHERE
    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_237)
#--KKPRC009
#--サービス契約開始登録
#--指定されたサービス契約番号の登録時の異動区分を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_237

SELECT
    KK0081.IDO_DIV,
    KK0081.GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.GENE_ADD_DTM = 
    (SELECT
        MIN(KK0081_GENE.GENE_ADD_DTM) AS KK0081_MIN
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_238)
#--加入御礼管理データ抽出
#--サービス契約番号に紐づく履歴をすべて取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_238

SELECT SKEKKA_SEND_CD
FROM   KK_T_SVC_KEI KK0081
WHERE  KK0081.SVC_KEI_NO = ?
AND    KK0081.SKEKKA_SEND_CD IS NOT NULL
AND    KK0081.SKEKKA_SEND_CD <> '0'
AND    KK0081.RSV_APLY_CD = '2'
AND    KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_239)
#--加入御礼管理データ抽出
#--サービス契約番号に紐づく予約適用年月日がカレントから未来の
#--レコードをロックする
#-----------------------------------------------------------

--KEY:KK_SELECT_239

SELECT 1
FROM KK_T_SVC_KEI KK0081
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM >= (
  SELECT MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
  FROM   KK_T_SVC_KEI KK0081_G
  WHERE  KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_G.RSV_APLY_YMD <= ?
  AND    KK0081_G.RSV_APLY_CD = '2'
  AND    KK0081_G.MK_FLG = '0')
FOR UPDATE

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_240)
#--KKPRC11001_継続分サービス契約情報抽出(サービス開始済サービス契約情報抽出)
#-----------------------------------------------------------

--KEY:KK_SELECT_240

SELECT
    SVC.SVC_KEI_NO,
    SVC.SVC_CD,
    SVC.PRC_GRP_CD,
    SVC.PCRS_CD,
    SVC.PPLAN_CD,
    SVC.TK_HOSHIKI_KEI_NO,
    SVC.SVC_STA_YMD,
    SVC.SVC_CHRG_STAYMD,
    SVC.PLAN_CHRG_STAYMD,
    SVC.PLAN_CHRG_ENDYMD,
    SVC.SVC_DSL_YMD,
    SVC.SVC_DLRE_CD,
    SVC.PNLTY_HASSEI_CD,
    SVC.PLAN_END_SBT_CD,
    SVC.KAIHK_YMD,
    SVC.PAUSE_STP_CD,
    SVC.SVC_PAUSE_YMD,
    SVC.SVC_PAUSE_CHRG_STA_YMD,
    SVC.SVC_PAUSE_RLS_YMD,
    SVC.SVC_CANCEL_YMD,
    SVC.SVC_ENDYMD,
    SVC.SVC_CHRG_ENDYMD,
    SVC.IDO_DIV,
    SVC.SEIRI_NO,
    '' JIGYOSHA_KEI_ID,
    DMY.REPLICA_MOTO_TK_HSK_KEI_NO
FROM
     (
       SELECT
          SVC2.SVC_KEI_NO,
          SVC2.SVC_CD,
          SVC2.PRC_GRP_CD,
          SVC2.PCRS_CD,
          SVC2.PPLAN_CD,
          SVC2.TK_HOSHIKI_KEI_NO,
          SVC2.SVC_STA_YMD,
          SVC2.SVC_CHRG_STAYMD,
          SVC2.PLAN_CHRG_STAYMD,
          SVC2.PLAN_CHRG_ENDYMD,
          SVC2.SVC_DSL_YMD,
          SVC2.SVC_DLRE_CD,
          SVC2.PNLTY_HASSEI_CD,
          SVC2.PLAN_END_SBT_CD,
          SVC2.KAIHK_YMD,
          SVC2.PAUSE_STP_CD,
          SVC2.SVC_PAUSE_YMD,
          SVC2.SVC_PAUSE_CHRG_STA_YMD,
          SVC2.SVC_PAUSE_RLS_YMD,
          SVC2.SVC_CANCEL_YMD,
          SVC2.SVC_ENDYMD,
          SVC2.SVC_CHRG_ENDYMD,
          SVC2.IDO_DIV,
          SVC2.SEIRI_NO,
          SVC2.GENE_ADD_DTM,
          ROW_NUMBER() OVER(PARTITION BY SVC_KEI_NO,PPLAN_CD ORDER BY RSV_APLY_YMD DESC, GENE_ADD_DTM DESC) AS ROW_NUM
       FROM
          KK_T_SVC_KEI SVC2
       WHERE
          RSV_APLY_YMD <= ?
       AND
          SVC_STA_YMD < '20991231'
       AND
          RSV_APLY_CD = '2'
       AND
          MK_FLG = '0'
     ) SVC
     LEFT JOIN (
        SELECT
           SVC_KEI_NO,
           GENE_ADD_DTM,
           REPLICA_MOTO_TK_HSK_KEI_NO
        FROM
           KK_T_SVC_KEI_DUMMY
        WHERE
           RSV_APLY_CD = '2'
        AND
           MK_FLG = '0'
       ) DMY
     ON  SVC.SVC_KEI_NO = DMY.SVC_KEI_NO
     AND SVC.GENE_ADD_DTM = DMY.GENE_ADD_DTM
WHERE
   SVC.SVC_KEI_NO = ?
AND
   SVC.ROW_NUM = 1
ORDER BY
   SVC.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_241)
#--KKPRC00907
#--照査済でサービス追加の契約を対象とする。
#-----------------------------------------------------------

--KEY:KK_SELECT_241

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SHOSA_YMD,
    KK0241.SVC_KEI_KAISEN_UCWK_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0241.KAISEN_UCWK_USE_STAYMD = 
    (SELECT
        MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) MX
    FROM
        KK_T_KAISEN_TG_SVKEI KK0241_MAX
    WHERE
        KK0241_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
        AND KK0241_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO
        AND KK0241_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO
    AND KK0251.GENE_ADD_DTM =
    (SELECT
        MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
    FROM
        KK_T_SVKEI_KAISEN_UW KK0251_GENE
    WHERE
        KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
        AND KK0251_GENE.MK_FLG = '0')
INNER JOIN
    KK_T_SVC_KEI KK0081_MIN
ON
    KK0081.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO AND
    KK0081_MIN.IDO_DIV IN('00001','00002','00019') AND
    KK0081_MIN.GENE_ADD_DTM = 
    (SELECT
        MIN(KK0081_GENE.GENE_ADD_DTM) AS GENE_MIN
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_STAT = '020' AND
    KK0081.SHOSA_DSL_FIN_CD = '1' AND
    KK0081.SHOSA_YMD IS NOT NULL  AND
    KK0081.TK_HOSHIKI_KEI_NO IS NULL   AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_242)
#--KKPRC01601
#--撤去情報の抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_242

SELECT
    DISTINCT 
    KK0081.SVC_KEI_NO,
    KK0081.IDO_DIV,
    KK0081.SVC_CD,
    KK1471.KOJIAK_NO,
    KK1471.KOJIAK_JSSI_YMD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.SYSID,
    KK1471.KOJIAK_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    (
    SELECT 
        DISTINCT
        KK1471.SVC_KEI_NO,
        KK1471.KOJIAK_NO ,
        KK1471.SVC_KEI_KAISEN_UCWK_NO,
        KK1471.KOJIAK_JSSI_YMD
    FROM 
        KK_T_KJ_FIN_WK KK1471
    INNER JOIN
        KU_T_KOJIAK KU0011
    ON
        KU0011.KOJIAK_NO = KK1471.KOJIAK_NO AND
        KU0011.KOJI_UK_OPTNTY_IDO_DIV = '00019'
    WHERE    
        KK1471.OPMS_KOJIAK_RSLT_CD = '1' AND 
        KK1471.KOJIAK_SBT_CD IN ('002','004') 
    ) KK1471
ON 
    KK1471.SVC_KEI_NO = KK0081.SVC_KEI_NO 
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK1471.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
    KK0251.GENE_ADD_DTM = (SELECT
                               MAX(KK0251_MAX.GENE_ADD_DTM)
                             FROM
                               KK_T_SVKEI_KAISEN_UW KK0251_MAX
                            WHERE
                               KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                               KK0251_MAX.MK_FLG = '0')
WHERE
    KK0081.SVC_CD = '03' AND
    KK0081.PRC_GRP_CD = '12' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM KK_T_SVC_KEI KK0081_GENE
      WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
            KK0081_GENE.RSV_APLY_YMD <= ? AND
            KK0081_GENE.RSV_APLY_CD = '2' AND
            KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_243)
#--KKPRC01601
#--お客様情報変更情報の抽出（SYSID）
#-----------------------------------------------------------

--KEY:KK_SELECT_243

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_PRG KK1091
            ON KK0081.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
               KK1091.PRG_DTM > ? || '235959999' AND
               KK1091.PRG_DTM <= ? || '235959999' AND
               KK1091.MK_FLG = '0' AND
               EXISTS(SELECT 1
                        FROM KK_M_KCNRIDODIV_CHG KK1561
                        WHERE
                            KK1561.IDO_DIV = KK1091.IDO_DIV AND
                            KK1561.PRG_STAT = KK1091.PRG_STAT AND
                            KK1561.KCNRIDODIV = '06000' AND
                            ? BETWEEN KK1561.KCNRIDODIV_CHG_TSTAYMD AND
                            KK1561.KCNRIDODIV_CHG_TENDYMD AND
                            KK1561.MK_FLG = '0')
WHERE
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
    (SELECT 
        KK0081_GENE.SVC_KEI_NO, 
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM 
        KK_T_SVC_KEI KK0081_GENE
     WHERE 
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0'
     GROUP BY KK0081_GENE.SVC_KEI_NO) AND
    KK0081.PRC_GRP_CD NOT IN ('11','13')
order by KK0081.SVC_KEI_NO


#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_244)
#--KKPRC01601
#--お客様情報変更情報の抽出（回線別サービス契約）
#-----------------------------------------------------------

--KEY:KK_SELECT_244

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0241.SVC_KEI_KAISEN_UCWK_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.KAISEN_UCWK_USE_STAYMD =
    (SELECT
         MAX(KK0241_STAYMD_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
    FROM
         KK_T_KAISEN_TG_SVKEI KK0241_STAYMD_MAX
    WHERE
         KK0241_STAYMD_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
         KK0241_STAYMD_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
         KK0241_STAYMD_MAX.MK_FLG = '0')
WHERE
    KK0081.SYSID = ?  AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM KK_T_SVC_KEI KK0081_GENE
      WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
            KK0081_GENE.RSV_APLY_YMD <= ? AND
            KK0081_GENE.RSV_APLY_CD = '2' AND
            KK0081_GENE.MK_FLG = '0') AND
EXISTS
(
       SELECT '1'  FROM KK_T_SVC_KEI KK0081_KCN
       WHERE 
            KK0081_KCN.SYSID = KK0081.SYSID AND
            KK0081_KCN.PRC_GRP_CD = '12' AND
            KK0081_KCN.SVC_CD = '03' AND
            KK0081_KCN.RSV_APLY_YMD <= ? AND
            KK0081_KCN.RSV_APLY_CD = '2' AND
            KK0081_KCN.MK_FLG = '0'
) 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_245)
#--KKPRC01601
#--異動情報の抽出１
#-----------------------------------------------------------

--KEY:KK_SELECT_245

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.MSKM_DTL_NO,
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.KAISEN_UCWK_USE_STAYMD = (SELECT
                                         MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD)
                                       FROM
                                         KK_T_KAISEN_TG_SVKEI KK0241_MAX
                                      WHERE
                                         KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
                                         KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
                                         KK0241_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
    KK0251.GENE_ADD_DTM = (SELECT
                               MAX(KK0251_MAX.GENE_ADD_DTM)
                             FROM
                               KK_T_SVKEI_KAISEN_UW KK0251_MAX
                            WHERE
                               KK0251_MAX.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                               KK0251_MAX.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.GENE_ADD_DTM = (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) AS GENE_MAX
                             FROM KK_T_SVC_KEI KK0081_GENE
                            WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                   KK0081_GENE.RSV_APLY_YMD <= ? AND
                                   KK0081_GENE.RSV_APLY_CD = '2' AND
                                   KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_246)
#--KKPRC01701
#--お客様情報変更情報の抽出（SYSID）
#-----------------------------------------------------------

--KEY:KK_SELECT_246

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_PRG KK1091
            ON KK0081.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
               KK1091.PRG_DTM > ? AND
               KK1091.PRG_DTM <= ? AND
               KK1091.MK_FLG = '0' AND
               EXISTS(SELECT 1
                        FROM KK_M_KCNRIDODIV_CHG KK1561
                        WHERE
                            KK1561.IDO_DIV = KK1091.IDO_DIV AND
                            KK1561.PRG_STAT = KK1091.PRG_STAT AND
                            KK1561.KCNRIDODIV = '06000' AND
                            ? BETWEEN KK1561.KCNRIDODIV_CHG_TSTAYMD AND
                            KK1561.KCNRIDODIV_CHG_TENDYMD AND
                            KK1561.MK_FLG = '0')
WHERE
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
    (SELECT 
        KK0081_GENE.SVC_KEI_NO, 
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM 
        KK_T_SVC_KEI KK0081_GENE
     WHERE 
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0'
     GROUP BY KK0081_GENE.SVC_KEI_NO)
ORDER BY KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_247)
#--KKPRC01701
#--お客様情報変更情報の抽出（回線別サービス契約）
#-----------------------------------------------------------

--KEY:KK_SELECT_247

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0241.SVC_KEI_KAISEN_UCWK_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.KAISEN_UCWK_USE_STAYMD =
    (SELECT
         MAX(KK0241_STAYMD_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
    FROM
         KK_T_KAISEN_TG_SVKEI KK0241_STAYMD_MAX
    WHERE
         KK0241_STAYMD_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
         KK0241_STAYMD_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
         KK0241_STAYMD_MAX.MK_FLG = '0')
WHERE
    KK0081.SYSID = ?  AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM KK_T_SVC_KEI KK0081_GENE
      WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
            KK0081_GENE.RSV_APLY_YMD <= ? AND
            KK0081_GENE.RSV_APLY_CD = '2' AND
            KK0081_GENE.MK_FLG = '0') AND
EXISTS
(
       SELECT '1'  FROM KK_T_SVC_KEI KK0081_KCN
       WHERE 
            KK0081_KCN.SYSID = KK0081.SYSID AND
            KK0081_KCN.SVC_CD = '03' AND
            KK0081_KCN.RSV_APLY_YMD <= ? AND
            KK0081_KCN.RSV_APLY_CD = '2' AND
            KK0081_KCN.MK_FLG = '0'
) 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_248)
#--KKPRC00912
#--光配線のサービス契約情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_248

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_TK_HOSHIKI_KEI KK0891
ON
    KK0891.TK_HOSHIKI_KEI_NO = KK0081.TK_HOSHIKI_KEI_NO
    AND KK0891.MK_FLG = '0'
INNER JOIN
    KK_T_KAISEN_USE_KEI KK0881
ON
    KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
    AND KK0881.MK_FLG = '0'
INNER JOIN
    KK_M_MANSION_COURSE KK0911
ON
    KK0911.MANSION_COURSE_CD = KK0881.MANSION_COURSE_CD
    AND KK0911.MANS_TUSHIN_EQUIP_CD = '03'
    AND KK0911.GENE_ADD_DTM = 
    (SELECT 
        MAX(KK0911_MAX.GENE_ADD_DTM) AS KK0241_MAX
    FROM
        KK_M_MANSION_COURSE KK0911_MAX
    WHERE
        KK0911_MAX.MANSION_COURSE_CD = KK0911.MANSION_COURSE_CD 
        AND KK0911_MAX.RSV_APLY_YMD <= ? 
        AND KK0911_MAX.MK_FLG = '0') 
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.PRC_GRP_CD ='04'
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT 
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_249)
#--KKPRC06401
#--分割・併合時のSYSID再取得
#-----------------------------------------------------------

--KEY:KK_SELECT_249

SELECT
  KK0081.SYSID,
  KK0081.GENE_ADD_DTM
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.IDO_DIV <> ?
  AND KK0081.GENE_ADD_DTM < ?
  AND KK0081.RSV_APLY_CD = '2'
  AND KK0081.MK_FLG = '0'
ORDER BY GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_250)
#--KKPRC02204
#--ネットのコース変更確定時のサービス契約情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_250

SELECT
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0251.SVC_KEI_KAISEN_UCWK_NO 
FROM 
KK_T_SVC_KEI KK0081
INNER JOIN 
        KK_T_KAISEN_TG_SVKEI KK0241 
ON 
        KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0241.KAISEN_UCWK_USE_STAYMD <= ? 
        AND KK0241.KAISEN_UCWK_USE_ENDYMD >= ? 
        AND KK0241.MK_FLG = '0' 
INNER JOIN 
        KK_T_SVKEI_KAISEN_UW KK0251 
ON 
        KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO 
        AND KK0251.GENE_ADD_DTM = 
        (SELECT 
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX 
        FROM 
            KK_T_SVKEI_KAISEN_UW KK0251_GENE 
        WHERE 
            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO 
            AND KK0251_GENE.MK_FLG = '0') 
WHERE 
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= TO_CHAR(TO_DATE(?) + 1, 'YYYYMMDD')
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_254)
#--KKPRC01601
#--住所変更確定情報抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_254

SELECT
    KK0861.KOSU,
    KK0881.CATID,
    KK0871.PID
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_TK_HOSHIKI_KEI KK0891
ON
    KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO AND
    KK0891.MK_FLG = '0'
INNER JOIN
    KK_T_KAISEN_USE_KEI KK0881
ON
    KK0891.KAISEN_USE_KEI_NO = KK0881.KAISEN_USE_KEI_NO AND
    KK0881.MK_FLG = '0'
INNER JOIN
    KK_T_OWNR_KEI KK0871
ON
    KK0881.OWNR_KEI_NO = KK0871.OWNR_KEI_NO AND
    KK0871.MK_FLG = '0'
INNER JOIN
    KK_T_MANSION_BUKKEN KK0861
ON
    KK0861.MANSION_BUKKEN_NO = KK0871.MANSION_BUKKEN_NO AND
    KK0861.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ? 
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                    FROM
                                                        KK_T_SVC_KEI KK0081_GENE
                                                    WHERE
                                                        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                                        KK0081_GENE.RSV_APLY_CD = '2' AND
                                                        KK0081_GENE.MK_FLG = '0'
                                                    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_259)
#--KKPRC06401
#--サービス契約番号、SYSIDでのカレント情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_259

SELECT
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.SYSID = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_264)
#--KKPRC00915
#--紹介者情報登録（被紹介者・申込時点）対象抽出（最も履歴の古いレコードを取得）
#-----------------------------------------------------------

--KEY:KK_SELECT_264

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.SVC_KEI_NO = ?
  AND KK0081.GENE_ADD_DTM =
      (SELECT 
          MIN(KK0081_GENE.GENE_ADD_DTM) AS KK0081_MIN
      FROM   
          KK_T_SVC_KEI KK0081_GENE
      WHERE
          KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.RSV_APLY_CD = '2'
          AND KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_265)
#--監視制御 サービス契約情報
#--サービス契約番号の有効な異動区分と提供方式契約番号を降順に取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_265

SELECT
    KK0081.IDO_DIV
   ,KK0081.TK_HOSHIKI_KEI_NO
FROM KK_T_SVC_KEI KK0081
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.RSV_APLY_CD = '2'
AND   KK0081.MK_FLG = '0'
ORDER BY KK0081.RSV_APLY_YMD DESC, KK0081.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_266)
#--通知書更新処理
#--整理番号に紐付くマンションのサービスが存在するか検索する（マンションプライベートは除く）
#-----------------------------------------------------------

--KEY:KK_SELECT_266

SELECT
    1
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SEIRI_NO = (
SELECT
    SEIRI_NO 
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
    SELECT MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
    FROM KK_T_SVC_KEI KK0081_G
    WHERE KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_G.RSV_APLY_YMD <= ?
    AND KK0081_G.RSV_APLY_CD = '2'
    AND KK0081_G.MK_FLG = '0'))
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM   KK_T_SVC_KEI KK0081_GENE
         WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND    KK0081_GENE.RSV_APLY_YMD <= ?
         AND    KK0081_GENE.RSV_APLY_CD = '2'
         AND    KK0081_GENE.MK_FLG = '0')
AND KK0081.PRC_GRP_CD = '04'
AND KK0081.SVC_KEI_STAT NOT IN ('010','910','920')
AND NOT EXISTS
        (SELECT 1
         FROM   KK_M_PCRS KK0791
         WHERE  KK0791.PCRS_CD = KK0081.PCRS_CD
         AND    KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM = 
                 (SELECT MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX
                  FROM   KK_M_PCRS KK0791_GENE
                  WHERE  KK0791_GENE.PCRS_CD = KK0791.PCRS_CD
                  AND    ? BETWEEN KK0791_GENE.PCRS_TSTAYMD AND KK0791_GENE.PCRS_TENDYMD
                  AND    KK0791_GENE.RSV_APLY_YMD <= ?
                  AND    KK0791_GENE.MK_FLG = '0')
         AND    KK0791.ID_TCHISHO_HAK_SKBT_CD = '4')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_269)
#--商品券発送指図ファイル作成
#--紹介コードに紐づくサービス契約情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_269

SELECT
    KK0021.MSKM_YMD
   ,KK0081.SVC_STA_YMD
FROM KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_SVC_KEI  KK0081_MIN ON KK0081.SVC_KEI_NO      = KK0081_MIN.SVC_KEI_NO
    INNER JOIN KK_T_MSKM_DTL KK0021     ON KK0081_MIN.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
WHERE KK0081.INTR_CD = ?
AND KK0081.SVC_KEI_STAT <> '920'
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 
AND KK0081_MIN.RSV_APLY_YMD || KK0081_MIN.GENE_ADD_DTM =
    (SELECT MIN(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MIN
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0')
AND KK0021.GENE_ADD_DTM = 
    (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS GENE_MAX
       FROM   KK_T_MSKM_DTL KK0021_GENE
       WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
       AND    KK0021_GENE.MK_FLG = '0')
ORDER BY KK0081.SVC_CD, KK0081.PRC_GRP_CD, DECODE(TRIM(SVC_STA_YMD), NULL, '00000000', SVC_STA_YMD) DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_271)
#--KKPRC35401にて使用
#--サービス契約から料金グループが"eo光TV"の予約とカレントレコードを全て取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_271

SELECT KK0081.SVC_KEI_NO,
        KK0081.SVC_KEI_STAT,
        KK0081.RSV_APLY_YMD,
        KK0081.SVC_PAUSE_YMD,
        KK0081.SVC_PAUSE_RLS_YMD,
        KK0081.SVC_DSL_YMD,
        KK0081.KAIHK_YMD,
        KK0081.SVC_DLRE_CD,
        KK0081.SVC_STP_YMD,
        KK0081.SVC_STP_RLS_YMD,
        KK0081.UPD_DTM
  FROM KK_T_SVC_KEI KK0081
 WHERE (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
            (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
               FROM KK_T_SVC_KEI KK0081_GENE
              WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND KK0081_GENE.RSV_APLY_YMD <= ?
                AND KK0081_GENE.RSV_APLY_CD = '2'
                AND KK0081_GENE.MK_FLG = '0'
             GROUP BY KK0081_GENE.SVC_KEI_NO)
   AND KK0081.SVC_CD='03'
   AND KK0081.PRC_GRP_CD IN ('11', '13')
   AND KK0081.SVC_STP_RLS_YMD = ?
 ORDER BY SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_272)
#--課金先情報付加
#--サービス契約番号にひもづく回線使用契約者タイプコードを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_272

SELECT KAISEN.KAISEN_USE_KEI_TYPE_CD
  FROM KK_T_SVC_KEI SVC
 INNER JOIN KK_T_TK_HOSHIKI_KEI TK
         ON TK.TK_HOSHIKI_KEI_NO = SVC.TK_HOSHIKI_KEI_NO
 INNER JOIN KK_T_KAISEN_USE_KEI KAISEN
         ON KAISEN.KAISEN_USE_KEI_NO = TK.KAISEN_USE_KEI_NO
 WHERE SVC.SVC_KEI_NO = ?
   AND SVC.PRC_GRP_CD = '99'
   AND SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM = (
       SELECT MAX(SVC_GENE.RSV_APLY_YMD || SVC_GENE.GENE_ADD_DTM)
         FROM KK_T_SVC_KEI SVC_GENE
        WHERE SVC_GENE.SVC_KEI_NO = SVC.SVC_KEI_NO
          AND SVC_GENE.RSV_APLY_CD = '2'
          AND SVC_GENE.RSV_APLY_YMD <= ?
          AND SVC_GENE.MK_FLG = '0'
   )
   AND TK.MK_FLG = '0'
   AND KAISEN.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_273)
#--該当のサービス契約番号の最新のステータスを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_273

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
    SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
    FROM   KK_T_SVC_KEI KK0081_GENE
    WHERE  KK0081_GENE.SVC_KEI_NO    = KK0081.SVC_KEI_NO
    AND    KK0081_GENE.RSV_APLY_CD   = '2'
    AND    KK0081_GENE.RSV_APLY_YMD <= ?
    AND    KK0081_GENE.MK_FLG        = '0'
)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_274)
#--KKPRC00921
#--カレントの世代登録年月日時分秒を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_274

SELECT
    KK0081.GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?  AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                    FROM
                                                        KK_T_SVC_KEI KK0081_GENE
                                                    WHERE
                                                        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO    AND
                                                        KK0081_GENE.RSV_APLY_YMD <= ?    AND
                                                        KK0081_GENE.RSV_APLY_CD = '2'    AND
                                                        KK0081_GENE.MK_FLG = '0'
                                                    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_INSERT_002)
#--サービス契約番号に紐づくカレントで有効なレコードを追加する。
#-----------------------------------------------------------

--KEY:KK_INSERT_002

INSERT INTO KK_T_SVC_KEI
    SELECT SVC_KEI_NO,
        TO_CHAR(SYSTIMESTAMP,'YYYYMMDDHH24MISSFF3'),
        SVC_KEI_STAT,
        SYSID,
        SVC_CD,
        MSKM_DTL_NO,
        SEIRI_NO,
        MENKAIHAT_ANKEN_NO,
        PRC_GRP_CD,
        PCRS_CD,
        PPLAN_CD,
        TK_HOSHIKI_KEI_NO,
        SVC_USE_STA_KIBO_YMD,
        RSV_TSTA_KIBO_YMD,
        ID_SOKHOSHO_OUTPUT_YH,
        SVC_KEI_KZKWRK_REQYMD,
        SHOSA_YMD,
        SHOSA_CL_YMD,
        SKEKKA_CD,
        SKEKKA_DTL_CD,
        SKEKKA_HOKI_CD,
        SKEKKA_SEND_CD,
        PAYWAY_KEIZOKU_FLG,
        FTRIAL_KANYU_YMD,
        FTRIAL_PRD_ENDYMD,
        HONKANYU_YMD,
        HONKANYU_IKO_KIGEN_YMD,
        KEI_CNC_YMD,
        PLAN_STAYMD,
        PLAN_ENDYMD,
        PLAN_CHRG_STAYMD,
        PLAN_CHRG_ENDYMD,
        PLAN_END_SBT_CD,
        RSV_APLY_YMD,
        RSV_CL_YMD,
        RSV_APLY_CD,
        SVC_CANCEL_YMD,
        SVC_CANCEL_RSN_CD,
        SVC_STA_YMD,
        SVC_CHRG_STAYMD,
        KEIZK_SVC_STAYMD,
        KEIZK_SVC_CHRG_STAYMD,
        LETTER_HASSO_SHIWAKE_DIV,
        THNX_LETTER_SHS_CD,
        WEB_OP_ADD_FAIL_FLG,
        SVC_STP_YMD,
        SVC_STP_RSN_CD,
        SVC_STP_RLS_YMD,
        SVC_STP_RLS_RSN_CD,
        PAUSE_STP_CD,
        SVC_PAUSE_YMD,
        SVC_PAUSE_RSN_CD,
        SVC_PAUSE_RSN_MEMO,
        SVC_PAUSE_RLS_YMD,
        SVC_PAUSE_RLS_RSN_CD,
        SVC_PAUSE_RLS_RSN_MEMO,
        SVC_ENDYMD,
        SVC_CHRG_ENDYMD,
        SVC_DSL_KISAN_YMD,
        SVC_DSL_YMD,
        SVC_DLRE_CD,
        SVC_DLRE_MEMO,
        SVC_DSL_TTDKI_FIN_FLG,
        KAIHK_YMD,
        SVC_CANCEL_CL_YMD,
        SVC_DSL_CL_YMD,
        CHGE_MT_HOJINSVKEI_UK_NO,
        CHGE_MT_HOJINSVKEI_UK_NOPT,
        CHGE_SK_HOJINSVKEI_UK_NO,
        CHGE_SK_HOJINSVKEI_UK_NOPT,
        CHMT_HJIN_EO_YKAE_SVKEI_NO,
        CHSK_HJIN_EO_YKAE_SVKEI_NO,
        HOJINSVKEI_HKTGI_SBT_CD,
        PNLTY_HASSEI_CD,
        PNLTY_CHGE_RSN_CD,
        IDO_DIV,
        SHK_DFLT_PWD,
        CUST_ID_PWD,
        MENKAIHAT_ANKEN_KR_ADD_FLG,
        INTR_CD,
        SHOSA_DSL_FIN_CD,
        IDO_NG_STAT_CD,
        CHRG_STA_YMD_HOSEI_UM,
        SVC_PAUSE_CHRG_STA_YMD,
        WORK_RRK_BIKO,
        AUTO_SHOSA_TRAN_STAT_CD,
        KIKI_MIADD_LIST_OPUTZM_FLG,
        KAIHK_FAIL_KEI_CST_ZM_FLG,
        SVCTK_BUT_DEL_TRN_JSSI_DTM,
        JURYO_CHOK_TCHI_YH,
        ADD_DTM,
        ADD_OPEACNT,
        'UPD_DTM',
        'UPD_OPE',
        DEL_DTM,
        DEL_OPEACNT,
        '0',
        ADD_UNYO_YMD,
        ADD_TRN_ID,
        'UPD_UNYO',
        'UPD_TRN',
        DEL_UNYO_YMD,
        DEL_TRN_ID
    FROM KK_T_SVC_KEI KTSK
    WHERE SVC_KEI_NO = ?
    AND (KTSK.SVC_KEI_NO, KTSK.RSV_APLY_YMD || KTSK.GENE_ADD_DTM) =
        (SELECT KTSK_GENE.SVC_KEI_NO, MAX(KTSK_GENE.RSV_APLY_YMD || KTSK_GENE.GENE_ADD_DTM) AS KTSK_MAX
         FROM  KK_T_SVC_KEI KTSK_GENE
         WHERE KTSK_GENE.SVC_KEI_NO = KTSK.SVC_KEI_NO
         AND KTSK_GENE.RSV_APLY_YMD <= ?
         AND KTSK_GENE.RSV_APLY_CD = '2'
         AND KTSK_GENE.MK_FLG = '0'
         GROUP BY KTSK_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_INSERT_003)
#--カレントレコード世代追加（排他制御用）
#-----------------------------------------------------------

--KEY:KK_INSERT_003

INSERT INTO KK_T_SVC_KEI(
    SVC_KEI_NO,
    GENE_ADD_DTM,
    SVC_KEI_STAT,
    SYSID,
    SVC_CD,
    MSKM_DTL_NO,
    SEIRI_NO,
    MENKAIHAT_ANKEN_NO,
    PRC_GRP_CD,
    PCRS_CD,
    PPLAN_CD,
    TK_HOSHIKI_KEI_NO,
    SVC_USE_STA_KIBO_YMD,
    RSV_TSTA_KIBO_YMD,
    ID_SOKHOSHO_OUTPUT_YH,
    SVC_KEI_KZKWRK_REQYMD,
    SHOSA_YMD,
    SHOSA_CL_YMD,
    SKEKKA_CD,
    SKEKKA_DTL_CD,
    SKEKKA_HOKI_CD,
    SKEKKA_SEND_CD,
    PAYWAY_KEIZOKU_FLG,
    FTRIAL_KANYU_YMD,
    FTRIAL_PRD_ENDYMD,
    HONKANYU_YMD,
    HONKANYU_IKO_KIGEN_YMD,
    KEI_CNC_YMD,
    PLAN_STAYMD,
    PLAN_ENDYMD,
    PLAN_CHRG_STAYMD,
    PLAN_CHRG_ENDYMD,
    PLAN_END_SBT_CD,
    RSV_APLY_YMD,
    RSV_CL_YMD,
    RSV_APLY_CD,
    SVC_CANCEL_YMD,
    SVC_CANCEL_RSN_CD,
    SVC_STA_YMD,
    SVC_CHRG_STAYMD,
    LETTER_HASSO_SHIWAKE_DIV,
    THNX_LETTER_SHS_CD,
    WEB_OP_ADD_FAIL_FLG,
    SVC_STP_YMD,
    SVC_STP_RSN_CD,
    SVC_STP_RLS_YMD,
    SVC_STP_RLS_RSN_CD,
    PAUSE_STP_CD,
    SVC_PAUSE_YMD,
    SVC_PAUSE_RSN_CD,
    SVC_PAUSE_RSN_MEMO,
    SVC_PAUSE_RLS_YMD,
    SVC_PAUSE_RLS_RSN_CD,
    SVC_PAUSE_RLS_RSN_MEMO,
    SVC_ENDYMD,
    SVC_CHRG_ENDYMD,
    SVC_DSL_KISAN_YMD,
    SVC_DSL_YMD,
    SVC_DLRE_CD,
    SVC_DLRE_MEMO,
    SVC_DSL_TTDKI_FIN_FLG,
    KAIHK_YMD,
    SVC_CANCEL_CL_YMD,
    SVC_DSL_CL_YMD,
    CHGE_MT_HOJINSVKEI_UK_NO,
    CHGE_MT_HOJINSVKEI_UK_NOPT,
    CHGE_SK_HOJINSVKEI_UK_NO,
    CHGE_SK_HOJINSVKEI_UK_NOPT,
    CHMT_HJIN_EO_YKAE_SVKEI_NO,
    CHSK_HJIN_EO_YKAE_SVKEI_NO,
    HOJINSVKEI_HKTGI_SBT_CD,
    PNLTY_HASSEI_CD,
    PNLTY_CHGE_RSN_CD,
    IDO_DIV,
    SHK_DFLT_PWD,
    CUST_ID_PWD,
    MENKAIHAT_ANKEN_KR_ADD_FLG,
    INTR_CD,
    SHOSA_DSL_FIN_CD,
    IDO_NG_STAT_CD,
    CHRG_STA_YMD_HOSEI_UM,
    SVC_PAUSE_CHRG_STA_YMD,
    WORK_RRK_BIKO,
    AUTO_SHOSA_TRAN_STAT_CD,
    KIKI_MIADD_LIST_OPUTZM_FLG,
    KAIHK_FAIL_KEI_CST_ZM_FLG,
    SVCTK_BUT_DEL_TRN_JSSI_DTM,
    ADD_DTM,
    ADD_OPEACNT,
    UPD_DTM,
    UPD_OPEACNT,
    DEL_DTM,
    DEL_OPEACNT,
    MK_FLG,
    ADD_UNYO_YMD,
    ADD_TRN_ID,
    UPD_UNYO_YMD,
    UPD_TRN_ID,
    DEL_UNYO_YMD,
    DEL_TRN_ID)
SELECT 
    SVC_KEI_NO,
    ?,
    SVC_KEI_STAT,
    SYSID,
    SVC_CD,
    MSKM_DTL_NO,
    SEIRI_NO,
    MENKAIHAT_ANKEN_NO,
    PRC_GRP_CD,
    PCRS_CD,
    PPLAN_CD,
    TK_HOSHIKI_KEI_NO,
    SVC_USE_STA_KIBO_YMD,
    RSV_TSTA_KIBO_YMD,
    ID_SOKHOSHO_OUTPUT_YH,
    SVC_KEI_KZKWRK_REQYMD,
    SHOSA_YMD,
    SHOSA_CL_YMD,
    SKEKKA_CD,
    SKEKKA_DTL_CD,
    SKEKKA_HOKI_CD,
    SKEKKA_SEND_CD,
    PAYWAY_KEIZOKU_FLG,
    FTRIAL_KANYU_YMD,
    FTRIAL_PRD_ENDYMD,
    HONKANYU_YMD,
    HONKANYU_IKO_KIGEN_YMD,
    KEI_CNC_YMD,
    PLAN_STAYMD,
    PLAN_ENDYMD,
    PLAN_CHRG_STAYMD,
    PLAN_CHRG_ENDYMD,
    PLAN_END_SBT_CD,
    RSV_APLY_YMD,
    RSV_CL_YMD,
    RSV_APLY_CD,
    SVC_CANCEL_YMD,
    SVC_CANCEL_RSN_CD,
    SVC_STA_YMD,
    SVC_CHRG_STAYMD,
    LETTER_HASSO_SHIWAKE_DIV,
    THNX_LETTER_SHS_CD,
    WEB_OP_ADD_FAIL_FLG,
    SVC_STP_YMD,
    SVC_STP_RSN_CD,
    SVC_STP_RLS_YMD,
    SVC_STP_RLS_RSN_CD,
    PAUSE_STP_CD,
    SVC_PAUSE_YMD,
    SVC_PAUSE_RSN_CD,
    SVC_PAUSE_RSN_MEMO,
    SVC_PAUSE_RLS_YMD,
    SVC_PAUSE_RLS_RSN_CD,
    SVC_PAUSE_RLS_RSN_MEMO,
    SVC_ENDYMD,
    SVC_CHRG_ENDYMD,
    SVC_DSL_KISAN_YMD,
    SVC_DSL_YMD,
    SVC_DLRE_CD,
    SVC_DLRE_MEMO,
    SVC_DSL_TTDKI_FIN_FLG,
    KAIHK_YMD,
    SVC_CANCEL_CL_YMD,
    SVC_DSL_CL_YMD,
    CHGE_MT_HOJINSVKEI_UK_NO,
    CHGE_MT_HOJINSVKEI_UK_NOPT,
    CHGE_SK_HOJINSVKEI_UK_NO,
    CHGE_SK_HOJINSVKEI_UK_NOPT,
    CHMT_HJIN_EO_YKAE_SVKEI_NO,
    CHSK_HJIN_EO_YKAE_SVKEI_NO,
    HOJINSVKEI_HKTGI_SBT_CD,
    PNLTY_HASSEI_CD,
    PNLTY_CHGE_RSN_CD,
    IDO_DIV,
    SHK_DFLT_PWD,
    CUST_ID_PWD,
    MENKAIHAT_ANKEN_KR_ADD_FLG,
    INTR_CD,
    SHOSA_DSL_FIN_CD,
    IDO_NG_STAT_CD,
    CHRG_STA_YMD_HOSEI_UM,
    SVC_PAUSE_CHRG_STA_YMD,
    WORK_RRK_BIKO,
    AUTO_SHOSA_TRAN_STAT_CD,
    KIKI_MIADD_LIST_OPUTZM_FLG,
    KAIHK_FAIL_KEI_CST_ZM_FLG,
    SVCTK_BUT_DEL_TRN_JSSI_DTM,
    ADD_DTM,
    ADD_OPEACNT,
    'UPD_DTM',
    'UPD_OPE',
    DEL_DTM,
    DEL_OPEACNT,
    MK_FLG,
    ADD_UNYO_YMD,
    ADD_TRN_ID,
    'UPD_UNYO',
    'UPD_TRN',
    DEL_UNYO_YMD,
    DEL_TRN_ID
FROM   KK_T_SVC_KEI KK0081
WHERE  KK0081.SVC_KEI_NO   = ?
AND    KK0081.GENE_ADD_DTM = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_INSERT_004)
#--消去実行
#-----------------------------------------------------------

--KEY:KK_INSERT_004

INSERT INTO KK_T_SVC_KEI(
    SVC_KEI_NO,
    GENE_ADD_DTM,
    SVC_KEI_STAT,
    SYSID,
    SVC_CD,
    MSKM_DTL_NO,
    SEIRI_NO,
    MENKAIHAT_ANKEN_NO,
    PRC_GRP_CD,
    PCRS_CD,
    PPLAN_CD,
    TK_HOSHIKI_KEI_NO,
    SVC_USE_STA_KIBO_YMD,
    RSV_TSTA_KIBO_YMD,
    ID_SOKHOSHO_OUTPUT_YH,
    SVC_KEI_KZKWRK_REQYMD,
    SHOSA_YMD,
    SHOSA_CL_YMD,
    SKEKKA_CD,
    SKEKKA_DTL_CD,
    SKEKKA_HOKI_CD,
    SKEKKA_SEND_CD,
    PAYWAY_KEIZOKU_FLG,
    FTRIAL_KANYU_YMD,
    FTRIAL_PRD_ENDYMD,
    HONKANYU_YMD,
    HONKANYU_IKO_KIGEN_YMD,
    KEI_CNC_YMD,
    PLAN_STAYMD,
    PLAN_ENDYMD,
    PLAN_CHRG_STAYMD,
    PLAN_CHRG_ENDYMD,
    PLAN_END_SBT_CD,
    RSV_APLY_YMD,
    RSV_CL_YMD,
    RSV_APLY_CD,
    SVC_CANCEL_YMD,
    SVC_CANCEL_RSN_CD,
    SVC_STA_YMD,
    SVC_CHRG_STAYMD,
    KEIZK_SVC_STAYMD,
    KEIZK_SVC_CHRG_STAYMD,
    LETTER_HASSO_SHIWAKE_DIV,
    THNX_LETTER_SHS_CD,
    WEB_OP_ADD_FAIL_FLG,
    SVC_STP_YMD,
    SVC_STP_RSN_CD,
    SVC_STP_RLS_YMD,
    SVC_STP_RLS_RSN_CD,
    PAUSE_STP_CD,
    SVC_PAUSE_YMD,
    SVC_PAUSE_RSN_CD,
    SVC_PAUSE_RSN_MEMO,
    SVC_PAUSE_RLS_YMD,
    SVC_PAUSE_RLS_RSN_CD,
    SVC_PAUSE_RLS_RSN_MEMO,
    SVC_ENDYMD,
    SVC_CHRG_ENDYMD,
    SVC_DSL_KISAN_YMD,
    SVC_DSL_YMD,
    SVC_DLRE_CD,
    SVC_DLRE_MEMO,
    SVC_DSL_TTDKI_FIN_FLG,
    KAIHK_YMD,
    SVC_CANCEL_CL_YMD,
    SVC_DSL_CL_YMD,
    CHGE_MT_HOJINSVKEI_UK_NO,
    CHGE_MT_HOJINSVKEI_UK_NOPT,
    CHGE_SK_HOJINSVKEI_UK_NO,
    CHGE_SK_HOJINSVKEI_UK_NOPT,
    CHMT_HJIN_EO_YKAE_SVKEI_NO,
    CHSK_HJIN_EO_YKAE_SVKEI_NO,
    HOJINSVKEI_HKTGI_SBT_CD,
    PNLTY_HASSEI_CD,
    PNLTY_CHGE_RSN_CD,
    IDO_DIV,
    SHK_DFLT_PWD,
    CUST_ID_PWD,
    MENKAIHAT_ANKEN_KR_ADD_FLG,
    INTR_CD,
    SHOSA_DSL_FIN_CD,
    IDO_NG_STAT_CD,
    CHRG_STA_YMD_HOSEI_UM,
    SVC_PAUSE_CHRG_STA_YMD,
    WORK_RRK_BIKO,
    AUTO_SHOSA_TRAN_STAT_CD,
    KIKI_MIADD_LIST_OPUTZM_FLG,
    KAIHK_FAIL_KEI_CST_ZM_FLG,
    SVCTK_BUT_DEL_TRN_JSSI_DTM,
    ADD_DTM,
    ADD_OPEACNT,
    UPD_DTM,
    UPD_OPEACNT,
    DEL_DTM,
    DEL_OPEACNT,
    MK_FLG,
    ADD_UNYO_YMD,
    ADD_TRN_ID,
    UPD_UNYO_YMD,
    UPD_TRN_ID,
    DEL_UNYO_YMD,
    DEL_TRN_ID
)
SELECT 
    SVC_KEI_NO,
    ?,
    SVC_KEI_STAT,
    SYSID,
    SVC_CD,
    MSKM_DTL_NO,
    SEIRI_NO,
    MENKAIHAT_ANKEN_NO,
    PRC_GRP_CD,
    PCRS_CD,
    PPLAN_CD,
    TK_HOSHIKI_KEI_NO,
    SVC_USE_STA_KIBO_YMD,
    RSV_TSTA_KIBO_YMD,
    ID_SOKHOSHO_OUTPUT_YH,
    SVC_KEI_KZKWRK_REQYMD,
    SHOSA_YMD,
    SHOSA_CL_YMD,
    SKEKKA_CD,
    SKEKKA_DTL_CD,
    SKEKKA_HOKI_CD,
    SKEKKA_SEND_CD,
    PAYWAY_KEIZOKU_FLG,
    FTRIAL_KANYU_YMD,
    FTRIAL_PRD_ENDYMD,
    HONKANYU_YMD,
    HONKANYU_IKO_KIGEN_YMD,
    KEI_CNC_YMD,
    PLAN_STAYMD,
    PLAN_ENDYMD,
    PLAN_CHRG_STAYMD,
    PLAN_CHRG_ENDYMD,
    PLAN_END_SBT_CD,
    RSV_APLY_YMD,
    RSV_CL_YMD,
    RSV_APLY_CD,
    SVC_CANCEL_YMD,
    SVC_CANCEL_RSN_CD,
    SVC_STA_YMD,
    SVC_CHRG_STAYMD,
    KEIZK_SVC_STAYMD,
    KEIZK_SVC_CHRG_STAYMD,
    LETTER_HASSO_SHIWAKE_DIV,
    THNX_LETTER_SHS_CD,
    WEB_OP_ADD_FAIL_FLG,
    SVC_STP_YMD,
    SVC_STP_RSN_CD,
    SVC_STP_RLS_YMD,
    SVC_STP_RLS_RSN_CD,
    PAUSE_STP_CD,
    SVC_PAUSE_YMD,
    SVC_PAUSE_RSN_CD,
    SVC_PAUSE_RSN_MEMO,
    SVC_PAUSE_RLS_YMD,
    SVC_PAUSE_RLS_RSN_CD,
    SVC_PAUSE_RLS_RSN_MEMO,
    SVC_ENDYMD,
    SVC_CHRG_ENDYMD,
    SVC_DSL_KISAN_YMD,
    SVC_DSL_YMD,
    SVC_DLRE_CD,
    SVC_DLRE_MEMO,
    SVC_DSL_TTDKI_FIN_FLG,
    KAIHK_YMD,
    SVC_CANCEL_CL_YMD,
    SVC_DSL_CL_YMD,
    CHGE_MT_HOJINSVKEI_UK_NO,
    CHGE_MT_HOJINSVKEI_UK_NOPT,
    CHGE_SK_HOJINSVKEI_UK_NO,
    CHGE_SK_HOJINSVKEI_UK_NOPT,
    CHMT_HJIN_EO_YKAE_SVKEI_NO,
    CHSK_HJIN_EO_YKAE_SVKEI_NO,
    HOJINSVKEI_HKTGI_SBT_CD,
    PNLTY_HASSEI_CD,
    PNLTY_CHGE_RSN_CD,
    IDO_DIV,
    SHK_DFLT_PWD,
    CUST_ID_PWD,
    MENKAIHAT_ANKEN_KR_ADD_FLG,
    INTR_CD,
    SHOSA_DSL_FIN_CD,
    IDO_NG_STAT_CD,
    CHRG_STA_YMD_HOSEI_UM,
    SVC_PAUSE_CHRG_STA_YMD,
    WORK_RRK_BIKO,
    AUTO_SHOSA_TRAN_STAT_CD,
    KIKI_MIADD_LIST_OPUTZM_FLG,
    KAIHK_FAIL_KEI_CST_ZM_FLG,
    ?,
    ADD_DTM,
    ADD_OPEACNT,
    'UPD_DTM',
    'UPD_OPE',
    NULL,
    NULL,
    '0',
    ADD_UNYO_YMD,
    ADD_TRN_ID,
    'UPD_UNYO',
    'UPD_TRN',
    NULL,
    NULL
FROM KK_T_SVC_KEI
WHERE SVC_KEI_NO = ?
AND GENE_ADD_DTM = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_INSERT_005)
#--マンション提供方式情報作成ファイルを元に登録を行う(処理区分：１)
#-----------------------------------------------------------

--KEY:KK_INSERT_005

INSERT INTO  KK_T_SVC_KEI(
SVC_KEI_NO,
GENE_ADD_DTM,
SVC_KEI_STAT,
SYSID,
SVC_CD,
PRC_GRP_CD,
PCRS_CD,
PPLAN_CD,
TK_HOSHIKI_KEI_NO,
PLAN_STAYMD,
PLAN_ENDYMD,
PLAN_CHRG_STAYMD,
PLAN_CHRG_ENDYMD,
RSV_APLY_YMD,
RSV_APLY_CD,
SVC_STA_YMD,
SVC_CHRG_STAYMD,
SVC_ENDYMD,
SVC_CHRG_ENDYMD,
SVC_DSL_KISAN_YMD,
SVC_DSL_YMD,
SVC_DLRE_CD,
AUTO_SHOSA_TRAN_STAT_CD,
KAIHK_FAIL_KEI_CST_ZM_FLG,
ADD_DTM,
ADD_OPEACNT,
UPD_DTM,
UPD_OPEACNT,
DEL_DTM,
DEL_OPEACNT,
MK_FLG,
ADD_UNYO_YMD,
ADD_TRN_ID,
UPD_UNYO_YMD,
UPD_TRN_ID,
DEL_UNYO_YMD,
DEL_TRN_ID
)
VALUES
(
?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
?, ?, ?, ?, ?, ?, ?, ?, ?, ?, 
?, ?, ?, ?, ?, ?, ?
)

#-


#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_INSERT_007)
#--サービス契約番号に紐づくカレントレコードを元に、世代更新。
#-----------------------------------------------------------

--KEY:KK_INSERT_007

INSERT INTO
 KK_T_SVC_KEI KK0081
(
 KK0081.SVC_KEI_NO,
 KK0081.GENE_ADD_DTM,
 KK0081.SVC_KEI_STAT,
 KK0081.SYSID,
 KK0081.SVC_CD,
 KK0081.MSKM_DTL_NO,
 KK0081.SEIRI_NO,
 KK0081.MENKAIHAT_ANKEN_NO,
 KK0081.PRC_GRP_CD,
 KK0081.PCRS_CD,
 KK0081.PPLAN_CD,
 KK0081.TK_HOSHIKI_KEI_NO,
 KK0081.SVC_USE_STA_KIBO_YMD,
 KK0081.RSV_TSTA_KIBO_YMD,
 KK0081.ID_SOKHOSHO_OUTPUT_YH,
 KK0081.SVC_KEI_KZKWRK_REQYMD,
 KK0081.SHOSA_YMD,
 KK0081.SHOSA_CL_YMD,
 KK0081.SKEKKA_CD,
 KK0081.SKEKKA_DTL_CD,
 KK0081.SKEKKA_HOKI_CD,
 KK0081.SKEKKA_SEND_CD,
 KK0081.PAYWAY_KEIZOKU_FLG,
 KK0081.FTRIAL_KANYU_YMD,
 KK0081.FTRIAL_PRD_ENDYMD,
 KK0081.HONKANYU_YMD,
 KK0081.HONKANYU_IKO_KIGEN_YMD,
 KK0081.KEI_CNC_YMD,
 KK0081.PLAN_STAYMD,
 KK0081.PLAN_ENDYMD,
 KK0081.PLAN_CHRG_STAYMD,
 KK0081.PLAN_CHRG_ENDYMD,
 KK0081.PLAN_END_SBT_CD,
 KK0081.RSV_APLY_YMD,
 KK0081.RSV_CL_YMD,
 KK0081.RSV_APLY_CD,
 KK0081.SVC_CANCEL_YMD,
 KK0081.SVC_CANCEL_RSN_CD,
 KK0081.SVC_STA_YMD,
 KK0081.SVC_CHRG_STAYMD,
 KK0081.KEIZK_SVC_STAYMD,
 KK0081.KEIZK_SVC_CHRG_STAYMD,
 KK0081.LETTER_HASSO_SHIWAKE_DIV,
 KK0081.THNX_LETTER_SHS_CD,
 KK0081.WEB_OP_ADD_FAIL_FLG,
 KK0081.SVC_STP_YMD,
 KK0081.SVC_STP_RSN_CD,
 KK0081.SVC_STP_RLS_YMD,
 KK0081.SVC_STP_RLS_RSN_CD,
 KK0081.PAUSE_STP_CD,
 KK0081.SVC_PAUSE_YMD,
 KK0081.SVC_PAUSE_RSN_CD,
 KK0081.SVC_PAUSE_RSN_MEMO,
 KK0081.SVC_PAUSE_RLS_YMD,
 KK0081.SVC_PAUSE_RLS_RSN_CD,
 KK0081.SVC_PAUSE_RLS_RSN_MEMO,
 KK0081.SVC_ENDYMD,
 KK0081.SVC_CHRG_ENDYMD,
 KK0081.SVC_DSL_KISAN_YMD,
 KK0081.SVC_DSL_YMD,
 KK0081.SVC_DLRE_CD,
 KK0081.SVC_DLRE_MEMO,
 KK0081.SVC_DSL_TTDKI_FIN_FLG,
 KK0081.KAIHK_YMD,
 KK0081.SVC_CANCEL_CL_YMD,
 KK0081.SVC_DSL_CL_YMD,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NO,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NO,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT,
 KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.HOJINSVKEI_HKTGI_SBT_CD,
 KK0081.PNLTY_HASSEI_CD,
 KK0081.PNLTY_CHGE_RSN_CD,
 KK0081.IDO_DIV,
 KK0081.SHK_DFLT_PWD,
 KK0081.CUST_ID_PWD,
 KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG,
 KK0081.INTR_CD,
 KK0081.SHOSA_DSL_FIN_CD,
 KK0081.IDO_NG_STAT_CD,
 KK0081.CHRG_STA_YMD_HOSEI_UM,
 KK0081.SVC_PAUSE_CHRG_STA_YMD,
 KK0081.WORK_RRK_BIKO,
 KK0081.AUTO_SHOSA_TRAN_STAT_CD,
 KK0081.KIKI_MIADD_LIST_OPUTZM_FLG,
 KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG,
 KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM,
 KK0081.JURYO_CHOK_TCHI_YH,
 KK0081.ADD_DTM,
 KK0081.ADD_OPEACNT,
 KK0081.UPD_DTM,
 KK0081.UPD_OPEACNT,
 KK0081.DEL_DTM,
 KK0081.DEL_OPEACNT,
 KK0081.MK_FLG,
 KK0081.ADD_UNYO_YMD,
 KK0081.ADD_TRN_ID,
 KK0081.UPD_UNYO_YMD,
 KK0081.UPD_TRN_ID,
 KK0081.DEL_UNYO_YMD,
 KK0081.DEL_TRN_ID
)
SELECT 
 KK0081.SVC_KEI_NO,
 ?,
 KK0081.SVC_KEI_STAT,
 KK0081.SYSID,
 KK0081.SVC_CD,
 KK0081.MSKM_DTL_NO,
 KK0081.SEIRI_NO,
 KK0081.MENKAIHAT_ANKEN_NO,
 KK0081.PRC_GRP_CD,
 KK0081.PCRS_CD,
 KK0081.PPLAN_CD,
 KK0081.TK_HOSHIKI_KEI_NO,
 KK0081.SVC_USE_STA_KIBO_YMD,
 KK0081.RSV_TSTA_KIBO_YMD,
 KK0081.ID_SOKHOSHO_OUTPUT_YH,
 KK0081.SVC_KEI_KZKWRK_REQYMD,
 KK0081.SHOSA_YMD,
 KK0081.SHOSA_CL_YMD,
 KK0081.SKEKKA_CD,
 KK0081.SKEKKA_DTL_CD,
 KK0081.SKEKKA_HOKI_CD,
 KK0081.SKEKKA_SEND_CD,
 KK0081.PAYWAY_KEIZOKU_FLG,
 KK0081.FTRIAL_KANYU_YMD,
 KK0081.FTRIAL_PRD_ENDYMD,
 KK0081.HONKANYU_YMD,
 KK0081.HONKANYU_IKO_KIGEN_YMD,
 KK0081.KEI_CNC_YMD,
 KK0081.PLAN_STAYMD,
 KK0081.PLAN_ENDYMD,
 KK0081.PLAN_CHRG_STAYMD,
 KK0081.PLAN_CHRG_ENDYMD,
 KK0081.PLAN_END_SBT_CD,
 KK0081.RSV_APLY_YMD,
 KK0081.RSV_CL_YMD,
 KK0081.RSV_APLY_CD,
 KK0081.SVC_CANCEL_YMD,
 KK0081.SVC_CANCEL_RSN_CD,
 KK0081.SVC_STA_YMD,
 KK0081.SVC_CHRG_STAYMD,
 KK0081.KEIZK_SVC_STAYMD,
 KK0081.KEIZK_SVC_CHRG_STAYMD,
 KK0081.LETTER_HASSO_SHIWAKE_DIV,
 KK0081.THNX_LETTER_SHS_CD,
 KK0081.WEB_OP_ADD_FAIL_FLG,
 KK0081.SVC_STP_YMD,
 KK0081.SVC_STP_RSN_CD,
 KK0081.SVC_STP_RLS_YMD,
 KK0081.SVC_STP_RLS_RSN_CD,
 KK0081.PAUSE_STP_CD,
 KK0081.SVC_PAUSE_YMD,
 KK0081.SVC_PAUSE_RSN_CD,
 KK0081.SVC_PAUSE_RSN_MEMO,
 KK0081.SVC_PAUSE_RLS_YMD,
 KK0081.SVC_PAUSE_RLS_RSN_CD,
 KK0081.SVC_PAUSE_RLS_RSN_MEMO,
 KK0081.SVC_ENDYMD,
 KK0081.SVC_CHRG_ENDYMD,
 KK0081.SVC_DSL_KISAN_YMD,
 KK0081.SVC_DSL_YMD,
 KK0081.SVC_DLRE_CD,
 KK0081.SVC_DLRE_MEMO,
 KK0081.SVC_DSL_TTDKI_FIN_FLG,
 KK0081.KAIHK_YMD,
 KK0081.SVC_CANCEL_CL_YMD,
 KK0081.SVC_DSL_CL_YMD,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NO,
 KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NO,
 KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT,
 KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO,
 KK0081.HOJINSVKEI_HKTGI_SBT_CD,
 KK0081.PNLTY_HASSEI_CD,
 KK0081.PNLTY_CHGE_RSN_CD,
 KK0081.IDO_DIV,
 KK0081.SHK_DFLT_PWD,
 KK0081.CUST_ID_PWD,
 KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG,
 KK0081.INTR_CD,
 KK0081.SHOSA_DSL_FIN_CD,
 KK0081.IDO_NG_STAT_CD,
 KK0081.CHRG_STA_YMD_HOSEI_UM,
 KK0081.SVC_PAUSE_CHRG_STA_YMD,
 KK0081.WORK_RRK_BIKO,
 KK0081.AUTO_SHOSA_TRAN_STAT_CD,
 KK0081.KIKI_MIADD_LIST_OPUTZM_FLG,
 KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG,
 KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM,
 KK0081.JURYO_CHOK_TCHI_YH,
 'ADD_DTM',
 'ADD_OPE',
 'UPD_DTM',
 'UPD_OPE',
 KK0081.DEL_DTM,
 KK0081.DEL_OPEACNT,
 '0',
 'ADD_UNYO',
 'ADD_TRN',
 'UPD_UNYO',
 'UPD_TRN',
 KK0081.DEL_UNYO_YMD,
 KK0081.DEL_TRN_ID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ?
 AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT MAX(KK_T_SVC_KEI_RCNT.RSV_APLY_YMD || KK_T_SVC_KEI_RCNT.GENE_ADD_DTM) AS KK_T_SVC_KEI_MAX
        FROM    KK_T_SVC_KEI KK_T_SVC_KEI_RCNT
        WHERE  KK_T_SVC_KEI_RCNT.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND     KK_T_SVC_KEI_RCNT.RSV_APLY_YMD <= ?
        AND     KK_T_SVC_KEI_RCNT.RSV_APLY_CD = '2'
        AND     KK_T_SVC_KEI_RCNT.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_009)
#--マンション提供方式情報作成ファイルを元に更新を行う(処理区分：２)
#-----------------------------------------------------------

--KEY:KK_UPDATE_009

UPDATE
    KK_T_SVC_KEI
SET
    SVC_KEI_STAT = ?,
    GENE_ADD_DTM = ?,
    PCRS_CD = ?,
    PPLAN_CD = ?,
    PLAN_STAYMD = ?,
    PLAN_ENDYMD = ?,
    PLAN_CHRG_STAYMD = ?,
    PLAN_CHRG_ENDYMD = ?,
    RSV_APLY_YMD = ?,
    RSV_APLY_CD = ?,
    SVC_STA_YMD = ?,
    SVC_CHRG_STAYMD = ?,
    SVC_ENDYMD = ?,
    SVC_CHRG_ENDYMD = ?,
    SVC_DSL_KISAN_YMD = ?,
    SVC_DSL_YMD = ?,
    SVC_DLRE_CD = ?,
    UPD_DTM = ?,
    UPD_OPEACNT = ?,
    UPD_UNYO_YMD = ?,
    UPD_TRN_ID = ?
WHERE
    SVC_KEI_NO = (SELECT
                        KK2281.SVC_KEI_NO
                    FROM
                        KK_T_SVC_KEI_DUMMY KK2281
                    WHERE
                        KK2281.SVC_KEI_NO = ? AND
                        KK2281.GENE_ADD_DTM = ? AND
                        KK2281.MK_FLG = '0'
                    ) AND
    MK_FLG = '0'

#-

#----------------------SC START---------------
#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-SC_INSERT_001)
#--一世代前のレコードをコピーし新しい世代登録年月日時分秒でレコードを
#--登録する。
#-----------------------------------------------------------

--KEY:SC_INSERT_001

 INSERT INTO KK_T_SVC_KEI 
 SELECT
     SVC_KEI_NO
 ,   ?
 ,   SVC_KEI_STAT
 ,   SYSID
 ,   SVC_CD
 ,   MSKM_DTL_NO
 ,   MENKAIHAT_ANKEN_NO
 ,   PRC_GRP_CD
 ,   PCRS_CD
 ,   PPLAN_CD
 ,   TK_HOSHIKI_KEI_NO
 ,   SVC_USE_STA_KIBO_YMD
 ,   RSV_TSTA_KIBO_YMD
 ,   ID_SOKHOSHO_OUTPUT_YH
 ,   SVC_KEI_KZKWRK_REQYMD
 ,   SHOSA_YMD
 ,   SHOSA_CL_YMD
 ,   SKEKKA_CD
 ,   SKEKKA_DTL_CD
 ,   SKEKKA_HOKI_CD
 ,   SKEKKA_SEND_CD
 ,   PAYWAY_KEIZOKU_FLG
 ,   FTRIAL_KANYU_YMD
 ,   FTRIAL_PRD_ENDYMD
 ,   HONKANYU_YMD
 ,   HONKANYU_IKO_KIGEN_YMD
 ,   KEI_CNC_YMD
 ,   PLAN_STAYMD
 ,   PLAN_ENDYMD
 ,   PLAN_CHRG_STAYMD
 ,   PLAN_CHRG_ENDYMD
 ,   PLAN_END_SBT_CD
 ,   RSV_APLY_YMD
 ,   RSV_CL_YMD
 ,   RSV_APLY_CD
 ,   SVC_CANCEL_YMD
 ,   SVC_CANCEL_RSN_CD
 ,   SVC_STA_YMD
 ,   SVC_CHRG_STAYMD
 ,   LETTER_HASSO_SHIWAKE_DIV
 ,   THNX_LETTER_SHS_CD
 ,   WEB_OP_ADD_FAIL_FLG
 ,   SVC_STP_YMD
 ,   SVC_STP_RSN_CD
 ,   SVC_STP_RLS_YMD
 ,   SVC_STP_RLS_RSN_CD
 ,   PAUSE_STP_CD
 ,   SVC_PAUSE_YMD
 ,   SVC_PAUSE_RSN_CD
 ,   SVC_PAUSE_RSN_MEMO
 ,   SVC_PAUSE_RLS_YMD
 ,   SVC_PAUSE_RLS_RSN_CD
 ,   SVC_PAUSE_RLS_RSN_MEMO
 ,   SVC_ENDYMD
 ,   SVC_CHRG_ENDYMD
 ,   SVC_DSL_YMD
 ,   SVC_DLRE_CD
 ,   SVC_DLRE_MEMO
 ,   SVC_DSL_TTDKI_FIN_FLG
 ,   KAIHK_YMD
 ,   SVC_CANCEL_CL_YMD
 ,   SVC_DSL_CL_YMD
 ,   CHGE_MT_HOJINSVKEI_UK_NO
 ,   CHGE_MT_HOJINSVKEI_UK_NOPT
 ,   CHGE_SK_HOJINSVKEI_UK_NO
 ,   CHGE_SK_HOJINSVKEI_UK_NOPT
 ,   CHMT_HJIN_EO_YKAE_SVKEI_NO
 ,   CHSK_HJIN_EO_YKAE_SVKEI_NO
 ,   PNLTY_HASSEI_CD
 ,   PNLTY_CHGE_RSN_CD
 ,   IDO_DIV
 ,   SHK_DFLT_PWD
 ,   MENKAIHAT_ANKEN_KR_ADD_FLG
 ,   INTR_CD
 ,   SHOSA_DSL_FIN_CD
 ,   IDO_NG_STAT_CD
 ,   CHRG_STA_YMD_HOSEI_UM
 ,   SVC_PAUSE_CHRG_STA_YMD
 ,   WORK_RRK_BIKO
 ,   AUTO_SHOSA_TRAN_STAT_CD
 ,   KIKI_MIADD_LIST_OPUTZM_FLG
 ,   KAIHK_FAIL_KEI_CST_ZM_FLG
 ,   SVCTK_BUT_DEL_TRN_JSSI_DTM
 ,   ?
 ,   ?
 ,   ?
 ,   ?
 ,   NULL
 ,   NULL
 ,   '0'
 FROM
     KK_T_SVC_KEI
 WHERE
     SVC_KEI_NO = ?
 AND GENE_ADD_DTM = ?
 AND MK_FLG = '1'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-SC_SELECT_001)
#--サービス契約番号から世代登録年月日時分秒と異動区分を取得する。
#-----------------------------------------------------------

--KEY:SC_SELECT_001

SELECT
    GENE_ADD_DTM
,   IDO_DIV
FROM
    KK_T_SVC_KEI
WHERE
    SVC_KEI_NO = ?
AND MK_FLG = '0'
AND rownum = 1
ORDER BY GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-SC_UPDATE_001)
#--サービス契約番号と世代登録年月日時分秒から更新年月日時分秒と更新オペレータアカウントを更新する。
#-----------------------------------------------------------

--KEY:SC_UPDATE_001

 UPDATE
     KK_T_SVC_KEI
 SET
     UPD_DTM     = ?
 ,   UPD_OPEACNT = ?
 WHERE
     SVC_KEI_NO = ?
 AND GENE_ADD_DTM = ?
 AND MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-SC_UPDATE_002)
#--サービス契約番号と世代登録年月日時分秒で論理削除を行う。
#-----------------------------------------------------------

--KEY:SC_UPDATE_002

 UPDATE
     KK_T_SVC_KEI
 SET
     DEL_DTM     = ?
 ,   DEL_OPEACNT = ?
 ,   MK_FLG = '1'
 WHERE
     SVC_KEI_NO = ?
 AND GENE_ADD_DTM = ?
 AND MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-SC_SELECT_002)
#--【EM課金申請データ抽出】
#--サービス契約番号に該当する最新世代のレコードを取得する。
#-----------------------------------------------------------

--KEY:SC_SELECT_002

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? 
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM
                KK_T_SVC_KEI KK0081_GENE
            WHERE
                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND
                KK0081_GENE.RSV_APLY_YMD <= ?
            AND
                KK0081_GENE.RSV_APLY_CD = '2'
            AND
                KK0081_GENE.MK_FLG = '0'
        )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-SC_SELECT_003)
#--【EM課金申請データ取込】
#--サービス契約番号に該当する最新世代のレコードのサービス契約ステータスを取得する。
#-----------------------------------------------------------

--KEY:SC_SELECT_003

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? 
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM
                KK_T_SVC_KEI KK0081_GENE
            WHERE
                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND
                KK0081_GENE.RSV_APLY_YMD <= ?
            AND
                KK0081_GENE.RSV_APLY_CD = '2'
            AND
                KK0081_GENE.MK_FLG = '0'
        )

#-

#----------------------SC END---------------

#----------------------TU START-----------------

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-TU_SELECT_001)
#--電話契約データをすべて抽出する。
#-----------------------------------------------------------

--KEY:TU_SELECT_001

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    NVL(KK0081.SHOSA_YMD, '99999999') AS SHOSA_YMD,
    KK0081.SKEKKA_CD,
    NVL(KK0081.SVC_STA_YMD, '99999999') AS MAINP_SVC_STA_YMD,
    S_KEI_UCWK.SVC_KEI_UCWK_STAT,
    S_KEI_UCWK.EO_TEL_SVC_STA_YMD,
    S_KEI_UCWK.TELNO,
    S_KEI_UCWK.FIRST_CDR_HASSEI_YMD,
    KK0251.VLAN_ID_FIX_FLG,
    S_KEI_UCWK.ADD_SOD_SEND_YMD,
    S_KEI_UCWK.BMP_KOJI_STAT,
    S_KEI_UCWK.BMP_KOJI_KIBO_YMDH,
    S_KEI_UCWK.BMP_KOJI_FIX_YMDH,
    S_KEI_UCWK.BMP_KOJI_FIN_YMD,
    S_KEI_UCWK.ADD_SOD_SEND_YMD,
    S_KEI_UCWK.SHUKKA_YMD,
    ZM0121.TELNO_TSTAYMD,
    ZM0121.TELNO_TENDYMD,
    (SELECT         
        ZM0171_BMP_UM.CD_DIV_NM
    FROM
        ZM_M_CD_NM_KANRI ZM0171_BMP_UM
    WHERE
        S_KEI_UCWK.BMP_UM = ZM0171_BMP_UM.CD_DIV
    AND ZM0171_BMP_UM.CD_TSTAYMD <= ?
    AND ZM0171_BMP_UM.CD_TENDYMD >= ?
    AND ZM0171_BMP_UM.CD_SBT_CD = 'CD00002'
    AND ZM0171_BMP_UM.MK_FLG = '0') AS BMP_UM,
    (SELECT
        ZM0171_VA_PORT_NO.CD_DIV_NM
    FROM
        ZM_M_CD_NM_KANRI ZM0171_VA_PORT_NO
    WHERE
        S_KEI_UCWK.VA_PORT_NO = ZM0171_VA_PORT_NO.CD_DIV
    AND ZM0171_VA_PORT_NO.CD_TSTAYMD <= ?
    AND ZM0171_VA_PORT_NO.CD_TENDYMD >= ?
    AND ZM0171_VA_PORT_NO.CD_SBT_CD = 'CD00593'
    AND ZM0171_VA_PORT_NO.MK_FLG = '0') AS VA_PORT_NO
FROM
    KK_T_SVC_KEI KK0081,
    KK_T_SVC_KEI_EOH_TEL KK0111,
    (SELECT 
        KK0161.SVC_KEI_NO,
        KK0161.SVC_KEI_UCWK_STAT,
        NVL(KK0161.SVC_STA_YMD, '99999999') AS EO_TEL_SVC_STA_YMD,
        KK0191.TELNO,
        NVL(KK0191.FIRST_CDR_HASSEI_YMD, '99999999') AS FIRST_CDR_HASSEI_YMD,
        KK0191.VA_PORT_NO,
        KK0191.BMP_UM,
        BMP_Q.BMP_KOJI_STAT,
        NVL(BMP_Q.BMP_KOJI_KIBO_YMDH, '9999999999') AS BMP_KOJI_KIBO_YMDH,
        NVL(BMP_Q.BMP_KOJI_FIX_YMDH, '9999999999') AS BMP_KOJI_FIX_YMDH,
        NVL(BMP_Q.BMP_KOJI_FIN_YMD, '99999999') AS BMP_KOJI_FIN_YMD,
        MIN(KK1041.ADD_SOD_SEND_YMD) AS ADD_SOD_SEND_YMD,
        MAX(DK0011.SHUKKA_YMD) AS SHUKKA_YMD
    FROM
        KK_T_SVC_KEI_UCWK KK0161,
        KK_T_SVKEIUW_EOH_TEL KK0191,
        KK_T_ODR_SET KK1041,
        DK_T_HAISO DK0011,
        DK_T_HAISO_TG_BPIN DK0021,
        (SELECT
            TU0011.BMP_KOJI_STAT,
            TU0011.SVC_KEI_UCWK_NO,
            TU0011.BMP_KOJI_KIBO_YMDH,
            TU0011.BMP_KOJI_FIX_YMDH,
            TU0011.BMP_KOJI_FIN_YMD
        FROM
            TU_T_BMP_KOJI TU0011
        WHERE
            TU0011.HOJIN_KOJIN_CD = '1' 
            AND 
            (TU0011.BMP_KOJI_NO, TU0011.GENE_ADD_DTM) =
            (SELECT
                MAXTU0011.BMP_KOJI_NO,
                MAX(MAXTU0011.GENE_ADD_DTM)
            FROM
                TU_T_BMP_KOJI MAXTU0011
            WHERE
                TU0011.BMP_KOJI_NO = MAXTU0011.BMP_KOJI_NO
            AND MAXTU0011.MK_FLG = '0'
            GROUP BY
            MAXTU0011.BMP_KOJI_NO)
        AND TU0011.MK_FLG = '0'
        ) BMP_Q
    WHERE
        KK0161.SVC_KEI_UCWK_STAT IN ('010', '020', '030')
    AND KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM = 
        (SELECT
            MAX(MAXKK0161.RSV_APLY_YMD || MAXKK0161.GENE_ADD_DTM) 
        FROM
            KK_T_SVC_KEI_UCWK MAXKK0161 
        WHERE
            KK0161.SVC_KEI_UCWK_NO = MAXKK0161.SVC_KEI_UCWK_NO
        AND MAXKK0161.RSV_APLY_YMD <= ?
        AND MAXKK0161.RSV_APLY_CD = '2'
        AND MAXKK0161.MK_FLG = '0')
    AND KK0161.SVC_KEI_NO = KK1041.SVC_KEI_NO
    AND KK0161.SVC_KEI_UCWK_NO = KK1041.SVC_KEI_UCWK_NO
    AND KK0161.SVC_KEI_UCWK_NO = KK0191.SVC_KEI_UCWK_NO
    AND KK0161.GENE_ADD_DTM = KK0191.GENE_ADD_DTM
    AND KK0191.VA_KIKI_CHG_NO = DK0021.KIKI_CHG_NO
    AND DK0011.HAISO_NO = DK0021.HAISO_NO
    AND DK0011.SHUKKA_YMD <= ?
    AND KK1041.ORDER_SBT_CD = '2'
    AND KK0161.SVC_KEI_UCWK_NO = BMP_Q.SVC_KEI_UCWK_NO(+)
    AND KK0161.MK_FLG = '0'
    AND KK0191.MK_FLG = '0'
    AND KK1041.MK_FLG = '0'
    AND DK0011.MK_FLG = '0'
    AND DK0021.MK_FLG = '0'
    GROUP BY
        KK0161.SVC_KEI_NO,
        KK0161.SVC_KEI_UCWK_STAT,
        KK0161.SVC_STA_YMD,
        KK0191.TELNO,
        KK0191.FIRST_CDR_HASSEI_YMD,
        KK0191.VA_PORT_NO,
        KK0191.BMP_UM,
        BMP_Q.BMP_KOJI_STAT,
        BMP_Q.BMP_KOJI_KIBO_YMDH,
        BMP_Q.BMP_KOJI_FIX_YMDH,
        BMP_Q.BMP_KOJI_FIN_YMD
    ) S_KEI_UCWK,
    KK_T_KAISEN_TG_SVKEI KK0241,
    KK_T_SVKEI_KAISEN_UW KK0251,
    ZM_M_TELNO ZM0121
WHERE
    S_KEI_UCWK.SVC_KEI_NO = KK0081.SVC_KEI_NO
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
    (SELECT
        MAXKK0081_2.SVC_KEI_NO,
        MAXKK0081_2.RSV_APLY_YMD || MAXKK0081_2.GENE_ADD_DTM
     FROM
       (SELECT
            MAXKK0081.SVC_KEI_NO,
            MAXKK0081.RSV_APLY_YMD,
            MAXKK0081.GENE_ADD_DTM,
            RANK() OVER(PARTITION BY MAXKK0081.SVC_KEI_NO
                   ORDER BY MAXKK0081.RSV_APLY_YMD DESC,MAXKK0081.GENE_ADD_DTM DESC) AS MAXKK0081_RANK
        FROM KK_T_SVC_KEI MAXKK0081
        WHERE
            MAXKK0081.RSV_APLY_YMD <= ?
            AND MAXKK0081.RSV_APLY_CD = '2'
            AND MAXKK0081.MK_FLG = '0') MAXKK0081_2
    WHERE
        MAXKK0081_2.MAXKK0081_RANK = 1
        AND KK0081.SVC_KEI_NO = MAXKK0081_2.SVC_KEI_NO)
AND KK0081.SVC_KEI_NO = KK0111.SVC_KEI_NO
AND KK0081.GENE_ADD_DTM = KK0111.GENE_ADD_DTM
AND KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
AND KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
AND KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
AND (KK0251.SVC_KEI_KAISEN_UCWK_NO, KK0251.GENE_ADD_DTM) =
    (SELECT
        MAXSKUW2.SVC_KEI_KAISEN_UCWK_NO,
        MAXSKUW2.GENE_ADD_DTM
     FROM
       (SELECT
            MAXSKUW.SVC_KEI_KAISEN_UCWK_NO,
            MAXSKUW.GENE_ADD_DTM,
            RANK() OVER(PARTITION BY MAXSKUW.SVC_KEI_KAISEN_UCWK_NO
                   ORDER BY MAXSKUW.GENE_ADD_DTM DESC) AS MAXSKUW_RANK
        FROM KK_T_SVKEI_KAISEN_UW MAXSKUW
        WHERE
            MAXSKUW.MK_FLG = '0') MAXSKUW2
    WHERE
        MAXSKUW2.MAXSKUW_RANK = 1
        AND KK0251.SVC_KEI_KAISEN_UCWK_NO = MAXSKUW2.SVC_KEI_KAISEN_UCWK_NO)
AND S_KEI_UCWK.TELNO = ZM0121.TELNO
AND ZM0121.TELNO_TSTAYMD <= ?
AND ZM0121.TELNO_TENDYMD >= ?
AND KK0081.MK_FLG = '0'
AND KK0111.MK_FLG = '0'
AND KK0241.MK_FLG = '0'
AND KK0251.MK_FLG = '0'
AND ZM0121.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-TU_SELECT_002)
#--お客様の契約の件数を取得する。
#-----------------------------------------------------------

--KEY:TU_SELECT_002

SELECT
    COUNT(*) AS KEI_CNT
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SYSID = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (
       SELECT MAX(MAXKK0081.RSV_APLY_YMD || MAXKK0081.GENE_ADD_DTM) 
       FROM KK_T_SVC_KEI MAXKK0081 
       WHERE KK0081.SVC_KEI_NO = MAXKK0081.SVC_KEI_NO AND 
           MAXKK0081.RSV_APLY_YMD <= ? AND 
           MAXKK0081.RSV_APLY_CD = '2' AND
           MAXKK0081.MK_FLG = '0'
       ) AND
    EXISTS(
      SELECT 
          1 
      FROM 
         KK_T_SVC_KEI_EOH_TEL KK0111
      WHERE
         KK0111.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND KK0111.GENE_ADD_DTM = KK0081.GENE_ADD_DTM
      ) AND
    KK0081.MK_FLG = '0'

#-

#----------------------TU END-------------------


#----------------------CK_LCS START-------------

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CK_DELETE_901)
#--SYSIDをキーに物理削除する
#-----------------------------------------------------------

--KEY:CK_DELETE_901

DELETE KK_T_SVC_KEI
 WHERE SYSID = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CK_SELECT_901)
#--SYSIDをキーに標準コンテンツ同意のサービス契約番号を取得する
#-----------------------------------------------------------

--KEY:CK_SELECT_901

SELECT B.SVC_KEI_NO, A.SVC_KEI_STAT, A.GENE_ADD_DTM
  FROM KK_T_SVC_KEI A
        INNER JOIN
       KK_T_SVKEI_EXC_CTRL B ON A.SVC_KEI_NO = B.SVC_KEI_NO
 WHERE A.SYSID = ?
   AND A.SVC_CD = ?
   AND A.PRC_GRP_CD = ?
   AND A.PCRS_CD = ?
   AND A.PPLAN_CD = ?
   AND A.SVC_KEI_STAT = '100'
   AND A.RSV_APLY_YMD || A.GENE_ADD_DTM =
         (SELECT MAX(GENE.RSV_APLY_YMD || GENE.GENE_ADD_DTM)
            FROM KK_T_SVC_KEI GENE
           WHERE GENE.SVC_KEI_NO = A.SVC_KEI_NO
             AND GENE.RSV_APLY_CD = '2'
             AND GENE.RSV_APLY_YMD  <= ?
             AND GENE.MK_FLG = '0')
 FOR UPDATE OF B.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CK_INSERT_901)
#--標準コンテンツ同意のサービス契約を解約状態にする
#-----------------------------------------------------------

--KEY:CK_INSERT_901

INSERT INTO KK_T_SVC_KEI
(
   SVC_KEI_NO
  ,GENE_ADD_DTM
  ,SVC_KEI_STAT
  ,SYSID
  ,SVC_CD
  ,MSKM_DTL_NO
  ,SEIRI_NO
  ,MENKAIHAT_ANKEN_NO
  ,PRC_GRP_CD
  ,PCRS_CD
  ,PPLAN_CD
  ,TK_HOSHIKI_KEI_NO
  ,SVC_USE_STA_KIBO_YMD
  ,RSV_TSTA_KIBO_YMD
  ,ID_SOKHOSHO_OUTPUT_YH
  ,SVC_KEI_KZKWRK_REQYMD
  ,SHOSA_YMD
  ,SHOSA_CL_YMD
  ,SKEKKA_CD
  ,SKEKKA_DTL_CD
  ,SKEKKA_HOKI_CD
  ,SKEKKA_SEND_CD
  ,PAYWAY_KEIZOKU_FLG
  ,FTRIAL_KANYU_YMD
  ,FTRIAL_PRD_ENDYMD
  ,HONKANYU_YMD
  ,HONKANYU_IKO_KIGEN_YMD
  ,KEI_CNC_YMD
  ,PLAN_STAYMD
  ,PLAN_ENDYMD
  ,PLAN_CHRG_STAYMD
  ,PLAN_CHRG_ENDYMD
  ,PLAN_END_SBT_CD
  ,RSV_APLY_YMD
  ,RSV_CL_YMD
  ,RSV_APLY_CD
  ,SVC_CANCEL_YMD
  ,SVC_CANCEL_RSN_CD
  ,SVC_STA_YMD
  ,SVC_CHRG_STAYMD
  ,LETTER_HASSO_SHIWAKE_DIV
  ,THNX_LETTER_SHS_CD
  ,WEB_OP_ADD_FAIL_FLG
  ,SVC_STP_YMD
  ,SVC_STP_RSN_CD
  ,SVC_STP_RLS_YMD
  ,SVC_STP_RLS_RSN_CD
  ,PAUSE_STP_CD
  ,SVC_PAUSE_YMD
  ,SVC_PAUSE_RSN_CD
  ,SVC_PAUSE_RSN_MEMO
  ,SVC_PAUSE_RLS_YMD
  ,SVC_PAUSE_RLS_RSN_CD
  ,SVC_PAUSE_RLS_RSN_MEMO
  ,SVC_ENDYMD
  ,SVC_CHRG_ENDYMD
  ,SVC_DSL_KISAN_YMD
  ,SVC_DSL_YMD
  ,SVC_DLRE_CD
  ,SVC_DLRE_MEMO
  ,SVC_DSL_TTDKI_FIN_FLG
  ,KAIHK_YMD
  ,SVC_CANCEL_CL_YMD
  ,SVC_DSL_CL_YMD
  ,CHGE_MT_HOJINSVKEI_UK_NO
  ,CHGE_MT_HOJINSVKEI_UK_NOPT
  ,CHGE_SK_HOJINSVKEI_UK_NO
  ,CHGE_SK_HOJINSVKEI_UK_NOPT
  ,CHMT_HJIN_EO_YKAE_SVKEI_NO
  ,CHSK_HJIN_EO_YKAE_SVKEI_NO
  ,HOJINSVKEI_HKTGI_SBT_CD
  ,PNLTY_HASSEI_CD
  ,PNLTY_CHGE_RSN_CD
  ,IDO_DIV
  ,SHK_DFLT_PWD
  ,CUST_ID_PWD
  ,MENKAIHAT_ANKEN_KR_ADD_FLG
  ,INTR_CD
  ,SHOSA_DSL_FIN_CD
  ,IDO_NG_STAT_CD
  ,CHRG_STA_YMD_HOSEI_UM
  ,SVC_PAUSE_CHRG_STA_YMD
  ,WORK_RRK_BIKO
  ,AUTO_SHOSA_TRAN_STAT_CD
  ,KIKI_MIADD_LIST_OPUTZM_FLG
  ,KAIHK_FAIL_KEI_CST_ZM_FLG
  ,SVCTK_BUT_DEL_TRN_JSSI_DTM
  ,ADD_DTM
  ,ADD_OPEACNT
  ,UPD_DTM
  ,UPD_OPEACNT
  ,DEL_DTM
  ,DEL_OPEACNT
  ,MK_FLG
  ,ADD_UNYO_YMD
  ,ADD_TRN_ID
  ,UPD_UNYO_YMD
  ,UPD_TRN_ID
  ,DEL_UNYO_YMD
  ,DEL_TRN_ID
) 
SELECT
   SVC_KEI_NO
  ,?       /* GENE_ADD_DTM */
  ,?       /* SVC_KEI_STAT */
  ,SYSID
  ,SVC_CD
  ,MSKM_DTL_NO
  ,SEIRI_NO
  ,MENKAIHAT_ANKEN_NO
  ,PRC_GRP_CD
  ,PCRS_CD
  ,PPLAN_CD
  ,TK_HOSHIKI_KEI_NO
  ,SVC_USE_STA_KIBO_YMD
  ,RSV_TSTA_KIBO_YMD
  ,ID_SOKHOSHO_OUTPUT_YH
  ,SVC_KEI_KZKWRK_REQYMD
  ,SHOSA_YMD
  ,SHOSA_CL_YMD
  ,SKEKKA_CD
  ,SKEKKA_DTL_CD
  ,SKEKKA_HOKI_CD
  ,SKEKKA_SEND_CD
  ,PAYWAY_KEIZOKU_FLG
  ,FTRIAL_KANYU_YMD
  ,FTRIAL_PRD_ENDYMD
  ,HONKANYU_YMD
  ,HONKANYU_IKO_KIGEN_YMD
  ,KEI_CNC_YMD
  ,PLAN_STAYMD
  ,?       /* PLAN_ENDYMD */
  ,PLAN_CHRG_STAYMD
  ,PLAN_CHRG_ENDYMD
  ,PLAN_END_SBT_CD
  ,?     /* RSV_APLY_YMD */
  ,NULL  /* RSV_CL_YMD */
  ,'2'   /* RSV_APLY_CD */
  ,SVC_CANCEL_YMD
  ,SVC_CANCEL_RSN_CD
  ,SVC_STA_YMD
  ,SVC_CHRG_STAYMD
  ,LETTER_HASSO_SHIWAKE_DIV
  ,THNX_LETTER_SHS_CD
  ,WEB_OP_ADD_FAIL_FLG
  ,SVC_STP_YMD
  ,SVC_STP_RSN_CD
  ,SVC_STP_RLS_YMD
  ,SVC_STP_RLS_RSN_CD
  ,PAUSE_STP_CD
  ,SVC_PAUSE_YMD
  ,SVC_PAUSE_RSN_CD
  ,SVC_PAUSE_RSN_MEMO
  ,SVC_PAUSE_RLS_YMD
  ,SVC_PAUSE_RLS_RSN_CD
  ,SVC_PAUSE_RLS_RSN_MEMO
  ,?          /* SVC_ENDYMD */
  ,SVC_CHRG_ENDYMD
  ,SVC_DSL_KISAN_YMD
  ,?          /* SVC_DSL_YMD */
  ,'01'       /* SVC_DLRE_CD */
  ,SVC_DLRE_MEMO
  ,SVC_DSL_TTDKI_FIN_FLG
  ,KAIHK_YMD
  ,SVC_CANCEL_CL_YMD
  ,SVC_DSL_CL_YMD
  ,CHGE_MT_HOJINSVKEI_UK_NO
  ,CHGE_MT_HOJINSVKEI_UK_NOPT
  ,CHGE_SK_HOJINSVKEI_UK_NO
  ,CHGE_SK_HOJINSVKEI_UK_NOPT
  ,CHMT_HJIN_EO_YKAE_SVKEI_NO
  ,CHSK_HJIN_EO_YKAE_SVKEI_NO
  ,HOJINSVKEI_HKTGI_SBT_CD
  ,PNLTY_HASSEI_CD
  ,PNLTY_CHGE_RSN_CD
  ,?         /* IDO_DIV */
  ,SHK_DFLT_PWD
  ,CUST_ID_PWD
  ,MENKAIHAT_ANKEN_KR_ADD_FLG
  ,INTR_CD
  ,SHOSA_DSL_FIN_CD
  ,IDO_NG_STAT_CD
  ,CHRG_STA_YMD_HOSEI_UM
  ,SVC_PAUSE_CHRG_STA_YMD
  ,WORK_RRK_BIKO
  ,AUTO_SHOSA_TRAN_STAT_CD
  ,KIKI_MIADD_LIST_OPUTZM_FLG
  ,KAIHK_FAIL_KEI_CST_ZM_FLG
  ,SVCTK_BUT_DEL_TRN_JSSI_DTM
  ,?             /* ADD_DTM */
  ,'ADD_OPE'     /* ADD_OPEACNT */
  ,?             /* UPD_DTM */
  ,'UPD_OPE'     /* UPD_OPEACNT */
  ,NULL          /* DEL_DTM */
  ,NULL          /* DEL_OPEACNT */
  ,'0'           /* MK_FLG */
  ,'ADD_UNYO'    /* ADD_UNYO_YMD */
  ,'ADD_TRN'     /* ADD_TRN_ID */
  ,'UPD_UNYO'    /* UPD_UNYO_YMD */
  ,'UPD_TRN'     /* UPD_TRN_ID */
  ,NULL          /* DEL_UNYO_YMD */
  ,NULL          /* DEL_TRN_ID */
 FROM KK_T_SVC_KEI
WHERE SVC_KEI_NO = ?
  AND GENE_ADD_DTM = ?

#-

#----------------------CK_LCS END---------------

#----------------------FU START-----------------
#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-FU_SELECT_001)
#--サービス契約番号を元に、SYSIDを取得（世代管理、予約管理を考慮）
#-----------------------------------------------------------

--KEY:FU_SELECT_001

SELECT KK0081.SYSID
  FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_NO = ?
   AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2')
   AND KK0081.MK_FLG = '0'
#-

#-----------------------------------------------------------
#--紹介(KK_T_INTR-FU_SELECT_004)
#--紹介コードに一致する有効なレコードの件数を取得する。
#-----------------------------------------------------------

--KEY:FU_SELECT_004

SELECT SYSID
FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_NO =  ?
   AND KK0081.SVC_KEI_STAT <> '920'
   AND KK0081.SVC_CD <> '04'
   AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
         SELECT MAX(KK0081_1.RSV_APLY_YMD || KK0081_1.GENE_ADD_DTM) AS KK0081_MAX
           FROM KK_T_SVC_KEI KK0081_1
          WHERE KK0081_1.SYSID = KK0081.SYSID
            AND KK0081_1.SVC_CD =  KK0081.SVC_CD 
            AND KK0081_1.RSV_APLY_YMD <= ?
            AND KK0081_1.RSV_APLY_CD = '2'
            AND KK0081_1.MK_FLG = '0'
  )
 and rownum < 2


#-

#-----------------------------------------------------------
#--紹介(KK_T_INTR-FU_SELECT_005)
#--紹介コードに一致する有効なレコードの件数を取得する。
#-----------------------------------------------------------

--KEY:FU_SELECT_005

SELECT EOID
FROM CK_T_CUST CK0011
 WHERE CK0011.SYSID = ?
   AND CK0011.CUST_STAT in ('010','100','200')
   AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = (
         SELECT MAX(CK0011_1.RSV_APLY_YMD || CK0011_1.GENE_ADD_DTM) AS CK0011_MAX
           FROM CK_T_CUST CK0011_1
          WHERE CK0011_1.EOID  = CK0011.EOID 
            AND CK0011_1.RSV_APLY_YMD <= ?
            AND CK0011_1.RSV_APLY_CD = '2'
            AND CK0011_1.MK_FLG = '0'
  )

#-

#-
#----------------------FU END--------------------

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_168)
#--ｅｏモバイル強制解約確定
#--ｅｏモバイル強制解約確定対象抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_168

SELECT
    KK0081.SVC_KEI_NO
   ,KK0081.SYSID
   ,KK0081.SVC_DSL_KISAN_YMD
   ,KK0781.KAIHK_PSB_PRD
FROM KK_T_SVC_KEI KK0081

  INNER JOIN KK_T_SVC_KEI_EOMOBA KK0121
  ON  KK0081.SVC_KEI_NO = KK0121.SVC_KEI_NO
  AND KK0081.GENE_ADD_DTM = KK0121.GENE_ADD_DTM

  INNER JOIN CK_T_CUST CK0011
  ON  CK0011.SYSID = KK0081.SYSID

  INNER JOIN KK_M_PRC_GRP KK0781
  ON  KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD

WHERE KK0081.SVC_KEI_STAT = '910'
AND   KK0081.PRC_GRP_CD = '08'
AND   KK0081.SVC_DLRE_CD = '02'
AND   KK0081.IDO_DIV = '00064'
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_G
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_YMD <= ?
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0')

AND  (KK0121.KYOSEI_DSL_FIX_FLG = '0'
  OR  KK0121.KYOSEI_DSL_FIX_FLG IS NULL)
AND   KK0121.RSV_APLY_CD = '2'
AND   KK0121.MK_FLG = '0'

AND   CK0011.KEISHA_TYPE_CD = '1'
AND   CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = (
  SELECT MAX(CK0011_G.RSV_APLY_YMD || CK0011_G.GENE_ADD_DTM) AS MAX_G
  FROM   CK_T_CUST CK0011_G
  WHERE  CK0011_G.SYSID = CK0011.SYSID
  AND    CK0011_G.RSV_APLY_YMD <= ?
  AND    CK0011_G.RSV_APLY_CD = '2'
  AND    CK0011.MK_FLG = '0')

AND  KK0781.GENE_ADD_DTM = (
  SELECT MAX(KK0781_GENE.GENE_ADD_DTM) AS MAX_G
  FROM   KK_M_PRC_GRP KK0781_GENE
  WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
  AND   KK0781_GENE.RSV_APLY_YMD <= ?
  AND   KK0781_GENE.MK_FLG = '0')

ORDER BY KK0081.SVC_DSL_KISAN_YMD, KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_169)
#--ｅｏモバイル強制解約確定登録結果更新
#-----------------------------------------------------------

--KEY:KK_SELECT_169

SELECT KEI.GENE_ADD_DTM, KEI.UPD_DTM 
FROM KK_T_SVC_KEI KEI
WHERE KEI.SVC_KEI_NO = ?
AND KEI.RSV_APLY_YMD || KEI.GENE_ADD_DTM =
                       (SELECT MAX(SUB_TSK.RSV_APLY_YMD || SUB_TSK.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
                        FROM   KK_T_SVC_KEI SUB_TSK
                        WHERE  SUB_TSK.SVC_KEI_NO = KEI.SVC_KEI_NO
                        AND    SUB_TSK.RSV_APLY_YMD <= ?
                        AND    SUB_TSK.RSV_APLY_CD = '2'
                        AND    SUB_TSK.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_174)
#--長期継続利用割引事前通知
#--長期継続利用割引事前通知対象を抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_174

SELECT
    KK0081.SVC_KEI_NO
   ,KK0081.SVC_KEI_STAT
   ,KK0081.SVC_DSL_KISAN_YMD
   ,KK0081.SVC_STA_YMD
   ,KK0851.WRIB_SVC_TRGT_SVC_CD
   ,KK0781.KAIHK_PSB_PRD
   ,ZM0171.CD_DIV_NM
   ,CK0011.CUST_NM
FROM  KK_T_SVC_KEI KK0081

  INNER JOIN KK_M_WRISVC_TG_SVC KK0851
  ON  KK0851.PPLAN_CD = KK0081.PPLAN_CD

  INNER JOIN  CK_T_CUST CK0011
  ON  KK0081.SYSID = CK0011.SYSID

  INNER JOIN  KK_M_PRC_GRP KK0781
  ON  KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD

  INNER JOIN  ZM_M_CD_NM_KANRI ZM0171
  ON  ZM0171.CD_DIV = KK0081.SVC_KEI_STAT

WHERE KK0851.WRIB_SVC_CD = 'W00000041'
AND   KK0851.RSV_APLY_YMD || KK0851.GENE_ADD_DTM = (
  SELECT  MAX(KK0851_GENE.RSV_APLY_YMD || KK0851_GENE.GENE_ADD_DTM) AS KK0851_GENE_MAX
  FROM    KK_M_WRISVC_TG_SVC KK0851_GENE
  WHERE   KK0851_GENE.WRIB_SVC_TRGT_SVC_CD = KK0851.WRIB_SVC_TRGT_SVC_CD
  AND     ? BETWEEN KK0851_GENE.WRIB_SVC_TRGT_SVC_TSTAYMD AND KK0851_GENE.WRIB_SVC_TRGT_SVC_TENDYMD
  AND     KK0851_GENE.RSV_APLY_YMD <= ?
  AND     KK0851_GENE.MK_FLG = '0')

AND  CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = (
  SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_GENE_MAX
  FROM   CK_T_CUST CK0011_GENE
  WHERE  CK0011_GENE.SYSID = CK0011.SYSID
  AND    CK0011_GENE.RSV_APLY_YMD <= ?
  AND    CK0011_GENE.RSV_APLY_CD = '2'
  AND    CK0011_GENE.MK_FLG = '0')

AND  KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM = (
  SELECT MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_GENE_MAX
  FROM   KK_M_PRC_GRP KK0781_GENE
  WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
  AND    KK0781_GENE.RSV_APLY_YMD <= ?
  AND    KK0781_GENE.MK_FLG = '0')

AND ZM0171.CD_SBT_CD = 'CD00037'
AND ? BETWEEN ZM0171.CD_TSTAYMD AND ZM0171.CD_TENDYMD
AND ZM0171.MK_FLG = '0'

AND   KK0081.SVC_KEI_STAT IN ('100','210','910')
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
  FROM  KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND  KK0081_GENE.RSV_APLY_YMD <= ?
  AND  KK0081_GENE.RSV_APLY_CD = '2'
  AND  KK0081.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_216)
#--SYSIDと対象サービスコードの値に応じて、サービス契約（カレントレコード）よりサービスコード毎に対象を１レコードずつ抽出する。
#--同種のサービス契約が複数（ex.ネットのサービス契約が2件）抽出された場合は、申込明細番号より申込明細を読み込み、申込年月日が小さい（古い）情報を優先する。また、申込年月日が同日である場合は、サービス契約番号の小さい方を対象とする。
#--使用ジョブ
#--EO2910210J0_はぴｅポイント引当審査
#-----------------------------------------------------------

--KEY:KK_SELECT_216

SELECT
    SVC.SVC_KEI_NO,
    SVC.SVC_KEI_STAT,
    SVC.PCRS_CD,
    SVC.PPLAN_CD,
    SVC.SVC_STA_YMD,
    DTL.MSKM_YMD,
    SVC.SVC_CD,
    SVC.TK_HOSHIKI_KEI_NO
FROM 
    KK_T_SVC_KEI SVC
    INNER JOIN KK_T_MSKM_DTL DTL
        ON DTL.MSKM_DTL_NO = SVC.MSKM_DTL_NO
        AND DTL.GENE_ADD_DTM =
        (
            SELECT
                MAX(DTL_GENE.GENE_ADD_DTM) AS GENE_MAX
            FROM
                KK_T_MSKM_DTL DTL_GENE
            WHERE
                DTL_GENE.MSKM_DTL_NO = DTL.MSKM_DTL_NO AND
                DTL_GENE.MK_FLG = '0'
        )
WHERE
    SVC.SYSID = ? AND
    SVC.SVC_CD = ? AND
    SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM =
    (
        SELECT
            MAX(SVC_GENE.RSV_APLY_YMD || SVC_GENE.GENE_ADD_DTM) AS GENE_MAX
        FROM
            KK_T_SVC_KEI SVC_GENE
        WHERE
            SVC_GENE.SVC_KEI_NO = SVC.SVC_KEI_NO AND
            SVC_GENE.RSV_APLY_YMD <= ? AND
            SVC_GENE.RSV_APLY_CD = '2' AND
            SVC_GENE.MK_FLG = '0'
    )
ORDER BY
    DTL.MSKM_YMD ASC,
    SVC.SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_226)
#--サービス契約回線内訳に紐づくサービスで回復不可となっていないネット・電話サービスが存在する場合、"1"を返す
#-----------------------------------------------------------

--KEY:KK_SELECT_226

SELECT
    1
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN KK_M_PRC_GRP KK0781
ON  KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
        (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM   KK_T_SVC_KEI KK0081_GENE
         WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND    KK0081_GENE.RSV_APLY_YMD <= ?
         AND    KK0081_GENE.RSV_APLY_CD = '2'
         AND    KK0081_GENE.MK_FLG = '0')
AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =
        (SELECT MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
         FROM   KK_M_PRC_GRP KK0781_GENE
         WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
         AND    KK0781_GENE.RSV_APLY_YMD <= ?
         AND    KK0781_GENE.MK_FLG = '0')
AND KK0081.SVC_KEI_NO IN
        (SELECT KK0241_SUB1.SVC_KEI_NO
         FROM   KK_T_KAISEN_TG_SVKEI KK0241_SUB1
         WHERE  KK0241_SUB1.SVC_KEI_KAISEN_UCWK_NO = ?
         AND    KK0241_SUB1.KAISEN_UCWK_USE_STAYMD =
                 (SELECT MAX(KK0241_SUB4.KAISEN_UCWK_USE_STAYMD)
                  FROM   KK_T_KAISEN_TG_SVKEI KK0241_SUB4
                  WHERE  KK0241_SUB4.SVC_KEI_NO = KK0241_SUB1.SVC_KEI_NO
                  AND    KK0241_SUB4.KAISEN_UCWK_USE_STAYMD <= ?
                  AND    KK0241_SUB4.MK_FLG = '0'))
AND ? BETWEEN KK0781.PRC_GRP_TSTAYMD AND KK0781.PRC_GRP_TENDYMD
AND NOT(KK0081.SVC_KEI_STAT = '910' AND TO_DATE(KK0081.SVC_ENDYMD) + 1 + KK0781.KAIHK_PSB_PRD <= TO_DATE(?))
AND NOT(KK0081.SVC_KEI_STAT = '920' AND TO_DATE(KK0081.SVC_CANCEL_YMD) + 1 + KK0781.CANCEL_CL_PSB_PRD <= TO_DATE(?))
AND KK0081.PRC_GRP_CD IN ('02', '03', '04', '05', '06', '10')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_227)
#--サービス契約回線内訳に紐づくサービスで回復不可となっていないテレビサービスが存在する場合、"1"を返す
#-----------------------------------------------------------

--KEY:KK_SELECT_227

SELECT
    1
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN KK_M_PRC_GRP KK0781
ON  KK0081.PRC_GRP_CD = KK0781.PRC_GRP_CD
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
        (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM   KK_T_SVC_KEI KK0081_GENE
         WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND    KK0081_GENE.RSV_APLY_YMD <= ?
         AND    KK0081_GENE.RSV_APLY_CD = '2'
         AND    KK0081_GENE.MK_FLG = '0')
AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM =
        (SELECT MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
         FROM   KK_M_PRC_GRP KK0781_GENE
         WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
         AND    KK0781_GENE.RSV_APLY_YMD <= ?
         AND    KK0781_GENE.MK_FLG = '0')
AND KK0081.SVC_KEI_NO IN
        (SELECT KK0241_SUB1.SVC_KEI_NO
         FROM   KK_T_KAISEN_TG_SVKEI KK0241_SUB1
         WHERE  KK0241_SUB1.SVC_KEI_KAISEN_UCWK_NO = ?
         AND    KK0241_SUB1.KAISEN_UCWK_USE_STAYMD =
                 (SELECT MAX(KK0241_SUB4.KAISEN_UCWK_USE_STAYMD)
                  FROM   KK_T_KAISEN_TG_SVKEI KK0241_SUB4
                  WHERE  KK0241_SUB4.SVC_KEI_NO = KK0241_SUB1.SVC_KEI_NO
                  AND    KK0241_SUB4.KAISEN_UCWK_USE_STAYMD <= ?
                  AND    KK0241_SUB4.MK_FLG = '0'))
AND ? BETWEEN KK0781.PRC_GRP_TSTAYMD AND KK0781.PRC_GRP_TENDYMD
AND NOT(KK0081.SVC_KEI_STAT = '910' AND TO_DATE(KK0081.SVC_ENDYMD) + 1 + KK0781.KAIHK_PSB_PRD <= TO_DATE(?))
AND NOT(KK0081.SVC_KEI_STAT = '920' AND TO_DATE(KK0081.SVC_CANCEL_YMD) + 1 + KK0781.CANCEL_CL_PSB_PRD <= TO_DATE(?))
AND KK0081.PRC_GRP_CD IN ('11', '12', '13')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_230)
#--UIA17_バッチ機能仕様書(KKPRC36701_従量分サービス契約情報抽出)
#--3.全体構成/3-3.処理詳細
#--(1) 対象サービス契約抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_230

SELECT K.SVC_KEI_NO,
       K.SVC_CD,
       K.PRC_GRP_CD,
       K.PCRS_CD,
       K.PPLAN_CD,
       K.TK_HOSHIKI_KEI_NO,
       K.SVC_STA_YMD,
       K.SVC_CHRG_STAYMD,
       K.PLAN_CHRG_STAYMD,
       K.PLAN_CHRG_ENDYMD,
       K.SVC_DSL_YMD,
       K.SVC_DLRE_CD,
       K.PNLTY_HASSEI_CD,
       K.PLAN_END_SBT_CD,
       K.KAIHK_YMD,
       K.PAUSE_STP_CD,
       K.SVC_PAUSE_YMD,
       K.SVC_PAUSE_CHRG_STA_YMD,
       K.SVC_PAUSE_RLS_YMD,
       K.SVC_CANCEL_YMD,
       K.SVC_ENDYMD,
       K.SVC_CHRG_ENDYMD,
       K.IDO_DIV,
       K.SEIRI_NO,
       '' SVC_KEI_UCWK_NO,
       KEOM.JIGYOSHA_KEI_ID
FROM   KK_T_SVC_KEI K
         INNER JOIN
           (SELECT SVC_KEI_NO,
                   PPLAN_CD,
                   MAX(RSV_APLY_YMD||GENE_ADD_DTM) AS K_MAX
            FROM   KK_T_SVC_KEI
            WHERE  RSV_APLY_YMD <= ?
              AND  RSV_APLY_CD = '2'
              AND  MK_FLG = '0'
            GROUP BY
                   SVC_KEI_NO,
                   PPLAN_CD
           ) K_GENE
           ON  K.SVC_KEI_NO = K_GENE.SVC_KEI_NO
           AND K.RSV_APLY_YMD || K.GENE_ADD_DTM = K_GENE.K_MAX
         LEFT JOIN
           KK_T_SVC_KEI_EOMOBA KEOM
           ON  K.SVC_KEI_NO = KEOM.SVC_KEI_NO
           AND K.GENE_ADD_DTM = KEOM.GENE_ADD_DTM
           AND KEOM.RSV_APLY_CD = '2'
           AND KEOM.MK_FLG = '0'
WHERE  K.SVC_STA_YMD <= ?
  AND  K.PRC_GRP_CD IN ('08','09')
UNION ALL
SELECT K.SVC_KEI_NO,
       K.SVC_CD,
       K.PRC_GRP_CD,
       K.PCRS_CD,
       K.PPLAN_CD,
       K.TK_HOSHIKI_KEI_NO,
       K.SVC_STA_YMD,
       K.SVC_CHRG_STAYMD,
       K.PLAN_CHRG_STAYMD,
       K.PLAN_CHRG_ENDYMD,
       K.SVC_DSL_YMD,
       K.SVC_DLRE_CD,
       K.PNLTY_HASSEI_CD,
       K.PLAN_END_SBT_CD,
       K.KAIHK_YMD,
       K.PAUSE_STP_CD,
       K.SVC_PAUSE_YMD,
       K.SVC_PAUSE_CHRG_STA_YMD,
       K.SVC_PAUSE_RLS_YMD,
       K.SVC_CANCEL_YMD,
       K.SVC_ENDYMD,
       K.SVC_CHRG_ENDYMD,
       K.IDO_DIV,
       K.SEIRI_NO,
       UCWK.SVC_KEI_UCWK_NO,
       '' JIGYOSHA_KEI_ID
FROM   KK_T_SVC_KEI K
        INNER JOIN 
          (SELECT SVC_KEI_NO,
                  PPLAN_CD,
                  MAX(RSV_APLY_YMD||GENE_ADD_DTM) AS K_MAX
           FROM   KK_T_SVC_KEI
           WHERE  RSV_APLY_YMD <= ?
             AND  RSV_APLY_CD = '2'
             AND  MK_FLG = '0'
           GROUP BY
                  SVC_KEI_NO,PPLAN_CD
          ) K_GENE
          ON  K.SVC_KEI_NO = K_GENE.SVC_KEI_NO
          AND K.RSV_APLY_YMD || K.GENE_ADD_DTM = K_GENE.K_MAX
        INNER JOIN
          (SELECT SVC_KEI_NO,
                  SVC_KEI_UCWK_NO
           FROM   KK_T_SVC_KEI_UCWK
           WHERE  RSV_APLY_CD = '2'
             AND  MK_FLG = '0'
           GROUP BY
                  SVC_KEI_NO,
                  SVC_KEI_UCWK_NO
          ) UCWK
          ON K.SVC_KEI_NO = UCWK.SVC_KEI_NO
WHERE  K.SVC_STA_YMD <= ?
  AND  K.PPLAN_CD = 'PA0311'
ORDER BY
       SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_231)
#--KKPRC11001_継続分サービス契約情報抽出(サービス開始済サービス契約情報抽出)
#-----------------------------------------------------------

--KEY:KK_SELECT_231

SELECT SVC.SVC_KEI_NO
      ,SVC.SVC_CD
      ,SVC.PRC_GRP_CD
      ,SVC.PCRS_CD
      ,SVC.PPLAN_CD
      ,SVC.TK_HOSHIKI_KEI_NO
      ,SVC.SVC_STA_YMD
      ,SVC.SVC_CHRG_STAYMD
      ,SVC.PLAN_CHRG_STAYMD
      ,SVC.PLAN_CHRG_ENDYMD
      ,SVC.SVC_DSL_YMD
      ,SVC.SVC_DLRE_CD
      ,SVC.PNLTY_HASSEI_CD
      ,SVC.PLAN_END_SBT_CD
      ,SVC.KAIHK_YMD
      ,SVC.PAUSE_STP_CD
      ,SVC.SVC_PAUSE_YMD
      ,SVC.SVC_PAUSE_CHRG_STA_YMD
      ,SVC.SVC_PAUSE_RLS_YMD
      ,SVC.SVC_CANCEL_YMD
      ,SVC.SVC_ENDYMD
      ,SVC.SVC_CHRG_ENDYMD
      ,SVC.IDO_DIV
      ,SVC.SEIRI_NO
      ,'' JIGYOSHA_KEI_ID
      ,DMY.REPLICA_MOTO_TK_HSK_KEI_NO
FROM   KK_T_SVC_KEI SVC
         INNER JOIN (
           SELECT SVC_KEI_NO,
                  MAX(RSV_APLY_YMD||GENE_ADD_DTM) AS MAX_GENE
           FROM   KK_T_SVC_KEI
           WHERE  RSV_APLY_YMD <= ?
             AND  RSV_APLY_CD = '2'
             AND  MK_FLG = '0'
           GROUP BY
                  SVC_KEI_NO
           ) SVC_GENE
         ON  SVC.SVC_KEI_NO = SVC_GENE.SVC_KEI_NO
         AND SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM = SVC_GENE.MAX_GENE
         LEFT JOIN (
           SELECT SVC_KEI_NO,
                  GENE_ADD_DTM,
                  REPLICA_MOTO_TK_HSK_KEI_NO
           FROM   KK_T_SVC_KEI_DUMMY
           WHERE  RSV_APLY_CD = '2'
             AND  MK_FLG = '0'
           ) DMY
         ON  SVC.SVC_KEI_NO = DMY.SVC_KEI_NO
         AND SVC.GENE_ADD_DTM = DMY.GENE_ADD_DTM
WHERE  SVC.SVC_STA_YMD <= '20991231'
ORDER BY
       SVC.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_232)
#--KKPRC32101:ｅｏ光テレビ統計情報ファイル（課金）作成
#-----------------------------------------------------------

--KEY:KK_SELECT_232

SELECT SVC.SVC_KEI_NO,
       SVC.SYSID,
       SVC.PPLAN_CD,
       (SELECT KK0251.KAISEN_PLACE_AD_CD
          FROM KK_T_SVKEI_KAISEN_UW KK0251
         WHERE KK0251.SVC_KEI_KAISEN_UCWK_NO IN (SELECT KK0241.SVC_KEI_KAISEN_UCWK_NO
                                                   FROM KK_T_KAISEN_TG_SVKEI KK0241
                                                  WHERE KK0241.SVC_KEI_NO = SVC.SVC_KEI_NO
                                                    AND ? BETWEEN KK0241.KAISEN_UCWK_USE_STAYMD AND KK0241.KAISEN_UCWK_USE_ENDYMD
                                                    AND KK0241.MK_FLG = '0')
           AND (KK0251.SVC_KEI_KAISEN_UCWK_NO, KK0251.GENE_ADD_DTM) = (SELECT KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO, MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                                                                         FROM KK_T_SVKEI_KAISEN_UW KK0251_GENE
                                                                        WHERE KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
                                                                          AND KK0251_GENE.MK_FLG = '0'
                                                                        GROUP BY KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO)) AS KAISEN_PLACE_AD_CD
  FROM (SELECT KK0081.SYSID,
               KK0081.SVC_KEI_NO,
               DECODE(KK0161.SVC_KEI_UCWK_NO, NULL, KK0081.PPLAN_CD, KK0161.PPLAN_CD) AS PPLAN_CD
          FROM KK_T_SVC_KEI KK0081
               LEFT OUTER JOIN (SELECT KK0161.SVC_KEI_NO,
                                       KK0161.SVC_KEI_UCWK_NO,
                                       KK0161.PPLAN_CD
                                  FROM KK_T_SVC_KEI_UCWK KK0161
                                 WHERE KK0161.SVC_KEI_NO = ?
                                   AND (KK0161.SVC_KEI_UCWK_NO, KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM) = (SELECT KK0161_GENE.SVC_KEI_UCWK_NO, MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM)
                                                                                                                 FROM KK_T_SVC_KEI_UCWK KK0161_GENE 
                                                                                                                WHERE KK0161.SVC_KEI_UCWK_NO = KK0161_GENE.SVC_KEI_UCWK_NO 
                                                                                                                  AND KK0161_GENE.RSV_APLY_CD='2' 
                                                                                                                  AND KK0161_GENE.RSV_APLY_YMD<=? 
                                                                                                                  AND KK0161_GENE.MK_FLG='0' 
                                                                                                                GROUP BY KK0161_GENE.SVC_KEI_UCWK_NO)
                                   AND ? BETWEEN KK0161.SVC_STA_YMD AND KK0161.SVC_ENDYMD
               ) KK0161
               ON KK0081.SVC_KEI_NO = KK0161.SVC_KEI_NO
         WHERE KK0081.SVC_KEI_NO = ?
           AND KK0081.SVC_CD='03'
           AND ? BETWEEN KK0081.SVC_STA_YMD AND KK0081.SVC_ENDYMD
           AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
                                                                                    FROM KK_T_SVC_KEI KK0081_GENE 
                                                                                   WHERE KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO 
                                                                                     AND KK0081_GENE.RSV_APLY_CD='2' 
                                                                                     AND KK0081_GENE.RSV_APLY_YMD<=? 
                                                                                     AND KK0081_GENE.MK_FLG='0' 
                                                                                   GROUP BY KK0081_GENE.SVC_KEI_NO) 
       ) SVC
 ORDER BY SVC.PPLAN_CD,
          KAISEN_PLACE_AD_CD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_234)
#--KKPRC06401
#--eoID会員有効性情報ファイル作成
#-----------------------------------------------------------

--KEY:KK_SELECT_234

SELECT
    KK0081.SVC_DSL_KISAN_YMD,
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO =?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_235)
#--ｅｏ６４移行対象のサービス契約情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_235

SELECT
    KK0081.SVC_KEI_NO ,
    KK0081.SYSID ,
    KK0081.PRC_GRP_CD ,
    KK0081.PCRS_CD ,
    KK0081.PPLAN_CD ,
    KK0081.TK_HOSHIKI_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_CD = '01' AND
    KK0081.SVC_KEI_STAT in ('100','210','220') AND
    ((KK0081.PRC_GRP_CD = '08' AND KK0081.PCRS_CD ='A62' AND KK0081.PPLAN_CD ='PA6201' ) OR
     (KK0081.PRC_GRP_CD = '08' AND KK0081.PCRS_CD ='A63' AND KK0081.PPLAN_CD ='PA6301' )) AND
    ? >= TO_CHAR(ADD_MONTHS(TO_DATE( KK0081.SVC_CHRG_STAYMD,'YYYYMMDD'),?),'YYYYMMDD') AND
    (KK0081.SVC_KEI_NO,KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (SELECT
                                                        KK0081_GENE.SVC_KEI_NO,
                                                        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                    FROM
                                                        KK_T_SVC_KEI KK0081_GENE
                                                    WHERE
                                                        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                                        KK0081_GENE.RSV_APLY_YMD <= ? AND
                                                        KK0081_GENE.RSV_APLY_CD = '2'
                                                        GROUP BY KK0081_GENE.SVC_KEI_NO
                                                    )
UNION
SELECT
    KK0081.SVC_KEI_NO ,
    KK0081.SYSID ,
    KK0081.PRC_GRP_CD ,
    KK0081.PCRS_CD ,
    KK0081.PPLAN_CD ,
    KK0081.TK_HOSHIKI_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_SVC_KEI_EOMOBA KK0121 
           ON KK0081.SVC_KEI_NO = KK0121.SVC_KEI_NO AND
           KK0081.GENE_ADD_DTM = KK0121.GENE_ADD_DTM AND
           KK0081.SVC_CD = '01'  AND
           KK0081.SVC_KEI_STAT = '910' AND
           ((KK0081.PRC_GRP_CD = '08' AND KK0081.PCRS_CD ='A62' AND KK0081.PPLAN_CD ='PA6201' ) OR
                (KK0081.PRC_GRP_CD = '08' AND KK0081.PCRS_CD ='A63' AND KK0081.PPLAN_CD ='PA6301' )) AND 
           ? >= TO_CHAR(ADD_MONTHS(TO_DATE( KK0081.SVC_CHRG_STAYMD,'YYYYMMDD'),?),'YYYYMMDD') AND
           KK0081.SVC_DLRE_CD = '02' AND
           KK0081.IDO_DIV = '00064'  AND  
           (KK0121.KYOSEI_DSL_FIX_FLG = '0' OR KK0121.KYOSEI_DSL_FIX_FLG IS NULL) AND 
           KK0121.RSV_APLY_CD = '2'  AND
           KK0121.MK_FLG  = '0'      AND
          (KK0081.SVC_KEI_NO,KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (SELECT
                                                                KK0081_GENE.SVC_KEI_NO,
                                                                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                            FROM
                                                                KK_T_SVC_KEI KK0081_GENE
                                                            WHERE
                                                                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                                                KK0081_GENE.RSV_APLY_YMD <= ? AND
                                                                KK0081_GENE.RSV_APLY_CD = '2'
                                                                GROUP BY KK0081_GENE.SVC_KEI_NO
                                                            )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_001)
#--サービス契約番号から異動検証に必要な情報を取得する
#-----------------------------------------------------------

--KEY:KV_SELECT_001

SELECT KK0081.SVC_KEI_NO ,
       KK0081.SVC_CD,
       KK0081.PRC_GRP_CD,
       KK0081.PCRS_CD,
       KK0251.KAISEN_TK_COMP_CD,
       KK0081.CHRG_STA_YMD_HOSEI_UM,
       KK0081.PLAN_STAYMD,
       KK0081.SVC_STA_YMD,
       KK0081.SHOSA_YMD,
       KK0081.RSV_APLY_YMD,
       KK0081.PLAN_ENDYMD,
       KK0081.SVC_ENDYMD,
       KK0081.SVC_CANCEL_YMD,
       KK0081.SVC_DSL_KISAN_YMD,
       KK0081.SVC_USE_STA_KIBO_YMD,
       KK0251.TEL_VLAN_ID_TRKM_YMD,
       DECODE(KK0251.KAISEN_TK_COMP_CD,'05',(SELECT KK0341.KKTK_SBT_CD 
                                            FROM KK_T_KKTK_SVC_KEI KK0341
                                            WHERE KK0241.SVC_KEI_NO = KK0341.SVC_KEI_NO
                                            AND KK0341.GENE_ADD_DTM =
                                                                     (SELECT MAX(KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
                                                                      FROM   KK_T_KKTK_SVC_KEI KK0341_GENE
                                                                      WHERE  KK0341_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                                      AND    KK0341_GENE.MK_FLG = '0')),'00') KKTK_SBT_CD,
       DECODE(KK0081_DJ.DJ_MSKM,0,0,1) DJ_MSKM_FLG,
       DECODE(KK0081.SVC_CD,'2',(SELECT KK0191.BMP_UM
                                            FROM KK_T_SVC_KEI_UCWK KK0161,
                                                 KK_T_SVKEIUW_EOH_TEL KK0191
                                            WHERE KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO 
                                            AND KK0161.SVC_KEI_UCWK_STAT IN ('010', '020', '030', '100')  
                                            AND KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM IN ( 
                                                ( SELECT MAX(KK0161_GENE_01.RSV_APLY_YMD || KK0161_GENE_01.GENE_ADD_DTM) AS KK0161_MAX 
                                                  FROM   KK_T_SVC_KEI_UCWK KK0161_GENE_01 
                                                  WHERE  KK0161_GENE_01.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO 
                                                  AND    KK0161_GENE_01.RSV_APLY_CD = '2' 
                                                  AND    KK0161_GENE_01.RSV_APLY_YMD <= ? 
                                                  AND    KK0161_GENE_01.MK_FLG = '0' 
                                                ), 
                                                ( SELECT MAX(KK0161_GENE_02.RSV_APLY_YMD || KK0161_GENE_02.GENE_ADD_DTM) AS KK0161_MAX 
                                                  FROM   KK_T_SVC_KEI_UCWK KK0161_GENE_02 
                                                  WHERE  KK0161_GENE_02.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO 
                                                  AND    KK0161_GENE_02.RSV_APLY_CD IN ('1', '2') 
                                                  AND    KK0161_GENE_02.MK_FLG = '0' 
                                                )) 
                                            AND KK0191.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
                                            AND KK0191.GENE_ADD_DTM =
                                                                     (SELECT MAX(KK0191_GENE.GENE_ADD_DTM) AS KK0191_MAX
                                                                      FROM   KK_T_SVKEIUW_EOH_TEL KK0191_GENE
                                                                      WHERE  KK0191_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO 
                                                                      AND    KK0191_GENE.MK_FLG = '0')),0) BMP_UM
  FROM KK_T_SVC_KEI KK0081
       LEFT OUTER JOIN KK_T_KAISEN_TG_SVKEI KK0241
       ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0241.MK_FLG = '0'
       LEFT OUTER JOIN (SELECT * FROM KK_T_SVKEI_KAISEN_UW KK0251_1
                        WHERE KK0251_1.GENE_ADD_DTM =
                              (SELECT MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                               FROM   KK_T_SVKEI_KAISEN_UW KK0251_GENE
                               WHERE  KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251_1.SVC_KEI_KAISEN_UCWK_NO
                               AND    KK0251_GENE.MK_FLG = '0')) KK0251
       ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
          AND KK0251.MK_FLG = '0',
       (SELECT COUNT(KK0081_DJ.SVC_CD) DJ_MSKM  
        FROM KK_T_SVC_KEI KK0081,KK_T_SVC_KEI KK0081_DJ 
        WHERE KK0081.SVC_KEI_NO = ?
        AND KK0081_DJ.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
        AND KK0081.SVC_KEI_NO <> KK0081_DJ.SVC_KEI_NO
        AND KK0081_DJ.SVC_CD = '01'   
        AND KK0081.GENE_ADD_DTM = 
                                 (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVC_KEI KK0081_GENE
                                  WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO)
        AND KK0081_DJ.GENE_ADD_DTM = 
                                 (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVC_KEI KK0081_GENE
                                  WHERE KK0081_GENE.SVC_KEI_NO = KK0081_DJ.SVC_KEI_NO)) KK0081_DJ
 WHERE KK0081.SVC_KEI_NO = ?
   AND KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO)
   AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_002)
#--サービス契約番号から異動検証に必要な情報を取得する
#-----------------------------------------------------------

--KEY:KV_SELECT_002

SELECT KK0081.SVC_KEI_NO ,
       KK0081.SVC_CD,
       KK0081.PRC_GRP_CD,
       KK0081.PCRS_CD,
       KK0081.SHOSA_YMD,
       KK0081.RSV_APLY_YMD,
       NVL((SELECT KK0191.BMP_UM FROM KK_T_SVKEIUW_EOH_TEL KK0191 WHERE 
        KK0191.GENE_ADD_DTM = 
       (SELECT MAX(KK0191_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVKEIUW_EOH_TEL KK0191_GENE
        WHERE KK0191_GENE.SVC_KEI_UCWK_NO = KK0341.SVC_KEI_UCWK_NO)),' ') BMP_UM 
  FROM KK_T_SVC_KEI KK0081,
       KK_T_KKTK_SVC_KEI KK0341       
 WHERE KK0081.SVC_KEI_NO = ?
   AND KK0081.SVC_KEI_NO = KK0341.SVC_KEI_NO
   AND KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO)
   AND KK0081.MK_FLG = '0'
   AND KK0341.GENE_ADD_DTM =
                             (SELECT MAX(KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
                              FROM   KK_T_KKTK_SVC_KEI KK0341_GENE
                              WHERE  KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO 
                              AND    KK0341_GENE.MK_FLG = '0')
   AND KK0341.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_003)
#--サービス契約番号と取得項目名から日付を取得
#-----------------------------------------------------------

--KEY:KV_SELECT_003

SELECT KK0081.*
       ,KK0781.PRC_GRP_NM
  FROM KK_T_SVC_KEI KK0081
    INNER JOIN KK_M_PRC_GRP KK0781
    ON KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD
    AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM = 
        (SELECT MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
         FROM   KK_M_PRC_GRP KK0781_GENE
         WHERE  KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
         AND    KK0781_GENE.RSV_APLY_YMD <= ?
         AND    KK0781_GENE.MK_FLG = '0')
 WHERE KK0081.SVC_KEI_NO = ?
   AND KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO)
   AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_004)
#--サービス契約番号とサービス契約回線内訳番号を基にサービス契約_工事案件を経由し工事完了情報を取得する。
#-----------------------------------------------------------

--KEY:KV_SELECT_004

SELECT KK0081.SVC_KEI_NO ,
       KK0081.SVC_CD,
       KK0081.PRC_GRP_CD,
       KK0081.PCRS_CD,
       KK0081.SHOSA_YMD,
       KK0081.RSV_APLY_YMD,
       NVL((SELECT KK0191.BMP_UM FROM KK_T_SVKEIUW_EOH_TEL KK0191 WHERE 
        KK0191.GENE_ADD_DTM = 
       (SELECT MAX(KK0191_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVKEIUW_EOH_TEL KK0191_GENE
        WHERE KK0191_GENE.SVC_KEI_UCWK_NO = KK0341.SVC_KEI_UCWK_NO)),' ') BMP_UM 
  FROM KK_T_SVC_KEI KK0081,
       KK_T_KKTK_SVC_KEI KK0341       
 WHERE KK0081.SVC_KEI_NO = ?
   AND KK0081.SVC_KEI_NO = KK0341.SVC_KEI_NO
   AND KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO)
   AND KK0081.MK_FLG = '0'
   AND KK0341.GENE_ADD_DTM =
                             (SELECT MAX(KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
                              FROM   KK_T_KKTK_SVC_KEI KK0341_GENE
                              WHERE  KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO 
                              AND    KK0341_GENE.MK_FLG = '0')
   AND KK0341.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_005)
#--KVPRC00201:対象契約情報のサービス契約番号を元に取得
#-----------------------------------------------------------

--KEY:KV_SELECT_005

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_CD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.SVC_PAUSE_YMD,
    KK0081.SVC_PAUSE_RLS_YMD,
    KK0081.SVC_ENDYMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_DSL_KISAN_YMD,
    KK0081.SVC_DSL_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_CANCEL_CL_YMD,
    KK0081.SVC_DSL_CL_YMD ,
    KK0081.IDO_DIV ,
    KK0081.SVC_PAUSE_CHRG_STA_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.PLAN_ENDYMD,
    KK0081.PLAN_CHRG_STAYMD ,
    KK0081.PLAN_CHRG_ENDYMD ,
    KK0081.SYSID ,
    KK0081.MSKM_DTL_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.MK_FLG = '0' AND
    KK0081.GENE_ADD_DTM = (SELECT
                                MAX(KK0081a.GENE_ADD_DTM)
                            FROM
                                KK_T_SVC_KEI KK0081a
                            WHERE
                                KK0081a.SVC_KEI_NO = ? AND
                                KK0081a.MK_FLG = '0'
                            )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_006)
#--KKPRC00901
#--対象サービス契約抽出
#--マンション基準日の取得
#-----------------------------------------------------------

--KEY:KV_SELECT_006

SELECT
  KK0881.SHOSA_AF_SVC_STA_NISU
FROM
  KK_T_SVC_KEI KK0081
  INNER JOIN 
    KK_T_TK_HOSHIKI_KEI KK0891
    ON
      KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO AND
      KK0891.MK_FLG = '0'
  INNER JOIN
      KK_T_KAISEN_USE_KEI KK0881
    ON
      KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO AND
      KK0881.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_013)
#--加入御礼管理データ抽出
#--サービス契約番号に紐づくレコードのうち
#--カレントレコード含む未来のレコードの
#--審査結果送信フラグを一括更新する
#-----------------------------------------------------------

--KEY:KK_UPDATE_013

UPDATE KK_T_SVC_KEI KK0081
SET   KK0081.SKEKKA_SEND_CD = ?,
      KK0081.UPD_DTM = 'UPD_DTM',
      KK0081.UPD_UNYO_YMD = 'UPD_UNYO',
      KK0081.UPD_TRN_ID = 'UPD_TRN',
      KK0081.UPD_OPEACNT = 'UPD_OPE'
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM >= (
  SELECT MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
  FROM   KK_T_SVC_KEI KK0081_G
  WHERE  KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_G.RSV_APLY_YMD <= ?
  AND    KK0081_G.RSV_APLY_CD = '2'
  AND    KK0081_G.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_014)
#--指定された世代登録年月日時分秒のレコードに対して、審査結果送信コードを編集する。
#-----------------------------------------------------------

--KEY:KK_UPDATE_014

UPDATE KK_T_SVC_KEI KK0081
SET KK0081.SVC_STA_YMD = ?,
    KK0081.UPD_DTM = 'UPD_DTM',
    KK0081.UPD_UNYO_YMD = 'UPD_UNYO',
    KK0081.UPD_TRN_ID = 'UPD_TRN',
    KK0081.UPD_OPEACNT = 'UPD_OPE'
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.GENE_ADD_DTM = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_015)
#--加入御礼管理データ抽出
#--サービス契約番号に紐づくレコードのうち
#--カレントレコード含む未来のレコードの
#--審査結果送信フラグを一括更新する
#-----------------------------------------------------------

--KEY:KK_UPDATE_015

UPDATE KK_T_SVC_KEI KK0081
SET   KK0081.SKEKKA_SEND_CD = ?,
      KK0081.UPD_DTM = 'UPD_DTM',
      KK0081.UPD_UNYO_YMD = 'UPD_UNYO',
      KK0081.UPD_TRN_ID = 'UPD_TRN',
      KK0081.UPD_OPEACNT = 'UPD_OPE'
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM >= (
  SELECT MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
  FROM   KK_T_SVC_KEI KK0081_G
  WHERE  KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_G.RSV_APLY_YMD <= ?
  AND    KK0081_G.RSV_APLY_CD = '2'
  AND    KK0081_G.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_251)
#--KKPRC12601
#--サービス契約が「住所変更」以外により解約されている場合に取得（世代管理、予約管理を考慮）
#--【条件】
#--サービス契約番号
#--予約適用年月日
#-----------------------------------------------------------

--KEY:KK_SELECT_251

SELECT KK0081.SVC_KEI_NO
  FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_NO = ?
   AND KK0081.SVC_KEI_STAT = '910'
   AND KK0081.IDO_DIV <> '00019'
   AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2'
           AND KK0081.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_252)
#--カレントのSYSIDを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_252

SELECT
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? 
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM
        KK_T_SVC_KEI KK0081_GENE
     WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_253)
#--監視制御 サービス契約情報
#--サービス契約番号の有効な全履歴をカレントから降順に取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_253

SELECT
    KK0081.SVC_DSL_YMD AS SVC_DSL_YMD
   ,KK0081.SVC_DSL_KISAN_YMD AS SVC_DSL_KISAN_YMD
   ,KK0081.PCRS_CD AS PCRS_CD
FROM KK_T_SVC_KEI KK0081
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.RSV_APLY_YMD <= ?
AND   KK0081.RSV_APLY_CD = '2'
AND   KK0081.MK_FLG = '0'
ORDER BY KK0081.RSV_APLY_YMD DESC, KK0081.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_255)
#--利用停止の特定サービス契約に支払い方法入力支援にて紐付くSYSIDと更新有無を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_255

WITH
KK0081_CUR_STOP /* カレントかつ停止の特定サービス契約 */
AS
(
SELECT
 KK0081.SVC_KEI_NO
 ,KK0081.SYSID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ? 
AND
 KK0081.SVC_KEI_STAT = '220' /* 停止 */ 
AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
 (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
   KK0081_GENE.RSV_APLY_YMD <= ? AND
   KK0081_GENE.RSV_APLY_CD = '2' AND
   KK0081_GENE.MK_FLG = '0'
  )
)
,
CN0131_CUR /* 有効な支払い方法入力支援にて特定サービス契約に紐付くSYSID */
AS
(
SELECT
 CN0131.ISP_KSSAI_SVC_KEI_NO SVC_KEI_NO
 ,CN0131.SYSID
FROM
 CN_T_PAYWAY_INSUPORT CN0131
WHERE
 CN0131.ISP_KSSAI_SVC_KEI_NO = ? 
AND
 CN0131.MK_FLG = '0'
)
SELECT /* 利用停止の特定サービス契約に支払い方法入力支援にて紐付くSYSIDと更新有無 */
 CN0131_CUR.SYSID
 ,'1' UPD_UM /* 更新有無(有) */
FROM
 KK0081_CUR_STOP
INNER JOIN CN0131_CUR
ON
 KK0081_CUR_STOP.SVC_KEI_NO=CN0131_CUR.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_256)
#--利用停止の特定サービス契約に紐付くSYSIDと更新有無を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_256

WITH
KK0081_CUR_STOP /* ①カレントかつ停止の特定サービス契約 */
AS
(
SELECT
 KK0081.SVC_KEI_NO
 ,KK0081.SYSID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ? /* サービス契約番号 */ 
AND
 KK0081.SVC_KEI_STAT = '220' /* 停止 */ 
AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
 (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = ? /* サービス契約番号 */ AND
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
   KK0081_GENE.RSV_APLY_YMD <= ? /* 運用日 */ AND
   KK0081_GENE.RSV_APLY_CD = '2' AND
   KK0081_GENE.MK_FLG = '0'
  )
)
,
KK0791_CUR /* ★カレントかつ現在有効な料金コース */
AS
(
SELECT
 KK0791.PCRS_CD
 ,KK0791.GENE_ADD_DTM
 ,ID_TCHISHO_HAK_SKBT_CD
FROM
 KK_M_PCRS KK0791
WHERE
 (KK0791.PCRS_CD,KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM)
 IN
 (
  SELECT
   KK0791_GENE.PCRS_CD
   ,MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX
  FROM
   KK_M_PCRS KK0791_GENE
  WHERE
   KK0791_GENE.RSV_APLY_YMD <= ? /* 運用日 */ AND
   KK0791_GENE.MK_FLG = '0'
  GROUP BY
   KK0791_GENE.PCRS_CD
  )
AND
 ? /* 運用日 */ BETWEEN KK0791.PCRS_TSTAYMD AND KK0791.PCRS_TENDYMD
)
,
KK0791_CUR_TARGET /* ②カレントかつ現在有効なID通知識別コードが0以外の料金コース */
AS
(
SELECT
 KK0791_CUR.PCRS_CD
FROM
 KK0791_CUR
WHERE
 KK0791_CUR.ID_TCHISHO_HAK_SKBT_CD IN('1','2','3','4','5') /* '0'以外 */
)
,
KK0081_ROUGH_FILTED /* (※)特定のSYSIDのサービス契約(カレントのみならず履歴分予約分も含む) */
AS
(
SELECT DISTINCT
 KK0081.SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
INNER JOIN
 KK0081_CUR_STOP STOP
 ON
 KK0081.SYSID=STOP.SYSID
WHERE
 KK0081.MK_FLG = '0'
)
,
KK0081_CUR_FILTED /* ③カレントかつ特定のSYSIDかつ特定の料金コースかつ停止系以外のステータスのサービス契約 */
AS
(
SELECT
 KK0081.SYSID
FROM
 KK_T_SVC_KEI KK0081
INNER JOIN /* 当テーブルで大まかに絞り込む */
 KK0081_ROUGH_FILTED ROUGH
 ON
 KK0081.SVC_KEI_NO=ROUGH.SVC_KEI_NO
INNER JOIN
 KK0081_CUR_STOP STOP
 ON
 KK0081.SYSID=STOP.SYSID
INNER JOIN
 KK0791_CUR_TARGET TARGET
 ON
 KK0081.PCRS_CD=TARGET.PCRS_CD 
WHERE
 KK0081.SVC_KEI_STAT IN('010','020','030','100','210') /* 停止系以外 */
AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
 (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  INNER JOIN /* 当テーブルで大まかに絞り込む */
   KK0081_ROUGH_FILTED ROUGH_2
  ON
   KK0081_GENE.SVC_KEI_NO=ROUGH_2.SVC_KEI_NO
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
   KK0081_GENE.RSV_APLY_YMD <= ? /* 運用日 */ AND
   KK0081_GENE.RSV_APLY_CD = '2' AND
   KK0081_GENE.MK_FLG = '0'
  )
)
,
KK0081_CUR_FILTED_2 /* ④カレントかつ特定のSYSIDかつ料金コースが全て発行なしのSYSID */
AS
(
SELECT
 KK0081_KK0791.SYSID
FROM
 (
  SELECT
   KK0081.SYSID,
   MAX(KK0791.ID_TCHISHO_HAK_SKBT_CD) AS MAX_ID_TCHISHO_HAK_SKBT_CD
  FROM
   KK_T_SVC_KEI KK0081
  INNER JOIN /* 当テーブルで大まかに絞り込む */
   KK0081_ROUGH_FILTED ROUGH
   ON
   KK0081.SVC_KEI_NO=ROUGH.SVC_KEI_NO
  INNER JOIN
   KK0081_CUR_STOP STOP
   ON
   KK0081.SYSID=STOP.SYSID
  INNER JOIN
   KK0791_CUR KK0791
   ON
   KK0081.PCRS_CD = KK0791.PCRS_CD
  WHERE KK0081.SVC_KEI_STAT < '910' AND
   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
   (
   SELECT
    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
   FROM
    KK_T_SVC_KEI KK0081_GENE
   INNER JOIN /* 当テーブルで大まかに絞り込む */
    KK0081_ROUGH_FILTED ROUGH_2
    ON
    KK0081_GENE.SVC_KEI_NO=ROUGH_2.SVC_KEI_NO
   WHERE
    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0081_GENE.RSV_APLY_YMD <= ? /* 運用日 */ AND
    KK0081_GENE.RSV_APLY_CD = '2' AND
    KK0081_GENE.MK_FLG = '0'
   )
  GROUP BY
   KK0081.SYSID
 ) KK0081_KK0791
WHERE
 KK0081_KK0791.MAX_ID_TCHISHO_HAK_SKBT_CD = '0' /* 発行なし */
)
SELECT /* ①を駆動表として、③または④に対応するSYSIDが存在すれば更新有無を"0"しなければ"1"に編集 */
 DRIVE.SYSID
 ,CASE
  WHEN DRIVE.SYSID IN
    (
     SELECT
      FILTED.SYSID
     FROM
      KK0081_CUR_FILTED FILTED
    )
  THEN
   '0'
  WHEN DRIVE.SYSID IN
   (
    SELECT
     FILTED_2.SYSID
    FROM
     KK0081_CUR_FILTED_2 FILTED_2
    WHERE
     NOT EXISTS (SELECT '1'
                   FROM KK_T_SVC_KEI KK0081
                  WHERE KK0081.SYSID = FILTED_2.SYSID
                    AND KK0081.SVC_CD = '51'
                    AND KK0081.SVC_KEI_STAT < '910'
                    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
                          SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                            FROM KK_T_SVC_KEI KK0081_GENE
                           WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                             AND KK0081_GENE.RSV_APLY_YMD <= ?
                             AND KK0081_GENE.RSV_APLY_CD = '2'
                             AND KK0081_GENE.MK_FLG = '0') )
    )
  THEN
   '0'
  ELSE
   '1'
  END UPD_UM
FROM
 KK0081_CUR_STOP DRIVE
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_257)
#--利用停止解除の特定サービス契約に紐付くSYSIDと更新有無を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_257

WITH
KK0081_CUR_STOP /* ①カレントかつ停止以外の特定サービス契約 */
AS
(
SELECT
 KK0081.SVC_KEI_NO
 ,KK0081.SYSID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ? 
AND
 KK0081.SVC_KEI_STAT IN('010','020','030','100','210') /* 停止系以外 */ 
AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
 (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
   KK0081_GENE.RSV_APLY_YMD <= ? AND
   KK0081_GENE.RSV_APLY_CD = '2' AND
   KK0081_GENE.MK_FLG = '0'
  )
)
,
KK0791_CUR_TARGET /* ②カレントかつID通知識別コードが0以外の料金コース */
AS
(
SELECT
 KK0791.PCRS_CD
FROM
 KK_M_PCRS KK0791
WHERE
 KK0791.ID_TCHISHO_HAK_SKBT_CD IN('1','2','3','4','5') /* '0'以外 */
AND
 ? BETWEEN KK0791.PCRS_TSTAYMD AND KK0791.PCRS_TENDYMD
AND
 (KK0791.PCRS_CD,KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM)
 IN
 (
  SELECT
   KK0791_GENE.PCRS_CD
   ,MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX
  FROM
   KK_M_PCRS KK0791_GENE
  WHERE
   KK0791_GENE.RSV_APLY_YMD <= ? AND
   KK0791_GENE.MK_FLG = '0'
  GROUP BY
   KK0791_GENE.PCRS_CD
  )
)
,
CK_T_CUST_TARGET   /* 会員ISP決済状態コードが1(利用停止中） */
AS
(
SELECT
    CK0011.SYSID
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
        CK_T_CUST CK0011
    ON
        KK0081.SYSID = CK0011.SYSID
        AND (CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM) =
        (SELECT
            MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM)
        FROM
            CK_T_CUST CK0011_GENE
        WHERE
                CK0011_GENE.SYSID = KK0081.SYSID
            AND CK0011_GENE.RSV_APLY_YMD <= ?
            AND CK0011_GENE.RSV_APLY_CD   = '2'
            AND CK0011_GENE.MK_FLG        = '0'
        GROUP BY
            CK0011_GENE.SYSID
        )
WHERE
    KK0081.SVC_KEI_NO = ?
    AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO        = ?
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD   = '2'
            AND KK0081_GENE.MK_FLG        = '0'
        GROUP BY
            KK0081_GENE.SVC_KEI_NO
        )
)
,
KK0081_CUR_FILTED /* ③カレントかつ特定のSYSIDかつ特定の料金コースかつ停止系以外のステータスのサービス契約 かつ会員ISP決済状態コードが1*/
AS
(
SELECT
 KK0081.SYSID
FROM
 KK_T_SVC_KEI KK0081
INNER JOIN
 KK0081_CUR_STOP STOP
 ON
 KK0081.SYSID=STOP.SYSID
INNER JOIN
 KK0791_CUR_TARGET TARGET
 ON
 KK0081.PCRS_CD=TARGET.PCRS_CD 
INNER JOIN
 CK_T_CUST_TARGET CUST
 ON
 KK0081.SYSID=CUST.SYSID
WHERE
 KK0081.SVC_KEI_STAT IN('010','020','030','100','210') /* 停止系以外 */
AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
 (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
   KK0081_GENE.RSV_APLY_YMD <= ? AND
   KK0081_GENE.RSV_APLY_CD = '2' AND
   KK0081_GENE.MK_FLG = '0'
  )
)
SELECT /* ①を駆動表として、③に対応するSYSIDが存在すれば更新有無を"1"しなければ"0"に編集 */
 DRIVE.SYSID
 ,CASE
  WHEN DRIVE.SYSID IN
   (
    SELECT
     FILTED.SYSID
    FROM
     KK0081_CUR_FILTED FILTED
   )
  THEN
   '1'
  ELSE
   '0'
  END UPD_UM
FROM
 KK0081_CUR_STOP DRIVE

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_258)
#--利用停止解除の特定サービス契約に支払い方法入力支援にて紐付くSYSIDと更新有無を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_258

WITH
KK0081_CUR_STOP /* カレントかつ停止の特定サービス契約 */
AS
(
SELECT
 KK0081.SVC_KEI_NO
 ,KK0081.SYSID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ? 
AND
 KK0081.SVC_KEI_STAT IN('010','020','030','100','210') /* 停止系以外 */ 
AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
 (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
   KK0081_GENE.RSV_APLY_YMD <= ? AND
   KK0081_GENE.RSV_APLY_CD = '2' AND
   KK0081_GENE.MK_FLG = '0'
  )
)
,
CN0131_CUR /* 有効な支払い方法入力支援にて特定サービス契約に紐付くSYSID */
AS
(
SELECT
 CN0131.ISP_KSSAI_SVC_KEI_NO SVC_KEI_NO
 ,CN0131.SYSID
FROM
 CN_T_PAYWAY_INSUPORT CN0131
WHERE
 CN0131.ISP_KSSAI_SVC_KEI_NO = ? 
AND
 CN0131.MK_FLG = '0'
)
SELECT /* 利用停止の特定サービス契約に支払い方法入力支援にて紐付くSYSIDと更新有無 */
 CN0131_CUR.SYSID
 ,'1' UPD_UM /* 更新有無(有) */
FROM
 KK0081_CUR_STOP
INNER JOIN CN0131_CUR
ON
 KK0081_CUR_STOP.SVC_KEI_NO=CN0131_CUR.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_261)
#--KKPRC02202(工事完了データ取込処理） 
#--相関ルール：RULE65課金開始日設定(サービス)の呼出用データ取得。 
#--相関ルール：RULE73開始日設定(サービス)の呼出用データ取得。 
#--KKPRC02202(工事取消データ取込処理） 
#--機器提供サービス契約機器変更手続中止サービスIF呼出用データ取得
#-----------------------------------------------------------

--KEY:KK_SELECT_261

SELECT 
    KK1681.IDO_DIV,
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_CD, 
    KK0081.PRC_GRP_CD, 
    KK0081.CHRG_STA_YMD_HOSEI_UM, 
    KK0251.KAISEN_TK_COMP_CD, 
    KK0251.SVC_KEI_KAISEN_UCWK_NO 
FROM 
KK_T_IDO_RSV KK1681 
INNER JOIN
KK_T_SVC_KEI_UCWK KK0161
ON 
KK1681.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO AND 
 KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM = 
    (SELECT 
        MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX 
    FROM 
        KK_T_SVC_KEI_UCWK KK0161_GENE 
    WHERE 
        KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO 
        AND KK0161_GENE.RSV_APLY_YMD <= ? 
        AND KK0161_GENE.RSV_APLY_CD = '2' 
        AND KK0161_GENE.MK_FLG = '0') 
INNER JOIN 
KK_T_SVC_KEI KK0081 
ON 
KK0161.SVC_KEI_NO = KK0081.SVC_KEI_NO AND 
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT 
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
    FROM 
        KK_T_SVC_KEI KK0081_GENE 
    WHERE 
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0081_GENE.RSV_APLY_YMD <= ? 
        AND KK0081_GENE.RSV_APLY_CD = '2' 
        AND KK0081_GENE.MK_FLG = '0') 
INNER JOIN 
        KK_T_KAISEN_TG_SVKEI KK0241 
ON 
        KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0241.KAISEN_UCWK_USE_STAYMD = 
        (SELECT
          MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAXYMD
        FROM
          KK_T_KAISEN_TG_SVKEI KK0241_MAX
        WHERE
          KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
          KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
          KK0241_MAX.MK_FLG = '0') 
INNER JOIN 
        KK_T_SVKEI_KAISEN_UW KK0251 
ON 
        KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO 
        AND KK0251.GENE_ADD_DTM = 
        (SELECT 
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX 
        FROM 
            KK_T_SVKEI_KAISEN_UW KK0251_GENE 
        WHERE 
            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO 
            AND KK0251_GENE.MK_FLG = '0') 
WHERE 
KK1681.IDO_RSV_NO = ? AND 
KK1681.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_262)
#--KKPRC06401
#--分割元、併合元のSYSID取得
#-----------------------------------------------------------

--KEY:KK_SELECT_262

SELECT
    SYSID
FROM
    KK_T_SVC_KEI
WHERE
    SVC_KEI_NO = ? AND
    GENE_ADD_DTM =  (SELECT
                        MAX(GENE_ADD_DTM)
                    FROM
                        KK_T_SVC_KEI
                    WHERE
                        SYSID <> (SELECT
                                        SYSID
                                    FROM
                                        KK_T_SVC_KEI
                                    WHERE
                                        SVC_KEI_NO = ? AND
                                        GENE_ADD_DTM = ?
                                    ) AND
                        GENE_ADD_DTM < ? AND
                        SVC_KEI_NO = ? AND
                        MK_FLG = '0'
                    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_263)
#--KKPRC36601(異動予約情報抽出） 
#--申込明細番号を元にサービス契約番号を取得する。 
#-----------------------------------------------------------

--KEY:KK_SELECT_263

/* KK_T_SVC_KEI.sql KK_SELECT_263 */ SELECT
  KK0081.SVC_KEI_NO
FROM
  KK_T_SVC_KEI KK0081
WHERE
  KK0081.MSKM_DTL_NO = ?
  AND KK0081.RSV_APLY_CD = '2'
  AND KK0081.MK_FLG = '0'
ORDER BY
  KK0081.SVC_STA_YMD DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_007)
#--契約異動検証、一時金生成チェック
#--3-3(1)(A)(b)サービス契約番号（最新）・提供方式契約番号を取得
#-----------------------------------------------------------

--KEY:KV_SELECT_007

SELECT
    KK0081.PCRS_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PPLAN_CD,
    KK0081.SVC_CD,
    KK0081.SYSID,
    KK0081.SVC_KEI_STAT,
    KK0081.TK_HOSHIKI_KEI_NO,
    NVL((SELECT KK0591.PPLAN_NM FROM KK_M_PPLAN KK0591 WHERE KK0591.PPLAN_CD = KK0081.PPLAN_CD AND  KK0591.MK_FLG = '0'),'') AS PPLAN_NM,
    KK0081.PLAN_CHRG_STAYMD,
    KK0081.PLAN_STAYMD,
    KK0081.SHOSA_YMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.MK_FLG = '0' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.MK_FLG = '0'
           AND KK0081_GENE.RSV_APLY_CD = '2')
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_008)
#--サービス契約番号を指定し、検証対象項目を取得する
#-----------------------------------------------------------

--KEY:KV_SELECT_008

SELECT
    KK0081.SVC_KEI_NO AS OUTPUT_NO,
    KK0081.PLAN_CHRG_STAYMD,
    KK0081.PLAN_CHRG_ENDYMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.PLAN_STAYMD,
    KK0081.PLAN_ENDYMD,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_ENDYMD,
    KK0081.SVC_PAUSE_YMD,
    KK0081.SVC_PAUSE_RLS_YMD,
    KK0081.SVC_DSL_YMD,
    KK0081.SVC_PAUSE_CHRG_STA_YMD,
    KK0081.KAIHK_YMD,
    KK0081.SVC_DSL_KISAN_YMD,
    KK0081.ADD_UNYO_YMD,
    KK0081.UPD_UNYO_YMD,
    KK0081.SVC_KEI_STAT AS STATUS,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_DSL_CL_YMD,
    KK0081.SVC_CANCEL_YMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (
        SELECT
            MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_SVC_KEI SVC_KEI_GENE
        WHERE
            SVC_KEI_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND
            SVC_KEI_GENE.IDO_DIV = ?
        AND 
            SVC_KEI_GENE.RSV_APLY_YMD <= ?
        AND 
            SVC_KEI_GENE.RSV_APLY_CD = '2'
        AND
            SVC_KEI_GENE.MK_FLG = '0'
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_009)
#--サービス契約番号を指定し、検証を行う
#-----------------------------------------------------------

--KEY:KV_SELECT_009

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.PLAN_CHRG_ENDYMD = ?
AND
    KK0081.MK_FLG = '0'
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_010)
#--サービス契約番号を指定し、検証を行う
#-----------------------------------------------------------

--KEY:KV_SELECT_010

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.SVC_CHRG_ENDYMD = ?
AND
    KK0081.MK_FLG = '0'
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_011)
#--サービス契約番号を指定し、検証を行う
#-----------------------------------------------------------

--KEY:KV_SELECT_011

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.PLAN_ENDYMD = ?
AND
    KK0081.MK_FLG = '0'
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_012)
#--サービス契約番号を指定し、検証を行う
#-----------------------------------------------------------

--KEY:KV_SELECT_012

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.SVC_ENDYMD = ?
AND
    KK0081.MK_FLG = '0'
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_013)
#--サービス契約、サービス契約内訳から締結済・照査済レコードを取得する。
#-----------------------------------------------------------

--KEY:KV_SELECT_013

SELECT
  KK0081.SYSID,
  KK0081.SVC_KEI_NO,
  ''  AS SVC_KEI_UCWK_NO,
  KK0081.PRC_GRP_CD,
  KK0081.PCRS_CD,
  KK0081.PPLAN_CD,
  KK0081.SHOSA_YMD,
  KK0081.KEI_CNC_YMD AS CNC_YMD,
  KK0791.PCRS_SBT_CD
FROM KK_T_SVC_KEI KK0081
 INNER JOIN KK_M_PCRS KK0791
 ON KK0791.PCRS_CD  = KK0081.PCRS_CD
WHERE KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM   KK_T_SVC_KEI KK0081_GENE
     WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND  KK0081_GENE.RSV_APLY_YMD <= ?
       AND  KK0081_GENE.RSV_APLY_CD = '2'
       AND  KK0081_GENE.MK_FLG = '0')
       AND  KK0081.SVC_KEI_STAT IN ('020','030')
       AND  KK0081.PRC_GRP_CD IN ('02','03','11')
UNION ALL
SELECT
  ''  AS SYSID,
  KK0161.SVC_KEI_NO,
  KK0161.SVC_KEI_UCWK_NO,
  ''  AS PRC_GRP_CD,
  KK0161.PCRS_CD,
  KK0161.PPLAN_CD,
  KK0161.SHOSA_YMD,
  KK0161.KEI_CNC_YMD AS CNC_YMD,
  KK0791.PCRS_SBT_CD  
FROM KK_T_SVC_KEI_UCWK KK0161
 INNER JOIN KK_T_SVC_KEI KK0081
 ON KK0081.SVC_KEI_NO = KK0161.SVC_KEI_NO
 INNER JOIN KK_M_PCRS KK0791
 ON KK0791.PCRS_CD  = KK0081.PCRS_CD AND
 KK0791.PCRS_SBT_CD = '1'
WHERE KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM = 
    (SELECT MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
     FROM   KK_T_SVC_KEI_UCWK KK0161_GENE
     WHERE  KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
       AND  KK0161_GENE.RSV_APLY_YMD <= ?
       AND  KK0161_GENE.RSV_APLY_CD = '2'
       AND  KK0161_GENE.MK_FLG = '0')
       AND  KK0161.SVC_KEI_UCWK_STAT IN ('020','030')
       AND  KK0081.PRC_GRP_CD <> '10'
       AND  KK0161.IDO_DIV = '00018'
UNION ALL
SELECT
  ''  AS SYSID,
  KK0161.SVC_KEI_NO,
  KK0161.SVC_KEI_UCWK_NO,
  KK0081.PRC_GRP_CD  AS PRC_GRP_CD,
  KK0161.PCRS_CD,
  KK0161.PPLAN_CD,
  KK0161.SHOSA_YMD,
  KK0161.KEI_CNC_YMD AS CNC_YMD,
  KK0791.PCRS_SBT_CD  
FROM KK_T_SVC_KEI_UCWK KK0161
 INNER JOIN KK_T_SVC_KEI KK0081
 ON KK0081.SVC_KEI_NO = KK0161.SVC_KEI_NO
 INNER JOIN KK_M_PCRS KK0791
 ON KK0791.PCRS_CD  = KK0081.PCRS_CD
 AND KK0791.PCRS_SBT_CD = '2'
WHERE KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM = 
    (SELECT MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
     FROM   KK_T_SVC_KEI_UCWK KK0161_GENE
     WHERE  KK0161_GENE.SVC_KEI_UCWK_NO = KK0161.SVC_KEI_UCWK_NO
       AND  KK0161_GENE.RSV_APLY_YMD <= ?
       AND  KK0161_GENE.RSV_APLY_CD = '2'
       AND  KK0161_GENE.MK_FLG = '0')
       AND  KK0161.SVC_KEI_UCWK_STAT IN ('020','030')
       AND  KK0081.PRC_GRP_CD = '10'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_014)
#--サービス契約番号を基に、機器提供サービス契約番号を取得する。
#-----------------------------------------------------------

--KEY:KV_SELECT_014

SELECT
    KK0081.SYSID,
    KK0081.SVC_KEI_NO,
    KK0341.SVC_KEI_UCWK_NO,
    KK0341.KKTK_SVC_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SHOSA_YMD,
    KK0081.KEI_CNC_YMD AS CNC_YMD,
    KK0341.TAKNKIKI_SBT_CD
FROM 
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_KKTK_SVC_KEI KK0341
     ON KK0341.OYA_KEI_SKBT_CD = '01' 
    AND KK0081.SVC_KEI_NO = KK0341.SVC_KEI_NO
    AND KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM =
       (SELECT MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
        FROM   KK_T_KKTK_SVC_KEI KK0341_GENE
        WHERE  KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO AND
               KK0341_GENE.RSV_APLY_YMD <= ? AND
               KK0341_GENE.RSV_APLY_CD = '2' AND
               KK0341_GENE.MK_FLG = '0')
    AND KK0341.TAKNKIKI_SBT_CD IN ('H0','J0')
WHERE
    KK0081.PRC_GRP_CD IN ('08','09')
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
               KK0081_GENE.RSV_APLY_YMD <= ? AND
               KK0081_GENE.RSV_APLY_CD = '2' AND
               KK0081_GENE.MK_FLG = '0')
       AND  KK0081.SVC_KEI_STAT = '030'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_015)
#--KVPRC00201(消去処理検証ツール） 
#--PPP認証ＩＤをキーに、サービス契約情報を取得する
#-----------------------------------------------------------

--KEY:KV_SELECT_015

SELECT KK0081.SVC_KEI_STAT AS STATUS
      ,KK0081.SVC_ENDYMD AS SVC_ENDYMD
      ,KK0081.PLAN_ENDYMD AS PLAN_ENDYMD
      ,KK0081.SVC_CANCEL_YMD AS SVC_CANCEL_YMD
      ,KK0081.SVC_DSL_YMD AS SVC_DSL_YMD
      ,KK0081.IDO_DIV AS IDO_DIV
      ,KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM AS SVCTK_BUT_DEL_TRN_JSSI_DTM
      ,KK0081.SVC_KEI_NO AS SVKEI_NO
  FROM KK_T_SVC_KEI KK0081
 INNER JOIN KK_T_SVC_KEI_EOH_TEL KK0111
    ON KK0081.SVC_KEI_NO = KK0111.SVC_KEI_NO
   AND KK0081.GENE_ADD_DTM = KK0111.GENE_ADD_DTM
 WHERE KK0111.PPP_NINSHO_ID = ?
   AND KK0111.MK_FLG = '0'
   AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
       (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
          FROM KK_T_SVC_KEI KK0081_GENE
         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2'
           AND KK0081_GENE.MK_FLG = '0'
         GROUP BY KK0081_GENE.SVC_KEI_NO
        )
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_016)
#--サービス契約から、料金グループコードが"ｅｏモバイル（Ｗｉ－Ｆｉ）"、または、料金コースコードが"ＷｉＭＡＸ　４０Ｍ　通常"のものを取得する。
#-----------------------------------------------------------

--KEY:KV_SELECT_016

SELECT
  KK0081.SYSID,
  KK0081.SVC_KEI_NO,
  ''  AS SVC_KEI_UCWK_NO,
  KK0081.PRC_GRP_CD,
  KK0081.PCRS_CD,
  KK0081.PPLAN_CD,
  KK0081.SHOSA_YMD,
  KK0081.KEI_CNC_YMD AS CNC_YMD,
  KK0081.SVC_KEI_STAT
FROM KK_T_SVC_KEI KK0081
WHERE KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM   KK_T_SVC_KEI KK0081_GENE
     WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND  KK0081_GENE.RSV_APLY_YMD <= ?
       AND  KK0081_GENE.RSV_APLY_CD = '2'
       AND  KK0081_GENE.MK_FLG = '0')
       AND  ( KK0081.PRC_GRP_CD = '07' OR KK0081.PCRS_CD = 'A28' )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_017)
#--割賦契約割引に対応するサービス契約が正しく適用されているかを判定する
#-----------------------------------------------------------

--KEY:KV_SELECT_017

SELECT  KK0081.PRC_GRP_CD,
        KK0321_SVC.SEIKY_KEI_NO
FROM    ( SELECT  KK0081.SVC_KEI_NO,
                  KK0081.PRC_GRP_CD
          FROM    KK_T_SVC_KEI  KK0081
          WHERE   KK0081.SVC_KEI_NO = ?
            AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                                 FROM    KK_T_SVC_KEI  KK0081_GENE
                                                                 WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                                   AND   KK0081_GENE.RSV_APLY_YMD <= ?
                                                                   AND   KK0081_GENE.RSV_APLY_CD = '2'
                                                                   AND   KK0081_GENE.MK_FLG = '0'
                                                               )
        ) KK0081
LEFT  JOIN KK_T_KAKINS KK0321_SVC    ON  KK0081.SVC_KEI_NO         = KK0321_SVC.SVC_KEI_NO
WHERE    KK0321_SVC.KAKINS_TSTAYMD <= ?
AND      KK0321_SVC.KAKINS_TENDYMD >= ?
AND      KK0321_SVC.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_018)
#--ハイブリッド割引適用のお客様に紐付くハイブリッド割引以外の契約を取得する
#-----------------------------------------------------------

--KEY:KV_SELECT_018

SELECT  KK0081.SVC_KEI_NO
FROM  ( SELECT  KK0081.SVC_KEI_NO,
                KK0081.SYSID
        FROM    KK_T_SVC_KEI  KK0081
        WHERE   KK0081.SVC_KEI_NO = ?
          AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                               FROM    KK_T_SVC_KEI  KK0081_GENE
                                                               WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                                 AND   KK0081_GENE.RSV_APLY_YMD <= ?
                                                                 AND   KK0081_GENE.RSV_APLY_CD = '2'
                                                                 AND   KK0081_GENE.MK_FLG = '0'
                                                             )
      ) KK0081_BASE
INNER JOIN ( SELECT  KK0081.SYSID
             FROM    KK_T_SVC_KEI  KK0081
             WHERE   NVL(KK0081.PPLAN_CD , ' ') = ?
               AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                                    FROM    KK_T_SVC_KEI  KK0081_GENE
                                                                    WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                                      AND   KK0081_GENE.RSV_APLY_YMD <= ?
                                                                      AND   KK0081_GENE.RSV_APLY_CD = '2'
                                                                      AND   KK0081_GENE.MK_FLG = '0'
                                                                  )
      ) KK0081_HYBRID  ON  KK0081_BASE.SYSID              = KK0081_HYBRID.SYSID
INNER JOIN ( SELECT  KK0081.SVC_KEI_NO,
                     KK0081.SYSID
             FROM    KK_T_SVC_KEI  KK0081
             WHERE   NVL(KK0081.PPLAN_CD , ' ') != ?
               AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                                    FROM    KK_T_SVC_KEI  KK0081_GENE
                                                                    WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                                      AND   KK0081_GENE.RSV_APLY_YMD <= ?
                                                                      AND   KK0081_GENE.RSV_APLY_CD = '2'
                                                                      AND   KK0081_GENE.MK_FLG = '0'
                                                                  )
      ) KK0081  ON  KK0081_BASE.SYSID              = KK0081.SYSID

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_019)
#--ネットのサービス契約が照査済以降（解約・キャンセルを除く）の場合の日付を取得する
#-----------------------------------------------------------

--KEY:KV_SELECT_019

SELECT MAX(KK0081.SHOSA_YMD) AS SHOSA_YMD,
       MAX(KK0081.KEI_CNC_YMD) AS KEI_CNC_YMD,
       MAX(KK0081.SVC_STA_YMD) AS SVC_STA_YMD
FROM   KK_T_SVC_KEI KK0081
INNER JOIN KK_T_WRISVC_TG_KEI KK0481 ON KK0481.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                        KK0481.WRIB_SVC_KEI_NO = ? AND
                                        KK0481.GENE_ADD_DTM = ( SELECT  MAX(KK0481_GENE.GENE_ADD_DTM) AS KK0481_GENE_MAX
                                                                FROM    KK_T_WRISVC_TG_KEI KK0481_GENE
                                                                WHERE   KK0481_GENE.WRIB_SVC_KEI_NO = KK0481.WRIB_SVC_KEI_NO
                                                                AND     KK0481_GENE.WRIB_SVC_TRGT_KEI_NO = KK0481.WRIB_SVC_TRGT_KEI_NO
                                                                AND     ? BETWEEN KK0481_GENE.WRISVC_TG_KEI_TSTAYMD AND KK0481_GENE.WRISVC_TG_KEI_TENDYMD
                                                                AND     KK0481_GENE.MK_FLG = '0')
INNER JOIN KK_M_PRC_GRP KK0781 ON KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD AND
                                  KK0781.EO_BRAND_CD = ? AND
                                  KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM = ( SELECT  MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
                                                                                 FROM    KK_M_PRC_GRP KK0781_GENE
                                                                                 WHERE   KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
                                                                                 AND     KK0781_GENE.RSV_APLY_YMD <= ?
                                                                                 AND     KK0781_GENE.MK_FLG = '0')
WHERE  KK0081.SVC_KEI_STAT IN ('020' , '030' , '100')
AND    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( SELECT  MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
                                                      FROM    KK_T_SVC_KEI KK0081_G
                                                      WHERE   KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                      AND     KK0081_G.RSV_APLY_YMD <= ?
                                                      AND     KK0081_G.RSV_APLY_CD = '2'
                                                      AND     KK0081_G.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_020)
#--各種サービス契約のサービス開始日・サービス課金開始日を取
#--得する
#-----------------------------------------------------------

--KEY:KV_SELECT_020

SELECT MAX(KK0081.SVC_STA_YMD) AS SVC_STA_YMD,
       MAX(KK0081.SVC_CHRG_STAYMD) AS SVC_CHRG_STAYMD
FROM   KK_T_SVC_KEI KK0081
INNER JOIN KK_T_WRISVC_TG_KEI KK0481 ON KK0481.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                        KK0481.WRIB_SVC_KEI_NO =? AND
                                        KK0481.GENE_ADD_DTM = ( SELECT  MAX(KK0481_GENE.GENE_ADD_DTM) AS KK0481_GENE_MAX
                                                                FROM    KK_T_WRISVC_TG_KEI KK0481_GENE
                                                                WHERE   KK0481_GENE.WRIB_SVC_KEI_NO = KK0481.WRIB_SVC_KEI_NO
                                                                AND     KK0481_GENE.WRIB_SVC_TRGT_KEI_NO = KK0481.WRIB_SVC_TRGT_KEI_NO
                                                                AND     ? BETWEEN KK0481_GENE.WRISVC_TG_KEI_TSTAYMD AND KK0481_GENE.WRISVC_TG_KEI_TENDYMD
                                                                AND     KK0481_GENE.MK_FLG = '0')
INNER JOIN KK_M_PRC_GRP KK0781 ON KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD AND
                                  KK0781.EO_BRAND_CD = ? AND
                                  KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM = ( SELECT  MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
                                                                                 FROM    KK_M_PRC_GRP KK0781_GENE
                                                                                 WHERE   KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
                                                                                 AND     KK0781_GENE.RSV_APLY_YMD <= ?
                                                                                 AND     KK0781_GENE.MK_FLG = '0')
WHERE  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( SELECT  MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
                                                      FROM    KK_T_SVC_KEI KK0081_G
                                                      WHERE   KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                      AND     KK0081_G.RSV_APLY_YMD <= ?
                                                      AND     KK0081_G.RSV_APLY_CD = '2'
                                                      AND     KK0081_G.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_021)
#--ハイブリッド割引に対応するサービス契約が正しく適用されているかを判定する
#-----------------------------------------------------------

--KEY:KV_SELECT_021

SELECT  KK0081.PRC_GRP_CD,
        KK0321_SVC.SEIKY_KEI_NO
FROM    ( SELECT  KK0081.SVC_KEI_NO,
                  KK0081.PRC_GRP_CD
          FROM    KK_T_SVC_KEI  KK0081
          WHERE   KK0081.SYSID = ?
            AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                                 FROM    KK_T_SVC_KEI  KK0081_GENE
                                                                 WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                                   AND   KK0081_GENE.RSV_APLY_YMD <= ?
                                                                   AND   KK0081_GENE.RSV_APLY_CD = '2'
                                                                   AND   KK0081_GENE.MK_FLG = '0'
                                                               )
        ) KK0081
INNER JOIN KK_M_PRC_GRP KK0781 ON KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD AND
                                  KK0781.EO_BRAND_CD = ? AND
                                  KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM = ( SELECT  MAX(KK0781_GENE.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
                                                                                 FROM    KK_M_PRC_GRP KK0781_GENE
                                                                                 WHERE   KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
                                                                                 AND     KK0781_GENE.RSV_APLY_YMD <= ?
                                                                                 AND     KK0781_GENE.MK_FLG = '0')
LEFT  JOIN KK_T_KAKINS KK0321_SVC    ON  KK0081.SVC_KEI_NO         = KK0321_SVC.SVC_KEI_NO
WHERE    KK0321_SVC.KAKINS_TSTAYMD <= ?
AND      KK0321_SVC.KAKINS_TENDYMD >= ?
AND      KK0321_SVC.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_022)
#--配送日付チェック。料金グループＣＤ電話データ取得
#-----------------------------------------------------------

--KEY:KV_SELECT_022

SELECT DISTINCT
    KK0081.SYSID,
    KK0081.SVC_KEI_NO,
    KK0161.SVC_KEI_UCWK_NO,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SHOSA_YMD,
    KK0081.KEI_CNC_YMD AS CNC_YMD,
    KK0161.SVC_KEI_UCWK_STAT ,
    KK0161.GENE_ADD_DTM,
    KK0161.RSV_APLY_YMD
FROM
    KK_T_SVC_KEI_UCWK KK0161 ,
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = KK0161.SVC_KEI_NO  AND
    KK0081.PRC_GRP_CD IN ('10')  AND
    KK0161.SVC_KEI_UCWK_STAT IN ('030')  AND
    KK0161.RSV_APLY_CD = '2'   AND
    KK0161.MK_FLG = '0'  AND
    KK0161.RSV_APLY_YMD || KK0161.GENE_ADD_DTM =  (SELECT
                                                        MAX(KK0161_GENE.RSV_APLY_YMD || KK0161_GENE.GENE_ADD_DTM) AS KK0161_MAX
                                                    FROM
                                                        KK_T_SVC_KEI_UCWK KK0161_GENE
                                                    WHERE
                                                        KK0081.SVC_KEI_NO = KK0161_GENE.SVC_KEI_NO  AND
                                                        KK0161_GENE.RSV_APLY_YMD <= ?   AND
                                                        KK0161_GENE.RSV_APLY_CD = '2'   AND
                                                        KK0161_GENE.MK_FLG = '0'
                                                    )                 AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                    FROM
                                                        KK_T_SVC_KEI  KK0081_GENE
                                                    WHERE
                                                        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO  AND
                                                        KK0081_GENE.RSV_APLY_YMD <= ?               AND
                                                        KK0081_GENE.RSV_APLY_CD = '2'               AND
                                                        KK0081_GENE.MK_FLG = '0'
                                                    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_275)
#--サービス契約番号を元にカレントの情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_275

SELECT
    SVC_KEI.PRC_GRP_CD,
    SVC_KEI.PCRS_CD,
    SVC_KEI.PPLAN_CD,
    SVC_KEI.SVC_STA_YMD,
    SVC_KEI.SHK_DFLT_PWD,
    SVC_KEI.SVC_CD,
    SVC_KEI.SEIRI_NO,
    SVC_KEI.SVC_KEI_NO,
    SVC_KEI.SVC_USE_STA_KIBO_YMD,
    SVC_KEI.SVC_KEI_STAT,
    SVC_KEI.SVC_ENDYMD,
    SVC_KEI.SVC_DSL_YMD
FROM KK_T_SVC_KEI SVC_KEI
WHERE SVC_KEI.SVC_KEI_NO = ?
AND   SVC_KEI.RSV_APLY_YMD || SVC_KEI.GENE_ADD_DTM = (
  SELECT MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS SVC_KEI_MAX
  FROM   KK_T_SVC_KEI SVC_KEI_GENE
  WHERE  SVC_KEI_GENE.SVC_KEI_NO = SVC_KEI.SVC_KEI_NO
  AND    SVC_KEI_GENE.RSV_APLY_YMD <= ?
  AND    SVC_KEI_GENE.RSV_APLY_CD = '2'
  AND    SVC_KEI_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_276)
#--KKPRC00923
#--機器オプションサービス契約開始登録実行
#-----------------------------------------------------------

--KEY:KK_SELECT_276

SELECT
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.PLAN_STAYMD,
    KK0081.PLAN_CHRG_STAYMD,
    KK0081.IDO_DIV,
    KK0081.MSKM_DTL_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.SVC_KEI_STAT = '100'
    AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            KK0081_GENE.SVC_KEI_NO,MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0'
        GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_277)
#--KKPRC00905
#--電波障害案件より初期住人支払料金額を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_277

SELECT
    KK0101.DMPS_ANKEN_NO,
    KK0581.SHK_JUNIN_PAY_PRC_AMNT
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_SVC_KEI_EOH_TV KK0101
ON
    KK0081.SVC_KEI_NO = KK0101.SVC_KEI_NO AND
    KK0081.GENE_ADD_DTM = KK0101.GENE_ADD_DTM AND
    KK0101.MK_FLG = '0'
INNER JOIN
    KK_T_DMPS_ANKEN KK0581
ON
    KK0101.DMPS_ANKEN_NO = KK0581.DMPS_ANKEN_NO AND
    KK0581.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ? AND
   (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
   (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
    FROM KK_T_SVC_KEI KK0081_GENE 
    WHERE KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)

#-


#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_278)
#--KKPRC10305
#--番ポなし番号事前通知情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_278

SELECT   KK0081.SVC_KEI_NO,
         KK0081.RSV_APLY_YMD,
         KK0081.GENE_ADD_DTM,
         KK0081.RSV_APLY_CD,
         KK0081.MK_FLG,
         KK0081.SYSID,
         KK0081.SVC_CD,
         KK0081.PRC_GRP_CD,
         KK0081.PCRS_CD,
         KK0081.PPLAN_CD,
         KK0081.IDO_DIV,
         KK0081.MSKM_DTL_NO,
         KK0081.SVC_KEI_STAT,
         KK0081.TK_HOSHIKI_KEI_NO
FROM    (SELECT   KK0081.SVC_KEI_NO,
                  KK0081.RSV_APLY_YMD,
                  KK0081.GENE_ADD_DTM,
                  KK0081.RSV_APLY_CD,
                  KK0081.MK_FLG,
                  KK0081.SYSID,
                  KK0081.SVC_CD,
                  KK0081.PRC_GRP_CD,
                  KK0081.PCRS_CD,
                  KK0081.PPLAN_CD,
                  KK0081.IDO_DIV,
                  KK0081.MSKM_DTL_NO,
                  KK0081.SVC_KEI_STAT,
                  KK0081.TK_HOSHIKI_KEI_NO,
                  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM AS GENE_DTM,
                  MAX(KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) OVER (PARTITION BY KK0081.SVC_KEI_NO) AS MAX_GENE_DTM
         FROM     KK_T_SVC_KEI KK0081
         WHERE    KK0081.SVC_KEI_NO = ?
         AND      KK0081.RSV_APLY_CD = '2'
         AND      KK0081.RSV_APLY_YMD <= ?
         AND      KK0081.MK_FLG = '0') KK0081
WHERE    KK0081.GENE_DTM = KK0081.MAX_GENE_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_279)
#--KKPRC10305
#--最古の申込明細番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_279

SELECT   KK0081.MSKM_DTL_NO
FROM     KK_T_SVC_KEI KK0081
WHERE    KK0081.SVC_KEI_NO = ?
AND      KK0081.RSV_APLY_CD = '2'
AND      KK0081.RSV_APLY_YMD <= ?
AND      KK0081.MK_FLG = '0'
AND      KK0081.MSKM_DTL_NO IS NOT NULL
ORDER BY KK0081.SVC_KEI_NO , KK0081.GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_280)
#--KKPRC00923
#--サービス契約番号から照査年月日を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_280

SELECT
  KK0081.SHOSA_YMD,
  CASE WHEN KK0081.SHOSA_YMD IS NOT NULL THEN
      TO_CHAR(TO_DATE(KK0081.SHOSA_YMD, 'YYYYMMDD') + 10, 'YYYYMMDD') 
  ELSE
      KK0081.SHOSA_YMD
  END AS SHOSA_YMD_ADD10
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_281)
#--KKPRC00909
#--カレント取得
#-----------------------------------------------------------

--KEY:KK_SELECT_281

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.MSKM_DTL_NO,
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SVC_USE_STA_KIBO_YMD,
    KK0081.SVC_STA_YMD,
    KK0081.SHOSA_YMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM
             KK_T_SVC_KEI KK0081_GENE
         WHERE
             KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
             AND KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD = '2'
             AND KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)

#-


#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_282)
#--KKPRC07001
#--サービス契約番号に紐づくサービス契約情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_282

SELECT   KK0081.SVC_KEI_NO,
         KK0081.SVC_KEI_STAT,
         KK0081.SYSID,
         KK0081.PRC_GRP_CD,
         KK0081.PPLAN_CD,
         KK0081.SVC_DLRE_CD,
         KK0081.MSKM_DTL_NO,
         KK0081.SVC_CANCEL_YMD,
         KK0081.TK_HOSHIKI_KEI_NO,
         KK0081.IDO_DIV,
         KK0081.RSV_APLY_YMD
FROM     KK_T_SVC_KEI KK0081
WHERE    KK0081.SVC_KEI_NO = ?
AND     (KK0081.SVC_KEI_NO , KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT   KK0081_GENE.SVC_KEI_NO , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM     KK_T_SVC_KEI KK0081_GENE
         WHERE    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND      KK0081_GENE.RSV_APLY_YMD <= ?
         AND      KK0081_GENE.RSV_APLY_CD = '2'
         AND      KK0081_GENE.MK_FLG = '0'
         GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_283)
#--申込明細番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_283

SELECT   KK0081.MSKM_DTL_NO
FROM     KK_T_SVC_KEI KK0081
WHERE    KK0081.SVC_KEI_NO = ?
AND      KK0081.IDO_DIV = '00019'
AND      KK0081.RSV_APLY_CD = '2'
AND      KK0081.RSV_APLY_YMD <= ?
AND      KK0081.MK_FLG = '0'
AND      KK0081.MSKM_DTL_NO IS NOT NULL
ORDER BY KK0081.SVC_KEI_NO , KK0081.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_284)
#--KKPRC02205
#--サービス契約に紐付くサービス契約回線内訳番号を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_284

SELECT 
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_CD, 
    KK0081.PRC_GRP_CD, 
    KK0081.CHRG_STA_YMD_HOSEI_UM, 
    KK0251.KAISEN_TK_COMP_CD, 
    KK0251.SVC_KEI_KAISEN_UCWK_NO 
FROM 
KK_T_SVC_KEI KK0081 
INNER JOIN 
        KK_T_KAISEN_TG_SVKEI KK0241 
ON 
        KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0241.KAISEN_UCWK_USE_STAYMD = 
        (SELECT
          MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAXYMD
        FROM
          KK_T_KAISEN_TG_SVKEI KK0241_MAX
        WHERE
          KK0241.SVC_KEI_NO = KK0241_MAX.SVC_KEI_NO AND
          KK0241_MAX.KAISEN_UCWK_USE_STAYMD <= ?  AND
          KK0241_MAX.KAISEN_UCWK_USE_ENDYMD >= ?  AND
          KK0241_MAX.MK_FLG = '0') 
INNER JOIN 
        KK_T_SVKEI_KAISEN_UW KK0251 
ON 
        KK0251.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO 
        AND KK0251.GENE_ADD_DTM = 
        (SELECT 
            MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX 
        FROM 
            KK_T_SVKEI_KAISEN_UW KK0251_GENE 
        WHERE 
            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO 
            AND KK0251_GENE.MK_FLG = '0') 
WHERE 
 KK0081.SVC_KEI_NO = ? AND 
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT 
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
    FROM 
        KK_T_SVC_KEI KK0081_GENE 
    WHERE 
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2' 
        AND KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_285)
#--カレントのSYSID・サービス契約ステータス・料金プランコードを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_285

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_KEI_STAT,
    KK0081.PPLAN_CD,
    KK0081_MIN.MSKM_DTL_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN KK_T_SVC_KEI KK0081_MIN
       ON KK0081.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO
      AND KK0081_MIN.GENE_ADD_DTM
            = (SELECT MIN(KK0081_GENE.GENE_ADD_DTM) AS GENE_MIN
                 FROM KK_T_SVC_KEI KK0081_GENE
                WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                  AND KK0081_GENE.RSV_APLY_YMD <= ?
                  AND KK0081_GENE.RSV_APLY_CD = '2'
                  AND KK0081_GENE.MK_FLG = '0')
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(GENE.RSV_APLY_YMD || GENE.GENE_ADD_DTM)
        FROM
            KK_T_SVC_KEI GENE
        WHERE
            GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND GENE.RSV_APLY_YMD <= ?
        AND GENE.RSV_APLY_CD   = '2'
        AND GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_286)
#--加入御礼管理データ抽出
#--指定されたサービス契約に紐づくすべてのサービス契約抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_286

SELECT
    KK0081.RSV_APLY_YMD,
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.MSKM_DTL_NO,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SKEKKA_CD,
    KK0081.SKEKKA_SEND_CD,
    KK0081.PAYWAY_KEIZOKU_FLG,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.IDO_DIV,
    KK0081.MENKAIHAT_ANKEN_NO,
    KK0081.SHOSA_DSL_FIN_CD,
    KK0081.SHOSA_YMD,
    KK0081.TK_HOSHIKI_KEI_NO
FROM  KK_T_SVC_KEI KK0081
WHERE (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
  SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_YMD <= ?
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO)
AND KK0081.SVC_KEI_NO = ?
AND KK0081.SKEKKA_SEND_CD <> '3'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_288)
#--料金インターフェイス共通処理
#--従属契約の連携情報に付与する基本契約の情報を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_288

SELECT SVC.SVC_KEI_NO,
       SVC.SEIRI_NO,
       SVC.SVC_CD,
       SVC.PRC_GRP_CD,
       SVC.PCRS_CD,
       SVC.PPLAN_CD,
       SVC.PLAN_CHRG_STAYMD,
       SVC.PLAN_CHRG_ENDYMD,
       SVC.GENE_ADD_DTM,
       SVC.SVC_DSL_YMD,
       SVC.SVC_CHRG_ENDYMD,
       SVC.SVC_DLRE_CD,
       SVC.TK_HOSHIKI_KEI_NO,
       SVC.PNLTY_HASSEI_CD
FROM       (SELECT SVC_SUB.SVC_KEI_NO,
                   SVC_SUB.SEIRI_NO,
                   SVC_SUB.SVC_CD,
                   SVC_SUB.PRC_GRP_CD,
                   SVC_SUB.PCRS_CD,
                   SVC_SUB.PPLAN_CD,
                   SVC_SUB.PLAN_CHRG_STAYMD,
                   SVC_SUB.PLAN_CHRG_ENDYMD,
                   SVC_SUB.GENE_ADD_DTM,
                   SVC_SUB.SVC_DSL_YMD,
                   SVC_SUB.SVC_CHRG_ENDYMD,
                   SVC_SUB.SVC_DLRE_CD,
                   SVC_SUB.TK_HOSHIKI_KEI_NO,
                   SVC_SUB.PNLTY_HASSEI_CD,
                   ROW_NUMBER() OVER (PARTITION BY SVC_KEI_NO, SVC_CD, PRC_GRP_CD, PCRS_CD, PPLAN_CD ORDER BY RSV_APLY_YMD DESC, GENE_ADD_DTM DESC) AS ROW_NUM,
                   ROW_NUMBER() OVER (PARTITION BY SVC_KEI_NO, SVC_CD, PRC_GRP_CD, PCRS_CD, PPLAN_CD ORDER BY GENE_ADD_DTM ASC) AS ROW_NUM_MIN
            FROM   KK_T_SVC_KEI SVC_SUB
            WHERE  SVC_SUB.SVC_KEI_NO = ?
              AND  SVC_SUB.KEI_CNC_YMD IS NOT NULL
              AND  SVC_SUB.RSV_APLY_YMD <= ?
              AND  SVC_SUB.RSV_APLY_CD = ?
              AND  SVC_SUB.MK_FLG = '0'
           ) SVC
WHERE SVC.ROW_NUM = 1
OR   (SVC.PLAN_CHRG_STAYMD <= SVC.PLAN_CHRG_ENDYMD
      AND SVC.PLAN_CHRG_ENDYMD >= ?
      AND SVC.PLAN_CHRG_ENDYMD <> '20991231')
OR    SVC.ROW_NUM_MIN = 1
ORDER BY
      SVC.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_291)
#--KKPRC51501_E-PON→GE-PON設備切替工事情報作成処理
#--KKPRC67101_ONU計画交換工事一括立ち上げ登録
#--指定されたサービス契約番号のカレント取得
#-----------------------------------------------------------

--KEY:KK_SELECT_291

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    (SELECT KK2111.LAST_UPD_DTM FROM KK_T_SVKEI_EXC_CTRL KK2111 
     WHERE KK2111.SVC_KEI_NO = KK0081.SVC_KEI_NO AND KK2111.MK_FLG = '0') AS LAST_UPD_DTM
FROM  KK_T_SVC_KEI KK0081
WHERE (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
  SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_YMD <= ?
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO)
AND KK0081.SVC_KEI_NO = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_292)
#--KKPRC51501_E-PON→GE-PON設備切替工事情報作成処理
#--電話契約と同一回線利用中のネット契約（ホームタイプ）の取得
#-----------------------------------------------------------

--KEY:KK_SELECT_292

SELECT COUNT(KK0081.SVC_KEI_NO) AS CNT
FROM KK_T_SVC_KEI KK0081 
INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241 ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
WHERE KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
   AND KK0081.PRC_GRP_CD = '02'
   AND KK0081.SVC_KEI_STAT NOT IN('910','920')
   AND KK0081.SVC_KEI_NO <> ?
   AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
          SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0'
          GROUP BY KK0081_GENE.SVC_KEI_NO)
   AND KK0241.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_290)
#--サービス契約締結対象取得（KKPRC00907）
#--照査済みのデータを抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_290

SELECT KK0081.SVC_KEI_NO,
       KK0081.SHOSA_YMD,
       (SELECT KK0241.SVC_KEI_KAISEN_UCWK_NO
          FROM KK_T_KAISEN_TG_SVKEI KK0241
         WHERE KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0241.KAISEN_UCWK_USE_ENDYMD = '20991231'
           AND KK0241.KAISEN_UCWK_USE_STAYMD
                 = (SELECT MAX(KK0241_MAX.KAISEN_UCWK_USE_STAYMD) MX
                      FROM KK_T_KAISEN_TG_SVKEI KK0241_MAX
                     WHERE KK0241_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO
                       AND KK0241_MAX.MK_FLG = '0')) SVC_KEI_KAISEN_UCWK_NO,
       KK0081.SVC_CD,
       KK0081.PRC_GRP_CD,
       KK0081.TK_HOSHIKI_KEI_NO,
       KK0081_MIN.IDO_DIV,
       KK0081_MIN.MSKM_DTL_NO,
       KK0081.PCRS_CD
  FROM KK_T_SVC_KEI KK0081
       INNER JOIN KK_T_SVC_KEI KK0081_MIN
               ON KK0081.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO
              AND KK0081_MIN.GENE_ADD_DTM
                    = (SELECT MIN(KK0081_GENE.GENE_ADD_DTM) AS GENE_MIN
                         FROM KK_T_SVC_KEI KK0081_GENE
                        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                          AND KK0081_GENE.RSV_APLY_YMD <= ?
                          AND KK0081_GENE.RSV_APLY_CD = '2'
                          AND KK0081_GENE.MK_FLG = '0')
 WHERE KK0081.SVC_KEI_STAT = '020'
   AND KK0081.SVC_CD NOT IN ('51','05')
   AND KK0081.SHOSA_DSL_FIN_CD = '1'
   AND KK0081.SHOSA_YMD IS NOT NULL
   AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM
        = (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
             FROM KK_T_SVC_KEI KK0081_GENE
            WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
              AND KK0081_GENE.RSV_APLY_YMD <= ?
              AND KK0081_GENE.RSV_APLY_CD = '2'
              AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_293)
#--KKPRC41301
#--お客様登録のコンテンツ情報設定条件取得
#-----------------------------------------------------------

--KEY:KK_SELECT_293

SELECT
 KK0081.SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SYSID = ? AND
 KK0081.SVC_CD = ? AND
 KK0081.PRC_GRP_CD = ? AND
 KK0081.PCRS_CD = ? AND
 KK0081.SVC_KEI_STAT = ? AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD = '2'
   AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_295)
#--KKPRC41301
#--サービス契約番号に紐付くカレントのステイタスとMINの異動区分を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_295

SELECT
    KK0081.SVC_KEI_STAT, KK0081_MIN.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN 
    (SELECT
            KK0081.SVC_KEI_NO, KK0081.IDO_DIV
        FROM
            KK_T_SVC_KEI KK0081
        WHERE
            KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT
                MIN(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
             FROM
                KK_T_SVC_KEI KK0081_GENE
             WHERE
                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                KK0081_GENE.RSV_APLY_YMD <= ? AND
                KK0081_GENE.RSV_APLY_CD = '2' AND
                KK0081_GENE.MK_FLG = '0')
        ) KK0081_MIN
ON  KK0081.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO
WHERE
    KK0081.SVC_KEI_NO = ? 
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM
        KK_T_SVC_KEI KK0081_GENE
     WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_296)
#--カレントのSYSID・サービス契約ステータス・サービス・料金グループ・料金コース・料金プランを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_296

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(GENE.RSV_APLY_YMD || GENE.GENE_ADD_DTM)
        FROM
            KK_T_SVC_KEI GENE
        WHERE
            GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND GENE.RSV_APLY_YMD <= ?
        AND GENE.RSV_APLY_CD   = '2'
        AND GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_297)
#--サービス契約番号を元に最新の異動区分を抽出する。(プラン変更時の復活分)
#-----------------------------------------------------------

--KEY:KK_SELECT_297

SELECT   KK0081.IDO_DIV
FROM     KK_T_SVC_KEI KK0081
WHERE    KK0081.SVC_KEI_NO = ?
AND     (KK0081.SVC_KEI_NO , KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT   KK0081_GENE.SVC_KEI_NO , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM     KK_T_SVC_KEI KK0081_GENE
         WHERE    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND      KK0081_GENE.RSV_APLY_YMD <= ?
         AND      KK0081_GENE.RSV_APLY_CD = '2'
         AND      KK0081_GENE.MK_FLG = '0'
         GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_298)
#--サービス契約番号を元に最新の異動区分を抽出する。(プラン変更時の付替分)
#-----------------------------------------------------------

--KEY:KK_SELECT_298

SELECT   KK0081.IDO_DIV
FROM     KK_T_SVC_KEI KK0081
WHERE    KK0081.SVC_KEI_NO = ?
AND     (KK0081.SVC_KEI_NO , KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT   KK0081_GENE.SVC_KEI_NO , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM     KK_T_SVC_KEI KK0081_GENE
         WHERE    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND      KK0081_GENE.RSV_APLY_YMD <= ?
         AND      KK0081_GENE.RSV_APLY_CD = '2'
         AND      KK0081_GENE.MK_FLG = '0'
         GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_023)
#--契約異動検証_機器出荷一時金生成チェック
#--(2)-(B)-(c)
#-----------------------------------------------------------

--KEY:KV_SELECT_023

SELECT
     KK0081.SVC_KEI_NO
     ,KK0081.SVC_STA_YMD
FROM
     KK_T_SVC_KEI KK0081
     ,KK_T_KAISEN_TG_SVKEI KK0241
WHERE
     KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
AND  KK0081.SVC_CD IN ('01', '02')
AND  KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
AND  KK0241.MK_FLG = '0'
AND
    (
     KK0081.SVC_KEI_NO,
     KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM
    ) =
    (
     SELECT
            KK0081_GENE.SVC_KEI_NO
            ,MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
     FROM
            KK_T_SVC_KEI KK0081_GENE
     WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND    KK0081_GENE.RSV_APLY_YMD <= ?
     AND    KK0081_GENE.RSV_APLY_CD = '2'
     AND    KK0081_GENE.MK_FLG = '0'
     GROUP BY KK0081_GENE.SVC_KEI_NO
    )
ORDER BY KK0081.SVC_STA_YMD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_024)
#--サービス契約(ネット系)の取得
#-----------------------------------------------------------

--KEY:KV_SELECT_024

SELECT  KK0081.SVC_KEI_NO,      /* サービス契約.サービス契約番号 */
        KK0081.SYSID,           /* サービス契約.SYSID */
        KK0081.SVC_KEI_STAT,    /* サービス契約.サービス契約ステータス */
        KK0081.SVC_STA_YMD,     /* サービス契約.サービス開始年月日 */
        KK0081.SVC_CHRG_STAYMD, /* サービス契約.サービス課金開始年月日 */
        KK0081.SVC_CHRG_ENDYMD, /* サービス契約.サービス課金終了年月日 */
        KK0081.IDO_DIV,         /* サービス契約.異動区分 */
        KK0081.ADD_UNYO_YMD,    /* サービス契約.登録運用年月日 */
        KK0081.ADD_TRN_ID,      /* サービス契約.登録処理ID */
        KK0081.UPD_UNYO_YMD,    /* サービス契約.更新運用年月日 */
        KK0081.UPD_TRN_ID,      /* サービス契約.更新処理ID */
        KK0081.DEL_UNYO_YMD,    /* サービス契約.削除運用年月日 */
        KK0081.DEL_TRN_ID       /* サービス契約.削除処理ID */
FROM        KK_T_SVC_KEI    KK0081
INNER JOIN  KK_T_KAKINS     KK0321
ON  KK0321.SVC_KEI_NO       = KK0081.SVC_KEI_NO
AND KK0321.KAKINS_TSTAYMD   <= ?
AND KK0321.KAKINS_TENDYMD   >= ?
AND KK0321.MK_FLG       = '0'
WHERE   (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
            SELECT  GENE.SVC_KEI_NO,
                    MAX(GENE.RSV_APLY_YMD || GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
            FROM    KK_T_SVC_KEI GENE
            WHERE   GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND     GENE.RSV_APLY_YMD <= ?
            AND     GENE.RSV_APLY_CD   = '2'
            AND     GENE.MK_FLG = '0'
            AND     KK0081.SVC_CD       IN ('01', '51')
            GROUP BY GENE.SVC_KEI_NO)
AND     KK0081.PRC_GRP_CD   <> '99'
AND     KK0321.SEIKY_KEI_NO = ?
ORDER BY    NVL(KK0081.SVC_STA_YMD, '99999999') /* サービス契約.サービス開始年月日がNULLのレコードは下位に並ぶようにする */

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_025)
#--サービス契約番号に紐付く異動区分の取得
#-----------------------------------------------------------

--KEY:KV_SELECT_025

SELECT
     KK0081.SVC_KEI_NO      /* サービス契約.サービス契約番号 */
    ,KK0081.GENE_ADD_DTM    /* サービス契約.世代登録年月日時分秒 */
    ,KK0081.IDO_DIV         /* サービス契約.異動区分 */
FROM
    KK_T_SVC_KEI    KK0081
WHERE
    KK0081.SVC_KEI_NO   = ?
ORDER BY
    KK0081.GENE_ADD_DTM

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KV_SELECT_026)
#--インターネット、MVNOサービスの契約有無をチェックするために参照する。
#-----------------------------------------------------------

--KEY:KV_SELECT_026

SELECT KK0081.SVC_KEI_NO,
       KK0081.SYSID,
       KK0081.SVC_KEI_STAT,
       KK0081.SVC_CHRG_STAYMD,
       KK0081.SVC_CHRG_ENDYMD,
       KK0081.ADD_UNYO_YMD,
       KK0081.ADD_TRN_ID,
       KK0081.UPD_UNYO_YMD,
       KK0081.UPD_TRN_ID,
       KK0081.DEL_UNYO_YMD,
       KK0081.DEL_TRN_ID
FROM
    KK_T_KAKINS KK0321
    INNER JOIN KK_T_SVC_KEI KK0081
        ON  KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
    KK0321.SEIKY_KEI_NO = ?
AND
    KK0321.MK_FLG = '0'
AND 
 KK0081.PRC_GRP_CD <> '99'
AND
 KK0081.SVC_CD IN ('01', '51')
AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')
ORDER BY KK0081.SVC_STA_YMD

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_299)
#--申込明細番号を元に、サービス契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_299

SELECT KK0081.SVC_KEI_NO
  FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.MSKM_DTL_NO = ?
   AND KK0081.RSV_APLY_YMD <= ?
   AND KK0081.RSV_APLY_CD = '2'
   AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_300)
#--サービス契約番号を元にサービス契約のカレントを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_300

SELECT KK0081.SVC_KEI_NO,
       KK0081.SVC_KEI_STAT,
       KK0081.SVC_CD,
       KK0081.SKEKKA_CD
  FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_NO = ?
   AND (KK0081.SVC_KEI_NO , KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
           (SELECT KK0081_GENE.SVC_KEI_NO , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
              FROM KK_T_SVC_KEI KK0081_GENE
             WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
               AND KK0081_GENE.RSV_APLY_YMD <= ?
               AND KK0081_GENE.RSV_APLY_CD = '2'
               AND KK0081_GENE.MK_FLG = '0'
             GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_301)
#--サービス契約番号を元にサービス契約のSYSID、提供方式契約番号を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_301

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.TK_HOSHIKI_KEI_NO
FROM  KK_T_SVC_KEI KK0081
WHERE (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
  SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM   KK_T_SVC_KEI KK0081_GENE
  WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_GENE.RSV_APLY_YMD <= ?
  AND    KK0081_GENE.RSV_APLY_CD = '2'
  AND    KK0081_GENE.MK_FLG = '0'
  GROUP BY KK0081_GENE.SVC_KEI_NO)
AND KK0081.SVC_KEI_NO = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_302)
#--サービス申込地点のサービス契約番号に紐づく申込明細番号から申込日・申込形態コードを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_302

SELECT     KK0021.MSKM_YMD,
           KK0021.MSKM_FORM_CD
FROM       KK_T_SVC_KEI KK0081
LEFT JOIN  KK_T_MSKM_DTL KK0021 ON
           KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
WHERE      KK0081.SVC_KEI_NO = ?
AND       (KK0081.SVC_KEI_NO , KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
          (SELECT   KK0081_GENE.SVC_KEI_NO , MIN(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
           FROM     KK_T_SVC_KEI KK0081_GENE
           WHERE    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND      KK0081_GENE.RSV_APLY_YMD <= ?
           AND      KK0081_GENE.RSV_APLY_CD = '2'
           AND      KK0081_GENE.MK_FLG = '0'
           GROUP BY KK0081_GENE.SVC_KEI_NO)
AND       (KK0021.MSKM_DTL_NO , KK0021.GENE_ADD_DTM) = 
          (SELECT   KK0021_GENE.MSKM_DTL_NO , MAX(KK0021_GENE.GENE_ADD_DTM)
           FROM     KK_T_MSKM_DTL KK0021_GENE
           WHERE    KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
           AND      KK0021_GENE.MK_FLG = '0'
           GROUP BY KK0021_GENE.MSKM_DTL_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_303)
#--サービス契約番号を元に提供方式コード、マンション物件コードを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_303

SELECT
    KK0891.TK_HOSHIKI_CD,
    KK0861.MANSION_BUKKEN_CD
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN  KK_T_TK_HOSHIKI_KEI KK0891
ON KK0891.TK_HOSHIKI_KEI_NO = KK0081.TK_HOSHIKI_KEI_NO
AND KK0891.MK_FLG = '0'
INNER JOIN KK_T_KAISEN_USE_KEI KK0881
ON KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
AND KK0881.MK_FLG = '0'
INNER JOIN KK_T_OWNR_KEI KK0871
ON KK0871.OWNR_KEI_NO = KK0881.OWNR_KEI_NO
AND KK0871.MK_FLG = '0'
INNER JOIN KK_T_MANSION_BUKKEN KK0861
ON KK0861.MANSION_BUKKEN_NO = KK0871.MANSION_BUKKEN_NO
AND KK0861.MK_FLG = '0'
WHERE (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
    SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) GENE_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO   =  KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD  = '2'
    AND KK0081_GENE.MK_FLG = '0')
AND KK0081.SVC_KEI_NO = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_305)
#--SYSIDに紐付くサービス契約情報とスマートリンクプレミアム有無を抜き出す。
#-----------------------------------------------------------

--KEY:KK_SELECT_305

SELECT /* JBSbatKKCreateECSmartLinkInfo.KK_T_SVC_KEI-KK_SELECT_305 */
  /*+ LEADING(KK0081,CK0011) */
   CK0011.SYSID 
  ,KK0081.SVC_KEI_NO 
  ,KK0081.SVC_KEI_STAT 
  ,KK0081.SVC_CD 
  ,KK0081.PRC_GRP_CD 
  ,KK0081.PPLAN_CD 
  ,KK0351.OP_SVC_KEI_STAT 
  ,CK0011.MEMBER_SBT_CD 
FROM  
      CK_T_CUST CK0011 
  LEFT JOIN (
      SELECT
           KK0081.SYSID
          ,KK0081.SVC_KEI_NO 
          ,KK0081.SVC_KEI_STAT 
          ,KK0081.SVC_CD 
          ,KK0081.PRC_GRP_CD 
          ,KK0081.PPLAN_CD
          ,KK0081.SHOSA_DSL_FIN_CD
      FROM
          KK_T_SVC_KEI KK0081 
      WHERE
              KK0081.SYSID IN (?) 
          AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =  
             (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
              FROM   KK_T_SVC_KEI KK0081_GENE 
              WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
              AND    KK0081_GENE.RSV_APLY_YMD <= ? 
              AND    KK0081_GENE.RSV_APLY_CD = '2' 
              AND    KK0081_GENE.MK_FLG = '0')
    ) KK0081
    ON
          KK0081.SYSID = CK0011.SYSID
      AND KK0081.SHOSA_DSL_FIN_CD = '1'
      AND KK0081.SVC_KEI_STAT IN ('020', '030', '100', '210', '220')
  LEFT JOIN
      KK_T_OP_SVC_KEI KK0351
    ON 
          KK0351.SVC_KEI_NO = KK0081.SVC_KEI_NO 
      AND KK0351.OP_SVC_CD = 'B077' 
      AND KK0351.RSV_APLY_YMD <= ? 
      AND KK0351.RSV_APLY_CD = '2' 
      AND KK0351.MK_FLG = '0' 
WHERE
      CK0011.SYSID IN (?) 
  AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =  
         (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX 
          FROM   CK_T_CUST CK0011_GENE 
          WHERE  CK0011_GENE.SYSID = CK0011.SYSID 
          AND    CK0011_GENE.RSV_APLY_YMD <= ? 
          AND    CK0011_GENE.RSV_APLY_CD = '2' 
          AND    CK0011_GENE.MK_FLG = '0') 
  AND (KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM =  
         (SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX 
          FROM   KK_T_OP_SVC_KEI KK0351_GENE 
          WHERE  KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO 
          AND    KK0351_GENE.RSV_APLY_YMD <= ? 
          AND    KK0351_GENE.RSV_APLY_CD = '2' 
          AND    KK0351_GENE.MK_FLG = '0') 
      OR KK0351.GENE_ADD_DTM IS NULL) 
  ORDER BY CK0011.SYSID 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_306)
#--サービス契約番号を元に、カレントの世代登録年月日時分秒を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_306

SELECT 
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM 
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.MK_FLG = '0'
AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
            (
                SELECT
                    MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS SVC_KEI_GENE_MAX
                FROM
                    KK_T_SVC_KEI SVC_KEI_GENE
                WHERE
                    SVC_KEI_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND SVC_KEI_GENE.RSV_APLY_YMD <= ?
                AND SVC_KEI_GENE.RSV_APLY_CD = '2'
                AND SVC_KEI_GENE.MK_FLG = '0'
            )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_307)
#--サービス契約回線内訳番号に紐づくサービス契約のうち、ステータスが受付済のものが存在するかを確認する。
#-----------------------------------------------------------

--KEY:KK_SELECT_307

SELECT     '1'
FROM       KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241 ON
           KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
           KK0241.SVC_KEI_KAISEN_UCWK_NO = ? AND
           KK0241.MK_FLG = '0'
WHERE     (KK0081.SVC_KEI_NO , KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
          (SELECT   KK0081_GENE.SVC_KEI_NO , MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
           FROM     KK_T_SVC_KEI KK0081_GENE
           WHERE    KK0081.SVC_KEI_NO = KK0081_GENE.SVC_KEI_NO
           AND      KK0081_GENE.RSV_APLY_YMD <= ?
           AND      KK0081_GENE.RSV_APLY_CD = '2'
           AND      KK0081_GENE.MK_FLG = '0'
           GROUP BY KK0081_GENE.SVC_KEI_NO)
AND        KK0081.SVC_KEI_STAT = '010'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_308)
#--サービス契約回線内訳番号を元に、カレントのサービス契約情報を抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_308

SELECT 
    KK0081.SVC_KEI_NO,
    KK0081.SVC_CD 
FROM 
    KK_T_SVC_KEI KK0081 
INNER JOIN 
    KK_T_KAISEN_TG_SVKEI KK0241 ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
WHERE 
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
         (SELECT 
             KK0081_GENE.SVC_KEI_NO,
             MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) 
          FROM 
             KK_T_SVC_KEI KK0081_GENE 
          WHERE 
             KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
          AND 
             KK0081_GENE.RSV_APLY_CD = '2' 
          AND 
             KK0081_GENE.RSV_APLY_YMD <= ? 
          AND 
             KK0081_GENE.MK_FLG = '0' 
          GROUP BY 
             KK0081_GENE.SVC_KEI_NO
         ) 
AND 
    KK0241.SVC_KEI_KAISEN_UCWK_NO = ? 
AND 
    KK0241.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_309)
#--SYSIDをパラメータとして、紐付くサービスの内容が
#--ネット・電話併用ならネットの料金プラン名
#--電話単独なら電話の料金プラン名を返す。
#-----------------------------------------------------------

--KEY:KK_SELECT_309

SELECT 
    KK0081.PRC_GRP_CD,
    KK0081.PPLAN_CD,
    KK0591.PPLAN_NM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_M_PPLAN KK0591
ON 
    KK0081.PPLAN_CD= KK0591.PPLAN_CD
WHERE
    KK0081.SVC_KEI_NO IN
    (
        SELECT 
            KK0241.SVC_KEI_NO
        FROM
            KK_T_KAISEN_TG_SVKEI KK0241
        WHERE
            KK0241.SVC_KEI_KAISEN_UCWK_NO = 
            (
                SELECT 
                    KK0241.SVC_KEI_KAISEN_UCWK_NO
                FROM
                    KK_T_KAISEN_TG_SVKEI KK0241
                WHERE
                    KK0241.SVC_KEI_NO = ?
                    AND
                    KK0241.KAISEN_UCWK_USE_STAYMD <= ?
                    AND
                    KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
            )
    )
    AND
    KK0081.SVC_KEI_STAT NOT IN ('910','920') 
    AND
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
                       (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
                           FROM   KK_T_SVC_KEI KK0081_GENE
                           WHERE 
                               KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                           AND  KK0081_GENE.RSV_APLY_YMD <= ?
                           AND  KK0081_GENE.RSV_APLY_CD = '2'
                           AND  KK0081_GENE.MK_FLG = '0'
                           GROUP BY KK0081_GENE.SVC_KEI_NO)
ORDER BY KK0081.SVC_CD


#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_310)
#--加入御礼管理データ抽出
#--加入御礼書の出力対象となる異動（新規申込、サービス追加、住所変更、電話番号追加）に対する受付年月日を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_310

SELECT
    CASE WHEN KK0021.MSKM_FORM_CD = '05' 
         AND  KK0011.MSKMSHO_ARIV_YMD IS NOT NULL
         THEN KK0011.MSKMSHO_ARIV_YMD
         ELSE SUBSTR(KK0011.MSKM_UK_DTM, 0,8)
    END MSKMSHO_ARIV_YMD,
    KK0011.MSKM_YMD
FROM  KK_T_SVC_KEI KK0081
INNER JOIN  KK_T_MSKM_DTL KK0021
   ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
INNER JOIN  KK_T_MSKM KK0011
   ON KK0011.MSKM_NO = KK0021.MSKM_NO
WHERE  KK0081.SVC_KEI_NO = ?
AND    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
            SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM   KK_T_SVC_KEI KK0081_GENE
            WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND    KK0081_GENE.IDO_DIV IN('00001','00002','00019','00041')
            AND    KK0081_GENE.RSV_APLY_YMD <= ?
            AND    KK0081_GENE.RSV_APLY_CD = '2'
            AND    KK0081_GENE.MK_FLG = '0'
            GROUP BY KK0081_GENE.SVC_KEI_NO)
AND    (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) = (
            SELECT KK0021_MAX.MSKM_DTL_NO, MAX(KK0021_MAX.GENE_ADD_DTM)
            FROM   KK_T_MSKM_DTL KK0021_MAX
            WHERE  KK0021_MAX.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
            AND    KK0021_MAX.MK_FLG = '0'
            GROUP BY KK0021_MAX.MSKM_DTL_NO)
AND    (KK0011.MSKM_NO, KK0011.GENE_ADD_DTM) = (
            SELECT KK0011_MAX.MSKM_NO, MAX(KK0011_MAX.GENE_ADD_DTM)
            FROM KK_T_MSKM KK0011_MAX
            WHERE KK0011_MAX.MSKM_NO = KK0011.MSKM_NO AND
            KK0011_MAX.MK_FLG = '0'
            GROUP BY KK0011_MAX.MSKM_NO)

#-
#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_311)
#--加入御礼管理データ抽出
#--加入御礼書の出力対象となる異動（新規申込、サービス追加、住所変更、電話番号追加が存在しない場合）に対する受付年月日を取得
#-----------------------------------------------------------

--KEY:KK_SELECT_311

SELECT
    CASE WHEN KK0021.MSKM_FORM_CD = '05' 
         AND  KK0011.MSKMSHO_ARIV_YMD IS NOT NULL
         THEN KK0011.MSKMSHO_ARIV_YMD
         ELSE SUBSTR(KK0011.MSKM_UK_DTM, 0,8)
    END MSKMSHO_ARIV_YMD,
    KK0011.MSKM_YMD
FROM  KK_T_SVC_KEI KK0081
INNER JOIN  KK_T_MSKM_DTL KK0021
   ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
INNER JOIN  KK_T_MSKM KK0011
   ON KK0011.MSKM_NO = KK0021.MSKM_NO
WHERE  KK0081.SVC_KEI_NO = ?
AND    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
            SELECT KK0081_GENE.SVC_KEI_NO, MIN(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM   KK_T_SVC_KEI KK0081_GENE
            WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND    KK0081_GENE.MSKM_DTL_NO IS NOT NULL
            AND    KK0081_GENE.RSV_APLY_YMD <= ?
            AND    KK0081_GENE.RSV_APLY_CD = '2'
            AND    KK0081_GENE.MK_FLG = '0'
            GROUP BY KK0081_GENE.SVC_KEI_NO)
AND    (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) = (
            SELECT KK0021_MAX.MSKM_DTL_NO, MAX(KK0021_MAX.GENE_ADD_DTM)
            FROM   KK_T_MSKM_DTL KK0021_MAX
            WHERE  KK0021_MAX.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
            AND    KK0021_MAX.MK_FLG = '0'
            GROUP BY KK0021_MAX.MSKM_DTL_NO)
AND    (KK0011.MSKM_NO, KK0011.GENE_ADD_DTM) = (
            SELECT KK0011_MAX.MSKM_NO, MAX(KK0011_MAX.GENE_ADD_DTM)
            FROM KK_T_MSKM KK0011_MAX
            WHERE KK0011_MAX.MSKM_NO = KK0011.MSKM_NO AND
            KK0011_MAX.MK_FLG = '0'
            GROUP BY KK0011_MAX.MSKM_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_312)
#--SYSID配下のサービス契約番号を取得する
#--使用ジョブ
#--EO28Z0240J0_はぴｅポイント会員登録
#-----------------------------------------------------------

--KEY:KK_SELECT_312

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0591.HPPSSTG_FLG
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_M_PPLAN KK0591 ON
        KK0591.PCRS_CD = KK0081.PCRS_CD
        AND
        KK0591.PPLAN_CD = KK0081.PPLAN_CD
        AND
        KK0591.PPLAN_TSTAYMD <= ?
        AND
        KK0591.PPLAN_TENDYMD >= ?
        AND
        KK0591.MK_FLG = '0'
WHERE
    KK0081.SYSID = ?
    AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT MAX(SUB.RSV_APLY_YMD || SUB.GENE_ADD_DTM) AS SUB_GENE_MAX
                        FROM KK_T_SVC_KEI SUB 
                        WHERE SUB.SVC_KEI_NO =  KK0081.SVC_KEI_NO
                        AND   SUB.RSV_APLY_YMD <= ?
                        AND   SUB.RSV_APLY_CD = '2'
                        AND   SUB.MK_FLG = '0')
ORDER BY
    KK0081.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_313)
#--KKPRC01701
#--住所変更新設情報の抽出(サービス追加分)
#-----------------------------------------------------------

--KEY:KK_SELECT_313

SELECT DISTINCT
    KK0081.SVC_KEI_NO,
    KK0081.SHOSA_YMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0081.MSKM_DTL_NO,
    KK0081.PCRS_CD,
    KK0081.SVC_CD,
    KK2101.ADCHG_NO,
    KK2101.CHBF_SKBT_NO,
    KK2101.CHAF_SKBT_NO,
    KK0101.DMPS_ANKEN_NO,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0251.KITEN_HDSHO_CD,
    MAX(KK1091.PRG_DTM) PRG_DTM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_PRG KK1091
ON
    KK0081.SVC_KEI_NO = KK1091.SVC_KEI_NO AND
    KK1091.PRG_STAT = '9500' AND
    KK1091.PRG_DTM > ? AND
    KK1091.PRG_DTM <= ? AND
    KK1091.IDO_DIV = '00019' AND
    KK1091.MK_FLG = '0'
INNER JOIN
(
    SELECT
        KK2101.ADCHG_NO,
        KK2101.CHBF_SKBT_NO,
        KK2101.CHAF_SKBT_NO,
        KK2091.ITNM_SVKEI_KISUW_NO 
    FROM
        KK_T_ADCHG_DTL KK2101
    INNER JOIN
        KK_T_ADCHG KK2091
    ON
        KK2091.ADCHG_NO = KK2101.ADCHG_NO AND
        KK2101.ADCHG_DTL_SBT_CD = '01' AND
        KK2091.ADCHG_STAT = '001' AND 
        KK2101.ADCHG_NO = 
        (SELECT MAX(KK2101_MAX.ADCHG_NO) ADCHG_NO_MAX
           FROM KK_T_ADCHG_DTL KK2101_MAX
          WHERE KK2101.CHAF_SKBT_NO = KK2101_MAX.CHAF_SKBT_NO AND
                KK2101_MAX.MK_FLG = '0')
) KK2101
ON
    KK2101.CHAF_SKBT_NO = KK0081.SVC_KEI_NO 
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0241.KAISEN_UCWK_USE_STAYMD = (SELECT
                                        MAX(KK0241_KUUS_MAX.KAISEN_UCWK_USE_STAYMD) AS KK0241_MAX
                                    FROM
                                        KK_T_KAISEN_TG_SVKEI KK0241_KUUS_MAX
                                    WHERE
                                        KK0241_KUUS_MAX.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
                                        KK0241_KUUS_MAX.KAISEN_UCWK_USE_STAYMD <= ? AND
                                        KK0241_KUUS_MAX.MK_FLG = '0')
INNER JOIN
    KK_T_SVKEI_KAISEN_UW KK0251
ON
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
    KK0251.GENE_ADD_DTM = (SELECT
                              MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                          FROM
                              KK_T_SVKEI_KAISEN_UW KK0251_GENE
                          WHERE
                              KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                              KK0251_GENE.MK_FLG = '0')
INNER JOIN
    KK_T_SVC_KEI_EOH_TV KK0101
ON
    KK0101.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
    KK0101.GENE_ADD_DTM = KK0081.GENE_ADD_DTM AND
    KK0101.MK_FLG = '0'
WHERE
    KK0081.SVC_CD = '03' AND
    KK2101.CHBF_SKBT_NO IS NULL AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
        KK0081_GENE.RSV_APLY_YMD <= ? AND
        KK0081_GENE.RSV_APLY_CD = '2' AND
        KK0081_GENE.MK_FLG = '0')
GROUP BY KK0081.SVC_KEI_NO,
         KK0081.SHOSA_YMD,
         KK0081.SVC_CHRG_ENDYMD,
         KK0081.TK_HOSHIKI_KEI_NO,
         KK0081.MSKM_DTL_NO,
         KK0081.PCRS_CD,
         KK0081.SVC_CD,
         KK2101.ADCHG_NO,
         KK2101.CHBF_SKBT_NO,
         KK2101.CHAF_SKBT_NO,
         KK0101.DMPS_ANKEN_NO,
         KK0251.KAISEN_PLACE_PCD,
         KK0251.KAISEN_PLACE_STATE_NM,
         KK0251.KAISEN_PLACE_CITY_NM,
         KK0251.KAISEN_PLACE_OAZTSU_NM,
         KK0251.KAISEN_PLACE_AZCHO_NM,
         KK0251.KAISEN_PLACE_BNCHIGO,
         KK0251.KAISEN_PLACE_ADRRM,
         KK0251.KAISEN_PLACE_ADRTTM,
         KK0251.KITEN_HDSHO_CD


#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_314)
#--サービス契約情報サービス集約
#--サービス契約からの休止情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_314

SELECT SVKEI.PAUSE_STP_CD,
       SVKEI.SVC_PAUSE_YMD,
       SVKEI.SVC_PAUSE_RLS_YMD,
       SVKEI.SVC_PAUSE_CHRG_STA_YMD
FROM   KK_T_SVC_KEI SVKEI
WHERE  SVKEI.SVC_KEI_NO = ?
AND    SVKEI.PAUSE_STP_CD <> '02'
AND    SVKEI.SVC_PAUSE_CHRG_STA_YMD <= ?
AND    NVL(SVKEI.SVC_PAUSE_RLS_YMD,'20991231') >= ?
AND    (
          SVKEI.RSV_APLY_YMD || SVKEI.GENE_ADD_DTM = (
          SELECT MAX(SVKEI_G.RSV_APLY_YMD || SVKEI_G.GENE_ADD_DTM)
          FROM   KK_T_SVC_KEI SVKEI_G
          WHERE  SVKEI_G.SVC_KEI_NO = SVKEI.SVC_KEI_NO
          AND    SVKEI_G.RSV_APLY_YMD <= ?
          AND    SVKEI_G.RSV_APLY_CD = '2'
          AND    SVKEI_G.MK_FLG = '0')
       OR
          (   SVKEI.SVC_PAUSE_CHRG_STA_YMD IS NOT NULL
          AND SVKEI.SVC_PAUSE_RLS_YMD IS NOT NULL
          AND SVKEI.RSV_APLY_YMD <= ?
          AND SVKEI.RSV_APLY_CD = '2'
          AND SVKEI.MK_FLG = '0')
       )
ORDER BY SVKEI.RSV_APLY_YMD DESC,
         SVKEI.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_315)
#--eo電気提供条件チェックリストを取得する
#--使用箇所
#--JBSbatKKEoelecTkJknChkList
#-----------------------------------------------------------

--KEY:KK_SELECT_315

SELECT
    DNK_SVC_KEI_NO
   ,DNK_SYSID
   ,DNK_SEIKY_KEI_NO
   ,DNK_SVKEI_GRP_SBT_CD
   ,DNK_SEIKY_WAY_CD
   ,NET_SVC_KEI_NO
   ,NET_SYSID
   ,NET_SEIKY_KEI_NO
FROM (
        SELECT
            KK0081_DNK.SVC_KEI_NO        AS DNK_SVC_KEI_NO
           ,KK0081_DNK.SYSID             AS DNK_SYSID
           ,KK0321_DNK.SEIKY_KEI_NO      AS DNK_SEIKY_KEI_NO
           ,KK0491_DNK.SEIKY_WAY_CD      AS DNK_SEIKY_WAY_CD
           ,KK2961_DNK.SVKEI_GRP_SBT_CD  AS DNK_SVKEI_GRP_SBT_CD
           ,KK2961_DNK.SVKEI_GRP_SKBT_NO AS DNK_SVKEI_GRP_SKBT_NO
        FROM
            KK_T_SVC_KEI KK0081_DNK
            INNER JOIN CK_T_CUST CK0011_DNK
            ON  CK0011_DNK.SYSID =  KK0081_DNK.SYSID
            INNER JOIN KK_T_KAKINS KK0321_DNK
            ON  KK0321_DNK.SVC_KEI_NO =  KK0081_DNK.SVC_KEI_NO
            INNER JOIN KK_T_SEIKY_KEI KK0491_DNK
            ON  KK0491_DNK.SEIKY_KEI_NO =  KK0321_DNK.SEIKY_KEI_NO
            LEFT OUTER JOIN KK_T_SVKEI_GRP_SETE KK2961_DNK
            ON  KK2961_DNK.SVC_KEI_NO =  KK0081_DNK.SVC_KEI_NO
            AND KK2961_DNK.SVKEI_GRP_SBT_CD = '01'
            AND KK2961_DNK.MK_FLG = '0'
        WHERE
                (KK0081_DNK.SVC_KEI_NO, KK0081_DNK.RSV_APLY_YMD || KK0081_DNK.GENE_ADD_DTM) =
                (SELECT
                    KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
                 FROM
                     KK_T_SVC_KEI KK0081_GENE
                 WHERE
                     KK0081_GENE.SVC_KEI_NO = KK0081_DNK.SVC_KEI_NO
                     AND KK0081_GENE.RSV_APLY_YMD <= ?
                     AND KK0081_GENE.RSV_APLY_CD = '2'
                     AND KK0081_GENE.MK_FLG = '0'
                GROUP BY KK0081_GENE.SVC_KEI_NO)
        AND     (CK0011_DNK.RSV_APLY_YMD || CK0011_DNK.GENE_ADD_DTM) =
                (SELECT
                    MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM)
                 FROM
                     CK_T_CUST CK0011_GENE
                 WHERE
                     CK0011_GENE.SYSID = CK0011_DNK.SYSID
                     AND CK0011_GENE.RSV_APLY_YMD <= ?
                     AND CK0011_GENE.RSV_APLY_CD = '2'
                     AND CK0011_GENE.MK_FLG = '0'
                GROUP BY CK0011_GENE.SYSID)
        AND     (KK0491_DNK.SEIKY_KEI_NO, KK0491_DNK.RSV_APLY_YMD || KK0491_DNK.GENE_ADD_DTM) =
                (SELECT
                    KK0491_GENE.SEIKY_KEI_NO, MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM)
                 FROM
                     KK_T_SEIKY_KEI KK0491_GENE
                 WHERE
                     KK0491_GENE.SEIKY_KEI_NO = KK0491_DNK.SEIKY_KEI_NO
                     AND KK0491_GENE.RSV_APLY_YMD <= ?
                     AND KK0491_GENE.RSV_APLY_CD = '2'
                     AND KK0491_GENE.MK_FLG = '0'
                GROUP BY KK0491_GENE.SEIKY_KEI_NO)
        AND     KK0081_DNK.SVC_KEI_STAT = '100'
        AND     KK0081_DNK.PRC_GRP_CD = '17'
        AND     CK0011_DNK.KEISHA_TYPE_CD IN ('1','2','3','5')
        AND     KK0321_DNK.KAKINS_TSTAYMD <= ?
        AND     KK0321_DNK.KAKINS_TENDYMD >= ?
        AND     KK0321_DNK.MK_FLG     = '0'
      ) LEFT OUTER JOIN
          (
            SELECT
                KK0081_NET.SVC_KEI_NO             AS NET_SVC_KEI_NO
               ,KK0081_NET.SYSID                  AS NET_SYSID
               ,KK0321_NET.SEIKY_KEI_NO           AS NET_SEIKY_KEI_NO
               ,KK0241_NET.SVC_KEI_KAISEN_UCWK_NO AS NET_SVC_KEI_KAISEN_UCWK_NO 
            FROM
                KK_T_KAISEN_TG_SVKEI KK0241_NET
                INNER JOIN KK_T_SVC_KEI KK0081_NET
                ON  KK0081_NET.SVC_KEI_NO = KK0241_NET.SVC_KEI_NO
                INNER JOIN KK_T_KAKINS KK0321_NET
                ON  KK0321_NET.SVC_KEI_NO =  KK0081_NET.SVC_KEI_NO
            WHERE
                (KK0081_NET.SVC_KEI_NO, KK0081_NET.RSV_APLY_YMD || KK0081_NET.GENE_ADD_DTM) =
                (SELECT
                    KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
                 FROM
                     KK_T_SVC_KEI KK0081_GENE
                 WHERE
                     KK0081_GENE.SVC_KEI_NO = KK0081_NET.SVC_KEI_NO
                     AND KK0081_GENE.RSV_APLY_YMD <= ?
                     AND KK0081_GENE.RSV_APLY_CD = '2'
                     AND KK0081_GENE.MK_FLG = '0'
                 GROUP BY KK0081_GENE.SVC_KEI_NO)
            AND  KK0241_NET.KAISEN_UCWK_USE_STAYMD <= ? 
            AND (KK0241_NET.SVC_KEI_NO, KK0241_NET.KAISEN_UCWK_USE_ENDYMD) =  
                (SELECT 
                    KK0241_GENE.SVC_KEI_NO, MAX(KK0241_GENE.KAISEN_UCWK_USE_ENDYMD) 
                 FROM   
                     KK_T_KAISEN_TG_SVKEI KK0241_GENE 
                 WHERE  
                     KK0241_GENE.SVC_KEI_NO = KK0241_NET.SVC_KEI_NO 
                     AND KK0241_GENE.KAISEN_UCWK_USE_STAYMD <= ? 
                     AND KK0241_GENE.MK_FLG = '0' 
                 GROUP BY KK0241_GENE.SVC_KEI_NO) 
            AND  KK0081_NET.SVC_KEI_STAT IN('010','020','030','100','210','220')
            AND  KK0081_NET.PRC_GRP_CD IN('02','03','04')
            AND  KK0321_NET.KAKINS_TSTAYMD <= ?
            AND  KK0321_NET.KAKINS_TENDYMD >= ?
            AND  KK0321_NET.MK_FLG     = '0'
          )
      ON NET_SVC_KEI_KAISEN_UCWK_NO = DNK_SVKEI_GRP_SKBT_NO
WHERE
    DNK_SVKEI_GRP_SBT_CD IS NULL
    OR NET_SVC_KEI_NO IS NULL
    OR DNK_SYSID <> NET_SYSID
    OR DNK_SEIKY_KEI_NO <> NET_SEIKY_KEI_NO
    OR DNK_SEIKY_WAY_CD = '1'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_316)
#--サービス契約情報サービス集約
#--サービス契約からの休止情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_316

SELECT
 KK0081.SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ? AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) KK0081_MAX
                                     FROM KK_T_SVC_KEI KK0081_GENE
                                     WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                           KK0081_GENE.RSV_APLY_YMD <= ? AND
                                           KK0081_GENE.RSV_APLY_CD = '2' AND
                                           KK0081_GENE.MK_FLG = '0') AND
 KK0081.IDO_DIV IN ('00001', '00002', '00019')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_317)
#--サービス契約解約対象、サービス契約撤去工事完了対象のレコード（MUSe連携のみ）を抽出する。
#--※工事案件.マンション工事案件状態コードがNULL以外の場合、MUSe連携と判定する。
#-----------------------------------------------------------

--KEY:KK_SELECT_317

SELECT
    TKK_IDY.IDO_RSV_NO,
    TKK_IDY.SVC_KEI_NO,
    TKK_IDY.SVC_KEI_KAISEN_UCWK_NO,
    TKK_IDY.MSKM_DTL_NO,
    TKK_IDY.SVC_KEI_STAT,
    TKK_IDY.UPD_DTM,
    TKK_IDY.RSV_APLY_YMD,
    TKK_KOJ.KOJIAK_JSSI_YMD,
    TKK_KOJ.KOJIAK_NO,
    '1' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        TKK_IDY_KAISEN_TG.SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_KAISEN_TG_SVKEI TKK_IDY_KAISEN_TG
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_KAISEN_TG.SVC_KEI_NO
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00006' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03')
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_STAYMD <= ?
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_ENDYMD >= ?
    AND TKK_IDY_IDO_RSV.MK_FLG   = '0'
    AND TKK_IDY_KAISEN_TG.MK_FLG = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= ?
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
) TKK_IDY
INNER JOIN
(
    SELECT
        TKK_KOJ_BASE.SVC_KEI_NO,
        TKK_KOJ_BASE.SVC_KEI_KAISEN_UCWK_NO,
        TKK_KOJ_BASE.KOJIAK_NO,
        TKK_KOJ_BASE.KOJIAK_JSSI_YMD,
        TKK_KOJ_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT
            TKK_KOJ_KJ_FIN.*
        FROM
            KK_T_KJ_FIN_WK TKK_KOJ_KJ_FIN
        INNER JOIN
        (
            SELECT
                SVC_KEI_NO,
                SVC_KEI_KAISEN_UCWK_NO,
                MAX(RNKI_YMD) RNKI_YMD,
                MAX(RNKI_SEQ) RNKI_SEQ
            FROM
                (
                    SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, RNKI_YMD, RNKI_SEQ
                    FROM   KK_T_KJ_FIN_WK
                    WHERE  RNKI_YMD <= ?
                    AND    (KOJIAK_SBT_CD = '002' OR KOJIAK_SBT_CD = '004')
                    AND EXISTS
                    (
                        SELECT KOJIAK.KOJIAK_NO
                        FROM   KU_T_KOJIAK KOJIAK
                        WHERE  KOJIAK.KOJIAK_NO = KK_T_KJ_FIN_WK.KOJIAK_NO
                        AND    KOJIAK.MANS_KOJIAK_STAT_CD IS NOT NULL
                        AND    KOJIAK.MK_FLG = '0'
                    )
                    AND    MK_FLG = 0
                )
            GROUP BY
                SVC_KEI_NO,
                SVC_KEI_KAISEN_UCWK_NO
        ) TKK_KOJ_WK_KJ_FIN
            ON  TKK_KOJ_KJ_FIN.SVC_KEI_NO             = TKK_KOJ_WK_KJ_FIN.SVC_KEI_NO
            AND TKK_KOJ_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO = TKK_KOJ_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO 
            AND TKK_KOJ_KJ_FIN.RNKI_YMD               = TKK_KOJ_WK_KJ_FIN.RNKI_YMD
            AND TKK_KOJ_KJ_FIN.RNKI_SEQ               = TKK_KOJ_WK_KJ_FIN.RNKI_SEQ
        WHERE
            OPMS_KOJIAK_RSLT_CD <> '2'
    ) TKK_KOJ_BASE
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) TKK_KOJ_MSKMD_KOJIAK
        ON  TKK_KOJ_BASE.KOJIAK_NO = TKK_KOJ_MSKMD_KOJIAK.KOJIAK_NO
)
TKK_KOJ
    ON  TKK_IDY.SVC_KEI_NO             = TKK_KOJ.SVC_KEI_NO
    AND TKK_IDY.SVC_KEI_KAISEN_UCWK_NO = TKK_KOJ.SVC_KEI_KAISEN_UCWK_NO
    AND TKK_IDY.MSKM_DTL_NO            = TKK_KOJ.MSKM_DTL_NO
UNION
SELECT
    KKB_KKW_IDO.IDO_RSV_NO,
    KKB_KKW_IDO.SVC_KEI_NO,
    KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO,
    KKB_KKW_IDO.MSKM_DTL_NO,
    KKB_KKW_IDO.SVC_KEI_STAT,
    KKB_KKW_IDO.UPD_DTM,
    KKB_KKW_IDO.RSV_APLY_YMD,
    '' AS KOJIAK_JSSI_YMD,
    '' AS KOJIAK_NO,
    '2' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        TKK_IDY_KAISEN_TG.SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_KAISEN_TG_SVKEI TKK_IDY_KAISEN_TG
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_KAISEN_TG.SVC_KEI_NO
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00006' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03')
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_STAYMD <= TO_CHAR(TO_DATE(?, 'YYYYMMDD') + 1, 'YYYYMMDD')
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_ENDYMD >= TO_CHAR(TO_DATE(?, 'YYYYMMDD') + 1, 'YYYYMMDD')
    AND TKK_IDY_IDO_RSV.RSV_APLY_YMD <= TO_CHAR(TO_DATE(?, 'YYYYMMDD') + 1, 'YYYYMMDD') 
    AND TKK_IDY_IDO_RSV.MK_FLG        = '0'
    AND TKK_IDY_KAISEN_TG.MK_FLG      = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= TO_CHAR(TO_DATE(?, 'YYYYMMDD') + 1, 'YYYYMMDD')
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
) KKB_KKW_IDO
WHERE
NOT EXISTS
(
    SELECT
        KKB_KKW_WK_KJ_FIN.SVC_KEI_NO,
        KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO,
        KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, KOJIAK_NO
        FROM   KK_T_KJ_FIN_WK
        WHERE  RNKI_YMD <= ?
        AND    (KOJIAK_SBT_CD = '002' OR KOJIAK_SBT_CD = '004')
        AND    OPMS_KOJIAK_RSLT_CD = '1'
        AND    MK_FLG = '0'
        GROUP BY
            SVC_KEI_NO,
            SVC_KEI_KAISEN_UCWK_NO,
            KOJIAK_NO
    ) KKB_KKW_WK_KJ_FIN
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_WK_KJ_FIN.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        KKB_KKW_IDO.SVC_KEI_NO             = KKB_KKW_WK_KJ_FIN.SVC_KEI_NO
    AND KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO
    AND KKB_KKW_IDO.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
)
AND EXISTS
(
    SELECT
        KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO
    FROM
    (
        SELECT SVKEI_KOJIAK.KOJIAK_NO, SVKEI_KOJIAK.SVC_KEI_NO, SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO
        FROM   KU_T_SVKEI_KOJIAK SVKEI_KOJIAK
        WHERE  SVKEI_KOJIAK.MK_FLG = '0'
    ) KKB_KKW_SVKEI_KOJIAK
    INNER JOIN
    (
        SELECT MSKM_DTL_KOJIAK.KOJIAK_NO, MSKM_DTL_KOJIAK.MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK MSKM_DTL_KOJIAK
        WHERE  MSKM_DTL_KOJIAK.MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        KKB_KKW_IDO.SVC_KEI_NO             = KKB_KKW_SVKEI_KOJIAK.SVC_KEI_NO
    AND KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO
    AND KKB_KKW_IDO.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    AND EXISTS
    (
        SELECT KOJIAK.KOJIAK_NO
        FROM   KU_T_KOJIAK KOJIAK
        WHERE  KOJIAK.KOJIAK_NO = KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO
        AND    KOJIAK.MANS_KOJIAK_STAT_CD IS NOT NULL
        AND    KOJIAK.MK_FLG = '0'
    )
)
UNION
SELECT
    TKK_IDY.IDO_RSV_NO,
    TKK_IDY.SVC_KEI_NO,
    TKK_IDY.SVC_KEI_KAISEN_UCWK_NO,
    TKK_IDY.MSKM_DTL_NO,
    TKK_IDY.SVC_KEI_STAT,
    TKK_IDY.UPD_DTM,
    TKK_IDY.RSV_APLY_YMD,
    TKK_KOJ.KOJIAK_JSSI_YMD,
    TKK_KOJ.KOJIAK_NO,
    '1' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        TKK_IDY_KAISEN_TG.SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_KAISEN_TG_SVKEI TKK_IDY_KAISEN_TG
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_KAISEN_TG.SVC_KEI_NO
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00019' AND TKK_IDY_IDO_RSV.IDO_RSV_DTL_CD = '007' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03')
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_STAYMD <= ?
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_ENDYMD >= ?
    AND TKK_IDY_IDO_RSV.MK_FLG   = '0'
    AND TKK_IDY_KAISEN_TG.MK_FLG = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= ?
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
) TKK_IDY
INNER JOIN
(
    SELECT
        TKK_KOJ_BASE.SVC_KEI_NO,
        TKK_KOJ_BASE.SVC_KEI_KAISEN_UCWK_NO,
        TKK_KOJ_BASE.KOJIAK_NO,
        TKK_KOJ_BASE.KOJIAK_JSSI_YMD,
        TKK_KOJ_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT
            TKK_KOJ_KJ_FIN.*
        FROM
            KK_T_KJ_FIN_WK TKK_KOJ_KJ_FIN
        INNER JOIN
        (
            SELECT
                SVC_KEI_NO,
                SVC_KEI_KAISEN_UCWK_NO,
                MAX(RNKI_YMD) RNKI_YMD,
                MAX(RNKI_SEQ) RNKI_SEQ
            FROM
                (
                    SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, RNKI_YMD, RNKI_SEQ
                    FROM   KK_T_KJ_FIN_WK
                    WHERE  RNKI_YMD <= ?
                    AND    (KOJIAK_SBT_CD = '002' OR KOJIAK_SBT_CD = '004')
                    AND EXISTS
                    (
                        SELECT KOJIAK.KOJIAK_NO
                        FROM   KU_T_KOJIAK KOJIAK
                        WHERE  KOJIAK.KOJIAK_NO = KK_T_KJ_FIN_WK.KOJIAK_NO
                        AND    KOJIAK.MANS_KOJIAK_STAT_CD IS NOT NULL
                        AND    KOJIAK.MK_FLG = '0'
                    )
                    AND    MK_FLG = 0
                )
            GROUP BY
                SVC_KEI_NO,
                SVC_KEI_KAISEN_UCWK_NO
        ) TKK_KOJ_WK_KJ_FIN
            ON  TKK_KOJ_KJ_FIN.SVC_KEI_NO             = TKK_KOJ_WK_KJ_FIN.SVC_KEI_NO
            AND TKK_KOJ_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO = TKK_KOJ_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO 
            AND TKK_KOJ_KJ_FIN.RNKI_YMD               = TKK_KOJ_WK_KJ_FIN.RNKI_YMD
            AND TKK_KOJ_KJ_FIN.RNKI_SEQ               = TKK_KOJ_WK_KJ_FIN.RNKI_SEQ
        WHERE
            OPMS_KOJIAK_RSLT_CD <> '2'
    ) TKK_KOJ_BASE
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) TKK_KOJ_MSKMD_KOJIAK
        ON  TKK_KOJ_BASE.KOJIAK_NO = TKK_KOJ_MSKMD_KOJIAK.KOJIAK_NO
)
TKK_KOJ
    ON  TKK_IDY.SVC_KEI_NO             = TKK_KOJ.SVC_KEI_NO
    AND TKK_IDY.SVC_KEI_KAISEN_UCWK_NO = TKK_KOJ.SVC_KEI_KAISEN_UCWK_NO
    AND TKK_IDY.MSKM_DTL_NO            = TKK_KOJ.MSKM_DTL_NO
UNION
SELECT
    KKB_KKW_IDO.IDO_RSV_NO,
    KKB_KKW_IDO.SVC_KEI_NO,
    KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO,
    KKB_KKW_IDO.MSKM_DTL_NO,
    KKB_KKW_IDO.SVC_KEI_STAT,
    KKB_KKW_IDO.UPD_DTM,
    KKB_KKW_IDO.RSV_APLY_YMD,
    '' AS KOJIAK_JSSI_YMD,
    '' AS KOJIAK_NO,
    '2' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        KK2091.ITNM_SVKEI_KISUW_NO AS SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    INNER JOIN KK_T_MSKM_DTL KK0021
        ON  KK0021.MSKM_DTL_NO = TKK_IDY_IDO_RSV.MSKM_DTL_NO
    INNER JOIN KK_T_MSKM KK0011
        ON  KK0011.MSKM_NO = KK0021.MSKM_NO
    INNER JOIN KK_T_ADCHG KK2091
        ON  KK2091.MSKM_NO = KK0011.MSKM_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00019' AND TKK_IDY_IDO_RSV.IDO_RSV_DTL_CD = '007' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03')
    AND TKK_IDY_IDO_RSV.RSV_APLY_YMD <= TO_CHAR(TO_DATE(?, 'YYYYMMDD') + 1, 'YYYYMMDD') 
    AND TKK_IDY_IDO_RSV.MK_FLG        = '0'
    AND KK2091.MK_FLG        = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= TO_CHAR(TO_DATE(?, 'YYYYMMDD') + 1, 'YYYYMMDD')
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
    AND (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) = 
        (
            SELECT KK0021_GENE.MSKM_DTL_NO, MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_MAX
            FROM    KK_T_MSKM_DTL KK0021_GENE
            WHERE   KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
            AND     KK0021_GENE.MK_FLG = '0'
            GROUP BY KK0021_GENE.MSKM_DTL_NO
        )
    AND (KK0011.MSKM_NO, KK0011.GENE_ADD_DTM) = 
        (
            SELECT KK0011_GENE.MSKM_NO, MAX(KK0011_GENE.GENE_ADD_DTM) AS KK0011_MAX
            FROM    KK_T_MSKM KK0011_GENE
            WHERE   KK0011_GENE.MSKM_NO = KK0011.MSKM_NO
            AND     KK0011_GENE.MK_FLG = '0'
            GROUP BY KK0011_GENE.MSKM_NO
        )
) KKB_KKW_IDO
WHERE
NOT EXISTS
(
    SELECT
        KKB_KKW_WK_KJ_FIN.SVC_KEI_NO,
        KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO,
        KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, KOJIAK_NO
        FROM   KK_T_KJ_FIN_WK
        WHERE  RNKI_YMD <= ?
        AND    (KOJIAK_SBT_CD = '002' OR KOJIAK_SBT_CD = '004')
        AND    OPMS_KOJIAK_RSLT_CD = '1'
        AND    MK_FLG = '0'
        GROUP BY
            SVC_KEI_NO,
            SVC_KEI_KAISEN_UCWK_NO,
            KOJIAK_NO
    ) KKB_KKW_WK_KJ_FIN
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_WK_KJ_FIN.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        KKB_KKW_IDO.SVC_KEI_NO             = KKB_KKW_WK_KJ_FIN.SVC_KEI_NO
    AND KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO
    AND KKB_KKW_IDO.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
)
AND EXISTS
(
    SELECT
        KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO
    FROM
    (
        SELECT SVKEI_KOJIAK.KOJIAK_NO, SVKEI_KOJIAK.SVC_KEI_NO, SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO
        FROM   KU_T_SVKEI_KOJIAK SVKEI_KOJIAK
        WHERE  SVKEI_KOJIAK.MK_FLG = '0'
    ) KKB_KKW_SVKEI_KOJIAK
    INNER JOIN
    (
        SELECT MSKM_DTL_KOJIAK.KOJIAK_NO, MSKM_DTL_KOJIAK.MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK MSKM_DTL_KOJIAK
        WHERE  MSKM_DTL_KOJIAK.MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        KKB_KKW_IDO.SVC_KEI_NO             = KKB_KKW_SVKEI_KOJIAK.SVC_KEI_NO
    AND KKB_KKW_IDO.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_SVKEI_KOJIAK.SVC_KEI_KAISEN_UCWK_NO
    AND KKB_KKW_IDO.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    AND EXISTS
    (
        SELECT KOJIAK.KOJIAK_NO
        FROM   KU_T_KOJIAK KOJIAK
        WHERE  KOJIAK.KOJIAK_NO = KKB_KKW_SVKEI_KOJIAK.KOJIAK_NO
        AND    KOJIAK.MANS_KOJIAK_STAT_CD IS NOT NULL
        AND    KOJIAK.MK_FLG = '0'
    )
)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_319)
#--通知書番号に紐づく通知対象物にネット契約が存在する場合、
#--ネット契約のカレントデータを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_319

SELECT
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM
             KK_T_SVC_KEI KK0081_GENE
         WHERE
             KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
             AND KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD = '2'
             AND KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_320)
#--口座振替受付対象データの抽出
#-----------------------------------------------------------

--KEY:KK_SELECT_320

SELECT
   KK0081.SVC_KEI_NO
   ,KK0081.SVC_KEI_STAT
   ,KK0081.SYSID
   ,KK0351.MLAD
   ,(SELECT KK0781.PRC_GRP_NM
       FROM KK_M_PRC_GRP KK0781
      WHERE KK0781.PRC_GRP_CD = KK0081.PRC_GRP_CD
        AND (KK0781.PRC_GRP_CD,KK0781.GENE_ADD_DTM) =
            (SELECT KK0781_GENE.PRC_GRP_CD,MAX(KK0781_GENE.GENE_ADD_DTM)
               FROM KK_M_PRC_GRP KK0781_GENE
              WHERE KK0781_GENE.PRC_GRP_CD = KK0781.PRC_GRP_CD
                AND KK0781_GENE.MK_FLG = '0'
              GROUP BY KK0781_GENE.PRC_GRP_CD)
     ) AS PRC_GRP_NM
   ,KK0081.PRC_GRP_CD
   ,(SELECT ZM0171.CD_DIV_NM
       FROM ZM_M_CD_NM_KANRI ZM0171
      WHERE ZM0171.CD_SBT_CD = 'CD00037'
        AND ZM0171.CD_DIV = KK0081.SVC_KEI_STAT
        AND ZM0171.MK_FLG = '0'
    ) AS SVC_KEI_STAT_NM
   ,(SELECT ZM0171.CD_DIV_NM
       FROM ZM_M_CD_NM_KANRI ZM0171
      WHERE ZM0171.CD_SBT_CD = 'CD00184'
        AND ZM0171.MK_FLG = '0'
        AND ZM0171.CD_DIV = 
            (SELECT CH0231.TOKUSOKU_STAT
               FROM CH_T_TOKUSOKU CH0231
              WHERE CH0231.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
                AND CH0231.TOKUSOKU_STAYMD <= ?
                AND CH0231.TOKUSOKU_ENDYMD > ?
                AND CH0231.MK_FLG = '0')
    ) AS TOKUSOKU_STAT
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN (
        SELECT
            KK0321_01.SEIKY_KEI_NO
           ,KK0321_01.SVC_KEI_NO
        FROM
            KK_T_KAKINS KK0321_01
        WHERE
            KK0321_01.SEIKY_KEI_NO = ?
        AND
            KK0321_01.KAKINS_TSTAYMD <= ?
        AND
            KK0321_01.KAKINS_TENDYMD >= ?
        AND
            KK0321_01.MK_FLG = '0'
           ) KK0321
        ON KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
LEFT JOIN (
        SELECT
            KK0351_01.SVC_KEI_NO
           ,KK0361.MLAD
        FROM
            KK_T_OP_SVC_KEI KK0351_01
        INNER JOIN (
                SELECT
                    KK0361_01.OP_SVC_KEI_NO
                   ,KK0361_01.GENE_ADD_DTM
                   ,KK0361_01.MLAD
                FROM
                    KK_T_OPSVKEI_ISP KK0361_01
                WHERE
                    KK0361_01.RSV_APLY_CD = '2'
                AND
                    KK0361_01.MK_FLG = '0'
                   ) KK0361
                ON KK0361.OP_SVC_KEI_NO = KK0351_01.OP_SVC_KEI_NO
               AND KK0361.GENE_ADD_DTM  = KK0351_01.GENE_ADD_DTM
        WHERE
            (KK0351_01.OP_SVC_KEI_NO, KK0351_01.RSV_APLY_YMD || KK0351_01.GENE_ADD_DTM) =
                (SELECT KK0351_GENE.OP_SVC_KEI_NO, MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM)
                   FROM KK_T_OP_SVC_KEI KK0351_GENE
                  WHERE KK0351_GENE.OP_SVC_KEI_NO = KK0351_01.OP_SVC_KEI_NO
                    AND KK0351_GENE.RSV_APLY_YMD <= ?
                    AND KK0351_GENE.RSV_APLY_CD = '2'
                    AND KK0351_GENE.MK_FLG = '0'
               GROUP BY KK0351_GENE.OP_SVC_KEI_NO)
        AND
            KK0351_01.OP_SVC_CD = 'B001'
        AND
            KK0351_01.OP_SVC_KEI_STAT = '100'
           ) KK0351
        ON KK0081.SVC_KEI_NO = KK0351.SVC_KEI_NO
WHERE
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
           FROM KK_T_SVC_KEI KK0081_GENE
          WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
      GROUP BY KK0081_GENE.SVC_KEI_NO)
ORDER BY
      KK0081.SVC_KEI_NO ASC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_321)
#--サービス契約番号と運用年月日でカレントを取得します。
#-----------------------------------------------------------

--KEY:KK_SELECT_321

SELECT 
    KK0081.SVC_CD 
FROM 
    KK_T_SVC_KEI KK0081 
WHERE 
    KK0081.SVC_KEI_NO = ? AND 
    KK0081.MK_FLG = '0' AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT 
                                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
                            FROM 
                                KK_T_SVC_KEI KK0081_GENE 
                            WHERE 
                                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO  AND
                                KK0081_GENE.RSV_APLY_YMD <= ? AND
                                KK0081_GENE.RSV_APLY_CD = '2' AND
                                KK0081_GENE.MK_FLG = '0'
                            )
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_322)
#--KKPRC01701
#--指定されたサービス契約が住所変更中の場合はレコードを返します。
#-----------------------------------------------------------

--KEY:KK_SELECT_322

SELECT
    KK2091.ADCHG_NO,
    KK2101.CHAF_SKBT_NO
FROM
    KK_T_ADCHG KK2091
INNER JOIN
    KK_T_ADCHG_DTL KK2101
ON
    KK2091.ADCHG_NO = KK2101.ADCHG_NO
WHERE
    KK2091.ADCHG_STAT IN ('001','002') AND
    KK2091.MK_FLG = '0' AND
    KK2101.ADCHG_DTL_SBT_CD = '01' AND
    KK2101.CHBF_SKBT_NO = ? AND
    KK2101.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_323)
#--指示書発行対象のサービス契約の情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_323

SELECT DISTINCT
       KK0081.SYSID
      ,KK0081.SVC_KEI_NO
      ,NVL2(KK0081.SHOSA_CL_YMD,'20991231',KK0081.SHOSA_YMD) AS SHOSA_YMD
      ,NVL(DECODE(KK0081.SVC_KEI_STAT,'910',KK0081.SVC_ENDYMD,'920',KK0081.SVC_CANCEL_YMD,'20991231'),'20991231') AS SVC_ENDYMD
      ,KK0081.MK_FLG
      ,KK0081.SVC_CD
      ,KK0081.PCRS_CD
      ,KK2141.OLD_ICS_KEI_SVC_CD
      ,KK2141.OLD_ICS_PPLAN_CD
      ,KK2141.OLD_ICS_HUKA_SVC_SBT_CD
      ,KK2141.SOKU_WARI_UM
      ,KK0081.RSV_APLY_YMD
      ,KK0081.GENE_ADD_DTM
FROM KK_T_SVC_KEI KK0081
      INNER JOIN KK_M_OLD_ICS_CD_CHG KK2141
      ON KK2141.PRC_GRP_CD = KK0081.PRC_GRP_CD
      AND KK2141.PCRS_CD = KK0081.PCRS_CD
      AND KK2141.PPLAN_CD = KK0081.PPLAN_CD
      AND KK2141.RNK_SAKI_SYS_SKBT_CD = '02'
      AND KK2141.OLD_ICS_CD_CHG_SBT_CD = '04'
      AND KK2141.MK_FLG = '0'
WHERE KK0081.SVC_KEI_NO IN (?)
AND (KK0081.SHOSA_YMD IS NOT NULL OR KK0081.SHOSA_CL_YMD IS NOT NULL)
AND KK0081.SHOSA_DSL_FIN_CD = '1'
AND (
      (KK0081.PRC_GRP_CD <> '10'
      AND (KK0081.SVC_KEI_NO, KK0081.SYSID, KK0081.PRC_GRP_CD, KK0081.PCRS_CD, KK0081.PPLAN_CD, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) IN (
            SELECT KK0081_G.SVC_KEI_NO, KK0081_G.SYSID, KK0081_G.PRC_GRP_CD, KK0081_G.PCRS_CD, KK0081_G.PPLAN_CD, MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
            FROM KK_T_SVC_KEI KK0081_G
            WHERE KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_G.RSV_APLY_CD = '2'
            AND KK0081_G.RSV_APLY_YMD <= ?
            AND KK0081_G.MK_FLG = '0'
            AND KK0081_G.PCRS_CD IN (
                  SELECT KK0791.PCRS_CD
                  FROM KK_M_PCRS KK0791
                  WHERE KK0791.ID_TCHISHO_HAK_SKBT_CD <> '0'
                  AND KK0791.GENE_ADD_DTM = (
                        SELECT MAX(KK0791_G.GENE_ADD_DTM)
                        FROM KK_M_PCRS KK0791_G
                        WHERE KK0791_G.PCRS_CD = KK0791.PCRS_CD
                        AND KK0791_G.PCRS_TSTAYMD <= ?
                        AND KK0791_G.PCRS_TENDYMD >= ?
                        AND KK0791_G.MK_FLG = '0'
                        )
                  )
            GROUP BY KK0081_G.SVC_KEI_NO, KK0081_G.SYSID, KK0081_G.PRC_GRP_CD, KK0081_G.PCRS_CD, KK0081_G.PPLAN_CD
            )
      )
      OR
      (KK0081.PRC_GRP_CD = '10'
      AND (KK0081.SVC_KEI_NO, KK0081.SYSID, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) IN (
            SELECT KK0081_G.SVC_KEI_NO, KK0081_G.SYSID, MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
            FROM KK_T_SVC_KEI KK0081_G
            WHERE KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_G.RSV_APLY_CD = '2'
            AND KK0081_G.RSV_APLY_YMD <= ?
            AND KK0081_G.MK_FLG = '0'
            AND KK0081_G.PCRS_CD IN (
                  SELECT KK0791.PCRS_CD
                  FROM KK_M_PCRS KK0791
                  WHERE KK0791.ID_TCHISHO_HAK_SKBT_CD <> '0'
                  AND KK0791.GENE_ADD_DTM = (
                        SELECT MAX(KK0791_G.GENE_ADD_DTM)
                        FROM KK_M_PCRS KK0791_G
                        WHERE KK0791_G.PCRS_CD = KK0791.PCRS_CD
                        AND KK0791_G.PCRS_TSTAYMD <= ?
                        AND KK0791_G.PCRS_TENDYMD >= ?
                        AND KK0791_G.MK_FLG = '0'
                        )
                  )
            GROUP BY KK0081_G.SVC_KEI_NO, KK0081_G.SYSID
            )
      )
)
ORDER BY KK0081.RSV_APLY_YMD DESC,KK0081.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_324)
#--２番号コースの有無を確認する。
#-----------------------------------------------------------

--KEY:KK_SELECT_324

SELECT KK0081.SVC_KEI_NO
FROM KK_T_SVC_KEI KK0081
WHERE KK0081.SVC_KEI_NO = ?
AND KK0081.SYSID = ?
AND KK0081.PCRS_CD = 'A32'
AND KK0081.RSV_APLY_CD = '2'
AND KK0081.RSV_APLY_YMD <= ?
AND KK0081.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_325)
#--契約内容通知対象契約を抽出するためサービス契約関連情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_325

SELECT KK0081_02.SVC_KEI_NO
     , KK3001.KNYTCS_DSP_MNGN_CD
     , KK3001.DSP_PST_SKCD
     , KK3001.MNGN_DSP_JKN_KSITEI_CD
     , KK0081_02.SVC_CD
     , KK0081_02.PRC_GRP_CD
     , KK0081_02.PCRS_CD
     , KK0081_02.PPLAN_CD
     , KK0081_02.TK_HOSHIKI_KEI_NO
     , 1 AS TV_DSP_NO
     , KK0081_02.SVC_PAUSE_YMD
     , KK0081_02.SVC_PAUSE_RLS_YMD
     , KK3001.PCRS_CD AS PCRS_CD_KK3001
     , KK0081_02.NTTORS_DIV
FROM  (
    SELECT KK0081_01.SVC_KEI_NO
         , KK0081_01.SVC_CD
         , KK0081_01.PRC_GRP_CD
         , KK0081_01.PCRS_CD
         , KK0081_01.PPLAN_CD
         , KK0081_01.TK_HOSHIKI_KEI_NO
         , KK0081_01.SHOSA_YMD
         , KK0081_01.SOKU_WARI_UM
         , KK0081_01.CHOKZUWRI_UM
         , KK0081_01.CDBS_STCH_SET_WRIB_UM
         , KK0081_01.STDARD_KOJIHI_STI_CD
         , CASE 
             WHEN KK0081_01.TK_HOSHIKI_KEI_NO IS NULL THEN
              '999'
             ELSE
              KK0891_01.MANSION_BUKKEN_CD
           END AS MANSION_BUKKEN_CD
         , KK0891_01.TK_HOSHIKI_PATTERN_CD
         , KK0891_01.TK_HOSHIKI_CD
         , KK0891_01.VDSL_PLAN_CD
         , KK0081_01.SVC_PAUSE_YMD
         , KK0081_01.SVC_PAUSE_RLS_YMD
         , KK0081_01.NTTORS_DIV
    FROM  (
        SELECT KK0081.SVC_KEI_NO
             , KK0081.SVC_CD
             , NVL(KK1681.NEW_PRC_GRP_CD, KK0081.PRC_GRP_CD) AS PRC_GRP_CD
             , NVL(KK1681.NEW_PCRS_CD,    KK0081.PCRS_CD)    AS PCRS_CD
             , NVL(KK1681.NEW_PPLAN_CD,   KK0081.PPLAN_CD)   AS PPLAN_CD
             , CASE
                 WHEN KK1681.NEW_PCRS_CD IS NOT NULL THEN
                   KK1681.NEW_TK_HOSHIKI_KEI_NO
                 ELSE
                   KK0081.TK_HOSHIKI_KEI_NO
               END AS TK_HOSHIKI_KEI_NO
             , KK0081.SHOSA_YMD
             , CASE
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KK_T_WRIB_SVC_KEI KK0451
                   INNER JOIN KK_T_WRISVC_TG_KEI KK0481
                   ON     KK0481.WRIB_SVC_KEI_NO = KK0451.WRIB_SVC_KEI_NO
                   AND    KK0481.WRISVC_TG_KEI_TSTAYMD <= ?
                   AND    KK0481.WRISVC_TG_KEI_TENDYMD >= ?
                   AND   (KK0481.WRIB_SVC_KEI_NO, KK0481.WRIB_SVC_TRGT_KEI_NO, KK0481.GENE_ADD_DTM) =
                      (SELECT KK0481_GENE.WRIB_SVC_KEI_NO, KK0481_GENE.WRIB_SVC_TRGT_KEI_NO, MAX(KK0481_GENE.GENE_ADD_DTM) AS KK0481_MAX
                       FROM   KK_T_WRISVC_TG_KEI KK0481_GENE
                       WHERE  KK0481_GENE.WRIB_SVC_KEI_NO = KK0481.WRIB_SVC_KEI_NO
                       AND    KK0481_GENE.WRIB_SVC_TRGT_KEI_NO = KK0481.WRIB_SVC_TRGT_KEI_NO
                       AND    KK0481_GENE.MK_FLG = '0'
                       GROUP BY KK0481_GENE.WRIB_SVC_KEI_NO, KK0481_GENE.WRIB_SVC_TRGT_KEI_NO)
                   INNER JOIN KK_M_WRIB_SVC KK0841
                   ON     KK0841.WRIB_SVC_CD = KK0451.WRIB_SVC_CD
                   AND   (KK0841.WRIB_SVC_CD, KK0841.RSV_APLY_YMD || KK0841.GENE_ADD_DTM) =
                      (SELECT KK0841_GENE.WRIB_SVC_CD, MAX(KK0841_GENE.RSV_APLY_YMD || KK0841_GENE.GENE_ADD_DTM) AS KK0841_MAX
                       FROM   KK_M_WRIB_SVC KK0841_GENE
                       WHERE  KK0841_GENE.WRIB_SVC_CD = KK0841.WRIB_SVC_CD
                       AND    KK0841_GENE.RSV_APLY_YMD <= ?
                       AND    KK0841_GENE.MK_FLG = '0'
                       GROUP BY KK0841_GENE.WRIB_SVC_CD)
                   WHERE  KK0481.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KK0841.WRIB_TYPE_CD = '31' 
                   AND    KK0451.WRIB_SVC_KEI_STAT IN ('010', '100')
                   AND   (KK0451.WRIB_SVC_KEI_NO, KK0451.RSV_APLY_YMD || KK0451.GENE_ADD_DTM) =
                      (SELECT KK0451_GENE.WRIB_SVC_KEI_NO, MAX(KK0451_GENE.RSV_APLY_YMD || KK0451_GENE.GENE_ADD_DTM) AS KK0451_MAX
                       FROM   KK_T_WRIB_SVC_KEI KK0451_GENE
                       WHERE  KK0451_GENE.WRIB_SVC_KEI_NO = KK0451.WRIB_SVC_KEI_NO
                       AND    KK0451_GENE.RSV_APLY_YMD <= ?
                       AND    KK0451_GENE.RSV_APLY_CD = '2'
                       AND    KK0451_GENE.MK_FLG = '0'
                       GROUP BY KK0451_GENE.WRIB_SVC_KEI_NO)
                 ) THEN '1'
                 ELSE '0'
               END AS SOKU_WARI_UM
             , CASE
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KK_T_WRIB_SVC_KEI KK0451
                   INNER JOIN KK_T_WRISVC_TG_KEI KK0481
                   ON     KK0481.WRIB_SVC_KEI_NO = KK0451.WRIB_SVC_KEI_NO
                   AND    KK0481.WRISVC_TG_KEI_TSTAYMD <= ?
                   AND    KK0481.WRISVC_TG_KEI_TENDYMD >= ?
                   AND   (KK0481.WRIB_SVC_KEI_NO, KK0481.WRIB_SVC_TRGT_KEI_NO, KK0481.GENE_ADD_DTM) =
                      (SELECT KK0481_GENE.WRIB_SVC_KEI_NO, KK0481_GENE.WRIB_SVC_TRGT_KEI_NO, MAX(KK0481_GENE.GENE_ADD_DTM) AS KK0481_MAX
                       FROM   KK_T_WRISVC_TG_KEI KK0481_GENE
                       WHERE  KK0481_GENE.WRIB_SVC_KEI_NO = KK0481.WRIB_SVC_KEI_NO
                       AND    KK0481_GENE.WRIB_SVC_TRGT_KEI_NO = KK0481.WRIB_SVC_TRGT_KEI_NO
                       AND    KK0481_GENE.MK_FLG = '0'
                       GROUP BY KK0481_GENE.WRIB_SVC_KEI_NO, KK0481_GENE.WRIB_SVC_TRGT_KEI_NO)
                   INNER JOIN KK_M_WRIB_SVC KK0841
                   ON     KK0841.WRIB_SVC_CD = KK0451.WRIB_SVC_CD
                   AND   (KK0841.WRIB_SVC_CD, KK0841.RSV_APLY_YMD || KK0841.GENE_ADD_DTM) =
                      (SELECT KK0841_GENE.WRIB_SVC_CD, MAX(KK0841_GENE.RSV_APLY_YMD || KK0841_GENE.GENE_ADD_DTM) AS KK0841_MAX
                       FROM   KK_M_WRIB_SVC KK0841_GENE
                       WHERE  KK0841_GENE.WRIB_SVC_CD = KK0841.WRIB_SVC_CD
                       AND    KK0841_GENE.RSV_APLY_YMD <= ?
                       AND    KK0841_GENE.MK_FLG = '0'
                       GROUP BY KK0841_GENE.WRIB_SVC_CD)
                   WHERE  KK0481.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KK0841.WRIB_TYPE_CD = '32'
                   AND    KK0451.WRIB_SVC_KEI_STAT IN ('010', '100')
                   AND   (KK0451.WRIB_SVC_KEI_NO, KK0451.RSV_APLY_YMD || KK0451.GENE_ADD_DTM) =
                      (SELECT KK0451_GENE.WRIB_SVC_KEI_NO, MAX(KK0451_GENE.RSV_APLY_YMD || KK0451_GENE.GENE_ADD_DTM) AS KK0451_MAX
                       FROM   KK_T_WRIB_SVC_KEI KK0451_GENE
                       WHERE  KK0451_GENE.WRIB_SVC_KEI_NO = KK0451.WRIB_SVC_KEI_NO
                       AND    KK0451_GENE.RSV_APLY_YMD <= ?
                       AND    KK0451_GENE.RSV_APLY_CD = '2'
                       AND    KK0451_GENE.MK_FLG = '0'
                       GROUP BY KK0451_GENE.WRIB_SVC_KEI_NO)
                 ) THEN '1'
                 ELSE '0'
               END AS CHOKZUWRI_UM
             , CASE
                 WHEN KK0081.SVC_CD = '03'
                  AND EXISTS (
                   SELECT 1
                   FROM   KK_T_WRIB_SVC_KEI KK0451
                   INNER JOIN KK_T_WRISVC_TG_KEI KK0481
                   ON     KK0481.WRIB_SVC_KEI_NO = KK0451.WRIB_SVC_KEI_NO
                   AND    KK0481.WRISVC_TG_KEI_TSTAYMD <= ?
                   AND    KK0481.WRISVC_TG_KEI_TENDYMD >= ?
                   AND   (KK0481.WRIB_SVC_KEI_NO, KK0481.WRIB_SVC_TRGT_KEI_NO, KK0481.GENE_ADD_DTM) =
                      (SELECT KK0481_GENE.WRIB_SVC_KEI_NO, KK0481_GENE.WRIB_SVC_TRGT_KEI_NO, MAX(KK0481_GENE.GENE_ADD_DTM) AS KK0481_MAX
                       FROM   KK_T_WRISVC_TG_KEI KK0481_GENE
                       WHERE  KK0481_GENE.WRIB_SVC_KEI_NO = KK0481.WRIB_SVC_KEI_NO
                       AND    KK0481_GENE.WRIB_SVC_TRGT_KEI_NO = KK0481.WRIB_SVC_TRGT_KEI_NO
                       AND    KK0481_GENE.MK_FLG = '0'
                       GROUP BY KK0481_GENE.WRIB_SVC_KEI_NO, KK0481_GENE.WRIB_SVC_TRGT_KEI_NO)
                   WHERE  KK0481.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KK0451.WRIB_SVC_CD = 'W00000009'
                   AND    KK0451.WRIB_SVC_KEI_STAT IN ('010', '100')
                   AND   (KK0451.WRIB_SVC_KEI_NO, KK0451.RSV_APLY_YMD || KK0451.GENE_ADD_DTM) =
                      (SELECT KK0451_GENE.WRIB_SVC_KEI_NO, MAX(KK0451_GENE.RSV_APLY_YMD || KK0451_GENE.GENE_ADD_DTM) AS KK0451_MAX
                       FROM   KK_T_WRIB_SVC_KEI KK0451_GENE
                       WHERE  KK0451_GENE.WRIB_SVC_KEI_NO = KK0451.WRIB_SVC_KEI_NO
                       AND    KK0451_GENE.RSV_APLY_YMD <= ?
                       AND    KK0451_GENE.RSV_APLY_CD = '2'
                       AND    KK0451_GENE.MK_FLG = '0'
                       GROUP BY KK0451_GENE.WRIB_SVC_KEI_NO)
                 ) THEN '1'
                 ELSE '0'
               END AS CDBS_STCH_SET_WRIB_UM
             , CASE
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KK_M_PCRS KK0791
                   WHERE  KK0791.PCRS_CD = KK0081.PCRS_CD
                   AND    KK0791.PRC_GRP_CD = KK0081.PRC_GRP_CD
                   AND    KK0081.PRC_GRP_CD = '02'
                   AND    KK0791.NTTORS_DIV IS NOT NULL
                   AND KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM = 
                  (SELECT MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX
                   FROM KK_M_PCRS KK0791_GENE
                   WHERE KK0791_GENE.PCRS_CD = KK0791.PCRS_CD
                   AND KK0791_GENE.RSV_APLY_YMD <= ?
                   AND KK0791_GENE.MK_FLG = '0')
                 ) THEN '09'
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KK_T_ICJKN_SETTE KK1021
                   WHERE  KK1021.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KK1021.TMP_PAY_PRC_NO = '999990000001'
                   AND    KK1021.FIN_STAT_CD = '2'
                   AND    KK1021.MK_FLG = '0'
                   AND    '00001' = ?
                 ) THEN '02'
                 WHEN EXISTS
                 ( SELECT 1
                   FROM   KK_T_ICJKN_SETTE KK1021
                   INNER JOIN KK_T_MSKM_DTL KK0021
                   ON  KK0021.MSKM_DTL_NO = KK1021.MSKM_DTL_NO
                   AND KK0021.GENE_ADD_DTM = (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) as MAX
                                              FROM KK_T_MSKM_DTL KK0021_GENE
                                              WHERE KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
                                              AND KK0021_GENE.MK_FLG = '0'
                                              ) 
                   INNER JOIN 
                    (SELECT KK3011.MSKM_NO
                     FROM   KK_T_KNYTCS KK3011
                     WHERE  KK3011.KNYTCS_NO = ?
                     AND    KK3011.MK_FLG    = '0'
                    )KK3011
                   ON KK3011.MSKM_NO = KK0021.MSKM_NO
                   WHERE  KK1021.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KK1021.TMP_PAY_PRC_NO = '999990000001'
                   AND    KK1021.FIN_STAT_CD = '2'
                   AND    KK1021.MK_FLG = '0'
                   AND    '00001' <> ?
                 ) THEN '02'
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   WHERE  KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.SVC_CD = '03'
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_STAT IN ('130', '140', '150', '160', '170', '180', '190')
                   AND    KU0011.KOJIAK_SBT_CD = '001'
                   AND    KU0011.MK_FLG = '0'
                 ) THEN '01'
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   WHERE  KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_STAT IN ('130', '140', '150', '160', '170', '180', '190')
                   AND    KU0011.KOJIAK_SBT_CD = '001'
                   AND    KU0011.MK_FLG = '0'
                   AND EXISTS(
                         SELECT 1
                         FROM KK_T_KOJIHI_KAP_KEI KK3131
                         INNER JOIN KK_M_KAP_PLAN KK2521
                         ON KK3131.KAP_PLAN_CD = KK2521.KAP_PLAN_CD
                         WHERE KK3131.KAP_KEI_STAT = '020'
                         AND   KK3131.SVC_KEI_KAISEN_UCWK_NO = ?
                         AND   KK2521.KAP_HAMBAI_FORM_CD = '01'
                         AND   KK2521.RSV_APLY_YMD || KK2521.GENE_ADD_DTM = 
                                        (SELECT 
                                             MAX(KK2521_GENE.RSV_APLY_YMD || KK2521_GENE.GENE_ADD_DTM) AS KK2521_MAX
                                         FROM  KK_M_KAP_PLAN KK2521_GENE
                                         WHERE KK2521_GENE.KAP_PLAN_CD = KK2521.KAP_PLAN_CD 
                                         AND   KK2521.KAP_PLAN_TSTAYMD <= ? 
                                         AND   KK2521.KAP_PLAN_TENDYMD >= ? 
                                         AND   KK2521_GENE.RSV_APLY_YMD <= ? 
                                         AND   KK2521_GENE.MK_FLG = '0'
                                        )
                         AND   KK3131.GENE_ADD_DTM = 
                                        (SELECT
                                            MAX(KK3131_GENE.GENE_ADD_DTM) AS KK3131_MAX
                                        FROM
                                            KK_T_KOJIHI_KAP_KEI KK3131_GENE
                                        WHERE
                                            KK3131_GENE.KOJIHI_KAP_KEI_NO = KK3131.KOJIHI_KAP_KEI_NO AND
                                            KK3131_GENE.MK_FLG = '0'
                                        )
                   )
                 ) THEN '03'
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   WHERE  KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_STAT IN ('130', '140', '150', '160', '170', '180', '190')
                   AND    KU0011.KOJIAK_SBT_CD = '001'
                   AND    KU0011.MK_FLG = '0'
                   AND EXISTS(
                         SELECT 1
                         FROM KK_T_KOJIHI_KAP_KEI KK3131
                         INNER JOIN KK_M_KAP_PLAN KK2521
                         ON KK3131.KAP_PLAN_CD = KK2521.KAP_PLAN_CD
                         WHERE KK3131.KAP_KEI_STAT = '020'
                         AND   KK3131.SVC_KEI_KAISEN_UCWK_NO = ?
                         AND   KK2521.KAP_HAMBAI_FORM_CD = '04'
                         AND   KK2521.RSV_APLY_YMD || KK2521.GENE_ADD_DTM = 
                                        (SELECT 
                                             MAX(KK2521_GENE.RSV_APLY_YMD || KK2521_GENE.GENE_ADD_DTM) AS KK2521_MAX
                                         FROM  KK_M_KAP_PLAN KK2521_GENE
                                         WHERE KK2521_GENE.KAP_PLAN_CD = KK2521.KAP_PLAN_CD 
                                         AND   KK2521.KAP_PLAN_TSTAYMD <= ? 
                                         AND   KK2521.KAP_PLAN_TENDYMD >= ? 
                                         AND   KK2521_GENE.RSV_APLY_YMD <= ? 
                                         AND   KK2521_GENE.MK_FLG = '0'
                                        )
                         AND   KK3131.GENE_ADD_DTM = 
                                        (SELECT
                                            MAX(KK3131_GENE.GENE_ADD_DTM) AS KK3131_MAX
                                        FROM
                                            KK_T_KOJIHI_KAP_KEI KK3131_GENE
                                        WHERE
                                            KK3131_GENE.KOJIHI_KAP_KEI_NO = KK3131.KOJIHI_KAP_KEI_NO AND
                                            KK3131_GENE.MK_FLG = '0'
                                        )
                   )
                 ) THEN '04'
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   WHERE  KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_STAT IN ('130', '140', '150', '160', '170', '180', '190')
                   AND    KU0011.KOJIAK_SBT_CD = '001'
                   AND    KU0011.MK_FLG = '0'
                   AND EXISTS(
                         SELECT 1
                         FROM KK_T_KOJIHI_KAP_KEI KK3131
                         INNER JOIN KK_M_KAP_PLAN KK2521
                         ON KK3131.KAP_PLAN_CD = KK2521.KAP_PLAN_CD
                         WHERE KK3131.KAP_KEI_STAT = '020'
                         AND   KK3131.SVC_KEI_KAISEN_UCWK_NO = ?
                         AND   KK2521.KAP_HAMBAI_FORM_CD = '02'
                         AND   KK2521.RSV_APLY_YMD || KK2521.GENE_ADD_DTM = 
                                        (SELECT 
                                             MAX(KK2521_GENE.RSV_APLY_YMD || KK2521_GENE.GENE_ADD_DTM) AS KK2521_MAX
                                         FROM  KK_M_KAP_PLAN KK2521_GENE
                                         WHERE KK2521_GENE.KAP_PLAN_CD = KK2521.KAP_PLAN_CD 
                                         AND   KK2521.KAP_PLAN_TSTAYMD <= ? 
                                         AND   KK2521.KAP_PLAN_TENDYMD >= ? 
                                         AND   KK2521_GENE.RSV_APLY_YMD <= ? 
                                         AND   KK2521_GENE.MK_FLG = '0'
                                        )
                         AND   KK3131.GENE_ADD_DTM = 
                                        (SELECT
                                            MAX(KK3131_GENE.GENE_ADD_DTM) AS KK3131_MAX
                                        FROM
                                            KK_T_KOJIHI_KAP_KEI KK3131_GENE
                                        WHERE
                                            KK3131_GENE.KOJIHI_KAP_KEI_NO = KK3131.KOJIHI_KAP_KEI_NO AND
                                            KK3131_GENE.MK_FLG = '0'
                                        )
                   )
                 ) THEN '05'
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   AND    KU0011.MK_FLG = '0'
                   INNER JOIN KK_T_SVC_KEI_EOH_NET KK0091
                   ON     KK0091.SVC_KEI_NO = KU0081.SVC_KEI_NO
                   AND    KK0091.MK_FLG = '0'
                   INNER JOIN KU_T_KJAK_EOH_NET KU0021
                   ON     KU0021.KOJIAK_NO = KU0081.KOJIAK_NO
                   AND    KU0021.MK_FLG = '0'
                   WHERE  KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KK0091.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_STAT IN ('130', '140', '150', '160', '170', '180', '190')
                   AND    KU0011.KOJIAK_SBT_CD = '001'
                   AND    ((KU0011.EQUIP_RYUYO_UM = '2' AND (KU0021.KOJI_SCOPE_CD <>'070' OR  KU0021.KOJI_SCOPE_CD IS NULL)) OR KU0011.EQUIP_RYUYO_UM = '3')
                   AND EXISTS(
                      SELECT MAX(KK0091_GENE.GENE_ADD_DTM) AS KK0091_MAX
                      FROM KK_T_SVC_KEI_EOH_NET KK0091_GENE
                      WHERE 
                        KK0091_GENE.SVC_KEI_NO = KK0091.SVC_KEI_NO
                      AND KK0091_GENE.MK_FLG = '0'
                      AND KK0091_GENE.NRKEMT_SVKEI_NO IS NOT NULL)
                 ) THEN '07'
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   AND    KU0011.MK_FLG = '0'
                   INNER JOIN KK_T_SVC_KEI_EOH_NET KK0091
                   ON     KK0091.SVC_KEI_NO = KU0081.SVC_KEI_NO
                   AND    KK0091.MK_FLG = '0'
                   INNER JOIN KU_T_KJAK_EOH_NET KU0021
                   ON     KU0021.KOJIAK_NO = KU0081.KOJIAK_NO
                   AND    KU0021.MK_FLG = '0'
                   WHERE  KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KK0091.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_STAT IN ('130', '140', '150', '160', '170', '180', '190')
                   AND    KU0011.KOJIAK_SBT_CD = '001'
                   AND    (KU0011.EQUIP_RYUYO_UM = '1' OR (KU0021.KOJI_SCOPE_CD = '070' AND KU0011.EQUIP_RYUYO_UM = '2'))
                   AND EXISTS(
                      SELECT MAX(KK0091_GENE.GENE_ADD_DTM) AS KK0091_MAX
                      FROM KK_T_SVC_KEI_EOH_NET KK0091_GENE
                      WHERE 
                        KK0091_GENE.SVC_KEI_NO = KK0091.SVC_KEI_NO
                      AND KK0091_GENE.MK_FLG = '0'
                      AND KK0091_GENE.NRKEMT_SVKEI_NO IS NOT NULL)
                 ) THEN '08'
                  WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   WHERE  KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_STAT IN ('130', '140', '150', '160', '170', '180', '190')
                   AND    KU0011.KOJIAK_SBT_CD = '001'
                   AND    KU0011.MK_FLG = '0'
                 ) THEN '01'
                 WHEN '00007' = ?
                   THEN '01' 
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   AND    KU0011.MK_FLG = '0'
                   INNER JOIN KU_T_KJAK_EOH_NET KU0021
                   ON     KU0021.KOJIAK_NO = KU0081.KOJIAK_NO
                   AND    KU0021.MK_FLG = '0'
                   WHERE  KU0081.SYSID = KK0081.SYSID
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_SBT_CD = '015'
                   AND    KU0011.KOJIAK_STAT IN ('130','140','150','160','170','180','190')
                   AND    KU0011.KOJI_UK_OPTNTY_IDO_DIV <> '00093'
                   AND    ( KU0021.KOJI_SCOPE_CD <>'070' OR  KU0021.KOJI_SCOPE_CD IS NULL)
                   AND    '00001' = ?
                   ) THEN '06'
                 WHEN EXISTS (
                   SELECT 1
                   FROM   KU_T_SVKEI_KOJIAK KU0081
                   INNER JOIN KU_T_KOJIAK KU0011
                   ON     KU0011.KOJIAK_NO = KU0081.KOJIAK_NO
                   AND    KU0011.MK_FLG = '0'
                   INNER JOIN KU_T_KJAK_EOH_NTMANS KU0061
                   ON     KU0061.KOJIAK_NO = KU0081.KOJIAK_NO
                   AND    KU0061.MK_FLG = '0'
                   WHERE  KU0081.SYSID = KK0081.SYSID
                   AND    KU0081.SVKEI_KOJIAK_TSTAYMD <= ?
                   AND    KU0081.SVKEI_KOJIAK_TENDYMD >= ?
                   AND    KU0081.MK_FLG = '0'
                   AND    KU0011.KOJIAK_SBT_CD = '015'
                   AND    KU0011.KOJIAK_STAT IN ('130','140','150','160','170','180','190')
                   AND    KU0011.KOJI_UK_OPTNTY_IDO_DIV <> '00093'
                   AND    (KU0061.KOJI_SCOPE_CD <>'070' OR  KU0061.KOJI_SCOPE_CD IS NULL)
                   AND    '00001' = ?
                 ) THEN '06'
                 ELSE NULL
               END AS STDARD_KOJIHI_STI_CD  
             , KK0081.SVC_PAUSE_YMD
             , KK0081.SVC_PAUSE_RLS_YMD
             , KK0791.NTTORS_DIV
        FROM   KK_T_SVC_KEI KK0081
        LEFT OUTER JOIN KK_T_IDO_RSV KK1681
        ON     KK1681.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK1681.IDO_RSV_STAT_CD IN ('00', '03')
        AND    KK1681.IDO_RSV_DTL_CD = '003'
        AND    KK1681.MK_FLG = '0' 
        INNER JOIN KK_M_PCRS KK0791
        ON     KK0791.PCRS_CD = KK0081.PCRS_CD
        AND    KK0791.PRC_GRP_CD = KK0081.PRC_GRP_CD
        WHERE  KK0081.SVC_KEI_NO IN (?) 
        AND    KK0081.SVC_KEI_STAT IN ('020', '030', '100', '210', '220')
        AND   (KK0081.SHOSA_DSL_FIN_CD IS NULL OR KK0081.SHOSA_DSL_FIN_CD <> '2')
        AND   (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
           (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
            FROM   KK_T_SVC_KEI KK0081_GENE
            WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND    KK0081_GENE.RSV_APLY_YMD <= ?
            AND    KK0081_GENE.RSV_APLY_CD = '2'
            AND    KK0081_GENE.MK_FLG = '0'
            GROUP BY KK0081_GENE.SVC_KEI_NO)
        AND   (KK0791.PCRS_CD, KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM) =
           (SELECT KK0791_GENE.PCRS_CD, MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_GENE_MAX
           FROM   KK_M_PCRS KK0791_GENE
           WHERE  KK0791_GENE.PCRS_CD = KK0791.PCRS_CD
           AND    KK0791_GENE.RSV_APLY_YMD <= ?
           AND    KK0791_GENE.MK_FLG = '0'
           GROUP BY KK0791_GENE.PCRS_CD)
    ) KK0081_01
    LEFT OUTER JOIN (
        SELECT KK0891.TK_HOSHIKI_KEI_NO
             , KK0891.TK_HOSHIKI_PATTERN_CD
             , KK0891.TK_HOSHIKI_CD
             , CASE KK0891.TK_PRC_SBT_CD
                 WHEN '001' THEN
                   '02'
                 ELSE
                   '01'
               END AS VDSL_PLAN_CD
             , KK0861.MANSION_BUKKEN_CD
        FROM   KK_T_TK_HOSHIKI_KEI KK0891
        INNER JOIN KK_T_KAISEN_USE_KEI KK0881
        ON     KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
        INNER JOIN KK_T_OWNR_KEI KK0871
        ON     KK0871.OWNR_KEI_NO = KK0881.OWNR_KEI_NO
        INNER JOIN KK_T_MANSION_BUKKEN KK0861
        ON     KK0861.MANSION_BUKKEN_NO = KK0871.MANSION_BUKKEN_NO
        WHERE  KK0891.MK_FLG = '0'
        AND    KK0881.MK_FLG = '0'
        AND    KK0871.MK_FLG = '0'
        AND    KK0861.MK_FLG = '0'
    ) KK0891_01
    ON     KK0891_01.TK_HOSHIKI_KEI_NO = KK0081_01.TK_HOSHIKI_KEI_NO
) KK0081_02
INNER JOIN KK_M_KNYTCS_DSP_MNGN KK3001
ON     KK3001.MNGN_DSP_JKN_SBT_CD = '01'
AND   (KK3001.SVC_CD                IS NULL OR KK3001.SVC_CD                = KK0081_02.SVC_CD)
AND   (KK3001.PRC_GRP_CD            IS NULL OR KK3001.PRC_GRP_CD            = KK0081_02.PRC_GRP_CD)
AND   (KK3001.PCRS_CD               IS NULL OR KK3001.PCRS_CD               = KK0081_02.PCRS_CD)
AND   (KK3001.PPLAN_CD              IS NULL OR KK3001.PPLAN_CD              = KK0081_02.PPLAN_CD)
AND   (KK3001.MANSION_BUKKEN_CD     IS NULL OR KK3001.MANSION_BUKKEN_CD     = KK0081_02.MANSION_BUKKEN_CD)
AND   (KK3001.MANS_TK_HSK_PTN_CD    IS NULL OR KK3001.MANS_TK_HSK_PTN_CD    = KK0081_02.TK_HOSHIKI_PATTERN_CD)
AND   (KK3001.MANSION_TK_HOSHIKI_CD IS NULL OR KK3001.MANSION_TK_HOSHIKI_CD = KK0081_02.TK_HOSHIKI_CD)
AND   (KK3001.MANSION_VDSL_PLAN_CD  IS NULL OR KK3001.MANSION_VDSL_PLAN_CD  = KK0081_02.VDSL_PLAN_CD)
AND   (KK3001.SOKU_WARI_UM          IS NULL OR KK3001.SOKU_WARI_UM          = KK0081_02.SOKU_WARI_UM)
AND   (KK3001.CHOKZUWRI_UM          IS NULL OR KK3001.CHOKZUWRI_UM          = KK0081_02.CHOKZUWRI_UM)
AND   (KK3001.CDBS_STCH_SET_WRIB_UM IS NULL OR KK3001.CDBS_STCH_SET_WRIB_UM = KK0081_02.CDBS_STCH_SET_WRIB_UM)
AND   (KK3001.STDARD_KOJIHI_STI_CD  IS NULL OR KK3001.STDARD_KOJIHI_STI_CD  = KK0081_02.STDARD_KOJIHI_STI_CD)
AND   (KK3001.MSKM_SBT_CD           IS NULL OR KK3001.MSKM_SBT_CD           = ?) 
AND   (KK3001.CLAUSE_TSTAYMD        IS NULL OR KK3001.CLAUSE_TSTAYMD       <= ?)
AND   (KK3001.CLAUSE_TENDYMD        IS NULL OR KK3001.CLAUSE_TENDYMD       >= ?)
AND    KK3001.KNYTCS_DSP_MNGN_TSTAYMD <= ?
AND    KK3001.KNYTCS_DSP_MNGN_TENDYMD >= ?
AND   (KK3001.KNYTCS_DSP_MNGN_CD, KK3001.RSV_APLY_YMD || KK3001.GENE_ADD_DTM) =
   (SELECT KK3001_GENE.KNYTCS_DSP_MNGN_CD, MAX(KK3001_GENE.RSV_APLY_YMD || KK3001_GENE.GENE_ADD_DTM) AS KK3001_MAX
    FROM   KK_M_KNYTCS_DSP_MNGN KK3001_GENE
    WHERE  KK3001_GENE.KNYTCS_DSP_MNGN_CD = KK3001.KNYTCS_DSP_MNGN_CD
    AND    KK3001_GENE.RSV_APLY_YMD <= ?
    AND    KK3001_GENE.MK_FLG = '0'
    GROUP BY KK3001_GENE.KNYTCS_DSP_MNGN_CD)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_326)
#--KKPRC55401
#--サービス契約番号に紐付く、契約者住所と回線場所住所を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_326

SELECT
    CK0011.KEISHA_AD_CD,
    CK0011.KEISHA_PCD,
    CK0011.KEISHA_STATE_NM,
    CK0011.KEISHA_CITY_NM,
    CK0011.KEISHA_OAZTSU_NM,
    CK0011.KEISHA_AZCHO_NM,
    CK0011.KEISHA_BNCHIGO,
    CK0011.KEISHA_ADRTTM,
    CK0011.KEISHA_ADRRM,
    KK0251.KAISEN_PLACE_AD_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0251.KAISEN_PLACE_ADRRM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241 ON KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
    INNER JOIN CK_T_CUST CK0011 ON KK0081.SYSID = CK0011.SYSID
    INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251 ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.GENE_ADD_DTM = ? AND
    CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = (SELECT
                                                        MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
                                                    FROM
                                                        CK_T_CUST CK0011_GENE
                                                    WHERE
                                                        CK0011_GENE.SYSID = CK0011.SYSID AND
                                                        CK0011_GENE.RSV_APLY_YMD <= ? AND
                                                        CK0011_GENE.RSV_APLY_CD = '2' AND
                                                        CK0011_GENE.MK_FLG = '0'
                                                    ) AND
    KK0241.KAISEN_UCWK_USE_STAYMD <= ? AND
    KK0241.KAISEN_UCWK_USE_ENDYMD >= ? AND
    KK0241.MK_FLG = '0' AND
    KK0251.SVC_KEI_KAISEN_UCWK_STAT = '100' AND
    KK0251.GENE_ADD_DTM = (SELECT
                                MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                            FROM
                                KK_T_SVKEI_KAISEN_UW KK0251_GENE
                            WHERE
                                KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                                KK0251_GENE.MK_FLG = '0'
                            )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_327)
#--KKPRC55401
#--サービス契約番号に紐付く、機器送付先住所と回線場所住所をする。
#-----------------------------------------------------------

--KEY:KK_SELECT_327

SELECT
    KK0251.KAISEN_PLACE_AD_CD,
    KK0251.KAISEN_PLACE_PCD,
    KK0251.KAISEN_PLACE_STATE_NM,
    KK0251.KAISEN_PLACE_CITY_NM,
    KK0251.KAISEN_PLACE_OAZTSU_NM,
    KK0251.KAISEN_PLACE_AZCHO_NM,
    KK0251.KAISEN_PLACE_BNCHIGO,
    KK0251.KAISEN_PLACE_ADRTTM,
    KK0251.KAISEN_PLACE_ADRRM,
    KK0341.KIKI_SOHUS_AD_CD,
    KK0341.KIKI_SOHUS_PCD,
    KK0341.KIKI_SOHUS_STATE_NM,
    KK0341.KIKI_SOHUS_CITY_NM,
    KK0341.KIKI_SOHUS_OAZTSU_NM,
    KK0341.KIKI_SOHUS_AZCHO_NM,
    KK0341.KIKI_SOHUS_BNCHIGO,
    KK0341.KIKI_SOHUS_ADRTTM,
    KK0341.KIKI_SOHUS_ADRRM
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241 ON KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
    INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251 ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
    INNER JOIN KK_T_KKTK_SVC_KEI KK0341 ON KK0081.SVC_KEI_NO = KK0341.SVC_KEI_NO OR
                                           KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0341.SVC_KEI_KAISEN_UCWK_NO
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.GENE_ADD_DTM = ? AND
    KK0241.KAISEN_UCWK_USE_STAYMD <= ? AND
    KK0241.KAISEN_UCWK_USE_ENDYMD >= ? AND
    KK0241.MK_FLG = '0' AND
    KK0251.SVC_KEI_KAISEN_UCWK_STAT = '100' AND
    KK0251.GENE_ADD_DTM = (SELECT
                                MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_MAX
                            FROM
                                KK_T_SVKEI_KAISEN_UW KK0251_GENE
                            WHERE
                                KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                                KK0251_GENE.MK_FLG = '0'
                            ) AND
    KK0341.KKTK_SVC_KEI_STAT = '100' AND
    KK0341.RSV_APLY_YMD || KK0341.GENE_ADD_DTM = (SELECT
                                                        MAX(KK0341_GENE.RSV_APLY_YMD || KK0341_GENE.GENE_ADD_DTM) AS KK0341_MAX
                                                    FROM
                                                        KK_T_KKTK_SVC_KEI KK0341_GENE
                                                    WHERE
                                                        KK0341_GENE.KKTK_SVC_KEI_NO = KK0341.KKTK_SVC_KEI_NO AND
                                                        KK0341_GENE.RSV_APLY_YMD <= ? AND
                                                        KK0341_GENE.RSV_APLY_CD = '2' AND
                                                        KK0341_GENE.MK_FLG = '0'
                                                    ) 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_328)
#--KKPRC55301
#--eo光ネット・eo光電話同一申込チェック
#-----------------------------------------------------------

--KEY:KK_SELECT_328

SELECT 1
FROM  (
    SELECT KK0021_01.MSKM_NO
    FROM   KK_T_SVC_KEI KK0081_01
    INNER JOIN KK_T_MSKM_DTL KK0021_01
    ON     KK0021_01.MSKM_DTL_NO = KK0081_01.MSKM_DTL_NO
    WHERE  KK0081_01.SVC_KEI_NO = ? 
    AND   (KK0081_01.SVC_KEI_NO, KK0081_01.GENE_ADD_DTM) =
       (SELECT KK0081_01_GENE.SVC_KEI_NO, MIN(KK0081_01_GENE.GENE_ADD_DTM) AS KK0081_01_GENE_MIN
        FROM   KK_T_SVC_KEI KK0081_01_GENE
        WHERE  KK0081_01_GENE.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
        AND    KK0081_01_GENE.MK_FLG = '0'
        GROUP BY KK0081_01_GENE.SVC_KEI_NO)
    AND   (KK0021_01.MSKM_DTL_NO, KK0021_01.GENE_ADD_DTM) =
       (SELECT KK0021_01_GENE.MSKM_DTL_NO, MAX(KK0021_01_GENE.GENE_ADD_DTM) AS KK0021_01_GENE_MAX
        FROM   KK_T_MSKM_DTL KK0021_01_GENE
        WHERE  KK0021_01_GENE.MSKM_DTL_NO  = KK0021_01.MSKM_DTL_NO
        AND    KK0021_01_GENE.MK_FLG = '0'
        GROUP BY KK0021_01_GENE.MSKM_DTL_NO)
) NET
INNER JOIN (
    SELECT KK0021_02.MSKM_NO
    FROM   KK_T_SVC_KEI KK0081_02
    INNER JOIN KK_T_MSKM_DTL KK0021_02
    ON     KK0021_02.MSKM_DTL_NO = KK0081_02.MSKM_DTL_NO
    WHERE  KK0081_02.SVC_KEI_NO = ? 
    AND   (KK0081_02.SVC_KEI_NO, KK0081_02.GENE_ADD_DTM) =
       (SELECT KK0081_02_GENE.SVC_KEI_NO, MIN(KK0081_02_GENE.GENE_ADD_DTM) AS KK0081_02_GENE_MIN
        FROM   KK_T_SVC_KEI KK0081_02_GENE
        WHERE  KK0081_02_GENE.SVC_KEI_NO = KK0081_02.SVC_KEI_NO
        AND    KK0081_02_GENE.MK_FLG = '0'
        GROUP BY KK0081_02_GENE.SVC_KEI_NO)
    AND   (KK0021_02.MSKM_DTL_NO, KK0021_02.GENE_ADD_DTM) =
       (SELECT KK0021_02_GENE.MSKM_DTL_NO, MAX(KK0021_02_GENE.GENE_ADD_DTM) AS KK0021_02_GENE_MAX
        FROM   KK_T_MSKM_DTL KK0021_02_GENE
        WHERE  KK0021_02_GENE.MSKM_DTL_NO  = KK0021_02.MSKM_DTL_NO
        AND    KK0021_02_GENE.MK_FLG = '0'
        GROUP BY KK0021_02_GENE.MSKM_DTL_NO)
) TEL
ON     NET.MSKM_NO = TEL.MSKM_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KU_SELECT_001)
#--【工事関連受信情報反映】
#--サービス契約番号に該当する最新世代のレコードを取得する。
#-----------------------------------------------------------

--KEY:KU_SELECT_001

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.MSKM_DTL_NO,
    KK0081.SEIRI_NO,
    KK0081.MENKAIHAT_ANKEN_NO,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0081.SVC_USE_STA_KIBO_YMD,
    KK0081.RSV_TSTA_KIBO_YMD,
    KK0081.ID_SOKHOSHO_OUTPUT_YH,
    KK0081.SVC_KEI_KZKWRK_REQYMD,
    KK0081.SHOSA_YMD,
    KK0081.SHOSA_CL_YMD,
    KK0081.SKEKKA_CD,
    KK0081.SKEKKA_DTL_CD,
    KK0081.SKEKKA_HOKI_CD,
    KK0081.SKEKKA_SEND_CD,
    KK0081.PAYWAY_KEIZOKU_FLG,
    KK0081.FTRIAL_KANYU_YMD,
    KK0081.FTRIAL_PRD_ENDYMD,
    KK0081.HONKANYU_YMD,
    KK0081.HONKANYU_IKO_KIGEN_YMD,
    KK0081.KEI_CNC_YMD,
    KK0081.PLAN_STAYMD,
    KK0081.PLAN_ENDYMD,
    KK0081.PLAN_CHRG_STAYMD,
    KK0081.PLAN_CHRG_ENDYMD,
    KK0081.PLAN_END_SBT_CD,
    KK0081.RSV_APLY_YMD,
    KK0081.RSV_CL_YMD,
    KK0081.RSV_APLY_CD,
    KK0081.SVC_CANCEL_YMD,
    KK0081.SVC_CANCEL_RSN_CD,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.KEIZK_SVC_STAYMD,
    KK0081.KEIZK_SVC_CHRG_STAYMD,
    KK0081.LETTER_HASSO_SHIWAKE_DIV,
    KK0081.THNX_LETTER_SHS_CD,
    KK0081.WEB_OP_ADD_FAIL_FLG,
    KK0081.SVC_STP_YMD,
    KK0081.SVC_STP_RSN_CD,
    KK0081.SVC_STP_RLS_YMD,
    KK0081.SVC_STP_RLS_RSN_CD,
    KK0081.PAUSE_STP_CD,
    KK0081.SVC_PAUSE_YMD,
    KK0081.SVC_PAUSE_RSN_CD,
    KK0081.SVC_PAUSE_RSN_MEMO,
    KK0081.SVC_PAUSE_RLS_YMD,
    KK0081.SVC_PAUSE_RLS_RSN_CD,
    KK0081.SVC_PAUSE_RLS_RSN_MEMO,
    KK0081.SVC_ENDYMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_DSL_KISAN_YMD,
    KK0081.SVC_DSL_YMD,
    KK0081.SVC_DLRE_CD,
    KK0081.SVC_DLRE_MEMO,
    KK0081.SVC_DSL_TTDKI_FIN_FLG,
    KK0081.KAIHK_YMD,
    KK0081.SVC_CANCEL_CL_YMD,
    KK0081.SVC_DSL_CL_YMD,
    KK0081.CHGE_MT_HOJINSVKEI_UK_NO,
    KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT,
    KK0081.CHGE_SK_HOJINSVKEI_UK_NO,
    KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT,
    KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO,
    KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO,
    KK0081.HOJINSVKEI_HKTGI_SBT_CD,
    KK0081.PNLTY_HASSEI_CD,
    KK0081.PNLTY_CHGE_RSN_CD,
    KK0081.IDO_DIV,
    KK0081.SHK_DFLT_PWD,
    KK0081.CUST_ID_PWD,
    KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG,
    KK0081.INTR_CD,
    KK0081.SHOSA_DSL_FIN_CD,
    KK0081.IDO_NG_STAT_CD,
    KK0081.CHRG_STA_YMD_HOSEI_UM,
    KK0081.SVC_PAUSE_CHRG_STA_YMD,
    KK0081.WORK_RRK_BIKO,
    KK0081.AUTO_SHOSA_TRAN_STAT_CD,
    KK0081.KIKI_MIADD_LIST_OPUTZM_FLG,
    KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG,
    KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM,
    KK0081.JURYO_CHOK_TCHI_YH
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? 
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (
            SELECT
                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
            FROM
                KK_T_SVC_KEI KK0081_GENE
            WHERE
                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND
                KK0081_GENE.RSV_APLY_YMD <= ?
            AND
                KK0081_GENE.RSV_APLY_CD = '2'
            AND
                KK0081_GENE.MK_FLG = '0'
        )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_329)
#--KKPRC55010
#--サービス契約番号に紐づくサービス提供会社コードがＫＣＮであるかを取得
#-----------------------------------------------------------

--KEY:KK_SELECT_329

SELECT
    '1'
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM
             KK_T_SVC_KEI KK0081_GENE
         WHERE
             KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
             AND KK0081_GENE.RSV_APLY_YMD <= ?
             AND KK0081_GENE.RSV_APLY_CD = '2'
             AND KK0081_GENE.MK_FLG = '0'
         GROUP BY KK0081_GENE.SVC_KEI_NO
         )
    AND KK0081.PRC_GRP_CD IN (
        (SELECT
            KK0781.PRC_GRP_CD
        FROM
            KK_M_PRC_GRP KK0781
        WHERE
           KK0781.SVC_CD = '03'
	       AND KK0781.KAISEN_TK_COMP_CD = '01'
    	   AND KK0781.SVCTK_COMP_CD = '03'
           AND KK0781.RSV_APLY_YMD || KK0781.GENE_ADD_DTM IN
            (SELECT
	            MAX(KK0781.RSV_APLY_YMD || KK0781_GENE.GENE_ADD_DTM) AS KK0781_MAX
            FROM
                KK_M_PRC_GRP KK0781_GENE
            WHERE KK0781_GENE.SVC_CD = '03'
                AND KK0781_GENE.KAISEN_TK_COMP_CD = '01'
                AND KK0781_GENE.SVCTK_COMP_CD = '03'
                AND KK0781_GENE.RSV_APLY_YMD <= ?
                AND KK0781_GENE.MK_FLG = '0'
             )
        )
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_330)
#--サービス契約番号を条件にサービス契約ステータスを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_330

SELECT
    KK0081.SYSID,
    KK0081.SVC_KEI_STAT,
    KK0081.PPLAN_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
        SELECT
            KK0081GENE.SVC_KEI_NO,
            MAX(KK0081GENE.RSV_APLY_YMD || KK0081GENE.GENE_ADD_DTM)
        FROM
            KK_T_SVC_KEI KK0081GENE
        WHERE
            KK0081GENE.SVC_KEI_NO    = KK0081.SVC_KEI_NO
        AND KK0081GENE.RSV_APLY_YMD <= ?
        AND KK0081GENE.RSV_APLY_CD   = '2'
        AND KK0081GENE.MK_FLG        = '0'
        GROUP BY
            KK0081GENE.SVC_KEI_NO)

#-


#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_331)
#--サービス契約番号を条件にカレントのサービス契約情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_331

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_KEI_STAT,
    KK0081.SYSID,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.TK_HOSHIKI_KEI_NO,
    KK0081.RSV_APLY_YMD,
    KK2111.LAST_UPD_DTM
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
 KK_T_SVKEI_EXC_CTRL KK2111
ON
 KK2111.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
 KK2111.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ?
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
        SELECT
            KK0081GENE.SVC_KEI_NO,
            MAX(KK0081GENE.RSV_APLY_YMD || KK0081GENE.GENE_ADD_DTM)
        FROM
            KK_T_SVC_KEI KK0081GENE
        WHERE
            KK0081GENE.SVC_KEI_NO    = KK0081.SVC_KEI_NO
        AND KK0081GENE.RSV_APLY_YMD <= ?
        AND KK0081GENE.RSV_APLY_CD   = '2'
        AND KK0081GENE.MK_FLG        = '0'
        GROUP BY
            KK0081GENE.SVC_KEI_NO)

#-


#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_332)
#--加入御礼書通知不要分の契約内容通知書データを抽出する
#-----------------------------------------------------------

--KEY:KK_SELECT_332

SELECT
    KK0081.SVC_CD
    ,KK0081.SVC_KEI_NO
    ,KK0081.IDO_DIV
    ,(SELECT
        MSKMSHO_DTL_NO
      FROM
        KK_T_MSKM_DTL KK0021
      WHERE
        KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
      AND
        KK0021.GENE_ADD_DTM IN
         (
          SELECT
            MAX(KK0021_MAX.GENE_ADD_DTM)
          FROM
            KK_T_MSKM_DTL KK0021_MAX
          WHERE
            KK0021_MAX.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
          AND
            MK_FLG = '0'
         )
     )AS MSKMSHO_DTL_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO IN 
     (
      SELECT DISTINCT
        KK0241.SVC_KEI_NO
      FROM
        KK_T_KAISEN_TG_SVKEI KK0241
      WHERE
        KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
      AND
        KK0241.KAISEN_UCWK_USE_STAYMD <= ?
      AND
        KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
      AND
        KK0241.MK_FLG = '0'
      AND 
        NOT EXISTS
         (
          SELECT
              1
          FROM
              KK_T_ADCHG KK2091
          WHERE
              KK2091.ITENS_SVKEI_KISUW_NO =  KK0241.SVC_KEI_KAISEN_UCWK_NO
          AND
              KK2091.ADCHG_STAT = '001'
          AND
              KK2091.MK_FLG = '0'
         )
        UNION 
        SELECT DISTINCT
          KK0241.SVC_KEI_NO
        FROM
          KK_T_KAISEN_TG_SVKEI KK0241
        WHERE
          KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
        AND
          KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
        AND
          KK0241.MK_FLG = '0'
        AND
          EXISTS
           (
            SELECT
                1
            FROM
                KK_T_ADCHG KK2091
            WHERE
                KK2091.ITENS_SVKEI_KISUW_NO =  KK0241.SVC_KEI_KAISEN_UCWK_NO
            AND
                KK2091.ADCHG_STAT = '001'
            AND
                KK2091.MK_FLG = '0'
           )
     )
AND
    KK0081.PRC_GRP_CD IN ('02', '03', '04', '10', '11', '13')
AND
    KK0081.SHOSA_YMD < ?
AND
    KK0081.SVC_KEI_STAT < '910'
AND
    KK0081.RSV_APLY_CD = '2'
AND
    KK0081.IDO_DIV IN ('00001', '00002', '00019')
AND
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
     (
      SELECT
         KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
      FROM
         KK_T_SVC_KEI KK0081_GENE
      WHERE
         KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND
         KK0081_GENE.RSV_APLY_YMD <= ?
      AND
         KK0081_GENE.IDO_DIV IN ('00001', '00002', '00019')
      AND
         KK0081_GENE.MK_FLG = '0'
      GROUP BY
         KK0081_GENE.SVC_KEI_NO
      )
AND
    EXISTS
     (
      SELECT
         1
      FROM
         KK_T_SVC_KEI SVC
      WHERE
         SVC.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND
         SVC.SKEKKA_SEND_CD = '3'
      AND
         SVC.SVC_KEI_STAT  < '910'
      AND
         (SVC.SVC_KEI_NO, SVC.RSV_APLY_YMD || SVC.GENE_ADD_DTM) =
          (
           SELECT
             SVC_GENE.SVC_KEI_NO, MAX(SVC_GENE.RSV_APLY_YMD || SVC_GENE.GENE_ADD_DTM) AS KK0081_MAX
           FROM
             KK_T_SVC_KEI SVC_GENE
           WHERE
             SVC_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND
             SVC_GENE.RSV_APLY_YMD <= ?
           AND
             SVC_GENE.MK_FLG = '0'
           GROUP BY
             SVC_GENE.SVC_KEI_NO
          )
     )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_333)
#--KKPRC57909
#--移行対象データが変更されていない場合、
#--移行対象データの契約サービスステータスを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_333

SELECT /*KK_T_SVC_KEI.SQL  KK_SELECT_333*/
    KK0081.SVC_KEI_STAT
FROM
    KK_T_SVC_KEI KK0081
    INNER JOIN
   (SELECT
        KK0481.SVC_KEI_NO
    FROM
        KK_T_WRIB_SVC_KEI KK0451
        INNER JOIN KK_T_WRISVC_TG_KEI KK0481
            ON  KK0481.WRIB_SVC_KEI_NO = KK0451.WRIB_SVC_KEI_NO
            AND (KK0481.GENE_ADD_DTM) = 
              (SELECT MAX(KK0481_GENE.GENE_ADD_DTM) AS KK0481_MAX 
               FROM   KK_T_WRISVC_TG_KEI KK0481_GENE 
               WHERE  KK0481_GENE.WRIB_SVC_KEI_NO = KK0481.WRIB_SVC_KEI_NO 
               AND    KK0481_GENE.WRIB_SVC_TRGT_KEI_NO = KK0481.WRIB_SVC_TRGT_KEI_NO 
               AND    KK0481_GENE.WRISVC_TG_KEI_TSTAYMD <= ?
               AND    KK0481_GENE.WRISVC_TG_KEI_TENDYMD >= ?
               AND    KK0481_GENE.MK_FLG = '0')
    WHERE
         KK0451.RSV_APLY_YMD || KK0451.GENE_ADD_DTM =
            (SELECT MAX(KK0451_GENE.RSV_APLY_YMD || KK0451_GENE.GENE_ADD_DTM) AS KK0451_MAX
             FROM   KK_T_WRIB_SVC_KEI KK0451_GENE
             WHERE  KK0451_GENE.WRIB_SVC_KEI_NO = KK0451.WRIB_SVC_KEI_NO
             AND    KK0451_GENE.RSV_APLY_YMD <= ?
             AND    KK0451_GENE.RSV_APLY_CD = '2'
             AND    KK0451_GENE.MK_FLG = '0')
    AND KK0451.WRIB_SVC_KEI_STAT IN ('010','100')
    AND KK0451.WRIB_SVC_CD IN ('W00000080','W00000010')
    AND KK0451.WRIB_SVC_KEI_NO = ?
    AND KK0451.UPD_DTM = ?
    ) WRIB_SVC
    ON  KK0081.SVC_KEI_NO = WRIB_SVC.SVC_KEI_NO
    INNER JOIN
   (SELECT
        KK0351.SVC_KEI_NO
    FROM
        KK_T_OP_SVC_KEI KK0351
        LEFT JOIN
       (SELECT
            KK0401.OP_SVC_KEI_NO
           ,KK0401.SBOP_SVC_KEI_STAT
        FROM
            KK_T_SBOP_SVC_KEI KK0401
        WHERE
            KK0401.RSV_APLY_YMD || KK0401.GENE_ADD_DTM = 
                (SELECT MAX(KK0401_GENE.RSV_APLY_YMD || KK0401_GENE.GENE_ADD_DTM) AS KK0401_MAX
                 FROM   KK_T_SBOP_SVC_KEI KK0401_GENE
                 WHERE  KK0401_GENE.SBOP_SVC_KEI_NO = KK0401.SBOP_SVC_KEI_NO
                 AND    KK0401_GENE.RSV_APLY_YMD <= ?
                 AND    KK0401_GENE.RSV_APLY_CD = '2'
                 AND    KK0401_GENE.MK_FLG = '0')
        AND KK0401.SBOP_SVC_KEI_STAT IN ('010','020','030','100','210','220')
        AND KK0401.SBOP_SVC_CD = 'D03'
        ) KK0401
        ON  KK0351.OP_SVC_KEI_NO = KK0401.OP_SVC_KEI_NO
    WHERE
        KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM = 
            (SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KK0351_MAX
             FROM   KK_T_OP_SVC_KEI KK0351_GENE
             WHERE  KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
             AND    KK0351_GENE.RSV_APLY_YMD <= ?
             AND    KK0351_GENE.RSV_APLY_CD = '2'
             AND    KK0351_GENE.MK_FLG = '0')
    AND KK0351.OP_SVC_KEI_STAT IN ('010','020','030','100')
    AND KK0351.OP_SVC_CD = 'B001'
    AND KK0401.SBOP_SVC_KEI_STAT IS NULL
    AND KK0351.OP_SVC_KEI_NO = ?
    AND KK0351.UPD_DTM = ?
    ) OP_SVC
    ON KK0081.SVC_KEI_NO = OP_SVC.SVC_KEI_NO
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
        (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM   KK_T_SVC_KEI KK0081_GENE
         WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND    KK0081_GENE.RSV_APLY_YMD <= ?
         AND    KK0081_GENE.RSV_APLY_CD = '2'
         AND    KK0081_GENE.MK_FLG = '0')

#-


#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_338)
#--KKPRC58704_解約精算金検証・契約情報付加
#--サービス契約情報に紐付く契約情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_338

SELECT /*KK_T_SVC_KEI.SQL  KK_SELECT_338*/
    KK0081.SYSID,
    CK0011.CUST_NM,
    KK0081.SVC_STA_YMD,
    KK0081.SVC_ENDYMD,
    KK0081.SVC_CHRG_STAYMD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.PLAN_CHRG_STAYMD,
    KK0081.PLAN_CHRG_ENDYMD,
    KK0081.PNLTY_HASSEI_CD,
    CASE WHEN EXISTS(
        SELECT
            1
        FROM
            KK_T_WRIB_SVC_KEI KK0451_1
        INNER JOIN
            KK_T_WRISVC_TG_KEI KK0481_1
        ON
            KK0451_1.WRIB_SVC_KEI_NO = KK0481_1.WRIB_SVC_KEI_NO
        WHERE
            KK0481_1.SVC_KEI_NO = ?
        AND KK0451_1.WRIB_SVC_KEI_STAT = '910'
        AND KK0451_1.SVC_ENDYMD = KK0081.SVC_ENDYMD
        AND KK0451_1.WRIB_SVC_CD = 'W00000021'
        AND (KK0481_1.WRIB_SVC_KEI_NO, KK0481_1.WRIB_SVC_TRGT_KEI_NO, KK0481_1.GENE_ADD_DTM) =
                (SELECT
                    KK0481_GENE_1.WRIB_SVC_KEI_NO, KK0481_GENE_1.WRIB_SVC_TRGT_KEI_NO, MAX(KK0481_GENE_1.GENE_ADD_DTM) AS KK0481_GENE_1_MAX
                FROM
                    KK_T_WRISVC_TG_KEI KK0481_GENE_1
                WHERE
                    KK0481_GENE_1.WRIB_SVC_KEI_NO = KK0481_1.WRIB_SVC_KEI_NO
                AND KK0481_GENE_1.WRIB_SVC_TRGT_KEI_NO = KK0481_1.WRIB_SVC_TRGT_KEI_NO
                AND KK0481_GENE_1.MK_FLG = '0'
                GROUP BY
                    KK0481_GENE_1.WRIB_SVC_KEI_NO, KK0481_GENE_1.WRIB_SVC_TRGT_KEI_NO)
        AND (KK0451_1.WRIB_SVC_KEI_NO, KK0451_1.RSV_APLY_YMD || KK0451_1.GENE_ADD_DTM) =
                (SELECT
                    KK0451_GENE_1.WRIB_SVC_KEI_NO, MAX(KK0451_GENE_1.RSV_APLY_YMD || KK0451_GENE_1.GENE_ADD_DTM) AS KK0451_GENE_1_MAX
                FROM
                    KK_T_WRIB_SVC_KEI KK0451_GENE_1
                WHERE
                    KK0451_GENE_1.WRIB_SVC_KEI_NO = KK0451_1.WRIB_SVC_KEI_NO
                AND KK0451_GENE_1.RSV_APLY_YMD <= ?
                AND KK0451_GENE_1.RSV_APLY_CD = '2'
                AND KK0451_GENE_1.MK_FLG = '0'
                GROUP BY
                    KK0451_GENE_1.WRIB_SVC_KEI_NO)
        AND KK0451_1.MK_FLG = '0'
        AND KK0481_1.MK_FLG = '0'
        ) THEN '有'
        ELSE
            '無'
    END AS SOKUWARI_UM,
    CASE WHEN EXISTS(
        SELECT
            1
        FROM
            KK_T_WRIB_SVC_KEI KK0451_2
        INNER JOIN
            KK_T_WRISVC_TG_KEI KK0481_2
        ON
            KK0451_2.WRIB_SVC_KEI_NO = KK0481_2.WRIB_SVC_KEI_NO
        WHERE
            KK0481_2.SVC_KEI_NO = ?
        AND KK0451_2.WRIB_SVC_KEI_NO = KK0481_2.WRIB_SVC_KEI_NO
        AND KK0451_2.WRIB_SVC_KEI_STAT = '910'
        AND KK0451_2.SVC_ENDYMD = KK0081.SVC_ENDYMD
        AND KK0451_2.WRIB_SVC_CD IN ('W00000011', 'W00000041')
        AND (KK0481_2.WRIB_SVC_KEI_NO, KK0481_2.WRIB_SVC_TRGT_KEI_NO, KK0481_2.GENE_ADD_DTM) =
                (SELECT
                    KK0481_GENE_2.WRIB_SVC_KEI_NO, KK0481_GENE_2.WRIB_SVC_TRGT_KEI_NO, MAX(KK0481_GENE_2.GENE_ADD_DTM) AS KK0481_GENE_2_MAX
                FROM
                    KK_T_WRISVC_TG_KEI KK0481_GENE_2
                WHERE
                    KK0481_GENE_2.WRIB_SVC_KEI_NO = KK0481_2.WRIB_SVC_KEI_NO
                AND KK0481_GENE_2.WRIB_SVC_TRGT_KEI_NO = KK0481_2.WRIB_SVC_TRGT_KEI_NO
                AND KK0481_GENE_2.MK_FLG = '0'
                GROUP BY
                    KK0481_GENE_2.WRIB_SVC_KEI_NO, KK0481_GENE_2.WRIB_SVC_TRGT_KEI_NO) AND
            (KK0451_2.WRIB_SVC_KEI_NO, KK0451_2.RSV_APLY_YMD || KK0451_2.GENE_ADD_DTM) =
                (SELECT
                    KK0451_GENE_2.WRIB_SVC_KEI_NO, MAX(KK0451_GENE_2.RSV_APLY_YMD || KK0451_GENE_2.GENE_ADD_DTM) AS KK0451_GENE_2_MAX
                FROM
                    KK_T_WRIB_SVC_KEI KK0451_GENE_2
                WHERE
                    KK0451_GENE_2.WRIB_SVC_KEI_NO = KK0451_2.WRIB_SVC_KEI_NO
                AND KK0451_GENE_2.RSV_APLY_YMD <= ?
                AND KK0451_GENE_2.RSV_APLY_CD = '2'
                AND KK0451_GENE_2.MK_FLG = '0'
                 GROUP BY
                    KK0451_GENE_2.WRIB_SVC_KEI_NO)
        AND KK0451_2.MK_FLG = '0'
        AND KK0481_2.MK_FLG = '0'
        ) THEN '有'
        ELSE
            '無'
        END AS CHOWARI_UM,
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    CK_T_CUST CK0011
ON
    KK0081.SYSID = CK0011.SYSID
WHERE
    KK0081.SVC_KEI_NO = ?
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            KK0081_GENE.SVC_KEI_NO,
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0'
        GROUP BY
            KK0081_GENE.SVC_KEI_NO
        )
AND (CK0011.SYSID, CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM) =
        (SELECT
            CK0011_GENE.SYSID,
            MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_GENE_MAX
        FROM
            CK_T_CUST CK0011_GENE
        WHERE
            CK0011_GENE.SYSID = CK0011.SYSID
        AND CK0011_GENE.RSV_APLY_YMD <= ?
        AND CK0011_GENE.RSV_APLY_CD = '2'
        AND CK0011_GENE.MK_FLG = '0'
        GROUP BY
            CK0011_GENE.SYSID)
AND KK0081.MK_FLG = '0'
AND CK0011.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_334)
#--KKPRC58101
#--eo電気契約サービスと同一利用場所のeo光サービス契約の契約ステータスを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_334

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0081.PRC_GRP_CD,
    KK0081.SHOSA_DSL_FIN_CD
FROM KK_T_KAISEN_TG_SVKEI KK0241
INNER JOIN
    KK_T_SVC_KEI KK0081
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN
    KK_T_SVKEI_GRP_SETE KK2961
ON
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK2961.SVKEI_GRP_SKBT_NO
WHERE
    KK0241.KAISEN_UCWK_USE_STAYMD <= ? AND
    KK0241.MK_FLG = '0' AND
    KK2961.SVC_KEI_NO = ? AND
    KK2961.SVKEI_GRP_SETE_TSTAYMD <= ? AND
    KK2961.SVKEI_GRP_SETE_TENDYMD >= ? AND
    KK2961.MK_FLG = '0' AND
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
      (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
         FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO  AND
              KK0081_GENE.RSV_APLY_YMD <= ? AND
              KK0081_GENE.RSV_APLY_CD = '2' AND
              KK0081_GENE.MK_FLG = '0'
              GROUP BY KK0081_GENE.SVC_KEI_NO)
ORDER BY KK0081.PRC_GRP_CD ASC,
         KK0241.KAISEN_UCWK_USE_ENDYMD DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_341)
#--KKPRC58801
#--eo電気ネットＮＧ・キャンセル対象リスト作成　eo電気取得
#-----------------------------------------------------------

--KEY:KK_SELECT_341

SELECT
KK0081_MAX.SVC_KEI_NO,
KK0081_MAX.SVC_KEI_STAT,
KK0011.MSKM_YMD
FROM 
KU_T_SVKEI_KOJIAK KU0081,
KK_T_SVKEI_GRP_SETE KK2961,
KK_T_SVC_KEI KK0081_MAX,
KK_T_SVC_KEI KK0081_MIN,
KK_T_MSKM_DTL KK0021,
KK_T_MSKM KK0011
WHERE 
KU0081.SVC_KEI_NO = ?
AND KU0081.KOJIAK_NO = ?
AND KK2961.SVKEI_GRP_SBT_CD = '01'
AND KU0081.SVC_KEI_KAISEN_UCWK_NO = KK2961.SVKEI_GRP_SKBT_NO
AND KK2961.SVC_KEI_NO = KK0081_MAX.SVC_KEI_NO  
AND KK2961.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO  
AND KK0081_MIN.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
AND KK0021.MSKM_NO = KK0011.MSKM_NO
AND ((KK0081_MAX.SVC_KEI_STAT = '020' AND KK0081_MAX.SHOSA_DSL_FIN_CD = '1')
    OR (KK0081_MAX.SVC_KEI_STAT >= '030'
    AND KK0081_MAX.SVC_KEI_STAT < '910'))
AND (KK0081_MAX.RSV_APLY_YMD || KK0081_MAX.GENE_ADD_DTM) =  
            (SELECT MAX(KK0081_MAX_GENE.RSV_APLY_YMD || KK0081_MAX_GENE.GENE_ADD_DTM) AS MAX_SVC 
                FROM  KK_T_SVC_KEI KK0081_MAX_GENE
                WHERE KK0081_MAX_GENE.SVC_KEI_NO = KK0081_MAX.SVC_KEI_NO 
                AND KK0081_MAX_GENE.RSV_APLY_YMD <= ?  
                AND KK0081_MAX_GENE.RSV_APLY_CD = '2'  
                AND KK0081_MAX_GENE.MK_FLG = '0')
AND (KK0081_MIN.RSV_APLY_YMD || KK0081_MIN.GENE_ADD_DTM) =  
            (SELECT MIN(KK0081_MIN_GENE.RSV_APLY_YMD || KK0081_MIN_GENE.GENE_ADD_DTM) AS MIN_SVC 
                FROM  KK_T_SVC_KEI KK0081_MIN_GENE 
                WHERE KK0081_MIN_GENE.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO 
                AND KK0081_MIN_GENE.RSV_APLY_YMD <= ?  
                AND KK0081_MIN_GENE.RSV_APLY_CD = '2'  
                AND KK0081_MIN_GENE.MK_FLG = '0')
AND KK0021.GENE_ADD_DTM =  
            (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS MAX_MSKM_DTL 
                FROM  KK_T_MSKM_DTL KK0021_GENE 
                WHERE KK0021_GENE.MSKM_DTL_NO= KK0021.MSKM_DTL_NO  
                AND KK0021_GENE.MK_FLG = '0')
AND KK0011.GENE_ADD_DTM =  
            (SELECT MAX(KK0011_GENE.GENE_ADD_DTM) AS MAX_MSKM
                FROM  KK_T_MSKM KK0011_GENE 
                WHERE KK0011_GENE.MSKM_NO= KK0011.MSKM_NO  
                AND KK0011_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_342)
#--KKPRC58801
#--eo電気ネットＮＧ・キャンセル対象リスト作成　eo光ネット取得
#-----------------------------------------------------------

--KEY:KK_SELECT_342

SELECT
KK0081.SVC_KEI_NO,
KK0081.SVC_KEI_STAT,
KK0011.MSKM_YMD
FROM 
KU_T_SVKEI_KOJIAK KU0081,
KK_T_SVC_KEI KK0081,
KU_T_MSKM_DTL_KOJIAK KU0091,
KK_T_MSKM_DTL KK0021,
KK_T_MSKM KK0011
WHERE KU0081.SVC_KEI_NO = ?
AND KU0081.KOJIAK_NO = ?
AND KU0081.SVC_KEI_NO = KK0081.SVC_KEI_NO
AND KU0081.KOJIAK_NO = KU0091.KOJIAK_NO
AND KU0091.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
AND KK0021.MSKM_NO = KK0011.MSKM_NO
AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =  
            (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_SVC 
                FROM  KK_T_SVC_KEI KK0081_GENE 
                WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
                AND KK0081_GENE.RSV_APLY_YMD <= ?  
                AND KK0081_GENE.RSV_APLY_CD = '2'  
                AND KK0081_GENE.MK_FLG = '0')
AND KK0021.GENE_ADD_DTM =  
            (SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS MAX_MSKM_DTL 
                FROM  KK_T_MSKM_DTL KK0021_GENE
                WHERE KK0021_GENE.MSKM_DTL_NO= KK0021.MSKM_DTL_NO
                AND KK0021_GENE.MK_FLG = '0')
AND KK0011.GENE_ADD_DTM =  
            (SELECT MAX(KK0011_GENE.GENE_ADD_DTM) AS MAX_MSKM
                FROM  KK_T_MSKM KK0011_GENE 
                WHERE KK0011_GENE.MSKM_NO= KK0011.MSKM_NO  
                AND KK0011_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_335)
#--KKPRC58302
#--eo電気利用場所住所上書き情報のサービス契約番号と一致するサービス契約のSYSIDと照査日,サービス契約ステータスを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_335

SELECT
    KK0081.SYSID,
    KK0081.SHOSA_YMD,
    KK0081.SVC_KEI_STAT
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_336)
#--KKPRC58302
#-- 同一SYSID内のeo電気以外のサービス契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_336

SELECT
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SYSID = ? AND
    KK0081.SVC_CD NOT IN ('04','05') AND
    KK0081.SVC_KEI_STAT < '910' AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_337)
#--KKPRC58302
#--ホスティング契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_337

SELECT
 KK0081.SVC_KEI_NO
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SYSID = ? AND
 KK0081.SVC_CD = '04' AND
 KK0081.PRC_GRP_CD = '14' AND
 KK0081.PCRS_CD = 'A58' AND
 KK0081.SVC_KEI_STAT = '100' AND
 KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
  SELECT
   MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
  FROM
   KK_T_SVC_KEI KK0081_GENE
  WHERE
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD = '2'
   AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_339)
#--KKPRC58302
#--無効フラグが「有効」かつ、サービス契約ステータスが「キャンセル済」「解約済」以外のサービス契約番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_339

SELECT 
    KK0081.SVC_KEI_NO 
FROM 
    KK_T_SVC_KEI KK0081 
WHERE 
    KK0081.SVC_KEI_NO = ? AND 
    KK0081.SVC_KEI_STAT IN('010','020','030','100','210','220') AND 
    KK0081.MK_FLG = '0' AND 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT 
                                MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
                            FROM 
                                KK_T_SVC_KEI KK0081_GENE 
                            WHERE 
                                KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO  AND
                                KK0081_GENE.RSV_APLY_YMD <= ? AND
                                KK0081_GENE.RSV_APLY_CD = '2' AND
                                KK0081_GENE.MK_FLG = '0'
                            )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_345)
#--KKPRC59401
#--更新対象サービス契約・お客様情報からさービス契約番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_345

SELECT
    KK0081.SYSID
    ,KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    (SELECT
         KK0321_BASE.SVC_KEI_NO
     FROM
         KK_T_KAKINS KK0321_BASE
     WHERE
         KK0321_BASE.SEIKY_KEI_NO = ?
     AND
         KK0321_BASE.SVC_KEI_NO IS NOT NULL
     AND
         ? BETWEEN KK0321_BASE.KAKINS_TSTAYMD AND KK0321_BASE.KAKINS_TENDYMD
     AND
         KK0321_BASE.MK_FLG = '0') KK0321
ON
    KK0081.SVC_KEI_NO = KK0321.SVC_KEI_NO
WHERE
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND
                                                      KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND
                                                      KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND
                                                      KK0081_GENE.MK_FLG = '0')
ORDER BY
    KK0081.SVC_CD ASC
  , KK0081.GENE_ADD_DTM DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_016)
#--KKPRC59901
#--提供方式契約番号から
#--料金グループコードがマンション・オーナー、料金プランコードがグローバル　１００Ｍ　イーサーネットである
#--料金コースコード、料金プランコードを更新する
#-----------------------------------------------------------

--KEY:KK_UPDATE_016

UPDATE /*KK_T_SVC_KEI.SQL KK_UPDATE_016*/
    KK_T_SVC_KEI KK0081
SET
    KK0081.PCRS_CD = 'A70'
  , KK0081.PPLAN_CD = 'PA7001'
  , KK0081.UPD_DTM = 'UPD_DTM'
  , KK0081.UPD_OPEACNT = 'UPD_OPE'
  , KK0081.UPD_UNYO_YMD = 'UPD_UNYO'
  , KK0081.UPD_TRN_ID = 'UPD_TRN'
WHERE
    KK0081.TK_HOSHIKI_KEI_NO = ?
AND
    KK0081.PRC_GRP_CD = '99'
AND
    KK0081.PPLAN_CD = 'PA5401'
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND
                                                      KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND
                                                      KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND
                                                      KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_347)
#--KKPRC59901
#--サービス契約番号からサービス契約ステータス、料金プランコードを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_347

SELECT /*KK_T_SVC_KEI.SQL KK_SELECT_347*/
    KK0081.SVC_KEI_STAT
  , KK0081.PPLAN_CD
  , KK0091.KOTEI_IP_AD_HKTGI_UM
  , KK0091.PC_PACK_UM
  , KK0091.CUST_NOVA_USE_UM
  , KK0091.MALWARE_BLOCKING_NON_FLG
  , KK0091.KOTEI_IP_AD_8
  , KK0091.PTNRACNT_ID
  , KK0081.SVC_STA_YMD
  , KK0081.PLAN_STAYMD
  , KK0081.PLAN_CHRG_STAYMD
  , KK0091.NRKEMT_SVKEI_NO
FROM
  KK_T_SVC_KEI KK0081
INNER JOIN  
  KK_T_SVC_KEI_EOH_NET  KK0091
  ON   KK0081.SVC_KEI_NO      =  KK0091.SVC_KEI_NO
  AND  KK0081.GENE_ADD_DTM    =  KK0091.GENE_ADD_DTM
WHERE
  KK0081.MK_FLG = '0'
AND
  KK0081.SVC_KEI_NO = ?
AND
  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (
      SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS MAX_GENE_DTM
      FROM
        KK_T_SVC_KEI KK0081_GENE
      WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND
        KK0081_GENE.RSV_APLY_YMD <= ?
      AND
        KK0081_GENE.RSV_APLY_CD = '2'
      AND
        KK0081_GENE.MK_FLG = '0'
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_017)
#--KKPRC59901
#--サービス契約番号から
#--料金プランコードがグローバル　１００Ｍ　イーサーネット、サービス契約ステータスがサービス提供中である
#--プラン終了年月日、プラン課金終了年月日、プラン終了種別コードを更新する
#-----------------------------------------------------------

--KEY:KK_UPDATE_017

UPDATE /*KK_T_SVC_KEI.SQL KK_UPDATE_017*/
    KK_T_SVC_KEI KK0081
SET
    KK0081.PLAN_ENDYMD = ?
  , KK0081.PLAN_CHRG_ENDYMD = ?
  , KK0081.PLAN_END_SBT_CD = '1'
  , KK0081.UPD_DTM = 'UPD_DTM'
  , KK0081.UPD_OPEACNT = 'UPD_OPE'
  , KK0081.UPD_UNYO_YMD = 'UPD_UNYO'
  , KK0081.UPD_TRN_ID = 'UPD_TRN'
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.PPLAN_CD = 'PA5401'
AND
    KK0081.SVC_KEI_STAT = '100'
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND
                                                      KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND
                                                      KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND
                                                      KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_INSERT_008)
#--KKPRC59901
#--サービス契約番号から
#--レコードをコピーして登録する
#-----------------------------------------------------------

--KEY:KK_INSERT_008

INSERT /*KK_T_SVC_KEI.SQL KK_INSERT_008*/ INTO KK_T_SVC_KEI(
    SVC_KEI_NO
  , GENE_ADD_DTM
  , SVC_KEI_STAT
  , SYSID
  , SVC_CD
  , MSKM_DTL_NO
  , SEIRI_NO
  , MENKAIHAT_ANKEN_NO
  , PRC_GRP_CD
  , PCRS_CD
  , PPLAN_CD
  , TK_HOSHIKI_KEI_NO
  , SVC_USE_STA_KIBO_YMD
  , RSV_TSTA_KIBO_YMD
  , ID_SOKHOSHO_OUTPUT_YH
  , SVC_KEI_KZKWRK_REQYMD
  , SHOSA_YMD
  , SHOSA_CL_YMD
  , SKEKKA_CD
  , SKEKKA_DTL_CD
  , SKEKKA_HOKI_CD
  , SKEKKA_SEND_CD
  , PAYWAY_KEIZOKU_FLG
  , FTRIAL_KANYU_YMD
  , FTRIAL_PRD_ENDYMD
  , HONKANYU_YMD
  , HONKANYU_IKO_KIGEN_YMD
  , KEI_CNC_YMD
  , PLAN_STAYMD
  , PLAN_ENDYMD
  , PLAN_CHRG_STAYMD
  , PLAN_CHRG_ENDYMD
  , PLAN_END_SBT_CD
  , RSV_APLY_YMD
  , RSV_CL_YMD
  , RSV_APLY_CD
  , SVC_CANCEL_YMD
  , SVC_CANCEL_RSN_CD
  , SVC_STA_YMD
  , SVC_CHRG_STAYMD
  , KEIZK_SVC_STAYMD
  , KEIZK_SVC_CHRG_STAYMD
  , LETTER_HASSO_SHIWAKE_DIV
  , THNX_LETTER_SHS_CD
  , WEB_OP_ADD_FAIL_FLG
  , SVC_STP_YMD
  , SVC_STP_RSN_CD
  , SVC_STP_RLS_YMD
  , SVC_STP_RLS_RSN_CD
  , PAUSE_STP_CD
  , SVC_PAUSE_YMD
  , SVC_PAUSE_RSN_CD
  , SVC_PAUSE_RSN_MEMO
  , SVC_PAUSE_RLS_YMD
  , SVC_PAUSE_RLS_RSN_CD
  , SVC_PAUSE_RLS_RSN_MEMO
  , SVC_ENDYMD
  , SVC_CHRG_ENDYMD
  , SVC_DSL_KISAN_YMD
  , SVC_DSL_YMD
  , SVC_DLRE_CD
  , SVC_DLRE_MEMO
  , SVC_DSL_TTDKI_FIN_FLG
  , KAIHK_YMD
  , SVC_CANCEL_CL_YMD
  , SVC_DSL_CL_YMD
  , CHGE_MT_HOJINSVKEI_UK_NO
  , CHGE_MT_HOJINSVKEI_UK_NOPT
  , CHGE_SK_HOJINSVKEI_UK_NO
  , CHGE_SK_HOJINSVKEI_UK_NOPT
  , CHMT_HJIN_EO_YKAE_SVKEI_NO
  , CHSK_HJIN_EO_YKAE_SVKEI_NO
  , HOJINSVKEI_HKTGI_SBT_CD
  , PNLTY_HASSEI_CD
  , PNLTY_CHGE_RSN_CD
  , IDO_DIV
  , SHK_DFLT_PWD
  , CUST_ID_PWD
  , MENKAIHAT_ANKEN_KR_ADD_FLG
  , INTR_CD
  , SHOSA_DSL_FIN_CD
  , IDO_NG_STAT_CD
  , CHRG_STA_YMD_HOSEI_UM
  , SVC_PAUSE_CHRG_STA_YMD
  , WORK_RRK_BIKO
  , AUTO_SHOSA_TRAN_STAT_CD
  , KIKI_MIADD_LIST_OPUTZM_FLG
  , KAIHK_FAIL_KEI_CST_ZM_FLG
  , SVCTK_BUT_DEL_TRN_JSSI_DTM
  , JURYO_CHOK_TCHI_YH
  , ADD_DTM
  , ADD_OPEACNT
  , UPD_DTM
  , UPD_OPEACNT
  , DEL_DTM
  , DEL_OPEACNT
  , MK_FLG
  , ADD_UNYO_YMD
  , ADD_TRN_ID
  , UPD_UNYO_YMD
  , UPD_TRN_ID
  , DEL_UNYO_YMD
  , DEL_TRN_ID
)
SELECT
    KK0081.SVC_KEI_NO
  , ?
  , KK0081.SVC_KEI_STAT
  , KK0081.SYSID
  , KK0081.SVC_CD
  , KK0081.MSKM_DTL_NO
  , KK0081.SEIRI_NO
  , KK0081.MENKAIHAT_ANKEN_NO
  , KK0081.PRC_GRP_CD
  , 'A70'
  , 'PA7001'
  , KK0081.TK_HOSHIKI_KEI_NO
  , KK0081.SVC_USE_STA_KIBO_YMD
  , KK0081.RSV_TSTA_KIBO_YMD
  , KK0081.ID_SOKHOSHO_OUTPUT_YH
  , KK0081.SVC_KEI_KZKWRK_REQYMD
  , KK0081.SHOSA_YMD
  , KK0081.SHOSA_CL_YMD
  , KK0081.SKEKKA_CD
  , KK0081.SKEKKA_DTL_CD
  , KK0081.SKEKKA_HOKI_CD
  , KK0081.SKEKKA_SEND_CD
  , KK0081.PAYWAY_KEIZOKU_FLG
  , KK0081.FTRIAL_KANYU_YMD
  , KK0081.FTRIAL_PRD_ENDYMD
  , KK0081.HONKANYU_YMD
  , KK0081.HONKANYU_IKO_KIGEN_YMD
  , KK0081.KEI_CNC_YMD
  , DECODE(KK0081.SVC_KEI_STAT, '010', KK0081.PLAN_STAYMD, '020', KK0081.PLAN_STAYMD, '030', KK0081.PLAN_STAYMD, '100', ?)
  , '20991231'
  , DECODE(KK0081.SVC_KEI_STAT, '010', KK0081.PLAN_CHRG_STAYMD, '020', KK0081.PLAN_CHRG_STAYMD, '030', KK0081.PLAN_CHRG_STAYMD, '100', ?)
  , '20991231'
  , NULL
  , ?
  , KK0081.RSV_CL_YMD
  , KK0081.RSV_APLY_CD
  , KK0081.SVC_CANCEL_YMD
  , KK0081.SVC_CANCEL_RSN_CD
  , KK0081.SVC_STA_YMD
  , KK0081.SVC_CHRG_STAYMD
  , KK0081.KEIZK_SVC_STAYMD
  , KK0081.KEIZK_SVC_CHRG_STAYMD
  , KK0081.LETTER_HASSO_SHIWAKE_DIV
  , KK0081.THNX_LETTER_SHS_CD
  , KK0081.WEB_OP_ADD_FAIL_FLG
  , KK0081.SVC_STP_YMD
  , KK0081.SVC_STP_RSN_CD
  , KK0081.SVC_STP_RLS_YMD
  , KK0081.SVC_STP_RLS_RSN_CD
  , KK0081.PAUSE_STP_CD
  , KK0081.SVC_PAUSE_YMD
  , KK0081.SVC_PAUSE_RSN_CD
  , KK0081.SVC_PAUSE_RSN_MEMO
  , KK0081.SVC_PAUSE_RLS_YMD
  , KK0081.SVC_PAUSE_RLS_RSN_CD
  , KK0081.SVC_PAUSE_RLS_RSN_MEMO
  , KK0081.SVC_ENDYMD
  , KK0081.SVC_CHRG_ENDYMD
  , KK0081.SVC_DSL_KISAN_YMD
  , KK0081.SVC_DSL_YMD
  , KK0081.SVC_DLRE_CD
  , KK0081.SVC_DLRE_MEMO
  , KK0081.SVC_DSL_TTDKI_FIN_FLG
  , KK0081.KAIHK_YMD
  , KK0081.SVC_CANCEL_CL_YMD
  , KK0081.SVC_DSL_CL_YMD
  , KK0081.CHGE_MT_HOJINSVKEI_UK_NO
  , KK0081.CHGE_MT_HOJINSVKEI_UK_NOPT
  , KK0081.CHGE_SK_HOJINSVKEI_UK_NO
  , KK0081.CHGE_SK_HOJINSVKEI_UK_NOPT
  , KK0081.CHMT_HJIN_EO_YKAE_SVKEI_NO
  , KK0081.CHSK_HJIN_EO_YKAE_SVKEI_NO
  , KK0081.HOJINSVKEI_HKTGI_SBT_CD
  , KK0081.PNLTY_HASSEI_CD
  , KK0081.PNLTY_CHGE_RSN_CD
  , KK0081.IDO_DIV
  , KK0081.SHK_DFLT_PWD
  , KK0081.CUST_ID_PWD
  , KK0081.MENKAIHAT_ANKEN_KR_ADD_FLG
  , KK0081.INTR_CD
  , KK0081.SHOSA_DSL_FIN_CD
  , KK0081.IDO_NG_STAT_CD
  , KK0081.CHRG_STA_YMD_HOSEI_UM
  , KK0081.SVC_PAUSE_CHRG_STA_YMD
  , KK0081.WORK_RRK_BIKO
  , KK0081.AUTO_SHOSA_TRAN_STAT_CD
  , KK0081.KIKI_MIADD_LIST_OPUTZM_FLG
  , KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG
  , KK0081.SVCTK_BUT_DEL_TRN_JSSI_DTM
  , KK0081.JURYO_CHOK_TCHI_YH
  , 'ADD_DTM'
  , 'ADD_OPE'
  , 'UPD_DTM'
  , 'UPD_OPE'
  , NULL
  , NULL
  , '0'
  , 'ADD_UNYO'
  , 'ADD_TRN'
  , 'UPD_UNYO'
  , 'UPD_TRN'
  , NULL
  , NULL
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND
                                                      KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND
                                                      KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND
                                                      KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_348)
#--KKPRC59901
#--サービス契約番号から
#--料金グループコードがｅｏ光電話、サービス契約ステータスが解約済未満である
#--サービス契約番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_348

SELECT /*KK_T_SVC_KEI.SQL KK_SELECT_348*/
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
WHERE
    KK0081.PRC_GRP_CD = '10'
AND
    KK0081.SVC_KEI_STAT < '910'
AND
    KK0241.SVC_KEI_KAISEN_UCWK_NO = (SELECT
                                         KK0241_BASE.SVC_KEI_KAISEN_UCWK_NO
                                     FROM
                                         KK_T_KAISEN_TG_SVKEI KK0241_BASE
                                     WHERE
                                         KK0241_BASE.SVC_KEI_NO = ?
                                     AND
                                         KK0241_BASE.KAISEN_UCWK_USE_STAYMD <= ?
                                     AND
                                         KK0241_BASE.KAISEN_UCWK_USE_ENDYMD >= ?
                                     AND
                                         KK0241_BASE.MK_FLG = '0')
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND
                                                      KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND
                                                      KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND
                                                      KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_349)
#--KKPRC59901
#--提供方式契約番号から
#--料金グループコードがマンション・オーナー、料金プランコードがグローバル　１００Ｍプレミアム　イーサーネットである
#--サービス契約番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_349

SELECT /*KK_T_SVC_KEI.SQL KK_SELECT_349*/
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.TK_HOSHIKI_KEI_NO = ?
AND
    KK0081.PRC_GRP_CD = '99'
AND
    KK0081.PPLAN_CD = 'PA7001'
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (SELECT
                                                      MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                  FROM
                                                      KK_T_SVC_KEI KK0081_GENE
                                                  WHERE
                                                      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                                                  AND
                                                      KK0081_GENE.RSV_APLY_YMD <= ?
                                                  AND
                                                      KK0081_GENE.RSV_APLY_CD = '2'
                                                  AND
                                                      KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_346)
#--サービス契約番号を条件にサービス契約ステータスを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_346

SELECT
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
        SELECT
            KK0081GENE.SVC_KEI_NO,
            MAX(KK0081GENE.RSV_APLY_YMD || KK0081GENE.GENE_ADD_DTM)
        FROM
            KK_T_SVC_KEI KK0081GENE
        WHERE
            KK0081GENE.SVC_KEI_NO    = KK0081.SVC_KEI_NO
        AND KK0081GENE.RSV_APLY_YMD <= ?
        AND KK0081GENE.RSV_APLY_CD   = '2'
        AND KK0081GENE.MK_FLG        = '0'
        GROUP BY
            KK0081GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_350)
#--契約内容通知対象契約を抽出するため申込年月日を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_350

SELECT KK0011.MSKM_YMD
FROM   KK_T_SVC_KEI KK0081
INNER JOIN KK_T_MSKM_DTL KK0021
ON     KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
INNER JOIN KK_T_MSKM KK0011
ON     KK0021.MSKM_NO = KK0011.MSKM_NO
WHERE  KK0081.SVC_KEI_NO = ?
AND   (KK0081.SVC_KEI_NO, KK0081.GENE_ADD_DTM) =
   (SELECT KK0081_GENE.SVC_KEI_NO, MIN(KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MIN
    FROM   KK_T_SVC_KEI KK0081_GENE
    WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND    KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)
AND   (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) =
   (SELECT KK0021_GENE.MSKM_DTL_NO, MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_GENE_MAX
    FROM   KK_T_MSKM_DTL KK0021_GENE
    WHERE  KK0021_GENE.MSKM_DTL_NO  = KK0021.MSKM_DTL_NO
    AND    KK0021_GENE.MK_FLG = '0'
    GROUP BY KK0021_GENE.MSKM_DTL_NO)
AND KK0011.GENE_ADD_DTM =  
            (SELECT MAX(KK0011_GENE.GENE_ADD_DTM) AS MAX_MSKM
                FROM  KK_T_MSKM KK0011_GENE 
                WHERE KK0011_GENE.MSKM_NO= KK0011.MSKM_NO  
                AND KK0011_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_352)
#--KKPRC60201
#--運用日付から、
#--サービス契約番号・ネットのサービス契約番号・卸事業者コード・サービス種別。異動理由コードを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_352

SELECT 
  SVKEI.SVC_KEI_NO,
  (
    SELECT  KK0081_01.SVC_KEI_NO
    FROM  KK_T_KAISEN_TG_SVKEI KK0241
    INNER  JOIN
        KK_T_SVC_KEI KK0081_01
        ON KK0241.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
    WHERE
      KK0241.SVC_KEI_KAISEN_UCWK_NO =
      (SELECT  MAX(KK0241_01.SVC_KEI_KAISEN_UCWK_NO)
      FROM  KK_T_KAISEN_TG_SVKEI KK0241_01
      WHERE  KK0241_01.SVC_KEI_NO = SVKEI.SVC_KEI_NO
      AND    KK0241_01.KAISEN_UCWK_USE_STAYMD <= ?
      AND    KK0241_01.KAISEN_UCWK_USE_ENDYMD =
          (SELECT  MAX(KK0241_02.KAISEN_UCWK_USE_ENDYMD) AS KK0241_MAX
          FROM  KK_T_KAISEN_TG_SVKEI KK0241_02
          WHERE  KK0241_02.SVC_KEI_NO = KK0241_01.SVC_KEI_NO
          AND    KK0241_02.KAISEN_UCWK_USE_STAYMD <= ?
          AND    KK0241_02.MK_FLG = '0')
        )
    AND KK0081_01.SVC_CD = '01'
    AND KK0081_01.RSV_APLY_YMD || KK0081_01.GENE_ADD_DTM =
      (SELECT  MAX(KK0081_01_GENE.RSV_APLY_YMD || KK0081_01_GENE.GENE_ADD_DTM) AS KK0081_01_MAX
      FROM  KK_T_SVC_KEI KK0081_01_GENE
      WHERE  KK0081_01_GENE.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
      AND    KK0081_01_GENE.RSV_APLY_YMD <= ?
      AND    KK0081_01_GENE.RSV_APLY_CD = '2'
      AND    KK0081_01_GENE.MK_FLG = '0')
    AND ROWNUM = 1
  ) AS NET_SVC_KEI_NO ,
  ORSJGSKEIIDT.ORSJGS_CD,
  ORSJGSKEIIDT.SVC_SBT,
  KK1131_01.IDO_RSN_CD AS IDO_RSN_CD_1,
  KK1131_02.IDO_RSN_CD AS IDO_RSN_CD_2
FROM
  (
    SELECT  KK0081.SVC_KEI_NO
    FROM  KK_T_SVC_KEI KK0081
    WHERE  KK0081.SVC_KEI_STAT = '920'
    AND    KK0081.SVC_CANCEL_YMD = ?
    AND    KK0081.SVC_CD IN ('01','02','03')
    AND    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
        (SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
        FROM  KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0')
  ) SVKEI
  INNER JOIN
  (
    SELECT  KK3141.ORSJGS_CD,
        KK3141.SVC_SBT,
        KK3141.SVC_KEI_NO
    FROM   KK_T_ORSJGS_KEI_IDT KK3141
    WHERE   KK3141.ORSJGS_RNKI_SKCD = '10'
    AND    KK3141.ORSJGS_KEI_IDT_STAT_CD = '1'
    AND    KK3141.ORSJGS_KEI_IDT_RSLT_CD  = '1' 
    AND    KK3141.MK_FLG = '0'
    AND    NOT EXISTS  (SELECT 1
              FROM  KK_T_ORSJGS_KEI_IDT KK3141_01
              WHERE  KK3141_01.SVC_KEI_NO = KK3141.SVC_KEI_NO
              AND    KK3141_01.ORSJGS_RNKI_SKCD = '05'
              AND    KK3141_01.ORSJGS_KEI_IDT_STAT_CD = '0'
              AND    KK3141_01.MK_FLG = '0')
  ) ORSJGSKEIIDT
  ON SVKEI.SVC_KEI_NO = ORSJGSKEIIDT.SVC_KEI_NO
  INNER JOIN
  (
  SELECT 
    KK1091.SVC_KEI_NO,
    KK1091.IDO_DIV,
    KK1091.IDO_DTM
  FROM  KK_T_PRG KK1091
  WHERE  (KK1091.SVC_KEI_NO, KK1091.IDO_DTM, KK1091.PRG_STAT) IN
      (SELECT
      KK1091_01.SVC_KEI_NO,
      MAX(KK1091_01.IDO_DTM),
      KK1091_01.PRG_STAT
      FROM  KK_T_PRG KK1091_01
      WHERE    KK1091_01.PRG_DTM  BETWEEN  ?
                        AND  ?
      AND    KK1091_01.PRG_STAT = '1201'
      AND    KK1091_01.MK_FLG = '0'
      GROUP BY
      KK1091_01.SVC_KEI_NO,
      KK1091_01.PRG_STAT
      )
  ) PRG
  ON SVKEI.SVC_KEI_NO = PRG.SVC_KEI_NO
LEFT OUTER JOIN
(
  SELECT *
  FROM
  (
    SELECT
    KK1131_01N.IDO_DIV,
    KK1131_01N.IDO_DTM,
    KK1131_01N.IDO_RSN_CD,
    KK1131_01N.SVC_KEI_NO,
    ROW_NUMBER() OVER(PARTITION BY KK1131_01N.IDO_DIV, KK1131_01N.IDO_DTM ORDER BY KK1131_01N.IDO_RSN_NO ASC) AS ROW_NUM
      FROM    KK_T_IDO_RSN KK1131_01N
      WHERE    KK1131_01N.MK_FLG = '0'
  ) KK1131_01T
    WHERE KK1131_01T.ROW_NUM = 1
) KK1131_01
ON   KK1131_01.SVC_KEI_NO = PRG.SVC_KEI_NO
AND KK1131_01.IDO_DIV = PRG.IDO_DIV
AND KK1131_01.IDO_DTM = PRG.IDO_DTM
LEFT OUTER JOIN
(
  SELECT *
  FROM
  (
    SELECT
    KK1131_02N.IDO_DIV,
    KK1131_02N.IDO_DTM,
    KK1131_02N.IDO_RSN_CD,
    KK1131_02N.SVC_KEI_NO,
    ROW_NUMBER() OVER(PARTITION BY KK1131_02N.IDO_DIV, KK1131_02N.IDO_DTM ORDER BY KK1131_02N.IDO_RSN_NO ASC) AS ROW_NUM
    FROM    KK_T_IDO_RSN KK1131_02N
    WHERE    KK1131_02N.MK_FLG = '0'
  ) KK1131_02T
  WHERE KK1131_02T.ROW_NUM = 2
)  KK1131_02
ON   KK1131_02.SVC_KEI_NO = PRG.SVC_KEI_NO
AND KK1131_02.IDO_DIV = PRG.IDO_DIV
AND KK1131_02.IDO_DTM = PRG.IDO_DTM
UNION ALL
SELECT  SVKEI.SVC_KEI_NO,
  (
    SELECT  KK0081_01.SVC_KEI_NO
    FROM  KK_T_KAISEN_TG_SVKEI KK0241
    INNER  JOIN
        KK_T_SVC_KEI KK0081_01
        ON KK0241.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
    WHERE
      KK0241.SVC_KEI_KAISEN_UCWK_NO =
      (SELECT  MAX(KK0241_01.SVC_KEI_KAISEN_UCWK_NO)
      FROM  KK_T_KAISEN_TG_SVKEI KK0241_01
      WHERE  KK0241_01.SVC_KEI_NO = SVKEI.SVC_KEI_NO
      AND    KK0241_01.KAISEN_UCWK_USE_STAYMD <= ?
      AND    KK0241_01.KAISEN_UCWK_USE_ENDYMD =
          (SELECT  MAX(KK0241_02.KAISEN_UCWK_USE_ENDYMD) AS KK0241_MAX
          FROM  KK_T_KAISEN_TG_SVKEI KK0241_02
          WHERE  KK0241_02.SVC_KEI_NO = KK0241_01.SVC_KEI_NO
          AND    KK0241_02.KAISEN_UCWK_USE_STAYMD <= ?
          AND    KK0241_02.MK_FLG = '0')
      )
    AND KK0081_01.SVC_CD = '01'
    AND KK0081_01.RSV_APLY_YMD || KK0081_01.GENE_ADD_DTM =
      (SELECT  MAX(KK0081_01_GENE.RSV_APLY_YMD || KK0081_01_GENE.GENE_ADD_DTM) AS KK0081_01_MAX
      FROM  KK_T_SVC_KEI KK0081_01_GENE
      WHERE  KK0081_01_GENE.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
      AND    KK0081_01_GENE.RSV_APLY_YMD <= ?
      AND    KK0081_01_GENE.RSV_APLY_CD = '2'
      AND    KK0081_01_GENE.MK_FLG = '0')
    AND ROWNUM = 1
  ) AS NET_SVC_KEI_NO ,
  ORSJGSKEIIDT.ORSJGS_CD,
  ORSJGSKEIIDT.SVC_SBT,
  KK1131_01.IDO_RSN_CD AS IDO_RSN_CD_1,
  KK1131_02.IDO_RSN_CD AS IDO_RSN_CD_2
FROM
  (
    SELECT  KK0081.SVC_KEI_NO
    FROM  KK_T_SVC_KEI KK0081
    WHERE  KK0081.SVC_KEI_STAT = '910'
    AND    KK0081.SVC_STA_YMD IS NULL
    AND    KK0081.SVC_CD IN ('01','02','03')
    AND    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
        (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
        FROM  KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0')
  ) SVKEI
  INNER JOIN
  (
    SELECT  KK3141.ORSJGS_CD,
        KK3141.SVC_SBT,
        KK3141.SVC_KEI_NO
    FROM   KK_T_ORSJGS_KEI_IDT KK3141
    WHERE   KK3141.ORSJGS_RNKI_SKCD = '10'
    AND    KK3141.ORSJGS_KEI_IDT_STAT_CD = '1'
    AND    KK3141.ORSJGS_KEI_IDT_RSLT_CD  = '1' 
    AND    KK3141.MK_FLG = '0'
    AND    NOT EXISTS  (SELECT 1
              FROM  KK_T_ORSJGS_KEI_IDT KK3141_01
              WHERE  KK3141_01.SVC_KEI_NO = KK3141.SVC_KEI_NO
              AND    KK3141_01.ORSJGS_RNKI_SKCD = '05'
              AND    KK3141_01.ORSJGS_KEI_IDT_STAT_CD = '0'
              AND    KK3141_01.MK_FLG = '0')
  ) ORSJGSKEIIDT
  ON SVKEI.SVC_KEI_NO = ORSJGSKEIIDT.SVC_KEI_NO
  INNER JOIN
  (
  SELECT 
    KK1091.SVC_KEI_NO,
    KK1091.IDO_DIV,
    KK1091.IDO_DTM
  FROM  KK_T_PRG KK1091
  WHERE  (KK1091.SVC_KEI_NO, KK1091.IDO_DTM, KK1091.PRG_STAT) IN
      (SELECT
      KK1091_01.SVC_KEI_NO,
      MAX(KK1091_01.IDO_DTM),
      KK1091_01.PRG_STAT
      FROM  KK_T_PRG KK1091_01
      WHERE    KK1091_01.PRG_DTM  BETWEEN  ?
                        AND  ?
      AND    KK1091_01.PRG_STAT IN ('1201','1304')
      AND    KK1091_01.MK_FLG = '0'
      GROUP BY
      KK1091_01.SVC_KEI_NO,
      KK1091_01.PRG_STAT
      )
  ) PRG
  ON SVKEI.SVC_KEI_NO = PRG.SVC_KEI_NO
LEFT OUTER JOIN
(
  SELECT *
  FROM
  (
    SELECT
    KK1131_01N.IDO_DIV,
    KK1131_01N.IDO_DTM,
    KK1131_01N.IDO_RSN_CD,
    KK1131_01N.SVC_KEI_NO,
    ROW_NUMBER() OVER(PARTITION BY KK1131_01N.IDO_DIV, KK1131_01N.IDO_DTM ORDER BY KK1131_01N.IDO_RSN_NO ASC) AS ROW_NUM
      FROM    KK_T_IDO_RSN KK1131_01N
      WHERE    KK1131_01N.MK_FLG = '0'
  ) KK1131_01T
  WHERE KK1131_01T.ROW_NUM = 1
) KK1131_01
ON   KK1131_01.SVC_KEI_NO = PRG.SVC_KEI_NO
AND KK1131_01.IDO_DIV = PRG.IDO_DIV
AND KK1131_01.IDO_DTM = PRG.IDO_DTM
LEFT OUTER JOIN
(
  SELECT *
  FROM
  (
    SELECT
    KK1131_02N.IDO_DIV,
    KK1131_02N.IDO_DTM,
    KK1131_02N.IDO_RSN_CD,
    KK1131_02N.SVC_KEI_NO,
    ROW_NUMBER() OVER(PARTITION BY KK1131_02N.IDO_DIV, KK1131_02N.IDO_DTM ORDER BY KK1131_02N.IDO_RSN_NO ASC) AS ROW_NUM
    FROM    KK_T_IDO_RSN KK1131_02N
    WHERE    KK1131_02N.MK_FLG = '0'
  )  KK1131_02T
  WHERE KK1131_02T.ROW_NUM = 2
) KK1131_02
ON   KK1131_02.SVC_KEI_NO = PRG.SVC_KEI_NO
AND KK1131_02.IDO_DIV = PRG.IDO_DIV
AND KK1131_02.IDO_DTM = PRG.IDO_DTM

#-

#-----------------------------------------------------------
#--卸先事業者契約異動通知(KK_T_SVC_KEI-KK_SELECT_357)
#--KKPRC60201
#--卸先事業者コードから、
#--サービス契約番号・ネットのサービス契約番号・卸事業者コード・サービス種別・サービス解約理由コードを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_357

SELECT /* KK_T_SVC_KEI.SQL KK_SELECT_357 */
 SVKEI.SVC_KEI_NO,
 (
 SELECT KK0081_01.SVC_KEI_NO
 FROM   KK_T_KAISEN_TG_SVKEI KK0241
 INNER  JOIN
        KK_T_SVC_KEI KK0081_01
        ON KK0241.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
 WHERE
  KK0241.SVC_KEI_KAISEN_UCWK_NO =
  (SELECT MAX(KK0241_01.SVC_KEI_KAISEN_UCWK_NO)
  FROM    KK_T_KAISEN_TG_SVKEI KK0241_01
  WHERE   KK0241_01.SVC_KEI_NO = SVKEI.SVC_KEI_NO
  AND     KK0241_01.KAISEN_UCWK_USE_STAYMD <= ?
  AND     KK0241_01.KAISEN_UCWK_USE_ENDYMD =
          (SELECT MAX(KK0241_02.KAISEN_UCWK_USE_ENDYMD) AS KK0241_MAX
          FROM    KK_T_KAISEN_TG_SVKEI KK0241_02
          WHERE   KK0241_02.SVC_KEI_NO = KK0241_01.SVC_KEI_NO
          AND     KK0241_02.KAISEN_UCWK_USE_STAYMD <= ?
          AND     KK0241_02.MK_FLG = '0')
          )
          AND KK0081_01.SVC_CD = '01'
          AND KK0081_01.RSV_APLY_YMD || KK0081_01.GENE_ADD_DTM =
              (SELECT MAX(KK0081_01_GENE.RSV_APLY_YMD || KK0081_01_GENE.GENE_ADD_DTM) AS KK0081_01_MAX
               FROM    KK_T_SVC_KEI KK0081_01_GENE
               WHERE   KK0081_01_GENE.SVC_KEI_NO = KK0081_01.SVC_KEI_NO
               AND     KK0081_01_GENE.RSV_APLY_YMD <= ?
               AND     KK0081_01_GENE.RSV_APLY_CD = '2'
               AND     KK0081_01_GENE.MK_FLG = '0')
          AND ROWNUM = 1
  ) AS NET_SVC_KEI_NO,
  ORSJGSKEIIDT.ORSJGS_CD,
  ORSJGSKEIIDT.SVC_SBT,
  SVKEI.SVC_DLRE_CD,
  SVKEI.SVC_CHRG_ENDYMD
FROM
(
 SELECT KK0081.SVC_KEI_NO,
           KK0081.SVC_DLRE_CD,
           KK0081.SVC_CHRG_ENDYMD
 FROM  KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_STAT = '910'
 AND   KK0081.SVC_DSL_YMD = ?
 AND   KK0081.SVC_CD IN (02, 03)
 AND   KK0081.SVC_DLRE_CD IN (01, 02)
 AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
        FROM    KK_T_SVC_KEI KK0081_GENE
        WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND     KK0081_GENE.RSV_APLY_YMD <= ?
        AND     KK0081_GENE.RSV_APLY_CD = '2'
        AND     KK0081_GENE.MK_FLG = '0')
) SVKEI
INNER JOIN
(
 SELECT KK3141.ORSJGS_CD,
        KK3141.SVC_SBT,
        KK3141.SVC_KEI_NO
 FROM  KK_T_ORSJGS_KEI_IDT KK3141
 WHERE KK3141.ORSJGS_RNKI_SKCD = '04'
 AND   KK3141.ORSJGS_KEI_IDT_STAT_CD = '1'
 AND   KK3141.ORSJGS_KEI_IDT_RSLT_CD  = '1' 
 AND   KK3141.MK_FLG = '0'
 AND   NOT EXISTS (SELECT 1
                   FROM    KK_T_ORSJGS_KEI_IDT KK3141_01
                   WHERE   KK3141_01.SVC_KEI_NO = KK3141.SVC_KEI_NO
                   AND     KK3141_01.ORSJGS_RNKI_SKCD = '06'
                   AND     KK3141_01.ORSJGS_KEI_IDT_STAT_CD= '0'
                   AND     KK3141_01.MK_FLG = '0')
) ORSJGSKEIIDT
ON SVKEI.SVC_KEI_NO = ORSJGSKEIIDT.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_353)
#--「入力ファイル.レコード区分 = お客様.卸先事業者コード　かつ　入力ファイル.共通キー = サービス契約.サービス契約番号」であるデータを抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_353

SELECT /* KK_T_SVC_KEI_KK_SELECT_353 */
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081 INNER JOIN CK_T_CUST CK0011 ON KK0081.SYSID = CK0011.SYSID
WHERE
    (CK0011.SYSID, CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM) =    (SELECT
                                                                        CK0011_GENE.SYSID,
                                                                        MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
                                                                    FROM
                                                                        CK_T_CUST CK0011_GENE
                                                                    WHERE
                                                                        CK0011_GENE.SYSID = CK0011.SYSID    AND
                                                                        CK0011_GENE.RSV_APLY_YMD <= ?    AND
                                                                        CK0011_GENE.RSV_APLY_CD = '2'    AND
                                                                        CK0011_GENE.MK_FLG = '0'
                                                                    GROUP BY
                                                                        CK0011_GENE.SYSID
                                                                    )  AND
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =   (SELECT
                                                                            KK0081_GENE.SVC_KEI_NO,
                                                                            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                                        FROM
                                                                            KK_T_SVC_KEI KK0081_GENE
                                                                        WHERE
                                                                            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO    AND
                                                                            KK0081_GENE.RSV_APLY_YMD <= ?    AND
                                                                            KK0081_GENE.RSV_APLY_CD = '2'    AND
                                                                            KK0081_GENE.MK_FLG = '0'
                                                                        GROUP BY
                                                                            KK0081_GENE.SVC_KEI_NO
                                                                        )  AND
    CK0011.ORSJGS_CD = ? AND
    KK0081.SVC_KEI_NO = ?

#-

#-----------------------------------------------------------
#--KKPRC60302
#--５．各解約共通処理#-----------------------------------------------------------

--KEY:KK_SELECT_351

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.SVC_CHRG_ENDYMD,
    KK0081.SVC_KEI_STAT,
    KK0321.SEIKY_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAKINS KK0321
ON  KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
 KK0321.KAKINS_TSTAYMD <= ? AND
 KK0321.KAKINS_TENDYMD >= ? AND
 KK0321.MK_FLG = '0'
WHERE
    EXISTS (SELECT
                1
            FROM
                KK_T_KAISEN_TG_SVKEI KK0241          
            INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251             
            ON KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
            WHERE
                KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                KK0241.KAISEN_UCWK_USE_STAYMD <= ? AND
                (KK0241.SVC_KEI_NO, KK0241.KAISEN_UCWK_USE_ENDYMD) =    (SELECT
                                                                            KK0241_TMP.SVC_KEI_NO,
                                                                            MAX(KK0241_TMP.KAISEN_UCWK_USE_ENDYMD)
                                                                        FROM
                                                                            KK_T_KAISEN_TG_SVKEI KK0241_TMP
                                                                        WHERE
                                                                            KK0241_TMP.SVC_KEI_NO = KK0241.SVC_KEI_NO AND
                                                                            KK0241_TMP.KAISEN_UCWK_USE_STAYMD <= ? AND
                                                                            KK0241_TMP.KAISEN_UCWK_USE_ENDYMD >= ? AND
                                                                            KK0241_TMP.MK_FLG = '0'
                                                                        GROUP BY
                                                                            KK0241_TMP.SVC_KEI_NO
                                                                        ) AND
                KK0251.SVC_KEI_KAISEN_UCWK_STAT IN ('010','100') AND
                (KK0251.SVC_KEI_KAISEN_UCWK_NO, KK0251.GENE_ADD_DTM) = (SELECT
                                                                            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO,
                                                                            MAX(KK0251_GENE.GENE_ADD_DTM)
                                                                        FROM
                                                                            KK_T_SVKEI_KAISEN_UW KK0251_GENE
                                                                        WHERE
                                                                            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO AND
                                                                            KK0251_GENE.MK_FLG = '0'
                                                                        GROUP BY
                                                                            KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO
                                                                        ) AND
                EXISTS (SELECT
                            1
                        FROM
                            KK_T_KAISEN_TG_SVKEI KK0241_01                  
                        INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251_01                     
                        ON KK0241_01.SVC_KEI_KAISEN_UCWK_NO = KK0251_01.SVC_KEI_KAISEN_UCWK_NO
                        WHERE
                            KK0241_01.SVC_KEI_NO = ? AND
                            KK0241_01.SVC_KEI_KAISEN_UCWK_NO = KK0241.SVC_KEI_KAISEN_UCWK_NO AND
                            KK0241_01.KAISEN_UCWK_USE_STAYMD <= ? AND
                            (KK0241_01.SVC_KEI_NO, KK0241_01.KAISEN_UCWK_USE_ENDYMD) =  (SELECT
                                                                                            KK0241_02_TMP.SVC_KEI_NO,
                                                                                            MAX(KK0241_02_TMP.KAISEN_UCWK_USE_ENDYMD)
                                                                                        FROM
                                                                                            KK_T_KAISEN_TG_SVKEI KK0241_02_TMP
                                                                                        WHERE
                                                                                            KK0241_02_TMP.SVC_KEI_NO = KK0241_01.SVC_KEI_NO AND
                                                                                            KK0241_02_TMP.KAISEN_UCWK_USE_STAYMD <= ? AND
                                                                                            KK0241_02_TMP.MK_FLG = '0'
                                                                                        GROUP BY
                                                                                            KK0241_02_TMP.SVC_KEI_NO
                                                                                        ) AND
                            KK0251_01.SVC_KEI_KAISEN_UCWK_STAT IN ('010','100') AND
                            (KK0251_01.SVC_KEI_KAISEN_UCWK_NO, KK0251_01.GENE_ADD_DTM) =    (SELECT
                                                                                                KK0251_01_GENE.SVC_KEI_KAISEN_UCWK_NO,
                                                                                                MAX(KK0251_01_GENE.GENE_ADD_DTM)
                                                                                            FROM
                                                                                                KK_T_SVKEI_KAISEN_UW KK0251_01_GENE
                                                                                            WHERE
                                                                                                KK0251_01_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251_01.SVC_KEI_KAISEN_UCWK_NO AND
                                                                                                KK0251_01_GENE.MK_FLG = '0'
                                                                                            GROUP BY
                                                                                                KK0251_01_GENE.SVC_KEI_KAISEN_UCWK_NO
                                                                                            )
                        )
            )    AND
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =   (SELECT
                                                                            KK0081_GENE.SVC_KEI_NO,
                                                                            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                                        FROM
                                                                            KK_T_SVC_KEI KK0081_GENE
                                                                        WHERE
                                                                            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO AND
                                                                            KK0081_GENE.RSV_APLY_YMD <= ? AND
                                                                            KK0081_GENE.RSV_APLY_CD = '2' AND
                                                                            KK0081_GENE.MK_FLG = '0'
                                                                        GROUP BY
                                                                            KK0081_GENE.SVC_KEI_NO
                                                                        )
ORDER BY
    KK0081.SVC_CD DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_356)
#--サービス契約情報チェック
#-----------------------------------------------------------

--KEY:KK_SELECT_356

SELECT /*+ KK_T_SVC_KEI_KK_SELECT_356 */
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO =  ? AND
    KK0081.SVC_KEI_STAT = '010' AND
    KK0081.SVC_CD in ('01','02','03') AND
    (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =  (SELECT
                                                                            KK0081_GENE.SVC_KEI_NO,
                                                                            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                                                                        FROM
                                                                            KK_T_SVC_KEI KK0081_GENE
                                                                        WHERE
                                                                            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO   AND
                                                                            KK0081_GENE.RSV_APLY_YMD <= ?  AND
                                                                            KK0081_GENE.RSV_APLY_CD = '2'   AND
                                                                            KK0081_GENE.MK_FLG = '0'
                                                                        GROUP BY
                                                                            KK0081_GENE.SVC_KEI_NO
                                                                        )

#-


#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_358)
#--「入力ファイル.共通キー = サービス契約.サービス契約番号」であるデータを抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_358

SELECT /*+ KK_T_SVC_KEI_KK_SELECT_358 */
	KK0081.SVC_CD,
	CK0011.ORSJGS_CD
FROM KK_T_SVC_KEI KK0081 LEFT OUTER JOIN CK_T_CUST CK0011 ON KK0081.SYSID = CK0011.SYSID
WHERE (CK0011.SYSID, CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM) = 
	 (SELECT  CK0011_GENE.SYSID, MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX 
	 FROM    CK_T_CUST CK0011_GENE 
	 WHERE   CK0011_GENE.SYSID = CK0011.SYSID 
	 AND     CK0011_GENE.RSV_APLY_YMD <= ? 
	 AND     CK0011_GENE.RSV_APLY_CD = '2' 
	 AND     CK0011_GENE.MK_FLG = '0'  
	 GROUP BY CK0011_GENE.SYSID ) 
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
	(SELECT  KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
	 FROM    KK_T_SVC_KEI KK0081_GENE 
	 WHERE   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
	 AND     KK0081_GENE.RSV_APLY_YMD <= ? 
	 AND     KK0081_GENE.RSV_APLY_CD = '2' 
	 AND     KK0081_GENE.MK_FLG = '0'  
	 GROUP BY KK0081_GENE.SVC_KEI_NO ) 
AND KK0081.SVC_KEI_NO = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_359)
#--KKPRC61202
#--標準工事費残債減額の適用の際、割引サービス契約の登録に必要な情報の取得
#-----------------------------------------------------------

--KEY:KK_SELECT_359

SELECT
    KK0081.SYSID,
    KK0851.WRIB_SVC_TRGT_SVC_CD
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN 
    KK_M_WRISVC_TG_SVC KK0851
ON 
    KK0851.PPLAN_CD = KK0081.PPLAN_CD
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
        FROM KK_T_SVC_KEI KK0081_GENE 
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0081_GENE.RSV_APLY_YMD <= ? 
        AND KK0081_GENE.RSV_APLY_CD = '2' 
        AND KK0081_GENE.MK_FLG = '0')
AND
    KK0851.WRIB_SVC_CD = 'W50000003'
AND
    KK0851.WRIB_SVC_TRGT_SVC_TSTAYMD <= ?
AND
    KK0851.WRIB_SVC_TRGT_SVC_TENDYMD >= ?
AND
    KK0851.RSV_APLY_YMD || KK0851.GENE_ADD_DTM = (
        SELECT MAX(GENE.RSV_APLY_YMD || GENE.GENE_ADD_DTM)
        FROM KK_M_WRISVC_TG_SVC GENE
        WHERE GENE.WRIB_SVC_TRGT_SVC_CD  = KK0851.WRIB_SVC_TRGT_SVC_CD
        AND GENE.RSV_APLY_YMD <= ?
        AND GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_360)
#--KKPRC61201
#--工事費割賦契約の回線及び初回請求先に紐付くサービス契約情報を取得し、解約済であるかを判断する
#-----------------------------------------------------------

--KEY:KK_SELECT_360

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_DSL_KISAN_YMD,
    KK0081.SVC_DLRE_CD,
    KK0321.SEIKY_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN
    KK_T_KAKINS KK0321
ON
    KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
    KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
AND (KK0241.SVC_KEI_NO, KK0241.KAISEN_UCWK_USE_ENDYMD) = 
        (SELECT KK0241_GENE.SVC_KEI_NO, MAX(KK0241_GENE.KAISEN_UCWK_USE_ENDYMD)
         FROM   KK_T_KAISEN_TG_SVKEI KK0241_GENE
         WHERE  KK0241_GENE.SVC_KEI_NO = KK0241.SVC_KEI_NO
         AND    KK0241_GENE.KAISEN_UCWK_USE_STAYMD <= ?
         AND    KK0241_GENE.MK_FLG = '0'
         GROUP BY KK0241_GENE.SVC_KEI_NO)
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 
AND
    KK0081.SVC_CD IN('01','02')
AND KK0321.KAKINS_TSTAYMD <= ?
AND KK0321.KAKINS_TENDYMD >= ?
AND KK0321.MK_FLG = '0'
UNION ALL
SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_DSL_KISAN_YMD,
    KK0081.SVC_DLRE_CD,
    KK0321.SEIKY_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAKINS KK0321
ON
    KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 
AND KK0321.KAKINS_TSTAYMD <= ?
AND KK0321.KAKINS_TENDYMD >= ?
AND KK0321.MK_FLG = '0'
ORDER BY 
    SVC_DSL_KISAN_YMD DESC, SVC_DLRE_CD DESC

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_364)
#--KKPRC36101_キャンペーン割引適用情報反映
#-----------------------------------------------------------

--KEY:KK_SELECT_364
      SELECT  /* KK_T_SVC_KEI.SQL KK_SELECT_364 */
              KK0241.SVC_KEI_NO
              , KK0081.PCRS_CD
              , KK0081.PPLAN_CD
        FROM  KK_T_KAISEN_TG_SVKEI KK0241
  INNER JOIN  KK_T_SVC_KEI KK0081
          ON  KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND  KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
              (SELECT  MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
                 FROM  KK_T_SVC_KEI KK0081_GENE
                WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                  AND  KK0081_GENE.RSV_APLY_YMD <= ?
                  AND  KK0081_GENE.RSV_APLY_CD = '2'
                  AND  KK0081_GENE.MK_FLG = '0'
              )
         AND  KK0081.SVC_CD IN ('01', '02')
       WHERE  KK0241.SVC_KEI_KAISEN_UCWK_NO IN
              (
              SELECT  KK2091.ITENS_SVKEI_KISUW_NO
                FROM  KK_T_ADCHG KK2091
               WHERE  KK2091.MK_FLG = '0'
                 AND  KK2091.ITNM_SVKEI_KISUW_NO = ?
              )
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_361)
#--「入力ファイル.共通キー = サービス契約.サービス契約番号」であるデータを抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_361

SELECT KK0011.MSKM_YMD
FROM   KK_T_SVC_KEI KK0081
INNER JOIN KK_T_MSKM_DTL KK0021
ON     KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
AND    KK0021.GENE_ADD_DTM = (
           SELECT MAX(KK0021_GENE.GENE_ADD_DTM) AS MSKM_DTL_MAX
           FROM  KK_T_MSKM_DTL KK0021_GENE
           WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
           AND    KK0021_GENE.MK_FLG = '0')
INNER JOIN KK_T_MSKM KK0011
ON     KK0011.MSKM_NO = KK0021.MSKM_NO
AND    KK0011.GENE_ADD_DTM = (
           SELECT MAX(KK0011_GENE.GENE_ADD_DTM) AS MSKM_MAX
           FROM  KK_T_MSKM KK0011_GENE
           WHERE  KK0011_GENE.MSKM_NO = KK0011.MSKM_NO
           AND    KK0011_GENE.MK_FLG = '0')
WHERE  KK0081.SVC_KEI_NO = ?
AND    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
           SELECT
               MIN(KK0081.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MIN
           FROM
               KK_T_SVC_KEI KK0081_GENE
           WHERE 
               KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
               AND KK0081_GENE.RSV_APLY_YMD <= ?
               AND KK0081_GENE.RSV_APLY_CD = '2'
               AND KK0081_GENE.MK_FLG = '0' )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_363)
#--KKPRC61203
#--住所変更先のサービスがテレビのみかを判断する
#-----------------------------------------------------------

--KEY:KK_SELECT_363

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_KAISEN_TG_SVKEI KK0241
ON
    KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
    KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0') 
AND
    KK0081.SVC_CD IN ('01','02')
AND
    KK0241.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_365)
#--KKPRC61202にて使用
#--割引サービス契約、進捗に登録するための申込明細番号、異動区分を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_365

SELECT
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
      (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.IDO_DIV = '00019'
       AND    KK0081_GENE.MK_FLG = '0') 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_343)
#--KKPRC33707
#--サービス契約番号に紐付く、サービス契約の料金グループが「ｅｏ光ネットホームタイプ」、「ｅｏ光ネットメゾンタイプ」、「ｅｏ光ネットマンションタイプ」、「ｅｏ光電話」のいずれかであるサービス契約のサービス契約番号を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_343

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.PRC_GRP_CD IN ('02','03','04','10') AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM   KK_T_SVC_KEI KK0081_GENE
       WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND    KK0081_GENE.RSV_APLY_YMD <= ?
       AND    KK0081_GENE.RSV_APLY_CD = '2'
       AND    KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_366)
#--カレントのSYSID・サービス契約ステータス・サービス契約ステータス・サービスコードを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_366

SELECT /* KK_T_SVC_KEI-KK_SELECT_366 */
    KK0081.SVC_KEI_NO,
    KK0081.SYSID,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(GENE.RSV_APLY_YMD || GENE.GENE_ADD_DTM)
        FROM
            KK_T_SVC_KEI GENE
        WHERE
            GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND GENE.RSV_APLY_YMD <= ?
        AND GENE.RSV_APLY_CD   = '2'
        AND GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_368)
#--KKPRC61904
#--申込明細番号比較対象取得
#-----------------------------------------------------------

--KEY:KK_SELECT_368

SELECT KK0081.MSKM_DTL_NO
 FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_NO = ?
 AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
 (
  SELECT MIN(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) FROM KK_T_SVC_KEI KK0081_GENE
  WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND KK0081_GENE.GENE_ADD_DTM > 
  (
   SELECT KK0081_2.GENE_ADD_DTM FROM KK_T_SVC_KEI KK0081_2
    WHERE (KK0081_2.SVC_KEI_NO,KK0081_2.RSV_APLY_YMD || KK0081_2.GENE_ADD_DTM) = 
    (
     SELECT KK0081_2_GENE.SVC_KEI_NO,MAX(KK0081_2_GENE.RSV_APLY_YMD || KK0081_2_GENE.GENE_ADD_DTM) AS MAX_GENE FROM KK_T_SVC_KEI KK0081_2_GENE
     WHERE KK0081_2_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND KK0081_2_GENE.RSV_APLY_YMD <= ?
     AND KK0081_2_GENE.RSV_APLY_CD = '2'
     AND KK0081_2_GENE.SVC_KEI_STAT <> '910'
     GROUP BY KK0081_2_GENE.SVC_KEI_NO
    )
  )
  AND KK0081_GENE.RSV_APLY_YMD <= ?
  AND KK0081_GENE.RSV_APLY_CD = '2'
  AND KK0081_GENE.SVC_KEI_STAT = '910'
 )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_369)
#--KKPRC51501_E-PON→GE-PON設備切替工事情報作成処理
#--回線利用中の電話契約の取得
#-----------------------------------------------------------

--KEY:KK_SELECT_369

SELECT KK0081.SVC_KEI_NO
FROM KK_T_SVC_KEI KK0081 
INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241 ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
WHERE KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
   AND KK0081.PRC_GRP_CD = '10'
   AND KK0081.SVC_KEI_STAT NOT IN('910','920')
   AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
          SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM   KK_T_SVC_KEI KK0081_GENE
          WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND    KK0081_GENE.RSV_APLY_YMD <= ?
          AND    KK0081_GENE.RSV_APLY_CD = '2'
          AND    KK0081_GENE.MK_FLG = '0'
          GROUP BY KK0081_GENE.SVC_KEI_NO)
   AND KK0241.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_370)
#--KKPRC62202
#--支払変更登録完了お知らせメール向けリスト出力データを取得
#-----------------------------------------------------------

--KEY:KK_SELECT_370

SELECT
    KK0081.SVC_KEI_NO
  , KK0361.MLAD
  , CH0051_CNT.CNT 
  , KK0321.SEIKY_KEI_NO
  , KK0501.KOZA_PAYWAY_UK_DIV
FROM KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAKINS KK0321
  ON KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN KK_T_OP_SVC_KEI KK0351
  ON KK0351.SYSID = KK0081.SYSID
INNER JOIN KK_T_OPSVKEI_ISP KK0361
  ON KK0361.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
  AND KK0361.GENE_ADD_DTM = KK0351.GENE_ADD_DTM
LEFT JOIN (
    SELECT COUNT(*) CNT, SEIKY_KEI_NO
    FROM CH_T_SEIKY CH0051
    WHERE CH0051.SEIKY_STAT = '020'
    AND CH0051.MK_FLG = '0'
    GROUP BY SEIKY_KEI_NO) CH0051_CNT
ON CH0051_CNT.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
INNER JOIN KK_T_SEIKY_KEI KK0491
 ON  KK0491.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO 
 AND KK0491.GENE_ADD_DTM =
      (SELECT MAX(KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
       FROM   KK_T_SEIKY_KEI KK0491_GENE
       WHERE  KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
       AND    KK0491_GENE.RSV_APLY_CD = '2'
       AND    KK0491_GENE.MK_FLG = '0')
LEFT OUTER JOIN ( 
    SELECT  KK0501.SEIKY_WAY_NO_KOZA ,  KK0501.KOZA_PAYWAY_UK_DIV
    FROM    KK_T_KOZA KK0501 
    WHERE       (KK0501.SEIKY_WAY_NO_KOZA,KK0501.GENE_ADD_DTM) = (
                                     SELECT KK0501_GENE.SEIKY_WAY_NO_KOZA,MAX(KK0501_GENE.GENE_ADD_DTM)
                                     FROM KK_T_KOZA KK0501_GENE
                                     WHERE KK0501_GENE.SEIKY_WAY_NO_KOZA = KK0501.SEIKY_WAY_NO_KOZA
                                     AND KK0501_GENE.MK_FLG = '0'
                                     GROUP BY KK0501_GENE.SEIKY_WAY_NO_KOZA
                                     )
) KK0501 
ON  KK0501.SEIKY_WAY_NO_KOZA = KK0491.SEIKY_WAY_NO_KOZA 
WHERE KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
    SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM KK_T_SVC_KEI KK0081_GENE
    WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081.MK_FLG = '0')
AND KK0351.RSV_APLY_YMD || KK0351.GENE_ADD_DTM = (
    SELECT MAX(KK0351_GENE.RSV_APLY_YMD || KK0351_GENE.GENE_ADD_DTM) AS KTSK_MAX
    FROM KK_T_OP_SVC_KEI KK0351_GENE
    WHERE KK0351_GENE.OP_SVC_KEI_NO = KK0351.OP_SVC_KEI_NO
    AND KK0351_GENE.RSV_APLY_YMD <= ?
    AND KK0351_GENE.RSV_APLY_CD = '2'
    AND KK0351_GENE.MK_FLG = '0'
    AND KK0351.MK_FLG = '0')
AND KK0321.KAKINS_TSTAYMD <= ?
AND KK0321.KAKINS_TENDYMD >= ?
AND KK0321.SEIKY_KEI_NO = ?
AND KK0351.OP_SVC_CD = 'B001'
AND KK0351.OP_SVC_KEI_STAT IN ('100','210','220')
AND KK0321.MK_FLG = '0'
AND KK0361.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_371)
#--KKPRC62202
#--支払変更登録完了お知らせSMS向けリスト出力データを取得
#-----------------------------------------------------------

--KEY:KK_SELECT_371

SELECT 
    CK0201.TELNO
  , CK0011.KEISHA_TELNO
  , CH0051_CNT.CNT
  , (SELECT ZM0171.CD_DIV_NM
     FROM ZM_M_CD_NM_KANRI ZM0171
     WHERE ZM0171.CD_SBT_CD = 'CD01809'
     AND ZM0171.CD_DIV = KK0501.KOZA_PAYWAY_UK_DIV
     AND ZM0171.CD_TSTAYMD <= ?
     AND ZM0171.CD_TENDYMD >= ?
     AND ZM0171.MK_FLG = '0') AS CD_DIV_NM
FROM KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAKINS KK0321
  ON KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN CK_T_CUST CK0011
  ON CK0011.SYSID = KK0081.SYSID
LEFT JOIN (
    SELECT CK0201_JOIN.TELNO
          ,CK0201_JOIN.SYSID
    FROM CK_T_RRKS CK0201_JOIN
    WHERE CK0201_JOIN.RSV_APLY_YMD || CK0201_JOIN.GENE_ADD_DTM = (
        SELECT MAX(CK0201_GENE.RSV_APLY_YMD || CK0201_GENE.GENE_ADD_DTM) AS CK0201_MAX
        FROM CK_T_RRKS CK0201_GENE
        WHERE CK0201_GENE.SYSID = CK0201_JOIN.SYSID
        AND CK0201_GENE.RRKS_SBT_CD = CK0201_JOIN.RRKS_SBT_CD
        AND CK0201_GENE.RRK_WAY_CD = CK0201_JOIN.RRK_WAY_CD
        AND CK0201_GENE.RSV_APLY_YMD <= ?
        AND CK0201_GENE.RSV_APLY_CD = '2'
        AND CK0201_GENE.MK_FLG = '0')
    AND (CK0201_JOIN.GENE_ADD_DTM || CK0201_JOIN.RRKS_NO) = (
        SELECT MAX(CK0201_MAX.GENE_ADD_DTM ||CK0201_MAX.RRKS_NO) RRKS_NO_MAX
        FROM CK_T_RRKS CK0201_MAX
        WHERE CK0201_MAX.SYSID = CK0201_JOIN.SYSID
        AND CK0201_MAX.TELNO IS NOT NULL)
) CK0201
  ON CK0201.SYSID = KK0081.SYSID
LEFT JOIN (
    SELECT COUNT(*) CNT, SEIKY_KEI_NO
    FROM CH_T_SEIKY CH0051
    WHERE CH0051.SEIKY_STAT = '020'
    AND CH0051.MK_FLG = '0'
    GROUP BY SEIKY_KEI_NO) CH0051_CNT
ON CH0051_CNT.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
INNER JOIN KK_T_SEIKY_KEI KK0491
 ON  KK0491.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO 
 AND KK0491.GENE_ADD_DTM =
      (SELECT MAX(KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
       FROM   KK_T_SEIKY_KEI KK0491_GENE
       WHERE  KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
       AND    KK0491_GENE.RSV_APLY_CD = '2'
       AND    KK0491_GENE.MK_FLG = '0') 
LEFT OUTER JOIN ( 
    SELECT  KK0501.SEIKY_WAY_NO_KOZA ,  KK0501.KOZA_PAYWAY_UK_DIV
    FROM    KK_T_KOZA KK0501 
    WHERE       (KK0501.SEIKY_WAY_NO_KOZA,KK0501.GENE_ADD_DTM) = (
                                     SELECT KK0501_GENE.SEIKY_WAY_NO_KOZA,MAX(KK0501_GENE.GENE_ADD_DTM)
                                     FROM KK_T_KOZA KK0501_GENE
                                     WHERE KK0501_GENE.SEIKY_WAY_NO_KOZA = KK0501.SEIKY_WAY_NO_KOZA
                                     AND KK0501_GENE.MK_FLG = '0'
                                     GROUP BY KK0501_GENE.SEIKY_WAY_NO_KOZA
                                     )
) KK0501 
ON  KK0501.SEIKY_WAY_NO_KOZA = KK0491.SEIKY_WAY_NO_KOZA
WHERE KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
    SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM KK_T_SVC_KEI KK0081_GENE
    WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081.MK_FLG = '0')
AND CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM = (
    SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_MAX
    FROM CK_T_CUST CK0011_GENE
    WHERE CK0011_GENE.SYSID = CK0011.SYSID
    AND CK0011_GENE.RSV_APLY_YMD <= ? 
    AND CK0011_GENE.RSV_APLY_CD = '2' 
    AND CK0011_GENE.MK_FLG = '0'
    AND CK0011.MK_FLG = '0')
AND KK0321.KAKINS_TSTAYMD <= ?
AND KK0321.KAKINS_TENDYMD >= ?
AND KK0321.SEIKY_KEI_NO = ?
AND (CK0201.TELNO LIKE '0_0%' OR CK0011.KEISHA_TELNO LIKE '0_0%')
AND KK0321.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_372)
#--KKPRC62202
#--支払変更登録完了お知らせハガキ向けリスト出力データを取得
#-----------------------------------------------------------

--KEY:KK_SELECT_372

SELECT DISTINCT
    KK0491. SOHUS_PCD
  , KK0491.SOHUS_STATE_NM || KK0491.SOHUS_CITY_NM || KK0491.SOHUS_OAZTSU_NM || KK0491.SOHUS_AZCHO_NM 
    || KK0491.SOHUS_BNCHIGO || KK0491.SOHUS_ADRTTM || KK0491.SOHUS_ADRRM AS SOHUS
  , KK0491.SOHUS_NM || KK0491.SOHUS_BKM AS SOHUS_NM
  , (SELECT ZM0171.CD_DIV_NM
     FROM ZM_M_CD_NM_KANRI ZM0171
     WHERE ZM0171.CD_SBT_CD = 'CD01809'
     AND ZM0171.CD_DIV = KK0501.KOZA_PAYWAY_UK_DIV
     AND ZM0171.CD_TSTAYMD <= ?
     AND ZM0171.CD_TENDYMD >= ?
     AND ZM0171.MK_FLG = '0') AS CD_DIV_NM
FROM KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAKINS KK0321
  ON KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN KK_T_SEIKY_KEI KK0491
  ON KK0491.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
INNER JOIN KK_T_SEIKY_KEI KK0491_RSV
 ON  KK0491_RSV.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO 
 AND KK0491_RSV.GENE_ADD_DTM =
      (SELECT MAX(KK0491_RSV_GENE.GENE_ADD_DTM) AS KK0491_RSV_MAX
       FROM   KK_T_SEIKY_KEI KK0491_RSV_GENE
       WHERE  KK0491_RSV_GENE.SEIKY_KEI_NO = KK0491_RSV.SEIKY_KEI_NO
       AND    KK0491_RSV_GENE.RSV_APLY_CD = '2'
       AND    KK0491_RSV_GENE.MK_FLG = '0') 
LEFT OUTER JOIN ( 
    SELECT  KK0501.SEIKY_WAY_NO_KOZA ,  KK0501.KOZA_PAYWAY_UK_DIV
    FROM    KK_T_KOZA KK0501 
    WHERE       (KK0501.SEIKY_WAY_NO_KOZA,KK0501.GENE_ADD_DTM) = (
                                     SELECT KK0501_GENE.SEIKY_WAY_NO_KOZA,MAX(KK0501_GENE.GENE_ADD_DTM)
                                     FROM KK_T_KOZA KK0501_GENE
                                     WHERE KK0501_GENE.SEIKY_WAY_NO_KOZA = KK0501.SEIKY_WAY_NO_KOZA
                                     AND KK0501_GENE.MK_FLG = '0'
                                     GROUP BY KK0501_GENE.SEIKY_WAY_NO_KOZA
                                     )
) KK0501 
ON  KK0501.SEIKY_WAY_NO_KOZA = KK0491_RSV.SEIKY_WAY_NO_KOZA
WHERE KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
    SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM KK_T_SVC_KEI KK0081_GENE
    WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081.MK_FLG = '0')
AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM = (
    SELECT MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
    FROM KK_T_SEIKY_KEI KK0491_GENE
    WHERE KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
    AND KK0491_GENE.RSV_APLY_YMD <= ?
    AND KK0491_GENE.RSV_APLY_CD = '2'
    AND KK0491_GENE.MK_FLG = '0')
AND KK0321.KAKINS_TSTAYMD <= ?
AND KK0321.KAKINS_TENDYMD >= ?
AND KK0321.SEIKY_KEI_NO = ?
AND KK0321.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_373)
#--KKPRC62301
#--サービス契約番号とSYSIDが一致しているかチェック
#--サービス契約番号のカレント情報取得
#-----------------------------------------------------------

--KEY:KK_SELECT_373

SELECT
 KK0081.GENE_ADD_DTM,
 KK0081.SVC_KEI_NO,
 KK0081.SYSID
FROM
 KK_T_SVC_KEI KK0081
WHERE
 KK0081.SVC_KEI_NO = ?
 AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =( 
  SELECT 
    MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX 
  FROM   
   KK_T_SVC_KEI KK0081_GENE 
  WHERE 
   KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
   AND KK0081_GENE.RSV_APLY_YMD <= ?
   AND KK0081_GENE.RSV_APLY_CD = '2'
   AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_374)
#--KKPRC62801
#--サービス契約番号よりネットサービスの情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_374

SELECT
    KK0081.SYSID
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE 
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
    ) 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KU_SELECT_002)
#--【工事案件情報抽出】【属性変更汎用情報抽出】
#--サービス契約番号にひもづくサービスコードを取得する
#-----------------------------------------------------------

--KEY:KU_SELECT_002

SELECT
    KK0081.SVC_CD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE 
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081_GENE.MK_FLG = '0'
    )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_375)
#--KKPRC32609
#--撤去工事完了情報抽出異動予約登録(切断ツール利用)の対象データを抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_375

SELECT
    TKK_IDY.IDO_RSV_NO,
    TKK_IDY.SVC_KEI_NO,
    TKK_IDY.SVC_KEI_KAISEN_UCWK_NO,
    TKK_IDY.MSKM_DTL_NO,
    TKK_IDY.SVC_KEI_STAT,
    TKK_IDY.UPD_DTM,
    TKK_IDY.RSV_APLY_YMD,
    '' AS KOJIAK_JSSI_YMD,
    '' AS KOJIAK_NO,
    '2' AS DATE_CATEGORY
FROM
(
    SELECT
        TKK_IDY_IDO_RSV.IDO_RSV_NO,
        TKK_IDY_IDO_RSV.SVC_KEI_NO,
        TKK_IDY_KAISEN_TG.SVC_KEI_KAISEN_UCWK_NO,
        TKK_IDY_IDO_RSV.MSKM_DTL_NO,
        TKK_IDY_SVC_KEI.SVC_KEI_STAT,
        TKK_IDY_IDO_RSV.UPD_DTM,
        TKK_IDY_IDO_RSV.RSV_APLY_YMD
    FROM
        KK_T_IDO_RSV TKK_IDY_IDO_RSV
    INNER JOIN KK_T_KAISEN_TG_SVKEI TKK_IDY_KAISEN_TG
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_KAISEN_TG.SVC_KEI_NO
    INNER JOIN KK_T_SVC_KEI TKK_IDY_SVC_KEI
        ON  TKK_IDY_IDO_RSV.SVC_KEI_NO = TKK_IDY_SVC_KEI.SVC_KEI_NO
    WHERE
        (TKK_IDY_IDO_RSV.IDO_DIV = '00006' AND TKK_IDY_IDO_RSV.IDO_RSV_DTL_CD = '007' AND TKK_IDY_IDO_RSV.IDO_RSV_STAT_CD = '03' AND TKK_IDY_IDO_RSV.RSV_APLY_YMD <= ?)
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_STAYMD <= ?
    AND TKK_IDY_KAISEN_TG.KAISEN_UCWK_USE_ENDYMD >= ?
    AND TKK_IDY_IDO_RSV.RSV_APLY_YMD <= ?
    AND TKK_IDY_IDO_RSV.MK_FLG   = '0'
    AND TKK_IDY_KAISEN_TG.MK_FLG = '0'
    AND (TKK_IDY_SVC_KEI.RSV_APLY_YMD || TKK_IDY_SVC_KEI.GENE_ADD_DTM) =
        (
            SELECT MAX(TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD || TKK_IDY_SVC_KEI_GENE.GENE_ADD_DTM)
            FROM   KK_T_SVC_KEI TKK_IDY_SVC_KEI_GENE
            WHERE  TKK_IDY_SVC_KEI_GENE.SVC_KEI_NO    = TKK_IDY_SVC_KEI.SVC_KEI_NO
            AND    TKK_IDY_SVC_KEI_GENE.SVC_CD IN ('01','02')
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_YMD <= ?
            AND    TKK_IDY_SVC_KEI_GENE.RSV_APLY_CD   = '2'
            AND    TKK_IDY_SVC_KEI_GENE.MK_FLG        = '0'
        )
) TKK_IDY
WHERE
NOT EXISTS
(
    SELECT
        KKB_KKW_WK_KJ_FIN.SVC_KEI_NO,
        KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO,
        KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
    FROM
    (
        SELECT SVC_KEI_NO, SVC_KEI_KAISEN_UCWK_NO, KOJIAK_NO
        FROM   KK_T_KJ_FIN_WK
        WHERE  RNKI_YMD <= ?
        AND    KOJIAK_SBT_CD = '002'
        AND    OPMS_KOJIAK_RSLT_CD = '1'
        AND    KOJI_SCOPE_CD IN('069','070')
        AND    MK_FLG = '0'
        GROUP BY
            SVC_KEI_NO,
            SVC_KEI_KAISEN_UCWK_NO,
            KOJIAK_NO
    ) KKB_KKW_WK_KJ_FIN
    INNER JOIN
    (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
    ) KKB_KKW_MSKMD_KOJIAK
        ON  KKB_KKW_WK_KJ_FIN.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
    WHERE
        TKK_IDY.SVC_KEI_NO             = KKB_KKW_WK_KJ_FIN.SVC_KEI_NO
    AND TKK_IDY.SVC_KEI_KAISEN_UCWK_NO = KKB_KKW_WK_KJ_FIN.SVC_KEI_KAISEN_UCWK_NO
    AND TKK_IDY.MSKM_DTL_NO            = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
)
AND EXISTS
(
  SELECT
      KOJIAK_SVC.SVC_KEI_NO
  FROM
      KU_T_KOJIAK KOJIAK
  INNER JOIN
      KU_T_SVKEI_KOJIAK KOJIAK_SVC
  ON
      KOJIAK_SVC.KOJIAK_NO = KOJIAK.KOJIAK_NO
  AND KOJIAK_SVC.MK_FLG = '0'
  INNER JOIN
  (
        SELECT KOJIAK_NO, MSKM_DTL_NO
        FROM   KU_T_MSKM_DTL_KOJIAK
        WHERE  MK_FLG = '0'
  ) KKB_KKW_MSKMD_KOJIAK
        ON  KOJIAK.KOJIAK_NO = KKB_KKW_MSKMD_KOJIAK.KOJIAK_NO
  LEFT OUTER JOIN
      KU_T_KJAK_EOH_NET KOJIAK_NET
  ON
      KOJIAK_NET.KOJIAK_NO = KOJIAK.KOJIAK_NO
  AND KOJIAK_NET.KOJI_SCOPE_CD IN('069','070')
  AND KOJIAK_NET.MK_FLG = '0'
  LEFT OUTER JOIN
      KU_T_KJAK_EOH_NTMANS KOJIAK_NET_MAN
  ON
      KOJIAK_NET_MAN.KOJIAK_NO = KOJIAK.KOJIAK_NO
  AND KOJIAK_NET_MAN.KOJI_SCOPE_CD IN('069','070')
  AND KOJIAK_NET_MAN.MK_FLG = '0'
  WHERE
      KOJIAK.MK_FLG = '0'
  AND TKK_IDY.SVC_KEI_NO = KOJIAK_SVC.SVC_KEI_NO
  AND TKK_IDY.MSKM_DTL_NO = KKB_KKW_MSKMD_KOJIAK.MSKM_DTL_NO
  AND KOJIAK.KOJIAK_SBT_CD = '002'
  AND ( KOJIAK_NET.KOJIAK_NO IS NOT NULL OR 
         KOJIAK_NET_MAN.KOJIAK_NO IS NOT NULL )
)


#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_015)
#--請求契約番号に紐付くサービス契約情報を取得する。（キャンセル除く）
#-----------------------------------------------------------

--KEY:CH_SELECT_015

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM
FROM
    KK_T_KAKINS KK0321
    INNER JOIN KK_T_SVC_KEI KK0081
        ON  KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
WHERE
    KK0321.SEIKY_KEI_NO = ?
AND ? BETWEEN KK0321.KAKINS_TSTAYMD AND KK0321.KAKINS_TENDYMD
AND KK0321.MK_FLG = '0'
AND KK0081.SVC_KEI_STAT <> '920'
AND KK0081.SVC_CD <> '04'
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_376)
#--KKPRC64201
#--サービス契約より申込明細番号を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_376

SELECT
    KK0081.MSKM_DTL_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
    (SELECT
         KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
     FROM
         KK_T_SVC_KEI KK0081_GENE
     WHERE
         KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND KK0081_GENE.IDO_DIV = '00019'
     AND KK0081_GENE.RSV_APLY_YMD <= ?
     AND KK0081_GENE.RSV_APLY_CD = '2'
     AND KK0081_GENE.MK_FLG = '0'
     GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--(KK_T_SVC_KEI- DK_SELECT_006)
#--KKPRC64201
#--DKPRC00301(光配線1Gのみフラグ追加）
#-----------------------------------------------------------

--KEY:DK_SELECT_006

SELECT
    KK0891.TK_HOSHIKI_PATTERN_CD,
    KK0891.TONAI_SPEED_CD,
    KK0881.HHS_1GONLY_FLG
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN KK_T_TK_HOSHIKI_KEI KK0891
    ON KK0891.TK_HOSHIKI_KEI_NO = KK0081.TK_HOSHIKI_KEI_NO
LEFT OUTER JOIN KK_T_KAISEN_USE_KEI KK0881
    ON KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
    AND KK0881.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ?
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
    (SELECT
         KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
     FROM
         KK_T_SVC_KEI KK0081_GENE
     WHERE
         KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND KK0081_GENE.RSV_APLY_YMD <= ?
     AND KK0081_GENE.RSV_APLY_CD = '2'
     AND KK0081_GENE.MK_FLG = '0'
     GROUP BY KK0081_GENE.SVC_KEI_NO)
AND KK0891.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_377)
#--KKPRC65401
#--サービス契約より申込番号に紐付く各サービス契約の情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_377

SELECT
  KK0081.SVC_KEI_STAT 
FROM
  KK_T_SVC_KEI KK0081 
WHERE
  KK0081.SVC_KEI_NO IN ( 
    SELECT DISTINCT
      KK0081_GENE.SVC_KEI_NO 
    FROM
      KK_T_SVC_KEI KK0081_GENE 
      INNER JOIN KK_T_MSKM_DTL KK0021 
        ON KK0081_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
        AND KK0021.MSKM_NO = ?
        AND KK0021.GENE_ADD_DTM = ( 
          SELECT
            MAX(KK0021_GENE.GENE_ADD_DTM) AS MSKM_DTL_MAX 
          FROM
            KK_T_MSKM_DTL KK0021_GENE 
          WHERE
            KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
            AND KK0021_GENE.MK_FLG = '0'
        )
  ) 
  AND KK0081.PRC_GRP_CD IN ('02', '03', '04', '10', '11', '12', '13', '16') 
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( 
    SELECT
      MAX( 
        KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM
      ) 
    FROM	
      KK_T_SVC_KEI KK0081_GENE 
    WHERE
      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
      AND KK0081_GENE.RSV_APLY_YMD <= ?
      AND KK0081_GENE.RSV_APLY_CD = '2' 
      AND KK0081_GENE.MK_FLG = '0'
  ) 

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CH_SELECT_018)
#--CHPRC06101-JBSbatCHKsdTrgtsIcrnSksi
#--請求契約より請求契約番号に紐づくサービス契約の課金開始、解約起算日を取得
#-----------------------------------------------------------

--KEY:CH_SELECT_018

SELECT
      KK0491.SEIKY_KEI_NO
    , KK0491.SOHUS_NM
    , KK0081.SVC_CHRG_STAYMD
    , KK0081.SVC_DSL_KISAN_YMD
FROM
    KK_T_SEIKY_KEI KK0491
    INNER JOIN CH_T_SEIKY_UCWK CH0101
        ON  KK0491.SEIKY_KEI_NO = CH0101.SEIKY_KEI_NO
    INNER JOIN KK_T_SVC_KEI KK0081
        ON  CH0101.SVC_KEI_NO = KK0081.SVC_KEI_NO
    INNER JOIN CH_T_SEIKY CH0051
        ON CH0101.SEIKY_KEI_NO = CH0051.SEIKY_KEI_NO
WHERE
        KK0491.SEIKY_KEI_NO = ?
    AND KK0491.RSV_APLY_YMD || KK0491.GENE_ADD_DTM =
            (SELECT
                 MAX(KK0491_GENE.RSV_APLY_YMD || KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
             FROM
                 KK_T_SEIKY_KEI KK0491_GENE
             WHERE 
                    KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
                AND KK0491_GENE.RSV_APLY_YMD <= ?
                AND KK0491_GENE.RSV_APLY_CD = '2'
                AND KK0491_GENE.MK_FLG = '0'
            )
    AND CH0101.MK_FLG = '0'
    AND CH0051.SEIKY_SBT_CD = '1'
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
            (SELECT
                 MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
             FROM
                 KK_T_SVC_KEI KK0081_GENE
             WHERE 
                    KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
                AND KK0081_GENE.PRC_GRP_CD = ?
                AND KK0081_GENE.RSV_APLY_YMD <= ?
                AND KK0081_GENE.RSV_APLY_CD = '2'
                AND KK0081_GENE.MK_FLG = '0'
            )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_378)
#--KKPRC65101-JBSbatKKShosaAFSmsChuushutu
#--サービス契約の最新と最古のデータを利用し、SYSID・申込番号・識別キーを取得
#-----------------------------------------------------------

--KEY:KK_SELECT_378


SELECT
DISTINCT
  KK0081_MAX.SYSID
  , KK0011.MSKM_NO
  , KK0011.SKBT_KEY
FROM KK_T_SVC_KEI KK0081_MAX 
  INNER JOIN KK_T_SVC_KEI KK0081_MIN 
  ON KK0081_MAX.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO 
  AND KK0081_MAX.RSV_APLY_YMD || KK0081_MAX.GENE_ADD_DTM = ( 
      SELECT
        MAX(KK0081_GENE2.RSV_APLY_YMD || KK0081_GENE2.GENE_ADD_DTM) 
      FROM
        KK_T_SVC_KEI KK0081_GENE2 
      WHERE
        KK0081_GENE2.SVC_KEI_NO = KK0081_MAX.SVC_KEI_NO 
        AND KK0081_GENE2.RSV_APLY_YMD <= ?
        AND KK0081_GENE2.RSV_APLY_CD = '2' 
        AND KK0081_GENE2.MK_FLG = '0'
    ) 
   AND KK0081_MIN.RSV_APLY_YMD || KK0081_MIN.GENE_ADD_DTM = ( 
      SELECT
        MIN(KK0081_GENE1.RSV_APLY_YMD || KK0081_GENE1.GENE_ADD_DTM) 
      FROM
        KK_T_SVC_KEI KK0081_GENE1 
      WHERE
        KK0081_GENE1.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO 
        AND KK0081_GENE1.RSV_APLY_YMD <= ?
        AND KK0081_GENE1.RSV_APLY_CD = '2' 
        AND KK0081_GENE1.MK_FLG = '0'
    ) 
  INNER JOIN KK_T_MSKM_DTL KK0021 
  ON KK0081_MIN.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
  AND (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) = ( 
      SELECT
        KK0021_GENE.MSKM_DTL_NO
        , MIN(KK0021_GENE.GENE_ADD_DTM) AS KK0021_GENE_MAX 
      FROM
        KK_T_MSKM_DTL KK0021_GENE 
      WHERE
        KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
        AND KK0021_GENE.MK_FLG = '0' 
      GROUP BY
        KK0021_GENE.MSKM_DTL_NO
    ) 
  INNER JOIN KK_T_MSKM KK0011 
  ON KK0021.MSKM_NO = KK0011.MSKM_NO 
  AND (KK0011.MSKM_NO, KK0011.GENE_ADD_DTM) = ( 
      SELECT
        KK0011.MSKM_NO
        , MAX(KK0011_GENE.GENE_ADD_DTM) AS KK0011_GENE_MAX 
      FROM
        KK_T_MSKM KK0011_GENE 
      WHERE
        KK0011_GENE.MSKM_NO = KK0011.MSKM_NO 
        AND KK0011_GENE.MK_FLG = '0' 
      GROUP BY
        KK0011_GENE.MSKM_NO
    ) 
WHERE
  KK0081_MAX.SHOSA_YMD = ? 
  AND KK0081_MAX.SVC_KEI_STAT IN ('020', '030', '100') 
  AND KK0081_MAX.SHOSA_DSL_FIN_CD != '2' 
  AND KK0081_MAX.PRC_GRP_CD IN ('02', '03', '04', '10', '11', '12', '13') 
  AND KK0081_MAX.PCRS_CD != 'A23' 
  AND KK0011.MSKM_SBT_CD = '00001'
  AND KK0011.SHOSA_FIN_TCHI IS NULL

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_379)
#--使用ジョブ：加入御礼書データ抽出
#--提供方式コードが"008"(光配線)、提供方式パターンコードが"50"(ONU)
#--光配線1Gのみフラグが"1"(対象)、ローゼット設置状態コードが"1"(設置済)
#--加入契約支払方式コードが"003"(全戸一括)、新規申込時の「申込」に紐づく「申込明細」に光テレビが存在しない場合、
#--「マンション_提供方式１」「マンション_提供方式２」に"51"(光コンセント)を設定するかどうかの判定を行う。
#-----------------------------------------------------------

--KEY:KK_SELECT_379

SELECT DISTINCT
    CASE WHEN KK0891.TK_HOSHIKI_CD = '008'
         AND  KK0891.TK_HOSHIKI_PATTERN_CD = '50'
         AND  KK0881.HHS_1GONLY_FLG = '1'
         AND  KK0251.ROZETT_STC_STAT_CD = '1'
         AND  KK0891.KANYU_KEI_PAY_HOSHIKI_CD = '003'
         AND  KK0081_2.SVC_CD != '03'
         THEN '51'
         ELSE NULL
    END TK_HOSHIKI_PATTERN_CD
FROM
    KK_T_SVC_KEI KK0081 
INNER JOIN KK_T_TK_HOSHIKI_KEI KK0891 ON
    KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO
	AND KK0891.MK_FLG = '0'
INNER JOIN KK_T_KAISEN_USE_KEI KK0881 ON 
    KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
	AND KK0881.MK_FLG = '0'
INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241 ON
    KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
	AND KK0241.MK_FLG = '0'
INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251 ON 
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
	AND KK0251.MK_FLG = '0'
INNER JOIN KK_T_MSKM_DTL KK0021 ON
    KK0081.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
	AND KK0021.MK_FLG = '0'
INNER JOIN KK_T_MSKM_DTL KK0021_2 ON
    KK0021.MSKM_NO = KK0021_2.MSKM_NO
	AND KK0021_2.MK_FLG = '0'
INNER JOIN KK_T_SVC_KEI KK0081_2 ON
    KK0021_2.MSKM_DTL_NO = KK0081_2.MSKM_DTL_NO
	AND KK0081_2.MK_FLG = '0'
WHERE 
KK0081.SVC_KEI_NO = ? 
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( 
      SELECT MIN(KK0081_MIN.RSV_APLY_YMD || KK0081_MIN.GENE_ADD_DTM) 
      FROM   KK_T_SVC_KEI KK0081_MIN 
      WHERE  KK0081_MIN.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND  KK0081_MIN.RSV_APLY_YMD <= ?
        AND  KK0081_MIN.RSV_APLY_CD = '2' 
        AND  KK0081_MIN.MK_FLG = '0') 
AND KK0891.MK_FLG = '0'
AND KK0881.MK_FLG = '0'
AND (KK0251.SVC_KEI_KAISEN_UCWK_NO, KK0251.GENE_ADD_DTM) = ( 
     SELECT KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO
       , MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_GENE_MAX
     FROM  KK_T_SVKEI_KAISEN_UW KK0251_GENE 
     WHERE KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO 
       AND KK0251_GENE.MK_FLG = '0' 
   GROUP BY KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO)
AND (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) = ( 
     SELECT KK0021_GENE.MSKM_DTL_NO
       , MIN(KK0021_GENE.GENE_ADD_DTM) AS KK0021_GENE_MIN
     FROM  KK_T_MSKM_DTL KK0021_GENE 
     WHERE KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
       AND KK0021_GENE.MK_FLG = '0' 
   GROUP BY KK0021_GENE.MSKM_DTL_NO)
AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
AND KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
ORDER BY TK_HOSHIKI_PATTERN_CD DESC
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_380)
#--KKPRC67101_ONU計画交換工事一括立ち上げ登録
#--同一回線で利用中のネットまたは電話契約を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_380

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_CD,
    KK0081.PCRS_CD
FROM
    KK_T_SVC_KEI KK0081 
INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241 ON KK0241.SVC_KEI_NO = KK0081.SVC_KEI_NO 
WHERE
    KK0241.SVC_KEI_KAISEN_UCWK_NO = ?
AND KK0081.SVC_CD IN ('01','02')
AND KK0081.SVC_KEI_STAT NOT IN('910','920')
AND KK0081.SVC_KEI_NO <> ?
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
       SELECT
           KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
       FROM
           KK_T_SVC_KEI KK0081_GENE
       WHERE
           KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
       AND KK0081_GENE.RSV_APLY_YMD <= ?
       AND KK0081_GENE.RSV_APLY_CD = '2'
       AND KK0081_GENE.MK_FLG = '0'
       GROUP BY KK0081_GENE.SVC_KEI_NO)
AND KK0241.MK_FLG = '0'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_381)
#--KKPRC62202
#--サービス契約スキーマから、メール向けのデータを抽出する。(連絡用メールアドレス宛)
#-----------------------------------------------------------

--KEY:KK_SELECT_381

SELECT 
    KK0081.SVC_KEI_NO
    ,CK0201.MLAD
    ,CH0051_CNT.CNT
    ,KK0321.SEIKY_KEI_NO
    ,KK0501.KOZA_PAYWAY_UK_DIV
FROM KK_T_SVC_KEI KK0081
INNER JOIN KK_T_KAKINS KK0321 ON KK0321.SVC_KEI_NO = KK0081.SVC_KEI_NO
INNER JOIN CK_T_RRKS CK0201 on CK0201.SYSID = KK0081.SYSID
LEFT JOIN (
    SELECT COUNT(*) CNT
        ,SEIKY_KEI_NO
    FROM CH_T_SEIKY CH0051
    WHERE CH0051.SEIKY_STAT = '020'
        AND CH0051.MK_FLG = '0'
    GROUP BY SEIKY_KEI_NO
    ) CH0051_CNT ON CH0051_CNT.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
INNER JOIN KK_T_SEIKY_KEI KK0491 ON KK0491.SEIKY_KEI_NO = KK0321.SEIKY_KEI_NO
    AND KK0491.GENE_ADD_DTM = (
        SELECT MAX(KK0491_GENE.GENE_ADD_DTM) AS KK0491_MAX
        FROM KK_T_SEIKY_KEI KK0491_GENE
        WHERE KK0491_GENE.SEIKY_KEI_NO = KK0491.SEIKY_KEI_NO
            AND KK0491_GENE.RSV_APLY_CD = '2'
            AND KK0491_GENE.MK_FLG = '0'
        )
LEFT OUTER JOIN (
    SELECT KK0501.SEIKY_WAY_NO_KOZA
        ,KK0501.KOZA_PAYWAY_UK_DIV
    FROM KK_T_KOZA KK0501
    WHERE (
        KK0501.SEIKY_WAY_NO_KOZA
        ,KK0501.GENE_ADD_DTM
        ) = (
            SELECT KK0501_GENE.SEIKY_WAY_NO_KOZA
                   ,MAX(KK0501_GENE.GENE_ADD_DTM)
            FROM KK_T_KOZA KK0501_GENE
            WHERE KK0501_GENE.SEIKY_WAY_NO_KOZA = KK0501.SEIKY_WAY_NO_KOZA
                AND KK0501_GENE.MK_FLG = '0'
            GROUP BY KK0501_GENE.SEIKY_WAY_NO_KOZA
            )
        ) KK0501 ON KK0501.SEIKY_WAY_NO_KOZA = KK0491.SEIKY_WAY_NO_KOZA
WHERE 
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
            AND KK0081_GENE.RSV_APLY_YMD <= ?
            AND KK0081_GENE.RSV_APLY_CD = '2'
            AND KK0081.MK_FLG = '0'
        )
    AND KK0321.KAKINS_TSTAYMD <= ?
    AND KK0321.KAKINS_TENDYMD >= ?
    AND KK0321.SEIKY_KEI_NO = ?
    AND CK0201.RRK_WAY_CD = '001'
    AND CK0201.RRKS_BUNRUI_CD = '1'
    AND CK0201.RRKS_SBT_CD = '1'
    AND KK0321.MK_FLG = '0'
    AND
    (CK0201.RRKS_NO, CK0201.RSV_APLY_YMD || CK0201.GENE_ADD_DTM) =
        (
        SELECT
            CK0201_GENE.RRKS_NO, MAX(CK0201_GENE.RSV_APLY_YMD || CK0201_GENE.GENE_ADD_DTM) AS CK0201_GENE_MAX
        FROM
            CK_T_RRKS CK0201_GENE
        WHERE
            CK0201_GENE.RRKS_NO = CK0201.RRKS_NO
        AND CK0201_GENE.RSV_APLY_CD = '2'
        AND CK0201_GENE.RSV_APLY_YMD  <= ?
        AND CK0201_GENE.MK_FLG = '0'
        GROUP BY
            CK0201_GENE.RRKS_NO
        )
   AND NOT EXISTS (
     SELECT 1
       FROM CK_T_RRKS Q
      WHERE Q.SYSID = CK0201.SYSID
        AND Q.RRK_WAY_CD = '001'
        AND Q.RSV_APLY_CD = '1'
        AND Q.RRKS_BUNRUI_CD = '1'
        AND Q.GENE_ADD_DTM =
              (SELECT MAX(J.GENE_ADD_DTM) AS J_MAX
                 FROM CK_T_RRKS J
                WHERE J.RRKS_NO = Q.RRKS_NO
                  AND J.MK_FLG = '0'
              )
        AND Q.MLAD = CK0201.MLAD
     )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_382)
#--KKPRC65103_照査完了通知メール送信
#--サービス契約番号とSYSIDよりシンプルプランコースのデータを取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_382

SELECT KK0081.SVC_KEI_NO
  FROM KK_T_SVC_KEI KK0081
 WHERE KK0081.SVC_KEI_NO = ?
   AND KK0081.SYSID = ?
   AND KK0081.SVC_KEI_STAT = '020'
   AND KK0081.PCRS_CD in ('A97' ,'A99')
   AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
          FROM KK_T_SVC_KEI KK0081_GENE
         WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2')
   AND KK0081.MK_FLG = '0'
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_383)
#--KKPRC33701
#--サービス契約番号と工事関連情報受信ファイルのサービス契約番号が紐づく、サービス契約ステータス
#--がサービス提供中未満（'010'受付済、'020'照査済、'030'締結済）かつ
#--工事関連情報受信ファイルのサービス契約番号と紐づいたサービス契約<eo光ネット>の、乗換元サービス
#--契約番号が設定されているデータを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_383

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_SVC_KEI_EOH_NET KK0091
ON
    KK0081.SVC_KEI_NO = KK0091.SVC_KEI_NO
AND KK0081.GENE_ADD_DTM = KK0091.GENE_ADD_DTM
AND KK0091.NRKEMT_SVKEI_NO IS NOT NULL
AND KK0091.MK_FLG = '0'
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.SVC_KEI_STAT IN ('010', '020', '030')
AND KK0081.MK_FLG = '0'
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
        (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
         FROM   KK_T_SVC_KEI KK0081_GENE
         WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND    KK0081_GENE.RSV_APLY_YMD <= ?
         AND    KK0081_GENE.RSV_APLY_CD = '2' 
         AND    KK0081_GENE.MK_FLG = '0') 
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_384)
#--KKPRC67501
#--乗換先（カレント）のサービス契約情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_384

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.SVC_STA_YMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
    AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
        (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
         FROM
             KK_T_SVC_KEI KK0081_GENE
         WHERE
             KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
         AND KK0081_GENE.RSV_APLY_YMD <= ?
         AND KK0081_GENE.RSV_APLY_CD = '2'
         AND KK0081_GENE.MK_FLG = '0')
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_386)
#--KKPRC67501、KKPRC67304_Netflix乗換完了登録
#--乗換先（最小）のサービス契約情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_386

SELECT
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV,
    KK0081.ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.GENE_ADD_DTM =
    (SELECT
         MIN(KK0081_GENE.GENE_ADD_DTM)
     FROM
         KK_T_SVC_KEI KK0081_GENE
     WHERE
         KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
     AND KK0081_GENE.RSV_APLY_YMD <= ?
     AND KK0081_GENE.RSV_APLY_CD = '2'
     AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_387)
#--KKPRC67304_Netflix乗換完了登録
#--入力したサービス契約番号のPK情報と、
#--そのレコードに紐づく料金コースの他事業者バンドル情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_387
SELECT
    KK0081.SVC_KEI_NO
    ,KK0081.GENE_ADD_DTM
    ,KK0791.TAJGS_BUNDLE_DIV
    ,KK0081.PCRS_CD
    ,KK0791.TAJGS_BUNDLE_ID
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN 
    KK_T_SVC_KEI_EOH_NET KK0091
ON 
    KK0091.SVC_KEI_NO = KK0081.SVC_KEI_NO
AND 
    KK0091.GENE_ADD_DTM = KK0081.GENE_ADD_DTM
INNER JOIN
    KK_M_PCRS KK0791
ON
    KK0791.PCRS_CD = KK0081.PCRS_CD
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0091.MK_FLG = '0'
    AND
        (KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM) = 
            (SELECT MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX 
             FROM   KK_M_PCRS KK0791_GENE 
             WHERE  KK0791_GENE.PCRS_CD = KK0791.PCRS_CD 
             AND    KK0791_GENE.RSV_APLY_YMD <= ?
             AND    KK0791_GENE.MK_FLG = '0'
             GROUP BY KK0791_GENE.PCRS_CD )
    AND
        (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
            (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
             FROM    KK_T_SVC_KEI KK0081_GENE
             WHERE   KK0081_GENE.SVC_KEI_NO  = KK0081.SVC_KEI_NO
             AND     KK0081_GENE.RSV_APLY_YMD <= ?
             AND     KK0081_GENE.RSV_APLY_CD = '2'
             AND     KK0081_GENE.MK_FLG      = '0'
             GROUP BY KK0081_GENE.SVC_KEI_NO)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_389)
#--KKPRC67603_NTT卸締結登録
#--サービス契約のステータスチェック
#-----------------------------------------------------------

--KEY:KK_SELECT_389

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.SVC_KEI_STAT = '020'
AND (KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = (
    SELECT
         MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
     FROM
         KK_T_SVC_KEI KK0081_GENE
     WHERE
         KK0081_GENE.SVC_KEI_NO    = KK0081.SVC_KEI_NO
     AND KK0081_GENE.RSV_APLY_YMD <= ?
     AND KK0081_GENE.RSV_APLY_CD   = '2'
     AND KK0081_GENE.MK_FLG        = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_388)
#--KK67601
#--サービス契約、料金コースの関連チェックを行う
#-----------------------------------------------------------

--KEY:KK_SELECT_388

SELECT 
    KK0081.SVC_KEI_NO,
	KK0791_A.NTTORS_DIV
FROM
    KK_T_SVC_KEI KK0081
LEFT OUTER JOIN
    (SELECT
	   KK0791.NTTORS_DIV,
	   KK0791.PCRS_CD
     FROM
	   KK_M_PCRS KK0791
	 WHERE
        (KK0791.PCRS_CD, KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM) =
          (SELECT
             KK0791_GENE.PCRS_CD,
             MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM)
           FROM
             KK_M_PCRS KK0791_GENE
           WHERE
             KK0791_GENE.PCRS_CD = KK0791.PCRS_CD AND
             KK0791_GENE.RSV_APLY_YMD<= ? AND
             KK0791_GENE.MK_FLG='0'
           GROUP BY
             KK0791_GENE.PCRS_CD)) KK0791_A
ON
    KK0081.PCRS_CD = KK0791_A.PCRS_CD
    
WHERE
    KK0081.SVC_KEI_NO = ?
    AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_390)
#--KKPRC42101_WEB申込情報出力処理
#--申込書番号から、新規申込時点での料金グループと料金コースを取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_390
SELECT
  KK0081_MIN.PRC_GRP_CD
  , KK0081_MIN.PCRS_CD 
FROM
  KK_T_SVC_KEI KK0081_MIN 
  INNER JOIN KK_T_MSKM_DTL KK0021_MIN 
    ON KK0081_MIN.MSKM_DTL_NO = KK0021_MIN.MSKM_DTL_NO 
WHERE
  KK0021_MIN.MSKMSHO_NO = ? 
  AND KK0081_MIN.RSV_APLY_YMD || KK0081_MIN.GENE_ADD_DTM = ( 
    SELECT
      MIN( 
        KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM
      ) AS KK0081_MIN 
    FROM
      KK_T_SVC_KEI KK0081_GENE 
    WHERE
      KK0081_GENE.SVC_KEI_NO = KK0081_MIN.SVC_KEI_NO 
      AND KK0081_GENE.PRC_GRP_CD IN ('02', '03', '04') 
      AND KK0081_GENE.RSV_APLY_YMD <= ? 
      AND KK0081_GENE.RSV_APLY_CD = '2' 
      AND KK0081_GENE.MK_FLG = '0'
  ) 
  AND KK0021_MIN.GENE_ADD_DTM = ( 
    SELECT
      MIN(KK0021_GENE.GENE_ADD_DTM) AS GENE_MIN 
    FROM
      KK_T_MSKM_DTL KK0021_GENE 
    WHERE
      KK0021_GENE.MSKM_DTL_NO = KK0021_MIN.MSKM_DTL_NO 
      AND KK0021_GENE.MK_FLG = '0'
  )
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_391)
#--KKPRC00504
#--サービス契約、料金コースの関連チェックを行う
#-----------------------------------------------------------

--KEY:KK_SELECT_391

SELECT 
     KK0011.ITENM_SVC_KEI_NO
    ,KK0791.NTTORS_DIV
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN
    KK_T_MSKM_DTL KK0021
ON
    KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO
INNER JOIN
    KK_T_MSKM KK0011
ON
    KK0011.MSKM_NO = KK0021.MSKM_NO
INNER JOIN
    KK_M_PCRS KK0791
ON
    KK0791.PCRS_CD = KK0081.PCRS_CD
AND
    KK0791.PRC_GRP_CD = KK0081.PRC_GRP_CD
WHERE
    KK0081.SVC_KEI_NO = ?
AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
     (SELECT KK0081_GENE.SVC_KEI_NO, MIN(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MIN
      FROM   KK_T_SVC_KEI KK0081_GENE
      WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND    KK0081_GENE.RSV_APLY_YMD <= ?
      AND    KK0081_GENE.RSV_APLY_CD = '2'
      AND    KK0081_GENE.MK_FLG = '0'
      GROUP BY KK0081_GENE.SVC_KEI_NO)
AND
    (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) =
     (SELECT KK0021_GENE.MSKM_DTL_NO, MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_GENE_MAX
     FROM   KK_T_MSKM_DTL KK0021_GENE
     WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
     AND    KK0021_GENE.MK_FLG = '0'
     GROUP BY KK0021_GENE.MSKM_DTL_NO)
AND
    (KK0011.MSKM_NO, KK0011.GENE_ADD_DTM) =
     (SELECT KK0011_GENE.MSKM_NO, MAX(KK0011_GENE.GENE_ADD_DTM) AS KK0011_GENE_MAX
     FROM   KK_T_MSKM KK0011_GENE
     WHERE  KK0011_GENE.MSKM_NO = KK0011.MSKM_NO
     AND    KK0011_GENE.MK_FLG = '0'
     GROUP BY KK0011_GENE.MSKM_NO)
AND
    KK0791.PCRS_TSTAYMD <= ?
AND
    KK0791.PCRS_TENDYMD >= ?
AND (KK0791.PCRS_CD, KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM) =
     (SELECT KK0791_GENE.PCRS_CD, MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_GENE_MAX
     FROM   KK_M_PCRS KK0791_GENE
     WHERE  KK0791_GENE.PCRS_CD = KK0791.PCRS_CD
     AND    KK0791_GENE.RSV_APLY_YMD <= ?
     AND    KK0791_GENE.MK_FLG = '0'
     GROUP BY KK0791_GENE.PCRS_CD)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_393)
#--KKPRC55301
#--NTT卸判定を行う
#-----------------------------------------------------------

--KEY:KK_SELECT_393
SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
INNER JOIN 
    KK_M_PCRS KK0791
ON 
    KK0791.PCRS_CD = KK0081.PCRS_CD
AND KK0791.PRC_GRP_CD = KK0081.PRC_GRP_CD
WHERE  
    KK0081.SVC_KEI_NO IN (?)
AND KK0791.PRC_GRP_CD = '02'
AND KK0791.NTTORS_DIV IS NOT NULL
AND   (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
   (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
    FROM   KK_T_SVC_KEI KK0081_GENE
    WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
    AND    KK0081_GENE.RSV_APLY_YMD <= ?
    AND    KK0081_GENE.RSV_APLY_CD = '2'
    AND    KK0081_GENE.MK_FLG = '0'
    GROUP BY KK0081_GENE.SVC_KEI_NO)
AND KK0791.RSV_APLY_YMD || KK0791.GENE_ADD_DTM = 
    (SELECT MAX(KK0791_GENE.RSV_APLY_YMD || KK0791_GENE.GENE_ADD_DTM) AS KK0791_MAX
   FROM KK_M_PCRS KK0791_GENE
    WHERE KK0791_GENE.PCRS_CD = KK0791.PCRS_CD
    AND KK0791_GENE.RSV_APLY_YMD <= ?
    AND KK0791_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_325)
#--契約内容通知対象契約を抽出するためコンテンツ関連情報を取得する
#-----------------------------------------------------------

--KEY:KK_SELECT_392

SELECT
    KK0081_01.CONT_SVC_CD
  , KK0081_01.SYSID
  , KK0081_01.SVC_KEI_NO
  , KK3001.KNYTCS_DSP_MNGN_CD
  , KK3001.DSP_PST_SKCD
  , KK3001.MNGN_DSP_JKN_KSITEI_CD 
FROM  ( 
    SELECT KK3291.CONT_SVC_CD
         , KK0081.SYSID
         , KK0081.SVC_KEI_NO 
    FROM
        KK_T_SVC_KEI KK0081 
    INNER JOIN KK_T_MSKM_DTL KK0021 
    ON KK0021.MSKM_DTL_NO = KK0081.MSKM_DTL_NO 
    INNER JOIN KK_T_MSKM KK0011 
    ON KK0011.MSKM_NO = KK0021.MSKM_NO 
    LEFT JOIN KK_T_CONT_MKM_INF KK3291 
    ON KK3291.MSKM_NO = KK0011.MSKM_NO 
    WHERE KK0081.SVC_KEI_NO IN (?) 
    AND KK0081.SYSID = ? 
    AND KK0081.SVC_CD = '01'
    AND KK0011.MSKM_YMD >= ? 
    AND KK3291.CONT_MKM_INF_STCD = '01' 
    AND   (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) =
       (SELECT KK0081_GENE.SVC_KEI_NO, MIN(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MIN
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0'
        GROUP BY KK0081_GENE.SVC_KEI_NO) 
    AND   (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) =
       (SELECT KK0021_GENE.MSKM_DTL_NO, MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_GENE_MAX
        FROM   KK_T_MSKM_DTL KK0021_GENE
        WHERE  KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO
        AND    KK0021_GENE.MK_FLG = '0'
        GROUP BY KK0021_GENE.MSKM_DTL_NO)
    AND (KK0011.MSKM_NO, KK0011.GENE_ADD_DTM) =
       (SELECT KK0011_GENE.MSKM_NO, MAX(KK0011_GENE.GENE_ADD_DTM) AS KK0011_GENE_MAX 
        FROM   KK_T_MSKM KK0011_GENE 
        WHERE  KK0011_GENE.MSKM_NO = KK0011.MSKM_NO 
        AND    KK0011_GENE.MK_FLG = '0' 
        GROUP BY KK0011_GENE.MSKM_NO) 
    AND KK3291.MK_FLG = '0'
) KK0081_01 
INNER JOIN KK_M_KNYTCS_DSP_MNGN KK3001 
ON KK3001.MNGN_DSP_JKN_SBT_CD = '14' 
AND   (KK3001.CONT_SVC_CD    IS NULL OR KK3001.CONT_SVC_CD = KK0081_01.CONT_SVC_CD) 
AND   (KK3001.MSKM_SBT_CD    IS NULL OR KK3001.MSKM_SBT_CD                     = ?) 
AND    KK3001.KNYTCS_DSP_MNGN_TSTAYMD <= ?
AND    KK3001.KNYTCS_DSP_MNGN_TENDYMD >= ?
AND   (KK3001.KNYTCS_DSP_MNGN_CD, KK3001.RSV_APLY_YMD || KK3001.GENE_ADD_DTM) =
   (SELECT KK3001_GENE.KNYTCS_DSP_MNGN_CD, MAX(KK3001_GENE.RSV_APLY_YMD || KK3001_GENE.GENE_ADD_DTM) AS KK3001_MAX
    FROM   KK_M_KNYTCS_DSP_MNGN KK3001_GENE
    WHERE  KK3001_GENE.KNYTCS_DSP_MNGN_CD = KK3001.KNYTCS_DSP_MNGN_CD
    AND    KK3001_GENE.RSV_APLY_YMD <= ?
    AND    KK3001_GENE.MK_FLG = '0'
    GROUP BY KK3001_GENE.KNYTCS_DSP_MNGN_CD)

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_394)
#--サービス契約番号を基にサービス契約を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_394

SELECT
    KK0081.SVC_KEI_NO AS SVC_KEI_NO,
    KK0081.GENE_ADD_DTM AS GENE_ADD_DTM
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
    (
        SELECT
            MAX(SVC_KEI_GENE.RSV_APLY_YMD || SVC_KEI_GENE.GENE_ADD_DTM) AS MAX_GENE_ADD_DTM
        FROM
            KK_T_SVC_KEI SVC_KEI_GENE
        WHERE
            SVC_KEI_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND 
            SVC_KEI_GENE.RSV_APLY_YMD <= ?
        AND 
            SVC_KEI_GENE.RSV_APLY_CD = '2'
        AND
            SVC_KEI_GENE.MK_FLG = '0'
    )
AND
    KK0081.SVC_KEI_STAT = '020'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_396)
#--使用ジョブ：加入御礼書データ抽出
#--提供方式コードが"008"(光配線)、提供方式パターンコードが"50"(ONU)
#--光配線1Gのみフラグが"1"(対象)、ローゼット設置状態コードが"1"(設置済)
#--加入契約支払方式コードが"003"(全戸一括)の場合、
#--「マンション_提供方式１」「マンション_提供方式２」に"51"(光コンセント)を設定するかどうかの判定を行う。
#-----------------------------------------------------------

--KEY:KK_SELECT_396

SELECT DISTINCT
    CASE WHEN KK0891.TK_HOSHIKI_CD = '008'
         AND  KK0891.TK_HOSHIKI_PATTERN_CD = '50'
         AND  KK0881.HHS_1GONLY_FLG = '1'
         AND  KK0251.ROZETT_STC_STAT_CD = '1'
         AND  KK0891.KANYU_KEI_PAY_HOSHIKI_CD = '003'
         THEN '51'
         ELSE NULL
    END TK_HOSHIKI_PATTERN_CD
FROM
    KK_T_SVC_KEI KK0081 
INNER JOIN KK_T_TK_HOSHIKI_KEI KK0891 ON
    KK0081.TK_HOSHIKI_KEI_NO = KK0891.TK_HOSHIKI_KEI_NO
	AND KK0891.MK_FLG = '0'
INNER JOIN KK_T_KAISEN_USE_KEI KK0881 ON 
    KK0881.KAISEN_USE_KEI_NO = KK0891.KAISEN_USE_KEI_NO
	AND KK0881.MK_FLG = '0'
INNER JOIN KK_T_KAISEN_TG_SVKEI KK0241 ON
    KK0081.SVC_KEI_NO = KK0241.SVC_KEI_NO
	AND KK0241.MK_FLG = '0'
INNER JOIN KK_T_SVKEI_KAISEN_UW KK0251 ON 
    KK0241.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO
	AND KK0251.MK_FLG = '0'
WHERE 
KK0081.SVC_KEI_NO = ? 
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = ( 
      SELECT MIN(KK0081_MIN.RSV_APLY_YMD || KK0081_MIN.GENE_ADD_DTM) 
      FROM   KK_T_SVC_KEI KK0081_MIN 
      WHERE  KK0081_MIN.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND  KK0081_MIN.RSV_APLY_YMD <= ?
        AND  KK0081_MIN.RSV_APLY_CD = '2' 
        AND  KK0081_MIN.MK_FLG = '0') 
AND KK0891.MK_FLG = '0'
AND KK0881.MK_FLG = '0'
AND (KK0251.SVC_KEI_KAISEN_UCWK_NO, KK0251.GENE_ADD_DTM) = ( 
     SELECT KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO
       , MAX(KK0251_GENE.GENE_ADD_DTM) AS KK0251_GENE_MAX
     FROM  KK_T_SVKEI_KAISEN_UW KK0251_GENE 
     WHERE KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO = KK0251.SVC_KEI_KAISEN_UCWK_NO 
       AND KK0251_GENE.MK_FLG = '0' 
   GROUP BY KK0251_GENE.SVC_KEI_KAISEN_UCWK_NO)
AND KK0241.KAISEN_UCWK_USE_STAYMD <= ?
AND KK0241.KAISEN_UCWK_USE_ENDYMD >= ?
ORDER BY TK_HOSHIKI_PATTERN_CD DESC
#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_020)
#--CNPRC03301_コンテンツ利用規約自動同意登録, CNPRC03302_コンテンツ利用自動開始登録,CNPRC03401_標準コンテンツ自動解約登録
#--カレントレコードからホスティングサービスを取得し、コンテンツ同意有無を確認する。
#-----------------------------------------------------------

--KEY:CN_SELECT_020

SELECT
    KK0081.SVC_KEI_NO
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SYSID = ?
AND
    KK0081.SVC_CD = '04'
AND
    KK0081.PRC_GRP_CD = '14'
AND
    KK0081.PCRS_CD = 'A58'
AND
    KK0081.PPLAN_CD = 'PA5801'
AND
    KK0081.SVC_KEI_STAT IN ('100','210')
AND
    KK0081.MK_FLG = '0'
AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
        SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
            KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_021)
#--CNPRC03301_コンテンツ利用規約自動同意登録
#--サービス契約スキーマに紐づいているコンテンツ系のメールの取得する。個人の場合お客様スキーマの情報はNULLにする。
#-----------------------------------------------------------

--KEY:CN_SELECT_021

SELECT
    CK0201.MLAD
FROM
    CK_T_CUST CK0011
INNER JOIN
    (
    SELECT
        CK0201_WK.SYSID
        ,CK0201_WK.MLAD
    FROM
        CK_T_RRKS CK0201_WK
    WHERE
               CK0201_WK.RRK_WAY_CD = '001'
        AND    CK0201_WK.RRKS_BUNRUI_CD = '1'
        AND    CK0201_WK.MK_FLG = '0'
        AND    CK0201_WK.RSV_APLY_YMD || CK0201_WK.GENE_ADD_DTM =
       (SELECT MAX(CK0201_GENE.RSV_APLY_YMD || CK0201_GENE.GENE_ADD_DTM) AS CK0201_GENE_MAX
        FROM   CK_T_RRKS CK0201_GENE
        WHERE  CK0201_GENE.RRKS_NO = CK0201_WK.RRKS_NO
        AND    CK0201_GENE.RSV_APLY_YMD <= ?
        AND    CK0201_GENE.RSV_APLY_CD = '2'
        AND    CK0201_GENE.MK_FLG = '0')
    )CK0201
    ON CK0011.SYSID = CK0201.SYSID
INNER JOIN
    (
    SELECT
        KK0081_WK.SYSID
        ,KK0081_WK.SVC_KEI_NO
    FROM
        KK_T_SVC_KEI KK0081_WK
    WHERE
               KK0081_WK.MK_FLG = '0'
        AND    KK0081_WK.RSV_APLY_YMD || KK0081_WK.GENE_ADD_DTM =
       (SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_GENE_MAX
        FROM   KK_T_SVC_KEI KK0081_GENE
        WHERE  KK0081_GENE.SVC_KEI_NO = KK0081_WK.SVC_KEI_NO
        AND    KK0081_GENE.RSV_APLY_YMD <= ?
        AND    KK0081_GENE.RSV_APLY_CD = '2'
        AND    KK0081_GENE.MK_FLG = '0')
    ) KK0081
    ON CK0201.SYSID = KK0081.SYSID
WHERE    CK0011.MK_FLG = '0'
    AND    CK0011.RSV_APLY_YMD || CK0011.GENE_ADD_DTM =
                (SELECT MAX(CK0011_GENE.RSV_APLY_YMD || CK0011_GENE.GENE_ADD_DTM) AS CK0011_GENE_MAX
                 FROM   CK_T_CUST CK0011_GENE
                 WHERE  CK0011_GENE.SYSID = CK0011.SYSID
                 AND    CK0011_GENE.RSV_APLY_YMD <= ?
                 AND    CK0011_GENE.RSV_APLY_CD = '2'
                 AND    CK0011_GENE.MK_FLG = '0')
    AND     KK0081.SVC_KEI_NO = ?

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-CN_SELECT_022)
#--CNPRC03302_コンテンツ利用自動開始登録
#--前日にサービス提供中になったサービス契約情報を取得する
#-----------------------------------------------------------

--KEY:CN_SELECT_022

SELECT
    KK0081.SVC_KEI_NO
   ,KK0081.SYSID
   ,KK0081.SVC_STA_YMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ?
AND KK0081.ADD_UNYO_YMD = ?
AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
   (SELECT
        MIN(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM)
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO 
    AND KK0081_GENE.SVC_KEI_STAT = '100'
    AND KK0081_GENE.RSV_APLY_YMD <= ?
    AND KK0081_GENE.RSV_APLY_CD = '2'
    AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_395)
#--KKPRC67604
#--サービス締結登録
#--サービス契約の主キー情報（サービス契約番号,世代登録年月日時分秒）を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_395

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.GENE_ADD_DTM,
    KK0081.MSKM_DTL_NO,
    KK0081.IDO_DIV,
    KK0081.SVC_CANCEL_RSN_CD,
    KK0081.SVC_STP_RSN_CD,
    KK0081.SVC_STP_RLS_RSN_CD,
    KK0081.SVC_PAUSE_RSN_CD,
    KK0081.SVC_PAUSE_RLS_RSN_CD,
    KK0081.SVC_DLRE_CD,
    KK0081.SVC_STA_YMD,
    KK0081.SYSID,
    KK0081.SVC_CD,
    KK0081.PRC_GRP_CD,
    KK0081.PCRS_CD,
    KK0081.PPLAN_CD,
    KK0081.SVC_KEI_STAT,
    KK0081.SVC_CHRG_STAYMD
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO =?
    AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = 
      (SELECT KK0081_GENE.SVC_KEI_NO, MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM KK_T_SVC_KEI KK0081_GENE
        WHERE KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
          AND KK0081_GENE.RSV_APLY_YMD <= ?
          AND KK0081_GENE.RSV_APLY_CD = '2'
          AND KK0081_GENE.MK_FLG = '0'
      GROUP BY KK0081_GENE.SVC_KEI_NO)
AND
    KK0081.SVC_KEI_STAT = '030'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_397)
#--回復不可であるかを確認するために参照する。
#--KKPR67801にて使用。
#-----------------------------------------------------------

--KEY:KK_SELECT_397

SELECT
    KK0081.SVC_KEI_NO,
    KK0081.KAIHK_FAIL_KEI_CST_ZM_FLG
FROM
    KK_T_SVC_KEI KK0081
WHERE
    KK0081.SVC_KEI_NO = ? AND
    KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = 
    (SELECT
        MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM
        KK_T_SVC_KEI KK0081_GENE
    WHERE
        KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
        AND KK0081_GENE.RSV_APLY_YMD <= ?
        AND KK0081_GENE.RSV_APLY_CD = '2'
        AND KK0081_GENE.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_398)
#--KKPRC00928
#--サービス開始年月日補正対象抽出
#--サービス開始年月日補正対象抽出ための情報を取得する。
#-----------------------------------------------------------

--KEY:KK_SELECT_398

SELECT
  KK0081_MIN1.SVC_KEI_NO
  , KK0081_MIN1.SYSID
  , KK0081.SVC_STA_YMD AS TNKYM_SVC_STA_YMD
  , KK0021.MSKM_DTL_NO
  , KK0081_MIN1.SVC_STA_YMD AS TNKYS_SVC_STA_YMD
  , KK0011.ITENM_SVC_KEI_NO
  , KK0081_MIN1.PCRS_CD AS TNKYS_PCRS_CD
  , KK0081.PCRS_CD AS TNKYM_PCRS_CD
FROM KK_T_SVC_KEI KK0081_MIN1 
  INNER JOIN KK_T_SVC_KEI KK0081_MIN2 
  ON KK0081_MIN1.SVC_KEI_NO = KK0081_MIN2.SVC_KEI_NO 
  INNER JOIN KK_T_MSKM_DTL KK0021 
  ON KK0081_MIN2.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
  INNER JOIN KK_T_MSKM KK0011 
  ON KK0021.MSKM_NO = KK0011.MSKM_NO 
  INNER JOIN KK_T_SVC_KEI KK0081 
  ON KK0011.ITENM_SVC_KEI_NO  = KK0081.SVC_KEI_NO
WHERE
      KK0081_MIN1.RSV_APLY_YMD || KK0081_MIN1.GENE_ADD_DTM = ( 
      SELECT
        MIN(KK0081_GENE1.RSV_APLY_YMD || KK0081_GENE1.GENE_ADD_DTM) 
      FROM
        KK_T_SVC_KEI KK0081_GENE1 
      WHERE
            KK0081_GENE1.SVC_KEI_NO = KK0081_MIN1.SVC_KEI_NO 
        AND KK0081_GENE1.RSV_APLY_YMD <= ?
        AND KK0081_GENE1.RSV_APLY_CD = '2' 
        AND KK0081_GENE1.MK_FLG = '0'
        AND KK0081_GENE1.SVC_KEI_STAT = '100'
    ) 
  AND (KK0081_MIN2.SVC_KEI_NO, KK0081_MIN2.RSV_APLY_YMD || KK0081_MIN2.GENE_ADD_DTM) = ( 
      SELECT
        KK0081_GENE2.SVC_KEI_NO
        , MIN(KK0081_GENE2.RSV_APLY_YMD || KK0081_GENE2.GENE_ADD_DTM) 
      FROM
        KK_T_SVC_KEI KK0081_GENE2 
      WHERE
            KK0081_GENE2.SVC_KEI_NO = KK0081_MIN2.SVC_KEI_NO 
        AND KK0081_GENE2.RSV_APLY_YMD <= ?
        AND KK0081_GENE2.RSV_APLY_CD = '2' 
        AND KK0081_GENE2.MK_FLG = '0'
      GROUP BY
        KK0081_GENE2.SVC_KEI_NO
    ) 
  AND (KK0021.MSKM_DTL_NO, KK0021.GENE_ADD_DTM) = ( 
      SELECT
        KK0021_GENE.MSKM_DTL_NO
        , MAX(KK0021_GENE.GENE_ADD_DTM) AS KK0021_GENE_MAX 
      FROM
        KK_T_MSKM_DTL KK0021_GENE 
      WHERE
            KK0021_GENE.MSKM_DTL_NO = KK0021.MSKM_DTL_NO 
        AND KK0021_GENE.MK_FLG = '0' 
      GROUP BY
        KK0021_GENE.MSKM_DTL_NO
    ) 
  AND (KK0011.MSKM_NO, KK0011.GENE_ADD_DTM) = ( 
      SELECT
        KK0011_GENE.MSKM_NO
        , MAX(KK0011_GENE.GENE_ADD_DTM) AS KK0011_GENE_MAX 
      FROM
        KK_T_MSKM KK0011_GENE 
      WHERE
            KK0011_GENE.MSKM_NO = KK0011.MSKM_NO 
        AND KK0011_GENE.MK_FLG = '0' 
      GROUP BY
        KK0011_GENE.MSKM_NO
    ) 
  AND (KK0081.SVC_KEI_NO, KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM) = ( 
      SELECT
        KK0081_GENE3.SVC_KEI_NO
        , MAX(KK0081_GENE3.RSV_APLY_YMD || KK0081_GENE3.GENE_ADD_DTM) 
      FROM
        KK_T_SVC_KEI KK0081_GENE3 
      WHERE
            KK0081_GENE3.SVC_KEI_NO = KK0081.SVC_KEI_NO 
        AND KK0081_GENE3.RSV_APLY_YMD <= ?
        AND KK0081_GENE3.RSV_APLY_CD = '2' 
        AND KK0081_GENE3.MK_FLG = '0'
      GROUP BY
        KK0081_GENE3.SVC_KEI_NO
    ) 
  AND KK0081_MIN1.ADD_UNYO_YMD = ?
  AND KK0081_MIN1.PRC_GRP_CD IN ('02', '03', '04') 
  AND KK0081_MIN1.PCRS_CD <> 'A97'
  AND KK0081_MIN1.PCRS_CD <> 'A99'
  AND KK0081.SVC_STA_YMD IS NOT NULL
  AND KK0081.SVC_STA_YMD <= ?
  AND KK0081.PRC_GRP_CD IN ('02', '03', '04') 
  AND KK0081.PCRS_CD <> 'A97' 
  AND KK0081.PCRS_CD <> 'A99'

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_UPDATE_018)
#--KKPRC00929
#--サービス開始年月日補正更新
#--指定されたサービス契約番号のカレントレコードに対して、サービス開始年月日を編集する。
#-----------------------------------------------------------

--KEY:KK_UPDATE_018

UPDATE KK_T_SVC_KEI KK0081
SET KK0081.SVC_STA_YMD = ?,
    KK0081.UPD_DTM = 'UPD_DTM',
    KK0081.UPD_UNYO_YMD = 'UPD_UNYO',
    KK0081.UPD_TRN_ID = 'UPD_TRN',
    KK0081.UPD_OPEACNT = 'UPD_OPE'
WHERE KK0081.SVC_KEI_NO = ?
AND   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM >= (
  SELECT MAX(KK0081_G.RSV_APLY_YMD || KK0081_G.GENE_ADD_DTM)
  FROM   KK_T_SVC_KEI KK0081_G
  WHERE  KK0081_G.SVC_KEI_NO = KK0081.SVC_KEI_NO
  AND    KK0081_G.RSV_APLY_YMD <= ?
  AND    KK0081_G.RSV_APLY_CD = '2'
  AND    KK0081_G.MK_FLG = '0')

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_402)
#--ＣＳコースが開通済み、かつ有効なCASカード情報の登録が未登録のデータを抽出
#--KKPR67301にて使用。
#-----------------------------------------------------------

--KEY:KK_SELECT_402

SELECT 
  KK0081.SVC_KEI_NO,
  KK0081.SYSID,
  KK0781.PPLAN_NM
FROM KK_T_SVC_KEI KK0081
INNER JOIN KK_M_PPLAN KK0781
ON KK0781.PPLAN_CD = KK0081.PPLAN_CD
AND KK0781.PCRS_CD = KK0081.PCRS_CD
WHERE
  KK0081.SVC_KEI_STAT='100'
  AND KK0081.PCRS_CD IN ('AC0','AC1')
  AND KK0081.PLAN_STAYMD >= ?
  AND KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM = (
    SELECT MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
    FROM KK_T_SVC_KEI KK0081_GENE
    WHERE
      KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
      AND KK0081_GENE.RSV_APLY_YMD <= ?
      AND KK0081_GENE.RSV_APLY_CD = '2'
      AND KK0081_GENE.MK_FLG = '0')
  AND NOT EXISTS(
      SELECT 1
      FROM KK_T_CASCD_KNRI KK3541
      WHERE KK0081.SVC_KEI_NO=KK3541.SVC_KEI_NO
      AND KK3541.MK_FLG='0'
      )

#-

#-----------------------------------------------------------
#--サービス契約(KK_T_SVC_KEI-KK_SELECT_403)
#--CAS未登録ユーザメールの送信先メールアドレスを抽出
#--KKPR67301にて使用。
#-----------------------------------------------------------

--KEY:KK_SELECT_403

SELECT
   KK0081.SYSID,
   CK0201.MLAD
FROM
   KK_T_SVC_KEI KK0081
INNER JOIN CK_T_RRKS CK0201 ON CK0201.SYSID = KK0081.SYSID
WHERE
   KK0081.SYSID = ? AND
   CK0201.RRKS_SBT_CD = '1' AND
   CK0201.RSV_APLY_CD = '2' AND
   CK0201.RRK_WAY_CD = '001' AND
   (CK0201.RRKS_NO, CK0201.RSV_APLY_YMD || CK0201.GENE_ADD_DTM) =
       (SELECT
          CK0201_GENE.RRKS_NO, MAX (CK0201_GENE.RSV_APLY_YMD || CK0201_GENE.GENE_ADD_DTM) AS CK0201_MAX
       FROM
          CK_T_RRKS CK0201_GENE
       WHERE
          CK0201.RRKS_NO = CK0201_GENE.RRKS_NO
           AND CK0201_GENE.RSV_APLY_YMD <= ?
           AND CK0201_GENE.RSV_APLY_CD = '2'
           AND CK0201_GENE.MK_FLG = '0'
           GROUP BY CK0201_GENE.RRKS_NO
     )
AND
   KK0081.RSV_APLY_YMD || KK0081.GENE_ADD_DTM =
       (SELECT
            MAX(KK0081_GENE.RSV_APLY_YMD || KK0081_GENE.GENE_ADD_DTM) AS KK0081_MAX
        FROM
            KK_T_SVC_KEI KK0081_GENE
        WHERE
           KK0081_GENE.SVC_KEI_NO = KK0081.SVC_KEI_NO
           AND KK0081_GENE.RSV_APLY_YMD <= ?
           AND KK0081_GENE.RSV_APLY_CD = '2'
           AND KK0081_GENE.MK_FLG = '0'
       )

#-