[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/