@echo off



@rem ファイルの有無確認

if "%1"=="" (

echo ＃事故情報データバンクシステム　アカウント処理用バッチ＃

echo.

echo このバッチに処理するファイルをドラック＆ドロップして下さい。

echo 処理を終了します。

pause

Exit

)



@REM ドラックアンドドロップされたドライブ、パス、ファイル名、拡張子を変数に設定する。

set org_csv=%1

set org_csv_filename=%~nx1

set org_csv_name=%~n1

set org_csv_ext=%~x1

set LOCAL_FOLDER=%~dp1

set TOOL_FOLDER=%~dp0



@REM 現在日時を取得して、半角数字のみに整形して変数に設定する。

set DATE_A=?TE%

set DATE_B=?TE_A:~-10%

set DATE_B=?TE_B:/=%

set TIME_A=%TIME%

set TIME_B=%TIME_A:~0,8%

set TIME_B=%TIME_B::=%



@REM 保存用フォルダを作成する

set SAVE_FOLDER="%TOOL_FOLDER%?TE_B%"

mkdir %SAVE_FOLDER%

mkdir %SAVE_FOLDER%\data

set EXT_FILE="%SAVE_FOLDER:"=%\%org_csv_name%.zip"



pause



@REM ファイルの拡張子を変更して、コピーする。

move /y %1 "%EXT_FILE%"



pause



@REM ZIPファイルを解凍する。

@REM "C:\Program Files\Lhaplus\Lhaplus.exe" /o:%SAVE_FOLDER% %EXT_FILE%

"%TOOL_FOLDER%\tools\7-Zip\7za1602\7za.exe" e -aos -pSPC$meNu -o"%SAVE_FOLDER%\data" "%EXT_FILE%"



@REM ZIPファイルを削除する。

del %EXT_FILE%



@REM アカウント発行書を作成する。

copy "%TOOL_FOLDER%\tools\様式\アカウント発行書.xlsm" "%SAVE_FOLDER%"





@REM 結果をアカウント発行書に転記する。



@echo on



start "" "%SAVE_FOLDER%"





pause