(Linux+COBOL+Tcl/Tk+PostgreSQL プログラミング)

Linuxで COBOLで x Windowのプログラミングが出来ます。
しかも全てフリー(タダ)です。

COBOLはを使用、GUIにはTcl/Tkを使用、データベースはPostgreSQを使用。

Linuxで動くフリーのCOBOL TinyCOBOLを使用してプログラミングを始めました。
実際始めるにあたって 何を作ろうか?どのようなプログラムが良いのか色々検討したところ、やはり実際に利用価値のあるプログラムで作成していて楽しい物・・・・・
そこでネットオークションで送料の計算をするプログラムでも出来れば と思い このプロジェクトは発足いたしました。(と言っても 一人で勝手に発足したのですが(^^;)

GUI部分にはTck/Tkを使用、データベースはPostgreSQL あとはCOBOLだけで作成する という事を基本に置いております。

 2001/09/02ゆうパック版 は「みねの」さんが開発されました。 みねのさんご苦労様でした。 

まずTinyCOBOLのサンプルプログラムのディレクトリー(test.code/tgui01)でTcl/Tkを使用しているサンプルを分析してみました。このtestgui01.cobですが、C言語のtestgui02.cをCALLしてその中でTclのライブラリーを使用してTkのWidgetとインターフェイスを取っているような作りになっております。しかしコボラーとしてはC言語は使用せず、COBOLとTcl/Tkでインターフェイスを取るような形のアプリケーションを作成したく 只今試行錯誤中です。

  現在までの経緯
  1.2001/04/14版 初版です。 発地は関西固定です。

  2.2001/05/01版 業者選択ラジオボタンの追加

  3.2001/06/09版 発地・着地の選択追加

  4.2001/07/20版 PostgreSQL使用

  5.2001/09/02版 ゆうパック部分の作成(みねの さん担当) 

2001/09/02版   ゆうパックロジックの作成 (みねのさんに作成して頂きました) 
9/02版の画面です。(Vinelinux 2.1 tcl-8.0.5 tk-8.0.5)




 詳細はこちらです。  

2001/07/20版   PostgreSQL使用  地域インデックス取得方法改訂 
サイズ・発送元・到着先・運賃をPostgreSQLのデータベースに登録し、サイズ・発送元・到着先よりSQL文にて運賃を取得。 
PostgreSQL使用   COBOLロジック改定。
7/20版の画面です。(RedHat7.1 tcl-8.3.1 tk-8.3.1)



詳細はこちらです。  

 2001/06/09版   発地 着地 選択可能   COBOL金額算出ロジック改定 
発送元と到着先の選択追加しました。あと細かいチェックの追加でTcl/Tk側は当バージョンでほぼ完成の形に近づきました。COBOL側もそれに伴い 発送元・到着先で金額計算するよう改定。また金額算出ロジックをIF判定から内部テーブルの形に改定いたしました。(次期バージョンで内部テーブルをファイル化する予定です)      発地・着地の選択追加 COBOLロジック改定。  
6/09版の画面です。



詳細はこちらです。

 2001/05/01版   業者選択ラジオボタン追加 その他小改定
業者選択ラジオボタンの追加を致しました。Tcl/Tk側で未入力チェック追加。COBOL側ヤマト運輸運賃全パターン作成完了。(但し発送元はあいかわらず関西固定)   4/14版をちょっとバージョンアップ致しました。 
 5/01版の画面です。





詳細はこちらです。 
 2001/04/14    プロジェクト発足
 まず アウトラインを作成しました。 
 4/14版の画面です。




詳細ページはこちらです








なにせ夜な夜な作成しておりますので バグ・ミス等発見して頂きました場合は、こちらまで メール頂ければ非常に有難いです。
また 仕様等で こうした方が良いのでは との意見もございましたら宜しくお願いいたします。

参考書籍

  1.詳解Tcl/Tk GUIプログラミング(秀和システム)
    2000年11に発行さてた本です。題名通り詳解に書かれており 大変分かりやすいです。
     http://members10.tsukaeru.net/bitwalk/
    (著者の方のサイトです。 Tcl/Tk・Perl/Tk・Gtk-Perl 等の情報があります。
    またTcl/Tk メーリングリストもあり Tcl/Tkを始める方は必見です。)


  2.はじめてのTcl/Tk(技術評論社)
    ちょっと古い本ですがTcl/Tkの入門書です。

  3.Linuxプログラミングガイド(秀和システム)
    一般的なLinuxのフリープログラミングの方法(Makeファイルの説明等)が載っております。

  4.Linuxで始めるCプログラミング(工学社)
    Tcl/Tk入門など載っており 簡単にしか説明されておりませんが なかなか重宝しました。

  5.実習MS−DOS LEVELUCOBOL入門(SPEC)
    昔々購入した本です。今回はXタイプを数値変換する時のロジックを参考にさせていただきました。

  6.改訂第3版 PostgreSQL 完全攻略ガイド (技術評論社)
    全517ページです。インストールから応用まで載っていて これ一冊で大概の事が分かるようになっております。