#-----------------------------------------------------------
#--工事遅延契約補正(KK_T_KOJI_DLY_KEHSI-KK_SELECT_001)
#--UIA17_バッチ機能仕様書(KKPRC10001_課金開始異動トリガー抽出)
#--3. 全体構成/3-3.処理詳細
#--(2) 本日サービス異動請求契約情報出力
#-----------------------------------------------------------

--KEY:KK_SELECT_001

SELECT KKN.SEIKY_KEI_NO
      ,KDK.SVC_KEI_NO
FROM   KK_T_KOJI_DLY_KEHSI KDK
      ,KK_T_KAKINS KKN
      ,
      (SELECT TO_CHAR(LAST_DAY(ADD_MONTHS(?,-2))+1,'yyyymmdd') STA_YMD
             ,? END_YMD
       FROM   DUAL
      ) DUAL
WHERE  KDK.SVC_KEI_NO = KKN.SVC_KEI_NO
  AND  KDK.KOJI_DLY_HOSEI_YMD = ?
  AND  SUBSTR(KDK.HOSEI_AF_SVC_CHRG_STAYMD,1,6) = SUBSTR(DUAL.STA_YMD,1,6)

  AND  KKN.KAKINS_TSTAYMD <= DUAL.END_YMD
  AND  KKN.KAKINS_TENDYMD >= DUAL.STA_YMD
  AND  KDK.MK_FLG = '0'
  AND  KKN.MK_FLG = '0'
ORDER BY
       KKN.SEIKY_KEI_NO
      ,KDK.SVC_KEI_NO

#-

#-----------------------------------------------------------
#--工事遅延契約補正(KK_T_KOJI_DLY_KEHSI-KK_SELECT_002)
#--契約補正対象のデータを抽出する。
#-----------------------------------------------------------

--KEY:KK_SELECT_002

SELECT
    KK1451.SVC_KEI_NO,
    KK1451.KOJI_DLY_HOSEI_YMD,
    KK1451.HOSEI_BF_SVC_CHRG_STAYMD,
    KK1451.HOSEI_AF_SVC_CHRG_STAYMD,
    KK1451.SVC_CHRG_STAYMD_CHGRE_CD
FROM
    KK_T_KOJI_DLY_KEHSI KK1451
WHERE
    KK1451.KOJI_DLY_HOSEI_YMD = ?
AND
    KK1451.MK_FLG = '0'

#-