システム化の経緯

同社では、IBM i （AS/400）をより使い易くするためGUI化ツールをいくつか検討していた。 簡単に使えそうなツールはあったものの、機能面での物足りなさを感じていた。 そんな中でDelphi/400に出会い、本格的な開発にも応用が可能なことが決め手となり、導入を決定した。 今回、以下の経緯により２つのシステムをDelphi/400による自社開発で提供した。
同社では、様々な建設現場に、足場をはじめとする仮設建設機材をレンタルで提供している。 レンタル機材が返却時に破損している場合、破損部分の検収写真を添付し、お客様に対して請求を行っている。 検収写真は多い時で1日300枚以上と大量なこともあり、事務作業が煩雑でさまざまな問題が発生していた。
その他の課題として、IBM i 帳票のPDF化を検討していたが、市販ツールは高価だったり専用サーバーが必要だったりで導入に至らなかった。

AFTER（システム導入後）

1.検収写真管理
Delphi/400で「写真管理ソフト　検収写真くん」を自社開発し、上記の各課題を解決した。 新ソフトでは、IBM i 上の検収情報とファイルサーバ上の検収写真データを自動で印刷、保管できるようにした。 各課題に対する解決策は以下のとおりである。

• (1)写真データの伝達

  新システムでは、IBM iデータとファイルサーバーデータを直接利用できるDelphi/400の特徴を活かし、検収情報（IBM i ）と検収写真（ファイルサーバー）を一画面で同時に参照できる。 営業店から直接サーバーを見に行くので、従来の写真データのメール送付作業が不要になった。

• (2)写真データの保存

  保存フォルダのカテゴリ（営業担当者・得意先・現場・返却日等）や階層を、任意の組合せで自動作成できるようにした。 各担当者毎にデータの保管方法が異なることに対応するため、担当者のPCにINIファイルを設定しフォルダー構成を自動決定できるようにした。

• (3)写真データの印刷

  Delphiと組み合わせて使用できる"VB-Report" により、以下の機能を実現した。
  

  • ・A4 用紙に、4枚または8枚の写真を自動リサイズしながらレイアウト作成する。
  • ・伝票番号が変わると、自動的にページ替えを行う。
  • ・商品名と修理内容を自動印字する。
  また、写真をサムネイル形式でも管理できるように工夫し、一覧性を高めた。

• (4)写真データと検収データの照合

  検収写真データと検収情報データをリンクするために、検収写真（JPEG）のEXIF情報にIBM i マッチング用キーを持たせた（EXIF情報とは、デジタルカメラで保存する記録の形式情報）。 Delphi/400でEXIF 情報を読み込み、IBM i 上のキーデータとマッチングにより、2つのデータを連携した。

2.スプールファイルのPDF化
Delphi/400を使って、スプールファイルの一覧（OUTQ）を画面上に表示し、該当スプールファイルをダブルクリックするとスプールファイルの内容を画面上に表示する。 さらにPDF印刷ボタンを押すと、VB-Reportで帳票を作成し、PDFを出力先として選択することによりPDF化を可能とした。

開発環境

Tool

Delphi/400 Version2007

DB Server

IBM i

開発会社

日綜産業株式会社（自社開発）