eDocArrangement2 / イードックアレンジメント2

用紙上下分割

概要

監視フォルダに格納されたXDW文書の全てのページを上下で分割して用紙サイズが半分になったXDW文書を出力します。

実行すると以下の様に動作します。

eDocArrangement2
10_用紙上下分割
領収書_サンプル.xdw
用紙上下分割
20_分割後
領収書_サンプル_1.xdw
領収書_サンプル_2.xdw

設定の前準備

C:\Homeの下に、以下のような構成でフォルダを作り、準備します。

フォルダ構成のダウンロード

用紙上下分割_フォルダ構成.zip

Cドライブのルートに解凍してください。

フォルダ構成は以下の通りです。

  • C:\Home\eDocArrangement2\Demo\用紙上下分割
    • 10_用紙上下分割
      • 領収書_サンプル.xdw
      • 領収書_サンプル.zip
    • 15_エラー
    • 20_分割後
    • 30_処理済み
    • 90_System
      • 10_Temp
        • 10_Tiff
        • 20_Tiff分割
      • 80_Tool
        • PictureTool
          • picturetool.exe
          • PictureTool.html
      • 90_Log

設定

以下のリンクから完成した設定をダウンロードしていただくことができます。

設定ファイルのダウンロード

用紙上下分割_設定.zip

以下のフォルダに解凍すると設定が適用されます。

C:\Users\ユーザー名\AppData\Roaming\TechnoStyle\eDocArrangement2

グローバルデータとログの設定（共通設定）

グローバルデータの内容は以下の通りです。トップフォルダを変更する場合は、以下の定義を変更してください。グローバルデータは、「共通設定」から変更できます。

名前

値

TopFolder

C:\Home\eDocArrangement2\Demo\用紙上下分割

詳しい設定方法は、設定例（共通）グローバルデータとログの設定を参照して下さい。

ログ設定

実行ログファイル名

{%GET_G(TopFolder)}\90_System\90_Log\Log.txt

エラーログファイル名

{%GET_G(TopFolder)}\90_System\90_Log\ErrorLog.txt

文字コード

SJIS

方式

追加書き込み (日単位)
用紙上下分割

XDW文書の全てのページを上下で分割して用紙サイズが半分になったXDW文書を出力する。

共通ログ設定の内容でログを出力する。

処理一覧
  • ファイルの繰り返し1
    Loop File

メイン画面のファイルリストを対象に繰り返し処理を行う。

ループ毎にユーザーデータをクリアする。

  • XDW文書オープン1
    Open DocuWorks File

DocuWorksファイルを読み書き可能でオープンする。

バインダーを新規作成する場合は、ページ最大サイズでカラーは青とする。

  • ページの繰り返し1
    Loop DocuWorks Page

「XDW文書オープン1」でオープンされた文書のページを先頭から繰り返し処理を行う。

  • Tiff出力
    Macro Execute

以下のマクロを実行する。

#Tiffファイルの出力先フォルダ
{%SET_U(wk,path,{%GET_G(TopFolder)}\90_System\10_Temp\10_Tiff)}
{%CREATE_FOLDER({%GET_U(wk,path)})}

#Tiffファイル名
{%SET_U(wk,path,{%GET_U(wk,path)}\{%GET(FileNameWithoutExtension)}_{%FORMAT({%DW_GET(PageLoopCount)},000)}.tif)}

#Tiff出力
{%DW_OUTPUT_TIFF_IMAGE(XDW文書オープン1,{%GET_U(wk,path)},300,Color,{%DW_GET(PageLoopCount)},PackBits)}
  • XDW文書クローズ1
    Close DocuWorks File

「XDW文書オープン1」でオープンされた文書をクローズする。クローズ前に文書を保存する。

バインダー内の文書、オリジナルデータを追加する場合は、末尾に追加する。

  • 条件分岐1
    If

以下の条件を判定して処理を分岐する。

処理階層内のエラー回数が0回。

  • 満たしている場合
    If Then
  • ファイル移動1
    Move File

文書を以下の通り移動する。

移動元

{%GET(FullPathFileName)}

移動先

{%GET_G(TopFolder)}\30_処理済み

移動先に同名の文書がある場合は、ファイル名に連番を付与する。

  • 満たしていない場合
    If Else
  • ファイル移動2
    Move File

文書を以下の通り移動する。

移動元

{%GET(FullPathFileName)}

移動先

{%GET_G(TopFolder)}\15_エラー

移動先に同名の文書がある場合は、ファイル名に連番を付与する。

  • ファイル検索
    Search Files

以下の検索を行う。

フォルダ名

ファイル名

下位フォルダ検索

{%GET_G(TopFolder)}\90_System\10_Temp\10_Tiff

*.tif

しない
  • ファイルの繰り返し3
    Loop File

ファイル検索を対象に繰り返し処理を行う。

ループ毎にユーザーデータをクリアする。

  • コマンド2
    Command Execute

以下のコマンドを実行する。

コマンド

{%GET_G(TopFolder)}\90_System\80_Tool\PictureTool\picturetool.exe

パラメータ

-i "{%GET(FullPathFileName)}" -o "{%GET_G(TopFolder)}\90_System\10_Temp\20_Tiff分割\{%GET(FileNameWithoutExtension)}.tif" -sp -os

環境変数

名前

値
  • ファイル削除
    Delete File

以下のファイルを削除します。

{%GET(FullPathFileName)}
  • ファイル検索2
    Search Files

以下の検索を行う。

フォルダ名

ファイル名

下位フォルダ検索

{%GET_G(TopFolder)}\90_System\10_Temp\20_Tiff分割

*.tif

しない
  • ファイルの繰り返し
    Loop File

ファイル検索2を対象に繰り返し処理を行う。

ループ毎にユーザーデータをクリアする。

  • DocuWorks文書変換1
    Convert DocuWorks File

以下のファイルを対象にDocuWorks文書変換を行う。

{%GET(FullPathFileName)}

以下のフォルダに変換出力する。

{%GET_G(TopFolder)}\20_分割後

ファイル名を「{%GET(FileNameWithoutExtension)}.xdw」に変更する。

出力先に同名の文書がある場合は、ファイル名に連番を付与する。

圧縮方式は、標準(JPEG)とする。

変換後の用紙サイズは、イメージが収まる定型サイズにする。

  • ファイル削除2
    Delete File

以下のファイルを削除します。

{%GET(FullPathFileName)}
監視設定（eDocArrangement 2 Schedulerの設定）

No. / 設定名

1 用紙上下分割

実行対象

用紙上下分割

監視フォルダ

{%GET_G(TopFolder)}\10_用紙上下分割

拡張子

*.xdw

下位フォルダ

対象にしない

スケジュール

一定間隔 00:00:10

常時ログ出力

しない

オープンチェック

オープンチェックする。(3秒)

サイズチェック

しない

実行条件

動作確認

以下の動画をご覧ください。

▲