#!/bin/bash
##############################################################
# システム名    ：eo顧客基幹システム
#
# サブシステム名：料金管理
#
# シェル名      ：会計用金庫情報分割
#
# 機能          ：会計用金庫情報を会計内訳コードで分割する。
#会計内訳コードが貸倒後入金の場合、会計用金庫情報貸倒後入金に出力を行う。
#会計内訳コードが貸倒後入金以外の場合、会計用金庫情報貸倒後入金以外に出力を行う。
#
#金庫料金項目コードが貸倒後入金（00900086301）で会計内訳種別詳細コードが前月以前預り金分（7051）の場合、
#会計用金庫情報貸倒後入金
#[${MID_DIR_AC}/ACIFM142010.csv]に出力を行う。
#
#金庫料金項目コードが貸倒後入金（00900086301）で会計内訳種別詳細コードが前月以前入金分（7040）の場合、
#レコードを破棄する。
#
#上記以外の場合、
#会計用金庫情報貸倒後入金以外
#[${MID_DIR_AC}/ACIFM142011.csv]に出力を行う。
#
# コマンド形式  ：EO30O0950J0.sh
#
# 実行環境      ：.../app/shl
#
# 終了ステータス：ゼロ以外異常
#
# 特記事項      ：特になし
#
# 変更履歴      ：変更日      変更者       障害／仕様変更No.
# v3.00           2012/05/15  FJ）岩切     新規作成
# v4.00           2013/04/30  FJ) 狭間     【TG1-2013-0000298】金庫データ抽出にて貸倒後入金を料金グループ毎に抽出する対応
##############################################################

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

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

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

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

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

#
#---OPD
#
OPD=$1

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

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

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

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

#---金庫料金項目コード定義
#貸倒後入金
RK_KASIDAOREGO_NYUKIN=00900086301

#---会計内訳コード定義
#前月以前入金分
KWS_ZENG_NYUKIN=7040
#前月以前預り金分
KWS_ZENG_AZUKARIKIN=7051

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

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

P1="OPD=,"
P2="SVCCTL=,"
P3="JOB=EO30O0950J0,"
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="
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

#
#--- ファイル定義
#
#--- 入力ファイル
INFILE_ACIFM225002=${MID_DIR_AC}/ACIFM225002.csv

#--- 出力ファイル
OUTFILE_ACIFM142010=${MID_DIR_AC}/ACIFM142010.csv
OUTFILE_ACIFM142010_WK1=${MID_DIR_AC}/${JOBNAME}_ACIFM142010_WK1.csv
OUTFILE_ACIFM142010_WK2=${MID_DIR_AC}/${JOBNAME}_ACIFM142010_WK2.csv
OUTFILE_ACIFM142010_WK3=${MID_DIR_AC}/${JOBNAME}_ACIFM142010_WK3.csv
OUTFILE_ACIFM142011=${MID_DIR_AC}/ACIFM142011.csv
OUTFILE_DUMMY=${MID_DIR_AC}/${JOBNAME}_DUMMY.csv

#--- 1.金庫（CH_T_KNK）
SQLFILE_CH0191_01=${SQL_DIR}/AC_U_CH0191_01.sql
SQLFILE_CH0191_01_WK1=${SQL_DIR}/${JOBNAME}_CH0191_01_WK1.sql

CSVFILE_CH0191_01=${MID_DIR_AC}/${JOBNAME}_CH0191_01_UNLOADER_WK_1.csv

#--- 2.充当（CH_T_JUTO）
SQLFILE_CH0201_01=${SQL_DIR}/AC_U_CH0201_01.sql
SQLFILE_CH0201_01_WK1=${SQL_DIR}/${JOBNAME}_CH0201_01_WK1.sql

CSVFILE_CH0201_01=${MID_DIR_AC}/${JOBNAME}_CH0201_01_UNLOADER_WK_1.csv

#--- 3.会計異動（CH_T_KAIK_IDO）
SQLFILE_CH0381_01=${SQL_DIR}/AC_U_CH0381_01.sql
SQLFILE_CH0381_01_WK1=${SQL_DIR}/${JOBNAME}_CH0381_01_WK1.sql

CSVFILE_CH0381_01=${MID_DIR_AC}/${JOBNAME}_CH0381_01_UNLOADER_WK_1.csv

#--- 4.会計内訳変換（CH_M_KAIK_UCWK_CHG）
SQLFILE_CH0691_02=${SQL_DIR}/AC_U_CH0691_02.sql
SQLFILE_CH0691_02_WK1=${SQL_DIR}/${JOBNAME}_CH0691_02_WK1.sql

CSVFILE_CH0691_02=${MID_DIR_AC}/${JOBNAME}_CH0691_02_UNLOADER_WK_1.csv

#--- 5.業務パラメータ管理（CH_M_KAIK_UCWK_CHG）
SQLFILE_ZM0321_01=${SQL_DIR}/AC_U_ZM0321_01.sql
SQLFILE_ZM0321_01_WK1=${SQL_DIR}/${JOBNAME}_ZM0321_01_WK1.sql

CSVFILE_ZM0321_01=${MID_DIR_AC}/${JOBNAME}_ZM0321_01_UNLOADER_WK_1.csv

#--- マッチング定義ファイル（AC_CM_0034）
DEFFILE_AC_CM_0034=${G_TOOLSH}/util/def/AC_CM_0034.def
DEFFILE_AC_CM_0034_WK1=${G_TOOLSH}/util/def/${JOBNAME}_AC_CM_0034_MATCHING_WK_1.def

#
#--- 各ファイルの存在チェックを行う
#
#--- 入力ファイル（FTTH通信量合計情報）
if [ ! -r ${INFILE_ACIFM225002} ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${INFILE_ACIFM225002}) "
    echo $JOBNAME " File is nonexist(${INFILE_ACIFM225002}) "
    exit ${G_RTN_ERROR}
fi
#--- 1.金庫（CH_T_KNK）
if [ ! -r ${SQLFILE_CH0191_01} ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${SQLFILE_CH0191_01}) "
    echo $JOBNAME " File is nonexist(${SQLFILE_CH0191_01}) "
    exit ${G_RTN_ERROR}
fi
#--- 2.充当（CH_T_JUTO）
if [ ! -r ${SQLFILE_CH0201_01} ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${SQLFILE_CH0201_01}) "
    echo $JOBNAME " File is nonexist(${SQLFILE_CH0201_01}) "
    exit ${G_RTN_ERROR}
fi
#--- 3.会計異動（CH_T_KAIK_IDO）
if [ ! -r ${SQLFILE_CH0381_01} ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${SQLFILE_CH0381_01}) "
    echo $JOBNAME " File is nonexist(${SQLFILE_CH0381_01}) "
    exit ${G_RTN_ERROR}
fi
#--- 4.会計内訳変換（CH_M_KAIK_UCWK_CHG）
if [ ! -r ${SQLFILE_CH0691_02} ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${SQLFILE_CH0691_02}) "
    echo $JOBNAME " File is nonexist(${SQLFILE_CH0691_02}) "
    exit ${G_RTN_ERROR}
fi
#--- 5.業務パラメータ管理（CH_M_KAIK_UCWK_CHG）
if [ ! -r ${SQLFILE_ZM0321_01} ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${SQLFILE_ZM0321_01}) "
    echo $JOBNAME " File is nonexist(${SQLFILE_ZM0321_01}) "
    exit ${G_RTN_ERROR}
fi
#--- マッチング定義ファイル（AC_CM_0034）
if [ ! -r ${DEFFILE_AC_CM_0034} ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " File is nonexist(${DEFFILE_AC_CM_0034}) "
    echo $JOBNAME " File is nonexist(${DEFFILE_AC_CM_0034}) "
    exit ${G_RTN_ERROR}
fi

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

#
#--- サブルーチン（UNLOAD）
#
UNLOAD(){
#unload
sh ${G_TOOLSH}/EOKULD03.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
}

#
#---ファイル分割
#
bsortex -copy -record recform=txtcsv \
  -input reclen=180 file=${INFILE_ACIFM225002} \
  -output file=${OUTFILE_ACIFM142010_WK1} case="1.4asc.eq.'${KWS_ZENG_AZUKARIKIN}'.and.8.11asc.eq.'${RK_KASIDAOREGO_NYUKIN}'" \
   reconst="0.2,1.4,2.10,3.6,4.12,5.2,6.3,7.12,EMPTY,9.8,10.10,11.12,12.12,13.6,14.10,15.1,16.5,17.4,18.6,19.12" \
  -output file=${OUTFILE_DUMMY}           case="1.4asc.eq.'${KWS_ZENG_NYUKIN}'.and.8.11asc.eq.'${RK_KASIDAOREGO_NYUKIN}'" \
  -output file=${OUTFILE_ACIFM142011}     case=other \
   reconst="0.2,1.4,2.10,3.6,4.12,5.2,6.3,7.12,EMPTY,9.8,10.10,11.12,12.12,13.6,14.10,15.1,16.5,17.4,18.6"
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

#
#--- 業務パラメータ取得
#
#--- SQL検索条件セット
cp -f ${SQLFILE_ZM0321_01} ${SQLFILE_ZM0321_01_WK1}
sed -i -e "s%:WORK_PARAM%'AC_WKS_KSDOR_PRC'%" ${SQLFILE_ZM0321_01_WK1}
sed -i -e "s%:OPE_DATE%'${RSLT_OPEDATE}'%"    ${SQLFILE_ZM0321_01_WK1}

#--- UNLOAD処理
#--- 5.業務パラメータ管理（CH_M_KAIK_UCWK_CHG）
UNLOAD ${SQLFILE_ZM0321_01_WK1} ${CSVFILE_ZM0321_01}

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

#--- パラメータ取得
AC_WKS_KSDOR_PRC=`cat ${CSVFILE_ZM0321_01}`

#
#---貸倒後入金ファイル再編集
#

#--- SQL検索条件セット
cp -f ${SQLFILE_CH0191_01} ${SQLFILE_CH0191_01_WK1}

cp -f ${SQLFILE_CH0201_01} ${SQLFILE_CH0201_01_WK1}

cp -f ${SQLFILE_CH0381_01} ${SQLFILE_CH0381_01_WK1}
sed -i -e "s%:PRC_KMK_CD%'${AC_WKS_KSDOR_PRC}'%" ${SQLFILE_CH0381_01_WK1}

cp -f ${SQLFILE_CH0691_02} ${SQLFILE_CH0691_02_WK1}

#--- UNLOAD処理
#--- 1.金庫（CH_T_KNK）
UNLOAD ${SQLFILE_CH0191_01_WK1} ${CSVFILE_CH0191_01} &

#--- 2.充当（CH_T_JUTO）
UNLOAD ${SQLFILE_CH0201_01_WK1} ${CSVFILE_CH0201_01} &

#--- 3.会計異動（CH_T_KAIK_IDO）
UNLOAD ${SQLFILE_CH0381_01_WK1} ${CSVFILE_CH0381_01} &

#--- 4.会計内訳変換（CH_M_KAIK_UCWK_CHG）
UNLOAD ${SQLFILE_CH0691_02_WK1} ${CSVFILE_CH0691_02} &

#--- 入力ファイルの改行コードをunix (LF)に変換する
nkf -Lu -s < ${OUTFILE_ACIFM142010_WK1} > ${OUTFILE_ACIFM142010_WK2}
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " nkf Error($SVC mv:rc=$rc) "
    echo $JOBNAME " nkf Error($SVC mv:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

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

#--- マッチング入力ファイルセット
cp -f ${DEFFILE_AC_CM_0034} ${DEFFILE_AC_CM_0034_WK1}
sed -i -e "s%:ACIFM225002%${OUTFILE_ACIFM142010_WK2}%" ${DEFFILE_AC_CM_0034_WK1}
sed -i -e "s%:CH0191_01%${CSVFILE_CH0191_01}%"         ${DEFFILE_AC_CM_0034_WK1}
sed -i -e "s%:CH0201_01%${CSVFILE_CH0201_01}%"         ${DEFFILE_AC_CM_0034_WK1}
sed -i -e "s%:CH0381_01%${CSVFILE_CH0381_01}%"         ${DEFFILE_AC_CM_0034_WK1}
sed -i -e "s%:CH0691_02%${CSVFILE_CH0691_02}%"         ${DEFFILE_AC_CM_0034_WK1}

# マッチング処理→入力ファイルへ
(export ZTLOUTFILE=${OUTFILE_ACIFM142010_WK3}
${G_TOOLSH}/util/bin/ZTLMAT01 ${DEFFILE_AC_CM_0034_WK1})
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " マッチング処理 Error($SVC ZTLOUTFILE:rc=$rc) "
    echo $JOBNAME " マッチング処理 Error($SVC ZTLOUTFILE:rc=$rc) "
    exit ${G_RTN_ERROR}
fi


#--- 入力ファイルの改行コードをwindows (CRLF)に変換する
nkf -Lw -s < ${OUTFILE_ACIFM142010_WK3} > ${OUTFILE_ACIFM142010}
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " nkf Error($SVC mv:rc=$rc) "
    echo $JOBNAME " nkf Error($SVC mv:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#ワーク削除
if [ $WK_RM = "true" ]
then
    rm -f ${OUTFILE_ACIFM142010_WK1}
    rm -f ${OUTFILE_ACIFM142010_WK2}
    rm -f ${OUTFILE_ACIFM142010_WK3}
    rm -f ${OUTFILE_DUMMY}
    rm -f ${SQLFILE_CH0191_01_WK1}
    rm -f ${SQLFILE_CH0201_01_WK1}
    rm -f ${SQLFILE_CH0381_01_WK1}
    rm -f ${SQLFILE_CH0691_02_WK1}
    rm -f ${SQLFILE_ZM0321_01_WK1}
    rm -f ${CSVFILE_CH0191_01}
    rm -f ${CSVFILE_CH0201_01}
    rm -f ${CSVFILE_CH0381_01}
    rm -f ${CSVFILE_CH0691_02}
    rm -f ${CSVFILE_ZM0321_01}
    rm -f ${DEFFILE_AC_CM_0034_WK1}
fi

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

exit ${G_RTN_NORMAL}