#!/bin/bash
##############################################################
# システム名    ：eo顧客基幹システム
#
# サブシステム名：料金管理
#
# シェル名      ：ｅｏ光電話通話明細抽出集計（工事遅延）
#
# 機能          ：１．ｅｏ光電話利用呼情報集計（工事遅延）
#
#(1) eo光電話通話明細テーブルより、対象キーワークに登録されている当日集計対象となる工事遅延分の請求年月および請求契約番号を対象としてeo光電話通話合計スキーマに集計出力
#(2) 処理対象は課金可否コードが1(課金可)の明細とし、課金不可の明細は請求金額としない。
#
#※eo光電話通話合計スキーマに出力する際、前日までに作成されたeo光電話通話合計は物理削除する。
#SQLPARAM
#1つ目（業務パラメータＩＤ：対象キーワーク使用機能識別コード＿再集計対象情報（前月））
#2つ目（業務パラメータ適用開始年月日：前月末日）
#3つ目（業務パラメータ適用終了年月日：前月末日）
#4つ目（課金可否：課金可）
#
# コマンド形式  ：EO3090310J0.sh
#
# 実行環境      ：.../app/shl
#
# 終了ステータス：ゼロ以外異常
#
# 特記事項      ：特になし
#
# 変更履歴      ：変更日      変更者       障害／仕様変更No.
# v4.01           2013/03/18  FJ）広野     性能改善: アンロードの参照先スクリプト変更にともなう修正
# v4.04           2013/04/24  FJ) 狭間     【ST4-2013-0000XXX】オンライン24時間対応
# v5.00           2013/09/20  FJ）伊藤     【OM-2013-0002224】SQL性能改善によるパラメータの追加
# v5.01           2013/09/24  FJ）早崎     【OM-2013-0002509】OM-2013-0002224対応削除
# v6.00.01        2014/01/08  FJ) 狭間     【OM-2013-0004533】電話のコース変更時に明細と合計が紐付かない修正
##############################################################

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

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

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

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

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

#
#---OPD
#
OPD=$1

#
#---ファイルから運用日を取得
#
read OPD <${MID_DIR_AC}/ACIFM037001.csv

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

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

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

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

P1="OPD=${OPD},"
P2="SVCCTL=JBSbatMultiServiceControl,"
P3="JOB=EO3090310J0,"
P4="IND1=ACIFM185.def,"
P5="INF1=${MID_DIR_AC}/ACIFM185002.csv,"
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=ACIFM262.def;${MID_DIR_AC}/ACIFM262002.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

#
#--- ファイル定義
#
SQLFILE=${SQL_DIR}/AC_U_AC0391_05.sql
OUTFILE=${MID_DIR_AC}/ACIFM185002.csv
OUTFILE2=${MID_DIR_AC}/ACIFM262002.csv

SQLFILE_WRK=${SQL_DIR}/AC_U_AC0391_05_WRK.sql
OUTFILE_WRK1=${MID_DIR_AC}/ACIFM185002_WRK1.csv
OUTFILE_WRK2=${MID_DIR_AC}/ACIFM185002_WRK2.csv

# 従量サービス契約情報アンロード定義ファイル
UL_AC_U_AC0551_08_DEF=${SQL_DIR}/AC_U_AC0551_08.sql
UL_AC_U_AC0551_08_DEF_WK1=${SQL_DIR}/${JOBNAME}_AC_U_AC0551_08_UNLOADER_WK_1.sql

# 従量サービス契約情報アンロードファイル
UL_AC_U_AC0551_08_CSV_WK1=${MID_DIR_AC}/${JOBNAME}_AC_U_AC0551_08_UNLOAD_WK_1.csv
BS_AC_U_AC0551_08_CSV_WK1=${MID_DIR_AC}/${JOBNAME}_AC_U_AC0551_08_BSORT_WK_1.csv
BS_AC_U_AC0551_08_CSV_WK2=${MID_DIR_AC}/${JOBNAME}_AC_U_AC0551_08_BSORT_WK_2.csv
BS_AC_U_AC0551_08_CSV_WK3=${MID_DIR_AC}/${JOBNAME}_AC_U_AC0551_08_BSORT_WK_3.csv
BS_AC_U_AC0551_08_CSV_WK4=${MID_DIR_AC}/${JOBNAME}_AC_U_AC0551_08_BSORT_WK_4.csv
BS_AC_U_AC0551_08_CSV_WK5=${MID_DIR_AC}/${JOBNAME}_AC_U_AC0551_08_BSORT_WK_5.csv

# マッチング定義ファイル
MC_AC_CM_0083_DEF=${G_TOOLSH}/util/def/AC_CM_0083.def
MC_AC_CM_0083_DEF_WK1=${G_TOOLSH}/util/def/${JOBNAME}_AC_CM_0083_MATCHING_WK_1.def

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

#
#--- 【SQLPARAM】
WORK_PARAM_ID="'AC_TWK_RE_SHUK_NO2'"
OPE_DATE="'${OPD}'"

#- 請求年月取得（運用日基準）
EVENT_CD="02"
. EO3SEIKYYM.sh ${EVENT_CD} ${OPE_DATE} ${JOBNAME}

#- イベントコード（利用開始日）
EVENT_CD_USE_STAYMD="01"

#- イベントコード（利用終了日）
EVENT_CD_USE_ENDYMD="02"

#- 請求年月末日取得
. EO3EVENTYMD.sh ${EVENT_CD_USE_ENDYMD} ${SEIKY_YM} ${JOBNAME}
SEIKY_YM_END_YMD=${EVENT_YMD}

#- 翌月取得
TARGET_DATE=${SEIKY_YM}01
YOKUGETSU=$(date +%Y%m --date "${TARGET_DATE} 1 month")

#- 翌月初日取得
. EO3EVENTYMD.sh ${EVENT_CD_USE_STAYMD} ${YOKUGETSU} ${JOBNAME}
YOKUGETSU_YM_STA_YMD=${EVENT_YMD}

# AC_U_AC0391_05
cp -f ${SQLFILE} ${SQLFILE_WRK}
sed -i -e "s/\:WORK_PARAM_ID/${WORK_PARAM_ID}/" ${SQLFILE_WRK} 
sed -i -e "s/\:OPE_DATE/${OPE_DATE}/"           ${SQLFILE_WRK} 

#- 課金対象従量サービス契約蓄積
cp -f ${UL_AC_U_AC0551_08_DEF} ${UL_AC_U_AC0551_08_DEF_WK1}
sed -i -e "s/:SEIKY_YM/'${SEIKY_YM}'/"          ${UL_AC_U_AC0551_08_DEF_WK1} 

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

#-------------------------------------------------------------------------------
#- UNLOAD処理
#-------------------------------------------------------------------------------
(
# AC_U_AC0391_05
sh ${G_TOOLSH}/EOKULD03.sh ${SQLFILE_WRK} ${OUTFILE_WRK1} ${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
) &
AC0391_01_1pid=$!

(
#- 課金対象従量サービス契約蓄積
sh ${G_TOOLSH}/EOKULD03.sh ${UL_AC_U_AC0551_08_DEF_WK1} ${UL_AC_U_AC0551_08_CSV_WK1} ${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
) &
AC0551_08_1pid=$!

# すべての抽出が終了するのを待つ
wait ${AC0391_01_1pid}
AC0391_01_1rc=$?

wait ${AC0551_08_1pid}
AC0551_08_1rc=$?

if [ ${AC0391_01_1rc} -ne 0 ] || [ ${AC0551_08_1rc} -ne 0 ]
then
    if [ ${AC0391_01_1rc} -ne 0 ]
    then
        sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " AC0391_UNLOAD Error($SVC AC0391_unload1:rc=${AC0391_01_1rc}) " 
        echo $JOBNAME " AC0391_UNLOAD Error($SVC AC0391_unload1:rc=${AC0391_01_1rc}) "
    fi
    if [ ${AC0551_08_1rc} -ne 0 ]
    then
        sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " AC0551_UNLOAD Error($SVC AC0551_unload1:rc=${AC0551_08_1rc}) " 
        echo $JOBNAME " AC0551_UNLOAD Error($SVC AC0551_unload1:rc=${AC0551_08_1rc}) "
    fi
    exit ${G_RTN_ERROR}
fi

#-------------------------------------------------------------------------------
#- 課金対象従量サービス契約蓄積の最新レコードを取得する
#- 集計単位：請求年月、請求契約番号、サービス契約番号、サービス契約内訳番号、電話番号
#-------------------------------------------------------------------------------

# 課金開始年月日≦請求年月末日（１－１）と課金開始年月日≧翌月月初日（２－１）に分ける
bsortex \
    -copy \
    -input reclen=300 file=${UL_AC_U_AC0551_08_CSV_WK1} \
    -record recform=txtcsv \
    -output file=${BS_AC_U_AC0551_08_CSV_WK1} case="5.8asc.le.'${SEIKY_YM_END_YMD}'" \
    -output file=${BS_AC_U_AC0551_08_CSV_WK2} case="5.8asc.ge.'${YOKUGETSU_YM_STA_YMD}'" 
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " bsortex Error($SVC ${BS_AC_U_AC0551_08_CSV_WK1}:rc=$rc) "
    echo $JOBNAME " bsortex Error($SVC ${BS_AC_U_AC0551_08_CSV_WK1}:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

# 課金開始年月日≦請求年月末日のレコードから課金開始年月日が最新（最大）のレコードのみ抽出する（１－２）
# 集計単位：請求年月、請求契約番号、サービス契約番号、サービス契約内訳番号、電話番号
bsortex \
    -sort key="0.6asca,1.10asca,2.10asca,3.12asca,4.11asca,5.8ascr" \
    -input reclen=300 file=${BS_AC_U_AC0551_08_CSV_WK1} \
    -record recform=txtcsv \
| bsortex \
    -merge key="0.6asc,1.10asc,2.10asc,3.12asc,4.11asc" \
    -input reclen=300 \
    -record recform=txtcsv \
    -summary suppress first \
    -output file=${BS_AC_U_AC0551_08_CSV_WK3}
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " bsortex Error($SVC ${BS_AC_U_AC0551_08_CSV_WK3}:rc=$rc) "
    echo $JOBNAME " bsortex Error($SVC ${BS_AC_U_AC0551_08_CSV_WK3}:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

# 課金開始年月日≧翌月月初日のレコードから課金開始年月日が最古（最小）のレコードのみ抽出する（２－２）
# 集計単位：請求年月、請求契約番号、サービス契約番号、サービス契約内訳番号、電話番号
bsortex \
    -sort key="0.6asca,1.10asca,2.10asca,3.12asca,4.11asca,5.8asca" \
    -input reclen=300 file=${BS_AC_U_AC0551_08_CSV_WK2} \
    -record recform=txtcsv \
| bsortex \
    -merge key="0.6asc,1.10asc,2.10asc,3.12asc,4.11asc" \
    -input reclen=300 \
    -record recform=txtcsv \
    -summary suppress first \
    -output file=${BS_AC_U_AC0551_08_CSV_WK4}
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " bsortex Error($SVC ${BS_AC_U_AC0551_08_CSV_WK4}:rc=$rc) "
    echo $JOBNAME " bsortex Error($SVC ${BS_AC_U_AC0551_08_CSV_WK4}:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

# １－２と２－２をマージして課金開始年月日が最古（最小）のレコードのみ抽出する
# ※１－２が優先の為
bsortex \
    -sort key="0.6asca,1.10asca,2.10asca,3.12asca,4.11asca,5.8asca" \
    -input reclen=300 file=${BS_AC_U_AC0551_08_CSV_WK3},${BS_AC_U_AC0551_08_CSV_WK4} \
    -record recform=txtcsv \
| bsortex \
    -merge key="0.6asc,1.10asc,2.10asc,3.12asc,4.11asc" \
    -input reclen=300 \
    -record recform=txtcsv \
    -summary suppress first \
    -output file=${BS_AC_U_AC0551_08_CSV_WK5}
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " bsortex Error($SVC ${BS_AC_U_AC0551_08_CSV_WK5}:rc=$rc) "
    echo $JOBNAME " bsortex Error($SVC ${BS_AC_U_AC0551_08_CSV_WK5}:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#-------------------------------------------------------------------------------
#- AC_U_AC0391_01と課金対象従量サービス契約蓄積をマッチングして料金コースコード、料金サービスコードを塗り替える
#-------------------------------------------------------------------------------

#- マッチング定義更新
cp -f ${MC_AC_CM_0083_DEF} ${MC_AC_CM_0083_DEF_WK1}
sed -i -e "s%:CSVFILE_AC0391_01%${OUTFILE_WRK1}%"              ${MC_AC_CM_0083_DEF_WK1}
sed -i -e "s%:CSVFILE_AC0551_08%${BS_AC_U_AC0551_08_CSV_WK5}%" ${MC_AC_CM_0083_DEF_WK1}

#
#- マッチング
#
ZTLOUTFILE=${OUTFILE_WRK2}
export ZTLOUTFILE
${G_TOOLSH}/util/bin/ZTLMAT01 ${MC_AC_CM_0083_DEF_WK1}

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

#ソート
bsortex \
  -sort key="0.10asca,1.12asca,2.3asca,3.12asca,4.10asca,5.12asca,6.6asca,13.8asca" \
  -record recform=txtcsv \
  -input  reclen=300 \
          file=${OUTFILE_WRK2} \
  -output file=${OUTFILE}
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " bsortex Error(${OUTFILE}.csv:rc=$rc) "
    echo $JOBNAME " bsortex Error(${OUTFILE}.csv:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#-------------------------------------------------------------------------------
#- ｅｏ光電話通話明細からｅｏ光電話通話合計削除用データを作成する
#- ｅｏ光電話通話合計が存在し、コース変更があるレコード（※１）を抽出したのち、
#- サービス契約番号、サービス契約内訳番号、更新先料金コースコード、更新先料金サービスコード、請求年月、課金先電話番号に編集し、
#- 同項目単位で集計する。
#- ※１．（料金コースコード≠更新先料金コースコード　または　料金サービスコード≠更新先料金サービスコード）
#- 　　　かつ　更新先料金コースコード≠空文字　かつ　更新先料金サービスコード≠空文字
#-------------------------------------------------------------------------------

#ソート
bsortex \
  -sort key="0.10asca,1.12asca,15.3asca,16.12asca,6.6asca,5.12asca" \
  -record recform=txtcsv \
  -input  reclen=300 file=${OUTFILE_WRK2} \
   include="(2.3asc.ne.15.3asc.or.3.12asc.ne.16.12asc).and.15.3asc.gt.'0'.and.16.12asc.gt.'0'" \
  -summary suppress first \
  -output file=${OUTFILE2} \
   reconst="0.10,1.12,15.3,16.12,6.6,5.12"
rc=$?
if [ $rc -ne 0 ]
then
    sh ${G_TOOLSH}/EOK010210J0.sh CS00002E $JOBNAME " bsortex Error(${OUTFILE2}.csv:rc=$rc) "
    echo $JOBNAME " bsortex Error(${OUTFILE2}.csv:rc=$rc) "
    exit ${G_RTN_ERROR}
fi

#
#---ＡＰＬ起動
#

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

#ワーク削除
if [ $WK_RM = "true" ]
then
    rm -f ${SQLFILE_WRK}
    rm -f ${OUTFILE_WRK1}
    rm -f ${OUTFILE_WRK2}
    rm -f ${UL_AC_U_AC0551_08_DEF_WK1}
    rm -f ${UL_AC_U_AC0551_08_CSV_WK1}
    rm -f ${BS_AC_U_AC0551_08_CSV_WK1}
    rm -f ${BS_AC_U_AC0551_08_CSV_WK2}
    rm -f ${BS_AC_U_AC0551_08_CSV_WK3}
    rm -f ${BS_AC_U_AC0551_08_CSV_WK4}
    rm -f ${BS_AC_U_AC0551_08_CSV_WK5}
    rm -f ${MC_AC_CM_0083_DEF_WK1}
fi

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

exit $exit_rc