改之前:/*
* システム名 :受発注システム
* 機能概要:オンラインテストで扱う商品は、検討商品マスタから作成
*
* 引数1 バッチID
* 引数2 業務日付
*
*/
\set ON_ERROR_STOP on
\pset columns 32767
/* ログ出力 */
CREATE OR REPLACE PROCEDURE
OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(LEVEL IN CHAR, C_FUNC_ID IN CHAR, P_BATCH_ID IN VARCHAR, MESSAGE IN VARCHAR) AS $$
BEGIN
PERFORM DBMS_OUTPUT.SERVEROUTPUT(TRUE);
PERFORM DBMS_OUTPUT.PUT_LINE(CLOCK_TIMESTAMP() ||' '||
COALESCE(LEVEL, '') ||' '||
C_FUNC_ID ||' '||
P_BATCH_ID ||' '||
COALESCE(MESSAGE, '') );
END $$ LANGUAGE plpgsql;
DO $$
DECLARE
C_LOG_LEVEL_INFO CONSTANT char(4) := 'INFO';
C_LOG_LEVEL_ERROR CONSTANT char(5) := 'ERROR';
C_FUNC_ID CONSTANT char(3) := 'OTL';
C_JOB_TITLE CONSTANT varchar(256) := '検討商品マスタ取込';
P_BATCH_ID varchar(256) := current_setting('custom.batch_id'); -- バッチID
P_GYOMU_DATE varchar(8) := current_setting('custom.gyomu_date'); -- 業務日付
/* 変数 */
V_PROC_CNT_CMT numeric := 0; -- 処理件数
exitCd INTEGER = 0;
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '検討商品マスタ取込 登録開始');
-- 地区便_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 削除開始');
TRUNCATE TABLE BX_M_080_TYUKO_SHO_CHIKUB_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 削除エラー');
RAISE;
END;
-- 地区便_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 登録開始');
INSERT INTO BX_M_080_TYUKO_SHO_CHIKUB_JOHO (
shuhnno,
hcchukbn,
chkcd,
shuhncd,
bnkbn,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
tkbishuhnkbn,
tkbioyfmcd,
brshuhncd,
hcchustrtb,
hcchustpstrtb,
hcchustpendb,
trkshb,
trkshkbn,
shuhntrkshrasnkbn,
hcchushrtnikbn,
mnmmhcchubsu,
mxmmhcchubsu,
plucd,
plucdhnkuumkbn,
poskbn,
knrnnshuhncd,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
hcchukbn,
chkcd,
shuhncd,
bnkbn,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
tkbishuhnkbn,
tkbioyfmcd,
brshuhncd,
hcchustrtb,
hcchustpstrtb,
hcchustpendb,
trkshb,
trkshkbn,
shuhntrkshrasnkbn,
hcchushrtnikbn,
mnmmhcchubsu,
mxmmhcchubsu,
plucd,
plucdhnkuumkbn,
poskbn,
knrnnshuhncd,
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_050_KSHO_CHIKU_BIN_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 登録エラー');
RAISE;
END;
-- 地区_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 削除開始');
TRUNCATE TABLE BX_M_081_TYUKO_SHO_CHIKU_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 削除エラー');
RAISE;
END;
-- 地区_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 登録開始');
INSERT INTO BX_M_081_TYUKO_SHO_CHIKU_JOHO (
shuhnno,
hcchukbn,
chkcd,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
cmumkbn,
cminfrmtn,
grpkbn,
shuhnstsmi1,
shuhnstsmi2,
shuhnstsmi3,
shuhnstsmi4,
shuhnstsmi5,
shuhnstsmi6,
dsgnpckghnkuarflg,
shuhnstsmipckghnkuyu,
irs,
caseirs,
setirs,
brshuhncd,
setbrkbn,
zikshbninfrmtnkbn,
hnpnkknstrtb,
hnpnkknendb,
shuhncmmnt,
bik,
nrrts,
tsjgnk,
gnkhkkkn,
gnkhkkkngnk,
shryutrhkskcd,
mkrcd,
brndcd,
linkyukukbn,
shuhnturkyudepotcd,
hssipttrn,
sshkehhkbn,
sshkeshuhncd,
sshkeshuhnnmknj,
shuhnhnkurasnkbn,
kntgiturkb,
shuhnrank,
hyjnfaceumkbn,
nwshuhnflg,
newkbn,
nryrkbn,
inptkbn,
bikhnkukbn,
shkiturkb,
hssshuhnflg,
dphngzuhishnflg,
shuhnsts,
shmkgn,
hnbikgn,
nuhnkgn,
sitiziksu,
mrktngnewshkkub,
mrktngnewsgsu,
mrktngnewsksikbn,
mrktngnewshknb,
dichuhyjkbn,
hcchustpkbn,
hnnmssg,
ffhnbikgntm,
ffhnbikgntshgiflg,
untgrupcd,
shrkktishid,
shrshunnshid,
shunnjkykbn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
hcchukbn,
chkcd,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
cmumkbn,
cminfrmtn,
grpkbn,
shuhnstsmi1,
shuhnstsmi2,
shuhnstsmi3,
shuhnstsmi4,
shuhnstsmi5,
shuhnstsmi6,
dsgnpckghnkuarflg,
shuhnstsmipckghnkuyu,
irs,
caseirs,
setirs,
brshuhncd,
setbrkbn,
zikshbninfrmtnkbn,
hnpnkknstrtb,
hnpnkknendb,
shuhncmmnt,
bik,
nrrts,
tsjgnk,
gnkhkkkn,
gnkhkkkngnk,
shryutrhkskcd,
mkrcd,
brndcd,
linkyukukbn,
shuhnturkyudepotcd,
hssipttrn,
sshkehhkbn,
sshkeshuhncd,
sshkeshuhnnmknj,
shuhnhnkurasnkbn,
kntgiturkb,
shuhnrank,
hyjnfaceumkbn,
nwshuhnflg,
newkbn,
nryrkbn,
inptkbn,
bikhnkukbn,
shkiturkb,
hssshuhnflg,
dphngzuhishnflg,
shuhnsts,
shmkgn,
hnbikgn,
nuhnkgn,
sitiziksu,
mrktngnewshkkub,
mrktngnewsgsu,
mrktngnewsksikbn,
mrktngnewshknb,
dichuhyjkbn,
hcchustpkbn,
hnnmssg,
ffhnbikgntm,
ffhnbikgntshgiflg,
untgrupcd,
shrkktishid,
shrshunnshid,
shunnjkykbn,
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM BX_M_051_KSHO_CHIKU_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE
AND shuhnsts >= 20;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 登録エラー');
RAISE;
END;
-- 商品情報_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 削除開始');
TRUNCATE TABLE BX_M_083_TYUKO_SHO_SHO_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 削除エラー');
RAISE;
END;
-- 商品情報_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 登録開始');
INSERT INTO BX_M_083_TYUKO_SHO_SHO_JOHO (
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
shuhnnmkn,
shuhnnmknj,
shuhnnmryksyu,
tnpyushuhnnmknj,
tnpyushuhnnmkn,
shuhnkkkhnkk,
facekkrdibnricd,
facekkrchubnricd,
facekkrshubnricd,
mkrcd,
brndcd,
shuhnsizeokyk,
shuhnsizehb,
shuhnsizetks,
shuhnjry,
shuhnbnri,
hcchukbn,
shuhnsts,
hpyushuhnstsmi,
ntsry,
co2histryu,
mnzishuhnkbn,
urbchnrtssu,
urbchnrtsryu,
tnpzksibnricd,
tnpzksicd,
tnpzksikmkcd,
shuhnstsmi1,
shuhnstsmi2,
shuhnstsmi3,
shuhnstsmi4,
shuhnstsmi5,
shuhnstsmi6,
shuhnstsmijznhcchuyu,
shuhnkntrn,
inptyshkbn,
inptkbn,
ffplutshkbn,
nffrnduyucmmnt,
oldshuhnno,
tnbik,
tngnk,
nrrts,
poskbn,
plucd,
kgnzirtstshflg,
gnkhkkkn,
gnkhkkkngnk,
irs,
caseirs,
tkbishuhnkbn,
tkbioyfmcd,
knrnnshuhncd,
cmumkbn,
cminfrmtn,
grpkbn,
shmkgn,
hnbikgn,
nuhnkgn,
hnnmssg,
shrkktishid,
shrshunnshid,
shunnjkykbn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
shuhnnmkn,
shuhnnmknj,
shuhnnmryksyu,
tnpyushuhnnmknj,
tnpyushuhnnmkn,
shuhnkkkhnkk,
facekkrdibnricd,
facekkrchubnricd,
facekkrshubnricd,
mkrcd,
brndcd,
shuhnsizeokyk,
shuhnsizehb,
shuhnsizetks,
shuhnjry,
shuhnbnri,
hcchukbn,
shuhnsts,
hpyushuhnstsmi,
ntsry,
co2histryu,
mnzishuhnkbn,
urbchnrtssu,
urbchnrtsryu,
tnpzksibnricd,
tnpzksicd,
tnpzksikmkcd,
shuhnstsmi1,
shuhnstsmi2,
shuhnstsmi3,
shuhnstsmi4,
shuhnstsmi5,
shuhnstsmi6,
shuhnstsmijznhcchuyu,
shuhnkntrn,
inptyshkbn,
inptkbn,
ffplutshkbn,
nffrnduyucmmnt,
oldshuhnno,
tnbik,
tngnk,
nrrts,
poskbn,
plucd,
kgnzirtstshflg,
gnkhkkkn,
gnkhkkkngnk,
irs,
caseirs,
tkbishuhnkbn,
tkbioyfmcd,
knrnnshuhncd,
cmumkbn,
cminfrmtn,
grpkbn,
shmkgn,
hnbikgn,
nuhnkgn,
hnnmssg,
shrkktishid,
shrshunnshid,
shunnjkykbn,
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_053_KSHO_SHO_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE
AND shuhnsts >= 20;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 登録エラー');
RAISE;
END;
-- 商品便別_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 削除開始');
TRUNCATE TABLE BX_M_082_TYUKO_SHO_BIN_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 削除エラー');
RAISE;
END;
-- 商品便別_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 登録開始');
INSERT INTO BX_M_082_TYUKO_SHO_BIN_JOHO (
shuhnno,
shuhncd,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
gndrcd,
hnbn,
gnbn,
gmnhyjzyn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
shuhncd,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
gndrcd,
hnbn,
gnbn,
gmnhyjzyn,
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_052_KSHO_SHO_BIN_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 登録エラー');
RAISE;
END;
-- 地域限定_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 削除開始');
TRUNCATE TABLE BX_M_079_TYUKO_SHO_CHIKIG_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 削除エラー');
RAISE;
END;
-- 地域限定_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 登録開始');
INSERT INTO BX_M_079_TYUKO_SHO_CHIKIG_JOHO (
shuhnno,
hcchukbn,
chkcd,
prefcd,
gyumyuprefkkchbcd,
shkchsncd3kt,
applystrtb,
applyendb,
turkjshrmode,
shrkbn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
hcchukbn,
chkcd,
prefcd,
gyumyuprefkkchbcd,
shkchsncd3kt,
applystrtb,
applyendb,
turkjshrmode,
shrkbn,
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_049_KSHO_CHIK_GNTI_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 登録エラー');
RAISE;
END;
-- PLU_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 削除開始');
TRUNCATE TABLE BX_M_085_TYUKO_SHO_PLU_HNK_BF;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 削除エラー');
RAISE;
END;
-- PLU_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 登録開始');
INSERT INTO BX_M_085_TYUKO_SHO_PLU_HNK_BF (
shuhnno,
hcchukbn,
chkcd,
hnkubfrshuhncd,
bnkbn,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
hnkubfrplucd,
hnkuaftrshuhncd,
hcchustpkbn,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
hcchukbn,
chkcd,
hnkubfrshuhncd,
bnkbn,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
hnkubfrplucd,
hnkuaftrshuhncd,
hcchustpkbn,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_055_KSHO_PLU_HNK_BF
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 登録エラー');
RAISE;
END;
-- 酒_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 削除開始');
TRUNCATE TABLE BX_M_084_TYUKO_SHO_SAKE_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 削除エラー');
RAISE;
END;
-- 酒_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 登録開始');
INSERT INTO BX_M_084_TYUKO_SHO_SAKE_JOHO (
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
alchldsu,
yry,
bkghrtskbn,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
alchldsu,
yry,
bkghrtskbn,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_054_KSHO_SAKE_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 登録エラー');
RAISE;
END;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '正常終了 : ' || C_JOB_TITLE);
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '');
RAISE NOTICE 'exitCd=%', exitCd;
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID P_BATCH_ID, 'PL/PGSQL ERROR:');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID P_BATCH_ID, 'SQLSTATE =[' || SQLSTATE || '] [' || SQLERRM || ']');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID P_BATCH_ID, '異常終了 : ' || C_JOB_TITLE);
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID P_BATCH_ID, '');
exitCd := 9;
RAISE NOTICE 'exitCd=%', exitCd;
RAISE;
END $$ LANGUAGE plpgsql; 改之后:/*
* システム名 :受発注システム
* 機能概要:オンラインテストで扱う商品は、検討商品マスタから作成
*
* 引数1 バッチID
* 引数2 業務日付
*
*/
\set ON_ERROR_STOP on
\pset columns 32767
/* ログ出力 */
CREATE OR REPLACE PROCEDURE
OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(LEVEL IN CHAR, C_FUNC_ID IN CHAR, P_BATCH_ID IN VARCHAR, MESSAGE IN VARCHAR) AS $$
BEGIN
PERFORM DBMS_OUTPUT.SERVEROUTPUT(TRUE);
PERFORM DBMS_OUTPUT.PUT_LINE(CLOCK_TIMESTAMP() ||' '||
COALESCE(LEVEL, '') ||' '||
C_FUNC_ID ||' '||
P_BATCH_ID ||' '||
COALESCE(MESSAGE, '') );
END $$ LANGUAGE plpgsql;
DO $$
DECLARE
C_LOG_LEVEL_INFO CONSTANT char(4) := 'INFO';
C_LOG_LEVEL_ERROR CONSTANT char(5) := 'ERROR';
C_FUNC_ID CONSTANT char(3) := 'OTL';
C_JOB_TITLE CONSTANT varchar(256) := '検討商品マスタ取込';
P_BATCH_ID varchar(256) := current_setting('custom.batch_id'); -- バッチID
P_GYOMU_DATE varchar(8) := current_setting('custom.gyomu_date'); -- 業務日付
/* 変数 */
V_PROC_CNT_CMT numeric := 0; -- 処理件数
exitCd INTEGER = 0;
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '検討商品マスタ取込 登録開始');
-- 地区便_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 削除開始');
TRUNCATE TABLE BX_M_080_TYUKO_SHO_CHIKUB_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 削除エラー');
RAISE;
END;
-- 地区便_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 登録開始');
INSERT INTO BX_M_080_TYUKO_SHO_CHIKUB_JOHO (
shuhnno,
hcchukbn,
chkcd,
shuhncd,
bnkbn,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
tkbishuhnkbn,
tkbioyfmcd,
brshuhncd,
hcchustrtb,
hcchustpstrtb,
hcchustpendb,
trkshb,
trkshkbn,
shuhntrkshrasnkbn,
hcchushrtnikbn,
mnmmhcchubsu,
mxmmhcchubsu,
plucd,
plucdhnkuumkbn,
poskbn,
knrnnshuhncd,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
hcchukbn,
chkcd,
shuhncd,
bnkbn,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
tkbishuhnkbn,
NULLIF(tkbioyfmcd, ''),
NULLIF(brshuhncd, ''),
NULLIF(hcchustrtb, ''),
NULLIF(hcchustpstrtb, ''),
NULLIF(hcchustpendb, ''),
NULLIF(trkshb, ''),
NULLIF(trkshkbn, ''),
NULLIF(shuhntrkshrasnkbn, ''),
hcchushrtnikbn,
mnmmhcchubsu,
mxmmhcchubsu,
NULLIF(plucd, ''),
plucdhnkuumkbn,
poskbn,
NULLIF(knrnnshuhncd, ''),
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_050_KSHO_CHIKU_BIN_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区便情報 登録エラー');
RAISE;
END;
-- 地区_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 削除開始');
TRUNCATE TABLE BX_M_081_TYUKO_SHO_CHIKU_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 削除エラー');
RAISE;
END;
-- 地区_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 登録開始');
INSERT INTO BX_M_081_TYUKO_SHO_CHIKU_JOHO (
shuhnno,
hcchukbn,
chkcd,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
cmumkbn,
cminfrmtn,
grpkbn,
shuhnstsmi1,
shuhnstsmi2,
shuhnstsmi3,
shuhnstsmi4,
shuhnstsmi5,
shuhnstsmi6,
dsgnpckghnkuarflg,
shuhnstsmipckghnkuyu,
irs,
caseirs,
setirs,
brshuhncd,
setbrkbn,
zikshbninfrmtnkbn,
hnpnkknstrtb,
hnpnkknendb,
shuhncmmnt,
bik,
nrrts,
tsjgnk,
gnkhkkkn,
gnkhkkkngnk,
shryutrhkskcd,
mkrcd,
brndcd,
linkyukukbn,
shuhnturkyudepotcd,
hssipttrn,
sshkehhkbn,
sshkeshuhncd,
sshkeshuhnnmknj,
shuhnhnkurasnkbn,
kntgiturkb,
shuhnrank,
hyjnfaceumkbn,
nwshuhnflg,
newkbn,
nryrkbn,
inptkbn,
bikhnkukbn,
shkiturkb,
hssshuhnflg,
dphngzuhishnflg,
shuhnsts,
shmkgn,
hnbikgn,
nuhnkgn,
sitiziksu,
mrktngnewshkkub,
mrktngnewsgsu,
mrktngnewsksikbn,
mrktngnewshknb,
dichuhyjkbn,
hcchustpkbn,
hnnmssg,
ffhnbikgntm,
ffhnbikgntshgiflg,
untgrupcd,
shrkktishid,
shrshunnshid,
shunnjkykbn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
hcchukbn,
chkcd,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
cmumkbn,
NULLIF(cminfrmtn, ''),
NULLIF(grpkbn, ''),
NULLIF(shuhnstsmi1, ''),
NULLIF(shuhnstsmi2, ''),
NULLIF(shuhnstsmi3, ''),
NULLIF(shuhnstsmi4, ''),
NULLIF(shuhnstsmi5, ''),
NULLIF(shuhnstsmi6, ''),
dsgnpckghnkuarflg,
NULLIF(shuhnstsmipckghnkuyu, ''),
irs,
caseirs,
setirs,
NULLIF(brshuhncd, ''),
setbrkbn,
NULLIF(zikshbninfrmtnkbn, ''),
NULLIF(hnpnkknstrtb, ''),
NULLIF(hnpnkknendb, ''),
NULLIF(shuhncmmnt, ''),
bik,
nrrts,
tsjgnk,
NULLIF(gnkhkkkn, ''),
gnkhkkkngnk,
NULLIF(shryutrhkskcd, ''),
mkrcd,
brndcd,
linkyukukbn,
NULLIF(shuhnturkyudepotcd, ''),
NULLIF(hssipttrn, ''),
NULLIF(sshkehhkbn, ''),
NULLIF(sshkeshuhncd, ''),
NULLIF(sshkeshuhnnmknj, ''),
NULLIF(shuhnhnkurasnkbn, ''),
NULLIF(kntgiturkb, ''),
NULLIF(shuhnrank, ''),
hyjnfaceumkbn,
nwshuhnflg,
newkbn,
nryrkbn,
inptkbn,
bikhnkukbn,
NULLIF(shkiturkb, ''),
hssshuhnflg,
dphngzuhishnflg,
shuhnsts,
shmkgn,
hnbikgn,
nuhnkgn,
sitiziksu,
NULLIF(mrktngnewshkkub, ''),
mrktngnewsgsu,
mrktngnewsksikbn,
NULLIF(mrktngnewshknb, ''),
dichuhyjkbn,
hcchustpkbn,
NULLIF(hnnmssg, ''),
ffhnbikgntm,
ffhnbikgntshgiflg,
NULLIF(untgrupcd, ''),
NULLIF(shrkktishid, ''),
NULLIF(shrshunnshid, ''),
NULLIF(shunnjkykbn, ''),
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM BX_M_051_KSHO_CHIKU_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE
AND CAST(shuhnsts AS integer) >= 20;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地区情報 登録エラー');
RAISE;
END;
-- 商品情報_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 削除開始');
TRUNCATE TABLE BX_M_083_TYUKO_SHO_SHO_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 削除エラー');
RAISE;
END;
-- 商品情報_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 登録開始');
INSERT INTO BX_M_083_TYUKO_SHO_SHO_JOHO (
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
shuhnnmkn,
shuhnnmknj,
shuhnnmryksyu,
tnpyushuhnnmknj,
tnpyushuhnnmkn,
shuhnkkkhnkk,
facekkrdibnricd,
facekkrchubnricd,
facekkrshubnricd,
mkrcd,
brndcd,
shuhnsizeokyk,
shuhnsizehb,
shuhnsizetks,
shuhnjry,
shuhnbnri,
hcchukbn,
shuhnsts,
hpyushuhnstsmi,
ntsry,
co2histryu,
mnzishuhnkbn,
urbchnrtssu,
urbchnrtsryu,
tnpzksibnricd,
tnpzksicd,
tnpzksikmkcd,
shuhnstsmi1,
shuhnstsmi2,
shuhnstsmi3,
shuhnstsmi4,
shuhnstsmi5,
shuhnstsmi6,
shuhnstsmijznhcchuyu,
shuhnkntrn,
inptyshkbn,
inptkbn,
ffplutshkbn,
nffrnduyucmmnt,
oldshuhnno,
tnbik,
tngnk,
nrrts,
poskbn,
plucd,
kgnzirtstshflg,
gnkhkkkn,
gnkhkkkngnk,
irs,
caseirs,
tkbishuhnkbn,
tkbioyfmcd,
knrnnshuhncd,
cmumkbn,
cminfrmtn,
grpkbn,
shmkgn,
hnbikgn,
nuhnkgn,
hnnmssg,
shrkktishid,
shrshunnshid,
shunnjkykbn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
NULLIF(shuhnnmkn, ''),
NULLIF(shuhnnmknj, ''),
NULLIF(shuhnnmryksyu, ''),
NULLIF(tnpyushuhnnmknj, ''),
NULLIF(tnpyushuhnnmkn, ''),
NULLIF(shuhnkkkhnkk, ''),
NULLIF(facekkrdibnricd, ''),
NULLIF(facekkrchubnricd, ''),
NULLIF(facekkrshubnricd, ''),
mkrcd,
brndcd,
shuhnsizeokyk,
shuhnsizehb,
shuhnsizetks,
shuhnjry,
NULLIF(shuhnbnri, ''),
hcchukbn,
shuhnsts,
NULLIF(hpyushuhnstsmi, ''),
ntsry,
co2histryu,
mnzishuhnkbn,
urbchnrtssu,
urbchnrtsryu,
NULLIF(tnpzksibnricd, ''),
NULLIF(tnpzksicd, ''),
NULLIF(tnpzksikmkcd, ''),
NULLIF(shuhnstsmi1, ''),
NULLIF(shuhnstsmi2, ''),
NULLIF(shuhnstsmi3, ''),
NULLIF(shuhnstsmi4, ''),
NULLIF(shuhnstsmi5, ''),
NULLIF(shuhnstsmi6, ''),
NULLIF(shuhnstsmijznhcchuyu, ''),
NULLIF(shuhnkntrn, ''),
inptyshkbn,
inptkbn,
ffplutshkbn,
NULLIF(nffrnduyucmmnt, ''),
oldshuhnno,
tnbik,
tngnk,
nrrts,
poskbn,
NULLIF(plucd, ''),
kgnzirtstshflg,
NULLIF(gnkhkkkn, ''),
gnkhkkkngnk,
irs,
caseirs,
tkbishuhnkbn,
NULLIF(tkbioyfmcd, ''),
NULLIF(knrnnshuhncd, ''),
cmumkbn,
cminfrmtn,NULLIF(cminfrmtn, ''),
NULLIF(grpkbn, ''),
shmkgn,
hnbikgn,
nuhnkgn,
NULLIF(hnnmssg, ''),
NULLIF(shrkktishid, ''),
NULLIF(shrshunnshid, ''),
NULLIF(shunnjkykbn, ''),
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_053_KSHO_SHO_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE
AND CAST(shuhnsts AS integer) >= '20';
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品情報 登録エラー');
RAISE;
END;
-- 商品便別_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 削除開始');
TRUNCATE TABLE BX_M_082_TYUKO_SHO_BIN_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 削除エラー');
RAISE;
END;
-- 商品便別_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 登録開始');
INSERT INTO BX_M_082_TYUKO_SHO_BIN_JOHO (
shuhnno,
shuhncd,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
gndrcd,
hnbn,
gnbn,
gmnhyjzyn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
shuhncd,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
NULLIF(gndrcd, ''),
NULLIF(hnbn, ''),
NULLIF(gnbn, ''),
gmnhyjzyn,
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_052_KSHO_SHO_BIN_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ商品便別情報 登録エラー');
RAISE;
END;
-- 地域限定_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 削除開始');
TRUNCATE TABLE BX_M_079_TYUKO_SHO_CHIKIG_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 削除エラー');
RAISE;
END;
-- 地域限定_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 登録開始');
INSERT INTO BX_M_079_TYUKO_SHO_CHIKIG_JOHO (
shuhnno,
hcchukbn,
chkcd,
prefcd,
gyumyuprefkkchbcd,
shkchsncd3kt,
applystrtb,
applyendb,
turkjshrmode,
shrkbn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
hcchukbn,
chkcd,
prefcd,
gyumyuprefkkchbcd,
shkchsncd3kt,
applystrtb,
applyendb,
turkjshrmode,
shrkbn,
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_049_KSHO_CHIK_GNTI_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ地域限定情報 登録エラー');
RAISE;
END;
-- PLU_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 削除開始');
TRUNCATE TABLE BX_M_085_TYUKO_SHO_PLU_HNK_BF;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 削除エラー');
RAISE;
END;
-- PLU_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 登録開始');
INSERT INTO BX_M_085_TYUKO_SHO_PLU_HNK_BF (
shuhnno,
hcchukbn,
chkcd,
hnkubfrshuhncd,
bnkbn,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
hnkubfrplucd,
hnkuaftrshuhncd,
hcchustpkbn,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
hcchukbn,
chkcd,
hnkubfrshuhncd,
bnkbn,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
NULLIF(hnkubfrplucd, ''),
NULLIF(hnkuaftrshuhncd, ''),
hcchustpkbn,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_055_KSHO_PLU_HNK_BF
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品PLU変更前マスタ 登録エラー');
RAISE;
END;
-- 酒_切捨
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 削除開始');
TRUNCATE TABLE BX_M_084_TYUKO_SHO_SAKE_JOHO;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 削除終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 削除エラー');
RAISE;
END;
-- 酒_登録
BEGIN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 登録開始');
INSERT INTO BX_M_084_TYUKO_SHO_SAKE_JOHO (
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
alchldsu,
yry,
bkghrtskbn,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
alchldsu,
yry,
NULLIF(bkghrtskbn, ''),
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_054_KSHO_SAKE_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE;
GET DIAGNOSTICS V_PROC_CNT_CMT = ROW_COUNT;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 登録件数: ' || V_PROC_CNT_CMT || '件');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 登録終了');
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '当日有効商品マスタ酒情報 登録エラー');
RAISE;
END;
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '正常終了 : ' || C_JOB_TITLE);
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_INFO, C_FUNC_ID, P_BATCH_ID, '');
RAISE NOTICE 'exitCd=%', exitCd;
EXCEPTION
WHEN OTHERS THEN
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, 'PL/PGSQL ERROR:');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, 'SQLSTATE =[' || SQLSTATE || '] [' || SQLERRM || ']');
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '異常終了 : ' || C_JOB_TITLE);
CALL OUTPUT_LOG_MESSAGE_B_BX_OLT01_020(C_LOG_LEVEL_ERROR, C_FUNC_ID, P_BATCH_ID, '');
exitCd := 9;
RAISE NOTICE 'exitCd=%', exitCd;
RAISE;
END $$ LANGUAGE plpgsql;报错:
2025/10/18 13:35:38 INFO ================================================
2025/10/18 13:35:38 INFO ----- Log Message Start -----
2025/10/18 13:35:38 INFO BATCH NAME = 検討商品マスタ取込
2025/10/18 13:35:38 INFO BATCH ID = B_BX_OLT01_020
2025/10/18 13:35:38 INFO 業務日付 = 20250904
exitCd=-1
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.450038+09 INFO OTL B_BX_OLT01_020 検討商品マスタ取込 登録開始
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.450252+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区便情報 削除開始
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.452166+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区便情報 削除終了
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.452347+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区便情報 登録開始
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.455285+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区便情報 登録件数: 3件
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.455455+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区便情報 登録終了
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.455648+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区情報 削除開始
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.457479+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区情報 削除終了
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.457605+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区情報 登録開始
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.45991+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区情報 登録件数: 3件
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.460032+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ地区情報 登録終了
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.460109+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ商品情報 削除開始
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.461652+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ商品情報 削除終了
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.461766+09 INFO OTL B_BX_OLT01_020 当日有効商品マスタ商品情報 登録開始
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.462309+09 ERROR OTL B_BX_OLT01_020 当日有効商品マスタ商品情報 登録エラー
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.463678+09 ERROR OTL B_BX_OLT01_020 PL/PGSQL ERROR:
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.463809+09 ERROR OTL B_BX_OLT01_020 SQLSTATE =[42601] [INSERT has more expressions than target columns]
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.463917+09 ERROR OTL B_BX_OLT01_020 異常終了 : 検討商品マスタ取込
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: 2025-10-18 13:35:38.464006+09 ERROR OTL B_BX_OLT01_020
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: NOTICE: exitCd=9
psql:/home/bx01/git/bx-db-server/program/svol01/bj/bin/sh/sql/bx_ins_B_BX_OLT01_020.sql:844: ERROR: INSERT has more expressions than target columns
LINE 155: 0
^
QUERY: INSERT INTO BX_M_083_TYUKO_SHO_SHO_JOHO (
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
shuhnnmkn,
shuhnnmknj,
shuhnnmryksyu,
tnpyushuhnnmknj,
tnpyushuhnnmkn,
shuhnkkkhnkk,
facekkrdibnricd,
facekkrchubnricd,
facekkrshubnricd,
mkrcd,
brndcd,
shuhnsizeokyk,
shuhnsizehb,
shuhnsizetks,
shuhnjry,
shuhnbnri,
hcchukbn,
shuhnsts,
hpyushuhnstsmi,
ntsry,
co2histryu,
mnzishuhnkbn,
urbchnrtssu,
urbchnrtsryu,
tnpzksibnricd,
tnpzksicd,
tnpzksikmkcd,
shuhnstsmi1,
shuhnstsmi2,
shuhnstsmi3,
shuhnstsmi4,
shuhnstsmi5,
shuhnstsmi6,
shuhnstsmijznhcchuyu,
shuhnkntrn,
inptyshkbn,
inptkbn,
ffplutshkbn,
nffrnduyucmmnt,
oldshuhnno,
tnbik,
tngnk,
nrrts,
poskbn,
plucd,
kgnzirtstshflg,
gnkhkkkn,
gnkhkkkngnk,
irs,
caseirs,
tkbishuhnkbn,
tkbioyfmcd,
knrnnshuhncd,
cmumkbn,
cminfrmtn,
grpkbn,
shmkgn,
hnbikgn,
nuhnkgn,
hnnmssg,
shrkktishid,
shrshunnshid,
shunnjkykbn,
tnphishnsmflg,
turkntj,
turkshid,
turkprgrmid,
updtntj,
updtshid,
updtprgrmid,
updtkisu
)
SELECT
shuhnno,
applystrtb,
applyendb,
shrkbn,
turkjshrmode,
NULLIF(shuhnnmkn, ''),
NULLIF(shuhnnmknj, ''),
NULLIF(shuhnnmryksyu, ''),
NULLIF(tnpyushuhnnmknj, ''),
NULLIF(tnpyushuhnnmkn, ''),
NULLIF(shuhnkkkhnkk, ''),
NULLIF(facekkrdibnricd, ''),
NULLIF(facekkrchubnricd, ''),
NULLIF(facekkrshubnricd, ''),
mkrcd,
brndcd,
shuhnsizeokyk,
shuhnsizehb,
shuhnsizetks,
shuhnjry,
NULLIF(shuhnbnri, ''),
hcchukbn,
shuhnsts,
NULLIF(hpyushuhnstsmi, ''),
ntsry,
co2histryu,
mnzishuhnkbn,
urbchnrtssu,
urbchnrtsryu,
NULLIF(tnpzksibnricd, ''),
NULLIF(tnpzksicd, ''),
NULLIF(tnpzksikmkcd, ''),
NULLIF(shuhnstsmi1, ''),
NULLIF(shuhnstsmi2, ''),
NULLIF(shuhnstsmi3, ''),
NULLIF(shuhnstsmi4, ''),
NULLIF(shuhnstsmi5, ''),
NULLIF(shuhnstsmi6, ''),
NULLIF(shuhnstsmijznhcchuyu, ''),
NULLIF(shuhnkntrn, ''),
inptyshkbn,
inptkbn,
ffplutshkbn,
NULLIF(nffrnduyucmmnt, ''),
oldshuhnno,
tnbik,
tngnk,
nrrts,
poskbn,
NULLIF(plucd, ''),
kgnzirtstshflg,
NULLIF(gnkhkkkn, ''),
gnkhkkkngnk,
irs,
caseirs,
tkbishuhnkbn,
NULLIF(tkbioyfmcd, ''),
NULLIF(knrnnshuhncd, ''),
cmumkbn,
cminfrmtn,NULLIF(cminfrmtn, ''),
NULLIF(grpkbn, ''),
shmkgn,
hnbikgn,
nuhnkgn,
NULLIF(hnnmssg, ''),
NULLIF(shrkktishid, ''),
NULLIF(shrshunnshid, ''),
NULLIF(shunnjkykbn, ''),
tnphishnsmflg,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
CLOCK_TIMESTAMP(),
P_BATCH_ID,
P_BATCH_ID,
0
FROM
BX_M_053_KSHO_SHO_JOHO
WHERE
shrkbn IN ('01', '02')
AND applystrtb <= P_GYOMU_DATE
AND applyendb >= P_GYOMU_DATE
AND CAST(shuhnsts AS integer) >= '20'
CONTEXT: PL/pgSQL function inline_code_block line 337 at SQL statement
2025/10/18 13:35:38 ERROR プログラムが異常終了しました。
2025/10/18 13:35:38 INFO ----- Log Message End -----
最新发布