#!/bin/bash
##############################################################
# システム名    ：eo顧客基幹システム
#
# サブシステム名：請求収納
#
# シェル名      ：クレジット結果リスト作成
#
# 機能          ：1.クレジット結果リスト作成
#
#(1)
#充当結果リスト用データをもとにクレジット結果リストを作成する。
#入金経路コードがクレジットのデータを出力対象とする。
#（充当結果が正常・エラーに関わらず出力対象とする。）
#
#
# コマンド形式  ：EO60Y0330J0.sh
#
# 実行環境      ：.../app/shl
#
# 終了ステータス：ゼロ以外異常
#
# 特記事項      ：特になし
#
# 変更履歴      ：変更日      変更者       障害／仕様変更No.
# v3.00           2012/09/25  FJ）成田     【ST1-2012-0000639】出力ファイル名の日付部分を運用日付からシステム日付に変更
#                                                              バッチ運用日取得処理は不要なため削除
# v4.00           2013/03/24  FJ）指原	   【ST4-2013-0000164】性能改善 - SQL検索対象スキーマをINファイル事前マッチングに変更
# v4.03           2013/04/03  FJ) 狭間     【ST2-2013-0001650】対象請求情報の抽出条件誤り修正と速度改善の為、アンロード統一
# v4.03.01        2013/04/08  FJ) 狭間     【ST4-2013-0000286】性能改善の為、アンロード並列化及び処理見直しと水平展開
# v4.04           2013/04/26  FJ) 狭間     【TG1-2013-0000256】クレジット結果リストに正常データが出力される不具合修正
# v5.00           2013/08/01  FJ) 狭間     【TG1-2013-0000731】請求アンロードファイル（CHIFM186001）の項目追加に伴いbsortの指定サイズ変更
# v5.01           2013/08/03  FJ) 前田     【TG1-2013-0000734】入力ファイルの発行SEQを除外して出力
##############################################################

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

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

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

#---多重起動用
[ $# -eq 2 ] &&TAJUKIDO="_$2" ;

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

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

#
#---OPD
#
OPD=$1

#
#---業務で必要な変数定義
#

#---ワークファイル削除モード
WK_RM=true

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

#---システム日時取得
. EOK010410J0.sh "2"
SYSDATE=`echo ${RSLT_SYSDATE}`

#---マッチング処理でLeftjoinがNULL時に"を付けなくする（マッチング使用時は必須）
export ZTLQUOTES=''

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

#
#--- 入力ファイルのサイズチェック
#--- 0byteの場合はJavaの出力ファイルを作成しJOB処理正常で終了
#
if [ ! -s ${MID_DIR_CH}/CHIFM033008.csv ]
then
    touch ${GAIBU_SEND_DIR_CH}/CHL01401/CHL01401_${SYSDATE}
    echo $JOBNAME "[END] InFile size is 0 byte. exit 0. File:[${MID_DIR_CH}/CHIFM033008.csv] "
    sh ${G_TOOLSH}/EOK010210J0.sh CS00026I $JOBNAME
    exit ${G_RTN_NORMAL}
fi

#
#---発行シーケンス(13項目目）削除ファイル
#
INFILE_WK=${MID_DIR_CH}/CHIFM033008_TMP.csv

#
#---発行シーケンス（13項目）を削除
#
cat ${MID_DIR_CH}/CHIFM033008.csv | cut -d, -f1-12 > ${INFILE_WK}

#
#--- UNLOAD処理1 請求契約スキーマ アンロードSQLファイル
#--- SQLファイルの存在チェックを行う
#
SQLFILE1=${SQL_DIR}/CH_U_KK0491_04.sql
if [ ! -r $SQLFILE1 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist($SQLFILE1) "
    echo $JOBNAME " File is nonexist($SQLFILE1) "
    exit ${G_RTN_ERROR}
fi

#
#--- UNLOAD処理3 クレジットカード会社名マスタ アンロードSQLファイル
#--- SQLファイルの存在チェックを行う
#
SQLFILE3=${SQL_DIR}/CH_U_KK0531_01.sql
if [ ! -r $SQLFILE3 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist($SQLFILE3) "
    echo $JOBNAME " File is nonexist($SQLFILE3) "
    exit ${G_RTN_ERROR}
fi

#
#--- UNLOAD処理1 請求契約スキーマアンロード実行
#
SQLFILE_WRK1=${SQL_DIR}/${JOBNAME}_CH_U_KK0491_04_WRK.sql

TMP_FILE_KK0491_01=${MID_DIR_CH}/${JOBNAME}_UNLOADER_KK0491_WK_1.csv
cat /dev/null > ${TMP_FILE_KK0491_01}

#--- SQL編集処理
cp -f ${SQLFILE1} ${SQLFILE_WRK1}
sed -i -e "s/:OPE_DATE/${OPD}/" ${SQLFILE_WRK1} 

#--- アンロード実行
(sh ${G_TOOLSH}/EOKULD03.sh ${user} ${password} ${SQLFILE_WRK1} ${TMP_FILE_KK0491_01} $JOBNAME
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " UNLOAD KK0491 Error($SVC unload:rc=$rc) " 
    echo $JOBNAME " UNLOAD Error($SVC unload:rc=$rc) "
    exit ${G_RTN_ERROR}
fi) &

#
#--- 絞込み処理2 請求アンロードファイル
#--- 条件：請求年月は直近過去の請求処理年月を指定する
#
INFILE_CHIFM186001=${MID_DIR_CH}/CHIFM186001.csv

INFILE_CHIFM186001_WRK=${MID_DIR_CH}/${JOBNAME}_CHIFM186001_BSORT_WK1.csv
cat /dev/null > ${INFILE_CHIFM186001_WRK}

#- 請求年月取得
EVENT_CD="04"
. EO3SEIKYYM2.sh ${EVENT_CD} ${RSLT_OPEDATE} ${JOBNAME}
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " EO3SEIKYYM2 Error($EO3SEIKYYM2:rc=$rc) " 
    echo $JOBNAME " EO3SEIKYYM2 Error($EO3SEIKYYM2:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#--- 絞込みを行う
bsortex \
  -copy \
  -record recform=txtcsv \
  -input reclen=150 \
  include="2.6asc.eq.'${SEIKY_YM}'" \
  file=${INFILE_CHIFM186001} \
  -output file=${INFILE_CHIFM186001_WRK} \
  reconst="0.12,2.6,3.5,4.64,5.5"
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

#
#--- UNLOAD処理3 クレジットカード会社名マスタアンロード実行
#
SQLFILE_WRK3=${SQL_DIR}/${JOBNAME}_CH_U_KK0531_01_WRK.sql

TMP_FILE_KK0531_01=${MID_DIR_CH}/${JOBNAME}_UNLOADER_KK0531_WK_1.csv
cat /dev/null > ${TMP_FILE_KK0531_01}

#--- SQL編集処理
cp -f ${SQLFILE3} ${SQLFILE_WRK3}
sed -i -e "s/:OPE_DATE/${OPD}/" ${SQLFILE_WRK3} 

(sh ${G_TOOLSH}/EOKULD03.sh ${user} ${password} ${SQLFILE_WRK3} ${TMP_FILE_KK0531_01} $JOBNAME
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " UNLOAD KK0531 Error($SVC unload:rc=$rc) " 
    echo $JOBNAME " UNLOAD Error($SVC unload:rc=$rc) "
    exit ${G_RTN_ERROR}
fi) &

#
#--- マッチング処理実行
#--- 充当結果ファイルに請求スキーマ、請求契約スキーマ、クレジットカード会社名スキーマをLEFTJOIN
#

INFILE_CHIFM033_WRK1=${MID_DIR_CH}/${JOBNAME}_CHIFM033_UNLOADER_WK_1.csv
INFILE_CHIFM033_WRK2=${MID_DIR_CH}/${JOBNAME}_CHIFM033_UNLOADER_WK_2.csv

#--- 改行コードをunix(LF)に変換する
nkf -Lu -s < ${INFILE_WK} > ${INFILE_CHIFM033_WRK1}

#--- 絞込みを行う
bsortex \
  -copy \
  -record recform=txtcsv \
  -input reclen=200 \
  include="8.1asc.eq.'E'.or.8.1asc.eq.'W'" \
  file=${INFILE_CHIFM033_WRK1} \
  -output file=${INFILE_CHIFM033_WRK2}
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

#--- マッチングdefにファイル名をセット
DEFFILE=${G_TOOLSH}/util/def/CH_CM_0069.def
DEFFILE_WRK=${G_TOOLSH}/util/def/${JOBNAME}_CH_CM_0069_MATCHING_WK_1.def
cp ${DEFFILE} ${DEFFILE_WRK}
sed -i -e "s%\:JYUTOKEKKA%${INFILE_CHIFM033_WRK2}%"           ${DEFFILE_WRK} 
sed -i -e "s%\:KK_T_SEIKY_KEI%${TMP_FILE_KK0491_01}%"         ${DEFFILE_WRK} 
sed -i -e "s%\:INFILE_CHIFM186001%${INFILE_CHIFM186001_WRK}%" ${DEFFILE_WRK} 
sed -i -e "s%\:KK_M_CRECARD_COMP%${TMP_FILE_KK0531_01}%"      ${DEFFILE_WRK} 

# すべての抽出が終了するのを待つ
wait

#--- マッチング結果の出力先ファイルを定義
MATCHING_WRK1=${MID_DIR_CH}/${JOBNAME}_CHIFM176_MATCHING_WK_1.csv
ZTLOUTFILE=${MATCHING_WRK1}
export ZTLOUTFILE

# マッチング実行
${G_TOOLSH}/util/bin/ZTLMAT01 ${DEFFILE_WRK}

#--- 改行コードをwindows (CRLF)に変換する
nkf -Lu -s < ${MATCHING_WRK1} > ${MID_DIR_CH}/CHIFM176001.csv

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

P1="OPD=,"
P2="SVCCTL=JBSbatMultiServiceControl,"
P3="JOB=EO60Y0330J0,"
P4="IND1=CHIFM176.def,"
P5="INF1=${MID_DIR_CH}/CHIFM176001.csv,"
P6="IND2=,"
P7="INF2=,"
P8="OTD1=CHIFE032.def,"
P9="OTF1=${GAIBU_SEND_DIR_CH}/CHL01401/CHL01401_${SYSDATE},"
P10="OTD2=,"
P11="OTF2=,"
P12="TABLENAME=,"
P13="SQLKEY=,"
P14="SQLPARAM=,"
P15="ERRFILE=,"
P16="RECOVERY=,"
P17="BREAKPTN=,"
P18="FREE="
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

#-ワーク削除
[ ${WK_RM} = "true" ] && rm -f ${SQLFILE_WRK1} ${SQLFILE_WRK2} ${SQLFILE_WRK3} \
${TMP_FILE_KK0491_01} ${INFILE_CHIFM186001_WRK} ${TMP_FILE_KK0531_01} \
${DEFFILE_WRK} ${INFILE_CHIFM033_WRK1} ${INFILE_CHIFM033_WRK2} ${MATCHING_WRK1} ${INFILE_WK};

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

exit $exit_rc