#!/bin/bash
##############################################################
# システム名    ：eo顧客基幹システム
#
# サブシステム名：契約管理
#
# シェル名      ：工事費割賦契約残債一括請求（解約）
#
# 機能          ：工事費割賦契約の初回請求サービス契約が解約されている場合に、
#工事費割賦契約の引継先（同一SYSID・同一請求先のサービス契約）が存在しなければ、残債一括請求とする。
#
#
# コマンド形式  ：EO2H00110J0.sh
#
# 実行環境      ：.../app/shl
#
# 終了ステータス：ゼロ以外異常
#
# 特記事項      ：特になし
#
# 変更履歴      ：変更日      変更者       障害／仕様変更No.
# V37.00.00       2018/04/25  FJ)周藤       【ANK-3383-00-00】標準工事費分割請求（STEP2）
# V37.00.01       2018/05/22  FJ)王         【IT2-2018-0000041】障害対応
# V37.00.02       2018/05/30  FJ)周藤       【IT2-2018-0000042】障害対応
# V45.00.00       2019/05/28  FJ)王         【ANK-3636-00-00】消費増税対応（8%⇒10%）
#
##############################################################

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

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

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

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

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

#
#---OPD
#
if [ "${OPD}" = "" ]; then
   . EOK010310J0.sh "BDATE"
   OPD=${RSLT_OPEDATE}
fi


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

#
#--- アンロード関数
#       p1：テーブル名／クエリファイル名
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
	
	# unload
	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
}

#
#--- マッチングクエリ編集
#       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
}

#
#---ファイル定義
#
KK3131_ALL=${MID_DIR_KK}/${JOBNAME}_KK_U_KK3131_ALL.csv
KK3131_ULD=${MID_DIR_KK}/${JOBNAME}_KK_U_KK3131_ULD.csv
KK0081_ALL=${MID_DIR_KK}/${JOBNAME}_KK_U_KK0081_ALL.csv
KK0081_ULD=${MID_DIR_KK}/${JOBNAME}_KK_U_KK0081_ULD.csv

KK_U_KK3131_05=${SQL_DIR}/KK_U_KK3131_05.sql
KK_U_KK0081_127=${SQL_DIR}/KK_U_KK0081_127.sql

KKIFM801001=${MID_DIR_KK}/KKIFM801001.csv
KKIFM801=${MID_DIR_KK}/KKIFM801.csv

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

if [ ! -r $KK_U_KK0081_127 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist($KK_U_KK0081_127) "
    echo $JOBNAME " File is nonexist($KK_U_KK0081_127) "
    exit ${G_RTN_ERROR}
fi

#
#--- アンロードファイルのクリアを行う
#
cat /dev/null > ${KK3131_ALL}
cat /dev/null > ${KK0081_ALL}

# IT2-2018-0000041 ADD START
rm ${KKIFM801}
cat /dev/null > ${KKIFM801}
# IT2-2018-0000041 ADD END

#
#--- アンロード処理
#
# 工事費割賦契約
EXEC_UNLOAD ${KK_U_KK3131_05} ${KK3131_ALL}

#--- ソート
#- SELECT(reconst)項目は以下
#  0.12 工事費割賦契約番号
#  1.17 世代登録年月日
#  2.12 サービス契約回線内訳番号
#  3.10 初回請求サービス契約番号
#  4.3  割賦契約ステータス
#  5.6  割賦一括請求切替年月
#  6.3  割賦支払い残回数
#  7.6  割賦プランコード
#
#  カレントレコードが割賦契約ステータス(4.3) = '030' 
#  AND 割賦一括請求切替年月(5.6) IS NULL
#  AND 割賦支払残回数(6.3) <> '0'
#  AND 割賦プランコード(7.6) <> 'KP0041'
#  AND 割賦プランコード(7.6) <> 'KP0141'
#
# ANK-3636-00-00 MOD START
#bsortex \
#      -sort key="0.12asc,1.17asc" \
#      -record recform=txtcsv \
#      -input reclen=93 < ${KK3131_ALL} \
#  | bsortex \
#      -merge key="0.12asc" \
#      -record recform=txtcsv \
#      -input reclen=93 \
#      -summary suppress last \
#  | bsortex \
#      -sort key="0.12asc" \
#      -record recform=txtcsv \
#      -input reclen=93 \
#         include="4.3asc.eq.'030'.and.5.6ascb.eq.' '.and.6.3asc.ne.'0'.and.7.6asc.ne.'KP0041'" \
#         reconst="0.12,1.17,2.12,3.10,4.3,5.6,6.3,7.6" \
#      -output file=${KK3131_ULD} 
bsortex \
      -sort key="0.12asc,1.17asc" \
      -record recform=txtcsv \
      -input reclen=93 < ${KK3131_ALL} \
  | bsortex \
      -merge key="0.12asc" \
      -record recform=txtcsv \
      -input reclen=93 \
      -summary suppress last \
  | bsortex \
      -sort key="0.12asc" \
      -record recform=txtcsv \
      -input reclen=93 \
         include="4.3asc.eq.'030'.and.5.6ascb.eq.' '.and.6.3asc.ne.'0'.and.7.6asc.ne.'KP0041'.and.7.6asc.ne.'KP0141'" \
         reconst="0.12,1.17,2.12,3.10,4.3,5.6,6.3,7.6" \
      -output file=${KK3131_ULD} 
# ANK-3636-00-00 MOD END

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

# サービス契約
EXEC_UNLOAD ${KK_U_KK0081_127} ${KK0081_ALL}

#--- ソート
#- SELECT(reconst)項目は以下
#  0.10 サービス契約番号
#  2.10 SYSID
#  3.12 申込明細番号
#  4.8  サービス解約起算年月日
#  5.2  サービス解約理由コード
#  9.8  サービス開始年月日
#
#  カレントレコードがサービス契約ステータス(6.3) = '910'
#  OR サービス契約ステータス(6.3) = '920'
#

# IT2-2018-0000042 MOD START
#bsortex \
#      -sort key="0.10asc,7.8asc,1.17asc" \
#      -record recform=txtcsv \
#      -input reclen=98 < ${KK0081_ALL} \
#         include="8.1asc.eq.'2',7.8asc.gt.' ',7.8asc.le.'${OPD}'" \
#  | bsortex \
#      -merge key="0.10asc" \
#      -record recform=txtcsv \
#      -input reclen=98 \
#      -summary suppress last \
#  | bsortex \
#      -sort key="0.10asc" \
#      -record recform=txtcsv \
#      -input reclen=98 \
#         include="6.3asc.eq.'910'.or.6.3asc.eq.'920'" \
#         reconst="0.10,2.10,3.12,4.8,5.2" \
#      -output file=${KK0081_ULD} 
bsortex \
      -sort key="0.10asc,7.8asc,1.17asc" \
      -record recform=txtcsv \
      -input reclen=109 < ${KK0081_ALL} \
         include="8.1asc.eq.'2',7.8asc.gt.' ',7.8asc.le.'${OPD}'" \
  | bsortex \
      -merge key="0.10asc" \
      -record recform=txtcsv \
      -input reclen=109 \
      -summary suppress last \
  | bsortex \
      -sort key="0.10asc" \
      -record recform=txtcsv \
      -input reclen=109 \
         include="6.3asc.eq.'910'.or.6.3asc.eq.'920'" \
         reconst="0.10,2.10,3.12,4.8,5.2,9.8" \
      -output file=${KK0081_ULD} 
# IT2-2018-0000042 MOD END

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

## マッチング実行
EDIT_MATCHING_QUERY ${G_TOOLSH}/util/def/KK_CM_0660.def "${KK3131_ULD} ${KK0081_ULD}"
EXEC_MATCHING ${KKIFM801001} ${MATCHING_QUERY_WORK}
# ダブルクォーテーション削除
sed -e 's/"//g' ${KKIFM801001} > ${KKIFM801}

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

P1="OPD=$OPD,"
P2="SVCCTL=JBSbatUnitServiceControl,"
P3="JOB=EO2H00110J0,"
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=KKIFM801;${MID_DIR_KK}/KKIFM801.csv"
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 ${KK3131_ALL}
rm ${KK3131_ULD}
rm ${KK0081_ALL}
rm ${KK0081_ULD}
rm ${KKIFM801001}
# IT2-2018-0000041 DEL START
#rm ${KKIFM801}
# IT2-2018-0000041 DEL END

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

exit $exit_rc