#----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_SELECT_003) #--KKPRC55101_契約内容通知情報抽出、ファイル出力に必要情報を取得 #----------------------------------------------------------- --KEY:KK_SELECT_003 SELECT KK3021.SVC_KEI_NO, KK3011.SVC_KEI_KAISEN_UCWK_NO, KK3011.KNYTCS_NO, KK3011.SYSID FROM KK_T_KNYTCS KK3011 INNER JOIN KK_T_KNYO_TCH_TG_BUT KK3021 ON KK3011.KNYTCS_NO = KK3021.KNYTCS_NO WHERE KK3011.KNYTCS_STAT = '010' AND KK3011.KNYTCS_KOHU_WAY_CD = '3' AND KK3011.MK_FLG = '0' AND KK3021.MK_FLG = '0' ORDER BY KK3011.KNYTCS_NO, KK3021.SVC_KEI_NO #- #----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_SELECT_001) #--KKPRC55001 #--契約内容通知書ステータス、契約内容通知書交付方法コードから #--対象レコードの契約内容通知書番号、異動区分を取得する #----------------------------------------------------------- --KEY:KK_SELECT_001 SELECT KNYTCS_NO, IDO_DIV FROM KK_T_KNYTCS WHERE KNYTCS_STAT = '020' AND KNYTCS_KOHU_WAY_CD IN ('1', '2') AND MK_FLG = '0' ORDER BY SYSID ASC, SVC_KEI_KAISEN_UCWK_NO ASC #- #----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_SELECT_002) #--契約内容通知書より契約内容通知対象を抽出する #----------------------------------------------------------- --KEY:KK_SELECT_002 SELECT KK3011.KNYTCS_NO ,KK3011.MSKM_NO ,KK3011.SVC_KEI_KAISEN_UCWK_NO ,KK3011.SYSID ,KK3011.KEI_SEIRT_YMD ,KK3011.IDO_DIV FROM KK_T_KNYTCS KK3011 WHERE KK3011.KNYTCS_STAT = '000' AND KK3011.MK_FLG = '0' #- #----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_UPDATE_001) #--KKPRC55002 #--契約内容通知書番号を条件として #--契約内容ステータス、契約内容通知書印刷依頼年月日を更新する #----------------------------------------------------------- --KEY:KK_UPDATE_001 UPDATE KK_T_KNYTCS SET KNYTCS_STAT = '100', KNYTCS_PRINT_REQYMD = ?, UPD_DTM = 'UPD_DTM', UPD_OPEACNT = 'UPD_OPE', UPD_UNYO_YMD = 'UPD_UNYO', UPD_TRN_ID = 'UPD_TRN' WHERE KNYTCS_NO = ? #- #----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_INSERT_001) #--KKPRC55011 #--契約内容通知書番号を元にレコードをコピー生成する #----------------------------------------------------------- --KEY:KK_INSERT_001 INSERT INTO KK_T_KNYTCS( KNYTCS_NO, KNYTCS_STAT, SYSID, SVC_KEI_KAISEN_UCWK_NO, MSKM_NO, KNYTCS_CD, KNYTCS_KOHU_WAY_CD, KNYTCS_PRINT_JSSI_SK_CD, KNYTCS_PRINT_REQYMD, KNYTCS_HAKKO_YMD, KNYTCS_WEB_KOKAI_YMD, KEI_RLS_PSB_PRD_STAYMD, KEI_SEIRT_YMD, KANUORESO_DOFU_CTRL_CD, KNYTCS_SOHUS_NM, KNYTCS_SOHUS_AD_CD, KNYTCS_SOHUS_PCD, KNYTCS_SOHUS_STATE_NM, KNYTCS_SOHUS_CITY_NM, KNYTCS_SOHUS_OAZTSU_NM, KNYTCS_SOHUS_AZCHO_NM, KNYTCS_SOHUS_BNCHIGO, KNYTCS_SOHUS_ADRTTM, KNYTCS_SOHUS_ADRRM, KNYTCS_SOHUS_TELNO, KNYTCS_CL_YMD, KNYTCS_CLRE_CD, IDO_DIV, 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, LETTER_HASSO_SHIWAKE_DIV ) SELECT ?, '020', SYSID, SVC_KEI_KAISEN_UCWK_NO, MSKM_NO, KNYTCS_CD, '2', '01', NULL, NULL, NULL, KEI_RLS_PSB_PRD_STAYMD, KEI_SEIRT_YMD, '0', KNYTCS_SOHUS_NM, KNYTCS_SOHUS_AD_CD, KNYTCS_SOHUS_PCD, KNYTCS_SOHUS_STATE_NM, KNYTCS_SOHUS_CITY_NM, KNYTCS_SOHUS_OAZTSU_NM, KNYTCS_SOHUS_AZCHO_NM, KNYTCS_SOHUS_BNCHIGO, KNYTCS_SOHUS_ADRTTM, KNYTCS_SOHUS_ADRRM, KNYTCS_SOHUS_TELNO, KNYTCS_CL_YMD, KNYTCS_CLRE_CD, IDO_DIV, 'ADD_DTM', 'ADD_OPE', 'UPD_DTM', 'UPD_OPE', NULL, NULL, '0', 'ADD_UNYO', 'ADD_TRN', 'UPD_UNYO', 'UPD_TRN', NULL, NULL, '0' FROM KK_T_KNYTCS WHERE KNYTCS_NO = ? AND MK_FLG = '0' #- #----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_SELECT_004) #--KKPRC55104_契約内容通知メール送信 #--引数の契約内容通知書番号と一致するレコードを抽出する。 #----------------------------------------------------------- --KEY:KK_SELECT_004 SELECT KK3011.KNYTCS_NO ,KK3011.KNYTCS_SOHUS_NM ,KK3011.IDO_DIV FROM KK_T_KNYTCS KK3011 WHERE KK3011.KNYTCS_NO = ? #- #----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_SELECT_005) #--契約内容通知書番号を元に申込種別を取得する #----------------------------------------------------------- --KEY:KK_SELECT_005 SELECT KK0011.MSKM_SBT_CD FROM KK_T_KNYTCS KK3011 INNER JOIN KK_T_MSKM KK0011 ON KK3011.MSKM_NO = KK0011.MSKM_NO WHERE KK3011.KNYTCS_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') AND KK3011.MK_FLG = '0' #- #----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_UPDATE_002) #--KKPRC55104_契約内容通知メール送信 #--引数の契約内容通知書番号と合致するレコードのステータス及びWEB公開年月日の更新を行う。 #----------------------------------------------------------- --KEY:KK_UPDATE_002 UPDATE KK_T_KNYTCS KK3011 SET KK3011.KNYTCS_STAT = '100' ,KK3011.KNYTCS_WEB_KOKAI_YMD = ? ,KK3011.UPD_DTM = 'UPD_DTM' ,KK3011.UPD_UNYO_YMD = 'UPD_UNYO' ,KK3011.UPD_TRN_ID = 'UPD_TRN' ,KK3011.UPD_OPEACNT = 'UPD_OPE' WHERE KK3011.KNYTCS_NO = ? #- #----------------------------------------------------------- #--契約内容通知書(KK_T_KNYTCS-KK_SELECT_006) #--サービス契約回線内訳番号をキーに当日有効なレコードの存在確認を行う #----------------------------------------------------------- --KEY:KK_SELECT_006 SELECT 1 FROM KK_T_KNYTCS KK3011 WHERE KK3011.KNYTCS_STAT = '000' AND KK3011.KNYTCS_NO <> ? AND KK3011.KEI_SEIRT_YMD = ? AND KK3011.SVC_KEI_KAISEN_UCWK_NO = ? AND KK3011.MK_FLG = '0' #-