#!/bin/bash
##############################################################
# システム名    ：eo顧客基幹システム
#
# サブシステム名：請求収納
#
# シェル名      ：債権回収委託会社充当結果入力情報付与分割
#
# 機能          ：1.債権回収委託会社充当結果入力情報付与分割
#
#(１)
#債権回収委託会社充当結果入力情報付与データを、入金情報、充当情報、金庫情報、未収情報に分割する
#分割する
#
# コマンド形式  ：EO60Y0950J0.sh
#
# 実行環境      ：.../app/shl
#
# 終了ステータス：ゼロ以外異常
#
# 特記事項      ：特になし
#
# 変更履歴      ：変更日      変更者       障害／仕様変更No.
# v54.00          2021/07/26  FJ）吉田     【ANK-4079-00-00】債権委託先会社からの入金処理システム化対応
##############################################################

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

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

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

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

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

#
#---OPD
#
OPD=$1

#---オンライン運用日付取得
if [ "${OPD}" = "" -o "${OPD}" = "20991231" ]; then
   . EOK010310J0.sh "ODATE"
else
   RSLT_OPEDATE="${OPD}"
fi

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

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

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


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


#----------------------------------------------------------------------------------------------------
# 業務パラメータ管理取得
#----------------------------------------------------------------------------------------------------
#
#--- 変数定義
#
#-- 入金額
WK_PRM_ID_NYUKIN_AMNT=CH_WKS_NYUKIN_AMNT
#-- 充当額
WK_PRM_ID_JUTO_GOKEI=CH_WKS_JUTO_GOKEI
#-- 金庫額（預り金）
WK_PRM_ID_KNKADD_DPSIT=CH_WKS_KNKADD_DPSIT
#-- 金庫額（仮受金）
WK_PRM_ID_KNKADD_KRUK=CH_WKS_KNKADD_KRUK
#-- 未収額
WK_PRM_ID_MISYU_KINGAKU=CH_WKS_MISYU_KINGAKU

#
#--- ファイル定義
#
#
#-- SQLファイル
#
SQLFILE_CH_U_CH0401_25=${SQL_DIR}/CH_U_CH0401_25.sql
SQLFILE_CH_U_CH0401_25_NYUKIN=${SQL_DIR}/${JOBNAME}_CH_U_CH0401_25_WK1.sql
SQLFILE_CH_U_CH0401_25_JUTO=${SQL_DIR}/${JOBNAME}_CH_U_CH0401_25_WK2.sql
SQLFILE_CH_U_CH0401_25_DPSIT=${SQL_DIR}/${JOBNAME}_CH_U_CH0401_25_WK3.sql
SQLFILE_CH_U_CH0401_25_KRUK=${SQL_DIR}/${JOBNAME}_CH_U_CH0401_25_WK4.sql
SQLFILE_CH_U_CH0401_25_MISYU=${SQL_DIR}/${JOBNAME}_CH_U_CH0401_25_WK5.sql

#
#-- アンロードファイル
#
CSVFILE_CH_U_CH0401_25_NYUKIN=${MID_DIR_CH}/${JOBNAME}_CH_U_CH0401_25_NYUKIN.csv
CSVFILE_CH_U_CH0401_25_JUTO=${MID_DIR_CH}/${JOBNAME}_CH_U_CH0401_25_JUTO.csv
CSVFILE_CH_U_CH0401_25_DPSIT=${MID_DIR_CH}/${JOBNAME}_CH_U_CH0401_25_DPSIT.csv
CSVFILE_CH_U_CH0401_25_KRUK=${MID_DIR_CH}/${JOBNAME}_CH_U_CH0401_25_KRUK.csv
CSVFILE_CH_U_CH0401_25_MISYU=${MID_DIR_CH}/${JOBNAME}_CH_U_CH0401_25_MISYU.csv


#
#-- 入力ファイル
#
INPUT_FILE=${MID_DIR_CH}/CHIFM401001.csv


#
#-- 出力ファイル
#
OUTPUT_FILE_NYUKIN=${MID_DIR_CH}/CHIFM401002.csv
OUTPUT_FILE_JUTO=${MID_DIR_CH}/CHIFM401003.csv
OUTPUT_FILE_KNK=${MID_DIR_CH}/CHIFM401004.csv
OUTPUT_FILE_MISHU=${MID_DIR_CH}/CHIFM401005.csv

OUTPUT_FILE_JUTO_WK=${MID_DIR_CH}/CHIFM401003_WK.csv
OUTPUT_FILE_NYUKIN_WK=${MID_DIR_CH}/CHIFM401002_WK.csv
OUTPUT_FILE_KNK_WK=${MID_DIR_CH}/CHIFM401004_WK.csv
OUTPUT_FILE_MISHU_WK=${MID_DIR_CH}/CHIFM401005_WK.csv


#-------------------------------------------------------------
# サブルーチン
#-------------------------------------------------------------
#
#--- サブルーチン（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

}


#
#--- サブルーチン（OUTPUTFILE）
#
OUTPUTFILE(){
    while read line1
    do
        PRC_KMK_CD=`echo ${line1}`
        bsortex -sort key=1.12asca -record recform=txtcsv \
        -input reclen=450 file=$1 \
        -output case="11.11asc.eq.'${PRC_KMK_CD}'" >> $2
        
        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
    done < $3
}

#
#--- サブルーチン（SORTFILE）
#
SORTFILE(){
    bsortex -sort key=1.12asca -record recform=txtcsv \
        -input reclen=450 file=$1 \
        -output file=$2

    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
}

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


#
#--- 出力ファイルの初期化
#
cat /dev/null > ${OUTPUT_FILE_NYUKIN}
cat /dev/null > ${OUTPUT_FILE_JUTO}
cat /dev/null > ${OUTPUT_FILE_KNK}
cat /dev/null > ${OUTPUT_FILE_MISHU}


#--- SQL検索条件セット
#--- 料金項目抽出変換
cp -f ${SQLFILE_CH_U_CH0401_25} ${SQLFILE_CH_U_CH0401_25_NYUKIN}
sed -i -e "s%:WORK_PARAM_ID%'${WK_PRM_ID_NYUKIN_AMNT}'%" ${SQLFILE_CH_U_CH0401_25_NYUKIN}
sed -i -e "s%:OPE_DATE%'${RSLT_OPEDATE}'%"    ${SQLFILE_CH_U_CH0401_25_NYUKIN}

cp -f ${SQLFILE_CH_U_CH0401_25} ${SQLFILE_CH_U_CH0401_25_JUTO}
sed -i -e "s%:WORK_PARAM_ID%'${WK_PRM_ID_JUTO_GOKEI}'%" ${SQLFILE_CH_U_CH0401_25_JUTO}
sed -i -e "s%:OPE_DATE%'${RSLT_OPEDATE}'%"    ${SQLFILE_CH_U_CH0401_25_JUTO}

cp -f ${SQLFILE_CH_U_CH0401_25} ${SQLFILE_CH_U_CH0401_25_DPSIT}
sed -i -e "s%:WORK_PARAM_ID%'${WK_PRM_ID_KNKADD_DPSIT}'%" ${SQLFILE_CH_U_CH0401_25_DPSIT}
sed -i -e "s%:OPE_DATE%'${RSLT_OPEDATE}'%"    ${SQLFILE_CH_U_CH0401_25_DPSIT}

cp -f ${SQLFILE_CH_U_CH0401_25} ${SQLFILE_CH_U_CH0401_25_KRUK}
sed -i -e "s%:WORK_PARAM_ID%'${WK_PRM_ID_KNKADD_KRUK}'%" ${SQLFILE_CH_U_CH0401_25_KRUK}
sed -i -e "s%:OPE_DATE%'${RSLT_OPEDATE}'%"    ${SQLFILE_CH_U_CH0401_25_KRUK}

cp -f ${SQLFILE_CH_U_CH0401_25} ${SQLFILE_CH_U_CH0401_25_MISYU}
sed -i -e "s%:WORK_PARAM_ID%'${WK_PRM_ID_MISYU_KINGAKU}'%" ${SQLFILE_CH_U_CH0401_25_MISYU}
sed -i -e "s%:OPE_DATE%'${RSLT_OPEDATE}'%"    ${SQLFILE_CH_U_CH0401_25_MISYU}


#
#--- UNLOAD処理
#
#--- 料金項目抽出変換
UNLOAD ${SQLFILE_CH_U_CH0401_25_NYUKIN} ${CSVFILE_CH_U_CH0401_25_NYUKIN}
UNLOAD ${SQLFILE_CH_U_CH0401_25_JUTO} ${CSVFILE_CH_U_CH0401_25_JUTO}
UNLOAD ${SQLFILE_CH_U_CH0401_25_DPSIT} ${CSVFILE_CH_U_CH0401_25_DPSIT}
UNLOAD ${SQLFILE_CH_U_CH0401_25_KRUK} ${CSVFILE_CH_U_CH0401_25_KRUK}
UNLOAD ${SQLFILE_CH_U_CH0401_25_MISYU} ${CSVFILE_CH_U_CH0401_25_MISYU}

#----------------------------------------------------------------------------------------------------
# ファイル分割処理
#----------------------------------------------------------------------------------------------------
#
# --- 分割
#
#OUTPUTFILE ${INPUT_FILE} ${OUTPUT_FILE_NYUKIN} ${CSVFILE_CH_U_CH0401_25_NYUKIN}
OUTPUTFILE ${INPUT_FILE} ${OUTPUT_FILE_NYUKIN_WK} ${CSVFILE_CH_U_CH0401_25_NYUKIN}
OUTPUTFILE ${INPUT_FILE} ${OUTPUT_FILE_JUTO_WK} ${CSVFILE_CH_U_CH0401_25_JUTO}
OUTPUTFILE ${INPUT_FILE} ${OUTPUT_FILE_KNK_WK} ${CSVFILE_CH_U_CH0401_25_DPSIT}
OUTPUTFILE ${INPUT_FILE} ${OUTPUT_FILE_KNK_WK} ${CSVFILE_CH_U_CH0401_25_KRUK}
OUTPUTFILE ${INPUT_FILE} ${OUTPUT_FILE_MISHU_WK} ${CSVFILE_CH_U_CH0401_25_MISYU}

#
# --- 分割ファイルから対象外データを除外する
#
# 充当額の出力ファイルから、督促異動フラグが''(空)のもののみ抽出
bsortex -sort key=1.12asca,16.6asca -record recform=txtcsv \
    -input reclen=450 file=${OUTPUT_FILE_JUTO_WK} \
    -output file=${OUTPUT_FILE_JUTO} case="25.1asc.lt.' '"
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

#
# --- 分割ファイルの再ソート(充当額は上記でソート済)
#
# 入金額情報をソートする
SORTFILE ${OUTPUT_FILE_NYUKIN_WK} ${OUTPUT_FILE_NYUKIN}

# 金庫額情報をソートする
SORTFILE ${OUTPUT_FILE_KNK_WK} ${OUTPUT_FILE_KNK}

# 未収額情報をソートする
bsortex -sort key=1.12asca,16.6asca -record recform=txtcsv \
    -input reclen=450 file=${OUTPUT_FILE_MISHU_WK} \
    -output file=${OUTPUT_FILE_MISHU}
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

#
#--- ワーク削除
#
if [ $WK_RM = "true" ]
then
    rm ${SQLFILE_CH_U_CH0401_25_NYUKIN}
    rm ${SQLFILE_CH_U_CH0401_25_JUTO}
    rm ${SQLFILE_CH_U_CH0401_25_DPSIT}
    rm ${SQLFILE_CH_U_CH0401_25_KRUK}
    rm ${SQLFILE_CH_U_CH0401_25_MISYU}
    rm ${CSVFILE_CH_U_CH0401_25_NYUKIN}
    rm ${CSVFILE_CH_U_CH0401_25_JUTO}
    rm ${CSVFILE_CH_U_CH0401_25_DPSIT}
    rm ${CSVFILE_CH_U_CH0401_25_KRUK}
    rm ${CSVFILE_CH_U_CH0401_25_MISYU}
    rm ${OUTPUT_FILE_JUTO_WK}
    rm ${OUTPUT_FILE_NYUKIN_WK}
    rm ${OUTPUT_FILE_KNK_WK}
    rm ${OUTPUT_FILE_MISHU_WK}
fi

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

exit ${G_RTN_NORMAL}