[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[orca-users:09842] 処方箋オリジナル帳票のカスタマイズ法



守屋@坂内国保診療所と申します.

 ORCAプロジェクトが公開しているオリジナル帳票のうち,処方箋をA5縦用紙に印刷するもの(※)をさらにカスタマイズしようと考えています.

(※)
http://www.orca.med.or.jp/receipt/tec/forms/jma-std-index.html#5874
のうちNo.65,「処方せん A5縦用紙 A00000H02A5M」です.

 同梱されているファイルのうち,帳票の様式は「A00000H02A5M1.red」ならびに「A00000H02A5M2.red」の2つに手を加えればいいと言うことは分かったのですが,実際に印刷される文字の配置を変更する方法が分かりません.

 おそらく「A00000H02A5M.CBL」を書き換えればいいということまでは予想出来るのですが,いかんせんOpenCOBOLは見るのも触るのも初めてで分かりません.
 COBOLが可読性の高い言語ということは何かで読んで,コードを眺めれば確かになるほどと思うのですが.

 具体的には,このオリジナル帳票ですと薬剤欄(処方欄)はおおよそ下記のように印刷されます.
(※固定ピッチでご覧下さい)

**************************************************************
1)
  ノルバスク5mg                          1      錠
  ニューロタン50  50mg                   1      錠
  【1日1回朝食後に】                               (  14日分)
**************************************************************

 このように割と横方向にたっぷりとスペースをとって配置されています.
 このスペースをもっと縮めたいのです.
 イメージとしては例えば下記のようにカスタマイズしたいです.

/////////////////////////////////////////////////
1)
  ノルバスク5mg                 1 錠
  ニューロタン50  50mg          1 錠
             【1日1回朝食後に】(  14日分)
/////////////////////////////////////////////////

 要は各要素間のスペースを好きなように変更したいわけです.

 これを実現するには「A00000H02A5M.CBL」のどの変数をいじればいいんでしょうか?
 あるいは他のファイルをいじることになるのでしょうか?

 どなたかお教えいただけると大変嬉しいです.
 よろしくお願い申し上げます.
-- 
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 守屋章成

■あいまいな家庭医の私■
http://fp-the-ambiguous.blogspot.com/
http://fp-the-ambiguous.blog.ocn.ne.jp/

  / ̄\ (社)地域医療振興協会 揖斐郡北西部地域医療センター
 |  MED 坂内国保診療所(岐阜県揖斐川町)
  \_/  http://www.jadecom.or.jp/

  ̄ ̄ ̄ ̄ 岐阜大学医学部 医学教育開発研究センター
  M E D C 非常勤講師
 ____ http://www1.gifu-u.ac.jp/~medc/