#!/bin/bash
##############################################################
# システム名    ：eo顧客基幹システム
#
# サブシステム名：顧客管理
#
# シェル名      ：ＧＣＲＭサービス契約者名寄せリスト出力
#
# 機能          ：ＧＣＲＭサービス契約者名寄せ結果リストとお客様、サービス契約のスキーマで突合せを行う。
#ＧＣＲＭサービス契約者名寄せ結果リストはデータダウンロード画面から取出可能とする。
#
# コマンド形式  ：EO2HN0111J0.sh
#
# 実行環境      ：.../app/shl
#
# 終了ステータス：ゼロ以外異常
#
# 特記事項      ：特になし
#
# 変更履歴      ：変更日      変更者       障害／仕様変更No.
# v54.00.00       2021/08/03  FJ)張本      【ANK-4089-00-00】GCRMリスト改修
#
##############################################################

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

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

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

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

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

#
#---OPD
#
OPD=$1

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

#
#---業務で必要な変数定義
#
#xxx=xxxxxxx
##############################################################
# 業務処理
##############################################################
sh ${G_TOOLSH}/EOK010210J0.sh CS00025I $JOBNAME

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

P1="OPD=$OPD,"
P2="SVCCTL=JBSbatUnitServiceControl,"
P3="JOB=EO2HN0111J0,"
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_KK}/"
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

#
#--- クエリ編集（マッチング）
#       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}
    sed -i -e s@'${OPD}'@${OPD}@g ${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
}

#
#--- サブルーチン（UNLOAD）
#
UNLOAD()
{
	sh ${G_TOOLSH}/EOKULD02.sh $1 $2 $JOBNAME
	rc=$?
	if [ $rc -ne 0 ]
	then
	    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " UNLOAD Error($SVC unload:rc=$rc) " 
	    echo $JOBNAME " UNLOAD Error($SVC unload:rc=$rc) "
	    exit ${G_RTN_ERROR}
	fi
}

#
#--- ファイル定義
#
# お客様カレント
SQLFILE_CK0011=${SQL_DIR}/KK_U_CK0011_22.sql
SQL_TMP_CK0011=${ULD_WORK_DIR}/KK_U_CK0011_22.${JOBNAME}.tmp.sql
SQL_OUT_CK0011=${MID_DIR_KK}/KKIFM900.${JOBNAME}.csv

# コード名称（契約者タイプ）
SQLFILE_ZM0171=${SQL_DIR}/KK_U_ZM0171_07.sql
SQL_OUT_ZM0171=${ULD_WORK_DIR}/KK_U_ZM0171_07.${JOBNAME}.csv.1
UNIQ_OUT_ZM0171=${ULD_WORK_DIR}/KK_U_ZM0171_07.${JOBNAME}.csv.2

# 料金グループ
SQLFILE_KK0781=${SQL_DIR}/KK_U_KK0781_01.sql
SQL_OUT_KK0781=${ULD_WORK_DIR}/KK_U_KK0781_01.${JOBNAME}.csv.1
UNIQ_OUT_KK0781=${ULD_WORK_DIR}/KK_U_KK0781_01.${JOBNAME}.csv.2

#--- 入力ファイルがない場合、後続処理は実行せず終了します。
RESULT_FILE=`find ${MID_DIR_KK}/KKIFM899001_*.csv | tail -1`

if [ -z ${RESULT_FILE} ]
then
    exit ${G_RTN_NORMAL}
fi

#
#--- 各ファイルの存在チェックを行う
#
if [ ! -r $SQLFILE_ZM0171 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist($SQLFILE_ZM0171) "
    echo $JOBNAME " File is nonexist($SQLFILE_ZM0171) "
    exit ${G_RTN_ERROR}
fi
if [ ! -r $SQLFILE_KK0781 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist($SQLFILE_KK0781) "
    echo $JOBNAME " File is nonexist($SQLFILE_KK0781) "
    exit ${G_RTN_ERROR}
fi
if [ ! -r $SQLFILE_CK0011 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist($SQLFILE_CK0011) "
    echo $JOBNAME " File is nonexist($SQLFILE_CK0011) "
    exit ${G_RTN_ERROR}
fi

#
#--- アンロードファイルのクリアを行う
#
cat /dev/null > $SQL_OUT_ZM0171
cat /dev/null > $UNIQ_OUT_ZM0171

cat /dev/null > $SQL_OUT_KK0781
cat /dev/null > $UNIQ_OUT_KK0781

cat /dev/null > $SQL_OUT_CK0011
cat /dev/null > $SQL_TMP_CK0011

#
#--- 運用日埋め込み用SQLファイル作成
#
sed s/ZZZZZ/${RSLT_OPEDATE}/g ${SQLFILE_CK0011} > ${SQL_TMP_CK0011}

#
#--- UNLOAD処理
#
# ZM0171
UNLOAD $SQLFILE_ZM0171 $SQL_OUT_ZM0171

# KK0781
UNLOAD $SQLFILE_KK0781 $SQL_OUT_KK0781

# CK0011
UNLOAD $SQL_TMP_CK0011 $SQL_OUT_CK0011

# ソート処理 & ユニーク

# コード名称（契約者タイプ）
bsortex \
 -sort key="0.12asca,2.10ascr" -record recform=txtcsv \
 -input file=${SQL_OUT_ZM0171} \
        reclen=250 \
        include="1.3asc.eq.'0'" \
 | bsortex \
     -merge key="0.12asc" -record recform=txtcsv \
     -input reclen=250 \
     -summary suppress first \
     -output file=${UNIQ_OUT_ZM0171}
rc=$?
if [ $rc -ne 0 ] 
    then sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " bsortex Error(${UNIQ_OUT_ZM0171}:rc=$rc) " 
    echo $JOBNAME " bsortex Error(${UNIQ_OUT_ZM0171} bsortex:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

# 料金グループ
bsortex \
 -sort key="0.2asc,2.17asc" -record recform=txtcsv \
 -input file=${SQL_OUT_KK0781} \
        reclen=270 \
 | bsortex \
     -merge key="0.2asc" -record recform=txtcsv \
     -input reclen=270 \
     -summary suppress last \
     -output file=${UNIQ_OUT_KK0781}
rc=$?
if [ $rc -ne 0 ] 
    then sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " bsortex Error(${UNIQ_OUT_KK0781}:rc=$rc) " 
    echo $JOBNAME " bsortex Error(${UNIQ_OUT_KK0781} bsortex:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#
#---ファイルのクリア（KKIFM899002_{DLYD_TRN_REQ_NO}.csv）
#
for filename in `find ${MID_DIR_KK} -maxdepth 1 -name "KKIFM899002_*"  | sort`; do

	rm $filename

done


#ANK-4089-00-00 ADD START
# KK0081のカレントデータ取得
KK0081_OUTFILE=${MID_DIR_KK}/KKIFM899002_KK0081.csv
#  KK0081のカレント AND サービス契約ステータス ='100' AND 料金グループコード IN ('02','03','04','51')
bsortex \
   -copy -record recform=txtcsv \
   -input file=${MID_DIR_CC}/CCIFM020002.csv include="2.3asc.eq.'100'.and.(7.2asc.eq.'02'.or.7.2asc.eq.'03'.or.7.2asc.eq.'04'.or.7.2asc.eq.'51')" \
          reclen=${ULD2_REC_LEN_KK0081} \
   -output file=${KK0081_OUTFILE}.match

# KK0081のソート（SYSID）
bsortex -sort key="3.10asc,7.2asc" -record recform=txtcsv \
  -input file=${KK0081_OUTFILE}.match \
  reclen=${ULD2_REC_LEN_KK0081} \
  -output file=${KK0081_OUTFILE}.sort

# KK0081のマージ（SYSID）
bsortex -merge key="3.10asc" -record recform=txtcsv -input file=${KK0081_OUTFILE}.sort \
  reclen=${ULD2_REC_LEN_KK0081} -summary suppress first -output file=${KK0081_OUTFILE}

rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " MERGE Error($SVC merge:rc=$rc) "
    echo $JOBNAME " MERGE Error($SVC merge:rc=$rc) "
    exit ${G_RTN_ERROR}
fi
#ANK-4089-00-00 ADD END

#
#---マージ
#
for filename in ${MID_DIR_KK}/KKIFM899001_*.csv
do

	# ファイル名から「KKIFM899001_」以降の文字列を取得する
	KKIFM899001="${filename}"
	SIZE=`expr length $filename`
	POS=`expr ${SIZE} - 18`
	prefix=`expr substr $filename $POS $SIZE`

	KKIFM899002="${MID_DIR_KK}/KKIFM899002_${prefix}"

	#--- マッチング実行
#ANK-4089-00-00 MOD START
#	EDIT_MATCHING_QUERY ${G_TOOLSH}/util/def/KK_CM_1023.def "${KKIFM899001} ${SQL_OUT_CK0011}"
	EDIT_MATCHING_QUERY ${G_TOOLSH}/util/def/KK_CM_1023.def "${KKIFM899001} ${SQL_OUT_CK0011} ${KK0081_OUTFILE}"
#ANK-4089-00-00 MOD END
	EXEC_MATCHING ${KKIFM899002}.match.1 ${MATCHING_QUERY_WORK}

	#--- マッチング実行
#ANK-4089-00-00 MOD START
#	EDIT_MATCHING_QUERY ${G_TOOLSH}/util/def/KK_CM_1024.def "${KKIFM899002}.match.1 ${MID_DIR_CC}/CCIFM020002.csv ${MID_DIR_CC}/CCIFM020002.csv"
	EDIT_MATCHING_QUERY ${G_TOOLSH}/util/def/KK_CM_1024.def "${KKIFM899001} ${KKIFM899002}.match.1 ${MID_DIR_CC}/CCIFM020002.csv ${MID_DIR_CC}/CCIFM020002.csv ${KK0081_OUTFILE}"
#ANK-4089-00-00 MOD END
	EXEC_MATCHING ${KKIFM899002}.match.2 ${MATCHING_QUERY_WORK}

	#--- マッチング実行
	EDIT_MATCHING_QUERY ${G_TOOLSH}/util/def/KK_CM_1025.def "${KKIFM899002}.match.2 ${UNIQ_OUT_ZM0171} ${UNIQ_OUT_KK0781}"
	EXEC_MATCHING ${KKIFM899002}.match.3 ${MATCHING_QUERY_WORK}

	#
	#--- ソート（通し番号、SYSID、ネット照査日、mineo照査日でソート）
	#
	bsortex -sort key="0.7ascn, 16.10asc, 23.8asc, 24.8asc" -record recform=txtcsv \
	  -input file=${KKIFM899002}.match.3 \
	  reclen="1833" \
	  -output file=${KKIFM899002}.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

	#
	#--- マージ（通し番号、SYSIDでマージする）
	#
	bsortex -merge key="0.7ascn, 16.10asc" -record recform=txtcsv -input file=${KKIFM899002}.sort \
	  reclen="1833" -summary suppress first -output file=${KKIFM899002}

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

done

#
#---ＡＰＬ起動
#

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

#
#--- ジョブの終了メッセージを出力する
#
sh ${G_TOOLSH}/EOK010210J0.sh CS00028I $JOBNAME
sh ${G_TOOLSH}/EOK010210J0.sh CS00026I $JOBNAME

exit $exit_rc