#!/bin/bash
##############################################################
# システム名    ：eo顧客基幹システム
#
# サブシステム名：請求収納
#
# シェル名      ：クレジットオーソリ決済結果受信（JCN)リスト作成
#
# 機能          ：受信したクレジットオーソリ決済結果受信（JCN)からオーソリ結果がNGのレコードを抽出し、
#               クレジットオーソリ決済結果受信（JCN)リスト（CHLST10601）を作成し、ダウンロード管理と電子ファイル管理に登録する。
#
#
# コマンド形式  ：EO60D0710J0.sh
#
# 実行環境      ：.../app/shl
#
# 終了ステータス：ゼロ以外異常
#
# 特記事項      ：特になし
#
# 変更履歴      ：変更日      変更者       障害／仕様変更No.
# v72.00.00     2024/11/06    GDC)ml.alcantara 【ANK-4606-00-00】代行オーソリ結果の洗替反映対応
#
##############################################################

##############################################################
# 環境変数定義
##############################################################

#
#---ツール格納場所
#
G_TOOLSH=.

#
#---環境変数定義Shell呼び出し
#
. EOK010110J0.sh

#
#---ＪＯＢ名
#
JOBNAME=`basename $0 | sed -e "s/\.sh//g"`

#
#---サービス（業務プロセス）
#
SVC=$JOBNAME

#
#---OPD
#
OPD=$1

#
#---運用日付取得
#
if [ "${OPD}" = "" ]; then
   . EOK010310J0.sh "BDATE"
   OPD=${RSLT_OPEDATE}
fi

##############################################################
# 業務処理
##############################################################
sh ${G_TOOLSH}/EOK010210J0.sh CS00025I $JOBNAME

#
#--- クエリ編集(マッチング)
#       p1：ＳＱＬ定義ファイル名
#       p2：バインド変数置換文字
#
EDIT_MATCHING_QUERY()
{
    MATCHING_FILE=$1
    MATCHING_QUERY_WORK=${ULD_WORK_DIR}/${JOBNAME}_MATCH_QUERY.tmp

    cat /dev/null > ${MATCHING_QUERY_WORK}

    # SQL定義ファイルの編集
    if [ ! -r ${MATCHING_FILE} ]
    then
        sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${MATCHING_FILE}:rc=$rc) "
        echo $JOBNAME " File is nonexist(${MATCHING_FILE}:rc=$rc) "
        exit ${G_RTN_ERROR}
    fi

    # バインド変数を置き換える
    cat ${MATCHING_FILE} > ${MATCHING_QUERY_WORK}

    for bind in $2
    do
        bind_escape=`echo $bind | sed "s/\//\\\\\\\\\//g"`
        sed -i, -e 0,/#FILE#/s/#FILE#/$bind_escape/ ${MATCHING_QUERY_WORK}
    done

    export MATCHING_QUERY_WORK
}

#
#--- マッチング処理
#      p1：出力ファイルパス
#      p2：マッチングクエリファイルパス
#
EXEC_MATCHING()
{
    # 出力ファイルの初期化
    OUTFILE=$1
    cat /dev/null > ${OUTFILE}
    rc=$?
    if [ $rc -ne 0 ]
    then
        sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File cat error(${OUTFILE}:rc=$rc) "
        echo $JOBNAME " File cat error(${OUTFILE}:rc=$rc) "
        exit ${G_RTN_ERROR}
    fi

    # マッチング実行
    export ZTLOUTFILE=${OUTFILE}
    ${G_TOOLSH}/util/bin/ZTLMAT01 $2
    rc=$?
    if [ $rc -ne 0 ]
    then
        sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " matching error($2:rc=$rc) "
        echo $JOBNAME " matching error($2:rc=$rc) "
        exit ${G_RTN_ERROR}
    fi
}

#
#--- クエリ編集(アンロード)
#       p1：ＳＱＬ定義ファイル名
#       p2：バインド変数置換文字
EDIT_ULD_QUERY()
{
    SQL_FILE=$1
    SQL_WORK_FILE=${ULD_WORK_DIR}/${JOBNAME}_QUERY.tmp
    cat /dev/null > ${SQL_WORK_FILE}

    # SQL定義ファイルの編集
    if [ ! -r ${SQL_FILE} ]
    then
        sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${SQL_FILE}:rc=$rc) "
        echo $JOBNAME " File is nonexist(${SQL_FILE}:rc=$rc) "
        exit ${G_RTN_ERROR}
    fi

    # バインド変数を置き換える
    cat ${SQL_FILE} > ${SQL_WORK_FILE}

    for bind in $2
    do
        sed -i, -e 0,/?/s/?/"'"$bind"'"/ ${SQL_WORK_FILE}
    done

    export SQL_WORK_FILE
}

#
#--- アンロード関数
#       p1：テーブル名／クエリファイル名
#       p2：出力ファイル名
EXEC_UNLOAD()
{
    # 出力ファイルの初期化
    cat /dev/null > $2
    rc=$?
    if [ $rc -ne 0 ]
    then
        sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File cat error($2:rc=$rc) "
        echo $JOBNAME " File cat error($2:rc=$rc) "
        exit ${G_RTN_ERROR}
    fi

    sh ${G_TOOLSH}/EOKULD02.sh $1 $2

    rc=$?
    if [ $rc -ne 0 ]
    then
        sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " unload error($2:rc=$rc) "
        echo $JOBNAME " unload error($2:rc=$rc) "
        exit ${G_RTN_ERROR}
    fi
}

#
#--- ファイル定義
#
# クレジットオーソリ決済結果受信（JCN)ファイル
INPUT_CHIFE102=${MID_DIR_CH}/CHIFE102.csv
INPUT_CHIFE102_TEMP1=${MID_DIR_CH}/${JOBNAME}_CHIFE102_TEMP1.csv
INPUT_CHIFE102_TEMP2=${MID_DIR_CH}/${JOBNAME}_CHIFE102_TEMP2.csv
# クレジットカードアンロードファイル
FILE_KK0521=${MID_DIR_CH}/${JOBNAME}_KK0521.csv
FILE_KK0521_CUR=${MID_DIR_CH}/${JOBNAME}_KK0521_CUR.csv
# 請求契約共通アンロードファイル
FILE_KK0491=${MID_DIR_CC}/CCIFM030001.csv
# 請求契約共通アンロードソートファイル
FILE_KK0491_SORT=${MID_DIR_CH}/${JOBNAME}_KK0491_SORT.csv
# クレジットオーソリ決済結果受信（JCN)対象ファイル
FILE_CHIFE102_TG=${MID_DIR_CH}/${JOBNAME}_CHIFE102_TG.csv
# 一時ワークファイル
FILE_CHIFM480_TEMP1=${MID_DIR_CH}/${JOBNAME}_CHIFE102_TG_TMP1.csv
FILE_CHIFM480_TEMP2=${MID_DIR_CH}/${JOBNAME}_CHIFE102_TG_TMP2.csv
# クレジットオーソリ決済結果受信（JCN)リストワークファイル
FILE_CHIFM480=${MID_DIR_CH}/CHIFM480.csv
# SQLファイル定義
SQLFILE_KK_U_KK0521_09=${SQL_DIR}/KK_U_KK0521_09.sql
SQLFILE_KK_U_ZM0321_01=${SQL_DIR}/KK_U_ZM0321_01.sql
# マッチングファイル定義
# 請求契約マッチング
DEFFILE_CH_CM_0298=${G_TOOLSH}/util/def/CH_CM_0298.def
# 預かりIDマッチング
DEFFILE_CH_CM_0299=${G_TOOLSH}/util/def/CH_CM_0299.def

#
#--- クレジットオーソリ決済結果受信（JCN)ファイル確認
#
if [ ! -r $INPUT_CHIFE102 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist($INPUT_CHIFE102) "
    echo $JOBNAME " File is nonexist($INPUT_CHIFE102) "
    exit ${G_RTN_ERROR}
fi

#
#--- 出力ファイルの初期化を行う
#
cat /dev/null > ${INPUT_CHIFE102_TEMP1}
cat /dev/null > ${INPUT_CHIFE102_TEMP2}
cat /dev/null > ${FILE_KK0521}
cat /dev/null > ${FILE_KK0521_CUR}
cat /dev/null > ${FILE_KK0491_SORT}
cat /dev/null > ${FILE_CHIFE102_TG}
cat /dev/null > ${FILE_CHIFM480_TEMP1}
cat /dev/null > ${FILE_CHIFM480_TEMP2}
cat /dev/null > ${FILE_CHIFM480}

#
#--- クレジットオーソリ決済結果受信（JCN)ファイルの複製
#
cp -fp ${INPUT_CHIFE102} ${INPUT_CHIFE102_TEMP1}

# 最初行(ヘッダー)を削除する。
sed -i -e '1d' ${INPUT_CHIFE102_TEMP1}

# 最終行(フッター)を削除する。
sed -i -e '$d' ${INPUT_CHIFE102_TEMP1}

# UTF8に変換及び、改行コードをLFにする。
nkf -x -w -Lu < ${INPUT_CHIFE102_TEMP1} > ${INPUT_CHIFE102_TEMP2}

#
#--- 入力ファイルにダブルクォーテーションを付加
#
sed -i -e "s/,/\",\"/g" ${INPUT_CHIFE102_TEMP2}
sed -i -e "s/^/\"/" ${INPUT_CHIFE102_TEMP2}
sed -i -e "s/$/\"/" ${INPUT_CHIFE102_TEMP2}

#
#--- クレジットオーソリ決済結果受信（JCN)対象ファイル
# 抽出条件: オーソリ結果='1' AND サイトID='4211' AND オーソリ取得結果サイン NOT IN ('000', 'NSD')
#
bsortex -copy -record recform=txtcsv \
    -input file=${INPUT_CHIFE102_TEMP2} reclen=510 \
        include="17.1asc.eq.'1'.and.1.4asc.eq.'4211'.and.16.3asc.ne.'000'.and.16.3asc.ne.'NSD'" \
    -output file=${FILE_CHIFE102_TG}

rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " SORT Error($SVC sort:rc=$rc) "
    echo $JOBNAME " SORT Error($SVC sort:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#
#--- クレジットカードのアンロードを行う
#
EDIT_ULD_QUERY ${SQLFILE_KK_U_KK0521_09}
EXEC_UNLOAD ${SQL_WORK_FILE} ${FILE_KK0521}

#
#--- KK0521のカレントデータ取得
#
bsortex -sort key="0.12asc,2.17asc" -record recform=txtcsv -input reclen=54 < ${FILE_KK0521} \
  | bsortex -merge key="0.12asc" -record recform=txtcsv -input reclen=54 -summary suppress last \
  | bsortex -sort key="1.16asc" -record recform=txtcsv -input reclen=54 -output file=${FILE_KK0521_CUR}

rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " SORT Error($SVC sort:rc=$rc) "
    echo $JOBNAME " SORT Error($SVC sort:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#
#--- 処理日の取得
# 業務パラメータ（KK_YUKO_YM_SNST_PRM）にて指定された月数分運用日を進めた月の月初（01日）を取得する。
#
ZM0321_OUTFILE=${MID_DIR_CH}/${JOBNAME}_ZM0321_OUT.csv
WORK_PARAM_ID=KK_YUKO_YM_SNST_PRM
EDIT_ULD_QUERY ${SQLFILE_KK_U_ZM0321_01} "${OPD} ${WORK_PARAM_ID} ${OPD} ${OPD}"
EXEC_UNLOAD ${SQL_WORK_FILE} ${ZM0321_OUTFILE}

read EXECDATE_DQ < ${ZM0321_OUTFILE}

# ダブルクォーテーション削除
PROC_OPEDATE=`echo ${EXECDATE_DQ} | sed -e 's/"//g'`

#
#--- KK0491のカレントデータ取得
# 抽出条件: 予約適用年月日<=処理日
#
bsortex -sort key="0.10asc,11.8asc,1.17asc" -record recform=txtcsv -input reclen=1274 include="11.8asc.le.'${PROC_OPEDATE}'" < ${FILE_KK0491} \
  | bsortex -merge key="0.10asc" -record recform=txtcsv -input reclen=1274 -summary suppress last \
  | bsortex -sort key="0.10asc" -record recform=txtcsv -input reclen=1274 -output file=${FILE_KK0491_SORT}

rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " SORT Error($SVC sort:rc=$rc) "
    echo $JOBNAME " SORT Error($SVC sort:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#
#--- クレジットカードファイルからデータ抽出を行う(マッチング)
#
EDIT_MATCHING_QUERY ${DEFFILE_CH_CM_0299} "${FILE_CHIFE102_TG} ${FILE_KK0521_CUR}"
EXEC_MATCHING ${FILE_CHIFM480_TEMP1} ${MATCHING_QUERY_WORK}

#
#--- 請求契約ファイルからデータ抽出を行う(マッチング)
#
EDIT_MATCHING_QUERY ${DEFFILE_CH_CM_0298} "${FILE_CHIFM480_TEMP1} ${FILE_KK0491_SORT}"
EXEC_MATCHING ${FILE_CHIFM480_TEMP2} ${MATCHING_QUERY_WORK}

#
#--- ファイル結合後、bsortで預かりID、請求契約番号の昇順にソートする。
#
bsortex -sort key="2.16asc,10.10asc" -record recform=txtcsv \
    -input file=${FILE_CHIFM480_TEMP2} reclen=103 \
    -output file=${FILE_CHIFM480}

rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " SORT Error($SVC sort:rc=$rc) "
    echo $JOBNAME " SORT Error($SVC sort:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#
#---パラメタ定義
#

P1="OPD=$OPD,"
P2="SVCCTL=JBSbatUnitServiceControl,"
P3="JOB=EO60D0710J0,"
P4="IND1=,"
P5="INF1=,"
P6="IND2=,"
P7="INF2=,"
P8="OTD1=,"
P9="OTF1=,"
P10="OTD2=,"
P11="OTF2=,"
P12="TABLENAME=,"
P13="SQLKEY=,"
P14="SQLPARAM=,"
P15="ERRFILE=,"
P16="RECOVERY=,"
P17="BREAKPTN=,"
P18="FREE=${MID_DIR_CH}/CHIFM480.csv;${MID_DIR_CH}/"
PARA="$P1$P2$P3$P4$P5$P6$P7$P8$P9$P10$P11$P12$P13$P14$P15$P16$P17$P18"

sh ${G_TOOLSH}/EOK010210J0.sh CS00027I $JOBNAME

#
#---ＡＰＬ起動
#

java ${JAVA_OPTION} -jar ${JAR_DIR}/koptBatch.jar $PARA

rc=$?
ERR_FLG=0
if [ $rc -ne 0 ]
then
   if [ $rc -ne 4 ]
   then
       if [ $rc -ne 8 ]
       then
           if [ $rc -ne 127 ]
           then
              sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " PROGRAM Error($SVC program:rc=$rc) "
              echo $JOBNAME " PROGRAM Error($SVC program:rc=$rc) "
              exit ${G_RTN_ERROR}
           fi
       fi
    fi
    ERR_FLG=1
fi

exit_rc=$rc

#
#--- 一時ファイルの削除を行う
#
rm -f ${ZM0321_OUTFILE}
rm -f ${INPUT_CHIFE102_TEMP1}
rm -f ${INPUT_CHIFE102_TEMP2}
rm -f ${FILE_KK0521}
rm -f ${FILE_KK0521_CUR}
rm -f ${FILE_KK0491_SORT}
rm -f ${FILE_CHIFE102_TG}
rm -f ${FILE_CHIFM480_TEMP1}
rm -f ${FILE_CHIFM480_TEMP2}
rm -f ${FILE_CHIFM480}
rm -f ${MID_DIR_CH}/CHLST10601_*.csv
#
#--- ジョブの終了メッセージを出力する
#
sh ${G_TOOLSH}/EOK010210J0.sh CS00028I $JOBNAME
sh ${G_TOOLSH}/EOK010210J0.sh CS00026I $JOBNAME

exit $exit_rc