#----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-CH_SELECT_001) #--削除対象外チェック(料金請求)で使用。 #----------------------------------------------------------- --KEY:CH_SELECT_001 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 INNER JOIN CH_T_SAIKEN CH0011 ON KK2611.SEIKY_KEI_NO = CH0011.SEIKY_KEI_NO AND (CH0011.SAIKEN_STAT NOT IN (?,?) OR ((CH0011.SAIKEN_STAT = ? AND ADD_MONTHS(CH0011.JUTO_FIN_YMD, 24) >= ?) OR (CH0011.SAIKEN_STAT = ? AND ADD_MONTHS(CH0011.SAIKEN_SHOKYAKU_YMD, 24) >= ?))) AND CH0011.MK_FLG = '0' WHERE KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' UNION SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 INNER JOIN CH_T_KNK CH0191 ON KK2611.SEIKY_KEI_NO = CH0191.SEIKY_KEI_NO AND CH0191.MK_FLG = '0' WHERE KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' GROUP BY KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-CR_SELECT_001) #--チェック対象データ抽出 #--・削除対象外チェック(履歴) #----------------------------------------------------------- --KEY:CR_SELECT_001 SELECT TKRK.SVC_KEI_NO FROM CR_T_TAIO_KIROK TKRK WHERE (TKRK.TOIAWASE_STAT_CD = '101' OR TKRK.TOIAWASE_STAT_CD = '102') AND TKRK.MK_FLG = '0' AND EXISTS ( SELECT 1 FROM KK_T_KJNIFDEL_JDG_WK KDJW WHERE KDJW.SVC_KEI_NO = TKRK.SVC_KEI_NO AND KDJW.DEL_JDG_CD = '00' AND KDJW.MK_FLG = '0' ) GROUP BY TKRK.SVC_KEI_NO #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_001) #--「個人情報削除判定ワーク」からチェック対象データを取得する。 #----------------------------------------------------------- --KEY:KK_SELECT_001 SELECT KK2611.SVC_KEI_NO ,KK2611.SEIKY_KEI_NO ,KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_002) #--「個人情報削除判定ワーク」の削除不可データを検索する。 #----------------------------------------------------------- --KEY:KK_SELECT_002 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID, KK2611.SVC_CD, KK2611.PRC_GRP_CD, KK2611.PCRS_CD, KK2611.NEW_MSKM_JI_MSKMSHO_NO, KK2611.ISP_NINSHO_ID, KK2611.SVC_DSL_KISAN_YMD, KK2611.SVC_CANCEL_YMD, KK2611.SVC_DSL_YMD, KK2611.SVC_ENDYMD, KK2611.DEL_TRN_TG_CHSHT_YMD, KK2611.KOJIN_INFO_DEL_RSN_CD, KK2611.DEL_JDG_CD, KK2611.KEI_LAST_UPD_DTM, KK2611.CRNT_DATA_SKBT_CD, KK2611.ADD_DTM, KK2611.ADD_OPEACNT, KK2611.UPD_DTM, KK2611.UPD_OPEACNT, KK2611.DEL_DTM, KK2611.DEL_OPEACNT, KK2611.MK_FLG, KK2611.ADD_UNYO_YMD, KK2611.ADD_TRN_ID, KK2611.UPD_UNYO_YMD, KK2611.UPD_TRN_ID, KK2611.DEL_UNYO_YMD, KK2611.DEL_TRN_ID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.DEL_JDG_CD in ('01','02','03','04','05','06','99') AND KK2611.MK_FLG = '0' ORDER BY KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_003) #--「個人情報削除判定ワーク」の削除不可データのサービス契約番号が、削除可能データに存在するか検索する。 #----------------------------------------------------------- --KEY:KK_SELECT_003 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SVC_KEI_NO = ? AND KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_004) #--「個人情報削除判定ワーク」の削除不可データの請求契約番号が、削除可能データに存在するか検索する。 #----------------------------------------------------------- --KEY:KK_SELECT_004 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SEIKY_KEI_NO = ? AND KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_005) #--「個人情報削除判定ワーク」の削除不可データのSYSIDが、削除可能データに存在するか検索する。 #----------------------------------------------------------- --KEY:KK_SELECT_005 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SYSID = ? AND KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_006) #--「個人情報削除判定ワーク」をキーで検索し、全項目を取得する。 #----------------------------------------------------------- --KEY:KK_SELECT_006 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID, KK2611.SVC_CD, KK2611.PRC_GRP_CD, KK2611.PCRS_CD, KK2611.NEW_MSKM_JI_MSKMSHO_NO, KK2611.ISP_NINSHO_ID, KK2611.SVC_DSL_KISAN_YMD, KK2611.SVC_CANCEL_YMD, KK2611.SVC_DSL_YMD, KK2611.SVC_ENDYMD, KK2611.DEL_TRN_TG_CHSHT_YMD, KK2611.KOJIN_INFO_DEL_RSN_CD, KK2611.DEL_JDG_CD, KK2611.KEI_LAST_UPD_DTM, KK2611.CRNT_DATA_SKBT_CD, KK2611.ADD_DTM, KK2611.ADD_OPEACNT, KK2611.UPD_DTM, KK2611.UPD_OPEACNT, KK2611.DEL_DTM, KK2611.DEL_OPEACNT, KK2611.MK_FLG, KK2611.ADD_UNYO_YMD, KK2611.ADD_TRN_ID, KK2611.UPD_UNYO_YMD, KK2611.UPD_TRN_ID, KK2611.DEL_UNYO_YMD, KK2611.DEL_TRN_ID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SVC_KEI_NO = ? AND KK2611.SEIKY_KEI_NO = ? AND KK2611.SYSID = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_007) #--「個人情報削除判定ワーク」を請求契約番号がALL0でない、かつ削除可能データで検索する。 #----------------------------------------------------------- --KEY:KK_SELECT_007 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SEIKY_KEI_NO <> ? AND KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_008) #--「個人情報削除判定ワーク」の削除対象データに存在するカレントの請求契約番号の件数を取得する。 #----------------------------------------------------------- --KEY:KK_SELECT_008 SELECT COUNT(*) AS KK2611_CNT FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SEIKY_KEI_NO = ? AND KK2611.CRNT_DATA_SKBT_CD = ? AND KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_009) #--「個人情報削除判定ワーク」の削除対象データに存在するカレントのSYSIDに関連するサービス契約番号の件数を取得する。 #----------------------------------------------------------- --KEY:KK_SELECT_009 SELECT COUNT(*) AS KK2611_CNT FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SYSID = ? AND KK2611.CRNT_DATA_SKBT_CD = ? AND KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_010) #--「個人情報削除判定ワーク」の削除可能データを #--全項目を取得する。 #----------------------------------------------------------- --KEY:KK_SELECT_010 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID, KK2611.SVC_CD, KK2611.PRC_GRP_CD, KK2611.PCRS_CD, KK2611.NEW_MSKM_JI_MSKMSHO_NO, KK2611.ISP_NINSHO_ID, KK2611.SVC_DSL_KISAN_YMD, KK2611.SVC_CANCEL_YMD, KK2611.SVC_DSL_YMD, KK2611.SVC_ENDYMD, KK2611.DEL_TRN_TG_CHSHT_YMD, KK2611.KOJIN_INFO_DEL_RSN_CD, KK2611.DEL_JDG_CD, KK2611.KEI_LAST_UPD_DTM, KK2611.CRNT_DATA_SKBT_CD, KK2611.ADD_DTM, KK2611.ADD_OPEACNT, KK2611.UPD_DTM, KK2611.UPD_OPEACNT, KK2611.DEL_DTM, KK2611.DEL_OPEACNT, KK2611.MK_FLG, KK2611.ADD_UNYO_YMD, KK2611.ADD_TRN_ID, KK2611.UPD_UNYO_YMD, KK2611.UPD_TRN_ID, KK2611.DEL_UNYO_YMD, KK2611.DEL_TRN_ID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' AND NOT EXISTS ( SELECT KK2611_EX.SVC_KEI_NO FROM KK_T_KJNIFDEL_JDG_WK KK2611_EX WHERE KK2611_EX.SEIKY_KEI_NO = '0000000000' AND KK2611_EX.SVC_KEI_NO = KK2611.SVC_KEI_NO AND KK2611_EX.KOJIN_INFO_DEL_RSN_CD IN ('01','03') AND KK2611_EX.SVC_CD NOT IN ('04') AND KK2611_EX.MK_FLG = '0' ) AND NOT EXISTS ( SELECT 1 FROM KK_T_KOJIN_INFO_DEL KK1531 WHERE KK1531.SVC_KEI_NO = KK2611.SVC_KEI_NO AND KK1531.SEIKY_KEI_NO = KK2611.SEIKY_KEI_NO AND KK1531.SYSID = KK2611.SYSID ) #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_011) #--データ存在チェック #----------------------------------------------------------- --KEY:KK_SELECT_011 SELECT COUNT(*) AS DEL_CNT FROM KK_T_KJNIFDEL_JDG_WK KTKIDJW WHERE KTKIDJW.SVC_KEI_NO = ? AND KTKIDJW.SEIKY_KEI_NO = ? AND KTKIDJW.SYSID = ? AND KTKIDJW.DEL_JDG_CD = ? AND KTKIDJW.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_012) #--削除対象データにSYSID、サービス契約が削除となり、請求契約が初期化されているデータを取得する。 #----------------------------------------------------------- --KEY:KK_SELECT_012 SELECT KTKJW.SVC_KEI_NO, KTKJW.SEIKY_KEI_NO, KTKJW.SYSID FROM KK_T_KJNIFDEL_JDG_WK KTKJW WHERE KTKJW.SYSID <> ? AND KTKJW.SEIKY_KEI_NO = ? AND KTKJW.DEL_JDG_CD = ? AND KTKJW.CRNT_DATA_SKBT_CD = ? AND KTKJW.MK_FLG = '0' ORDER BY KTKJW.SYSID ,KTKJW.SVC_KEI_NO ,KTKJW.SVC_ENDYMD #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_013) #--「個人情報削除判定ワーク」をSYSID単位で検索し主キーを取得する。 #----------------------------------------------------------- --KEY:KK_SELECT_013 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SYSID = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_SELECT_014) #--「個人情報削除判定ワーク」をSYSIDがALL0でない、かつ削除可能データで検索する。 #----------------------------------------------------------- --KEY:KK_SELECT_014 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SYSID <> ? AND KK2611.DEL_JDG_CD = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_UPDATE_001) #--「個人情報削除判定ワーク」の削除判定コードに削除不可(契約)を設定する。 #----------------------------------------------------------- --KEY:KK_UPDATE_001 UPDATE KK_T_KJNIFDEL_JDG_WK SET DEL_JDG_CD = ? ,UPD_DTM = ? ,UPD_OPEACNT = ? ,UPD_UNYO_YMD = ? ,UPD_TRN_ID = ? WHERE SVC_KEI_NO = ? AND DEL_JDG_CD = '00' AND MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_INSERT_001) #--「個人情報削除」より、ユーザによる削除対象外データを抽出し、「個人情報削除判定ワーク」へ登録する。 #----------------------------------------------------------- --KEY:KK_INSERT_001 INSERT INTO KK_T_KJNIFDEL_JDG_WK (SVC_KEI_NO ,SEIKY_KEI_NO ,SYSID ,SVC_CD ,PRC_GRP_CD ,PCRS_CD ,NEW_MSKM_JI_MSKMSHO_NO ,ISP_NINSHO_ID ,SVC_DSL_KISAN_YMD ,SVC_CANCEL_YMD ,SVC_DSL_YMD ,SVC_ENDYMD ,DEL_TRN_TG_CHSHT_YMD ,KOJIN_INFO_DEL_RSN_CD ,DEL_JDG_CD ,KEI_LAST_UPD_DTM ,CRNT_DATA_SKBT_CD ,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_KJNIFDEL_JDG_WK-KK_DELETE_001) #--「個人情報削除判定ワーク」のデータをキーで削除する。 #----------------------------------------------------------- --KEY:KK_DELETE_001 DELETE FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SVC_KEI_NO = ? AND KK2611.SEIKY_KEI_NO = ? AND KK2611.SYSID = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KK_DELETE_002) #--「個人情報削除判定ワーク」をサービス契約番号単位で削除する。 #----------------------------------------------------------- --KEY:KK_DELETE_002 DELETE FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SVC_KEI_NO = ? AND KK2611.DEL_JDG_CD = '00' AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-CR_UPDATE_001) #--削除判定コード更新 #--・削除対象外チェック(履歴) #----------------------------------------------------------- --KEY:CR_UPDATE_001 UPDATE KK_T_KJNIFDEL_JDG_WK SET DEL_JDG_CD = '06', UPD_DTM = ?, UPD_OPEACNT = ?, UPD_UNYO_YMD = 'UPD_UNYO', UPD_TRN_ID = 'UPD_TRN' WHERE SVC_KEI_NO = ? AND DEL_JDG_CD = '00' AND MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KU_SELECT_001) #--【削除対象外チェック(工事)】 #--個人情報削除判定ワークから"削除可"のデータを取得する。 #----------------------------------------------------------- --KEY:KU_SELECT_001 SELECT KK2611.SVC_KEI_NO FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.DEL_JDG_CD = '00' AND KK2611.MK_FLG = '0' GROUP BY KK2611.SVC_KEI_NO #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-KU_SELECT_002) #--【削除対象外チェック(工事)】 #--工事案件番号に紐づくサービス契約番号で取得する。 #----------------------------------------------------------- --KEY:KU_SELECT_002 SELECT KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID, KK2611.DEL_JDG_CD FROM KK_T_KJNIFDEL_JDG_WK KK2611 WHERE KK2611.SVC_KEI_NO = ? AND KK2611.MK_FLG = '0' #- #----------------------------------------------------------- #--個人情報削除判定ワーク(KK_T_KJNIFDEL_JDG_WK-DK_SELECT_001) #--削除対象外チェック(物流)で使用。 #----------------------------------------------------------- --KEY:DK_SELECT_001 SELECT /*+ LEADING (KK2611) */ KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID FROM KK_T_KJNIFDEL_JDG_WK KK2611 INNER JOIN DK_T_HMPIN_KIKI DK0301 ON KK2611.SVC_KEI_NO = DK0301.LOAD_OYA_SVKEI_NO AND DK0301.HMPIN_KIKI_STAT IN ('001','002') AND DK0301.MK_FLG = '0' WHERE KK2611.DEL_JDG_CD = '00' AND KK2611.MK_FLG = '0' GROUP BY KK2611.SVC_KEI_NO, KK2611.SEIKY_KEI_NO, KK2611.SYSID #-