【COBOL】コボラー集まれ！！！【事務処理】
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
2006/05/01(月) 18:32:380153デフォルトの名無しさん
2007/03/30(金) 13:22:470154デフォルトの名無しさん
2007/04/08(日) 10:09:03家のパソコンで予習・復習したいのでCOBOLの環境（？）を
入れたいのですが、入れ方を教えてください！
0155デフォルトの名無しさん
2007/04/08(日) 21:02:38FreeCOBOL.iNFO〜フリーのWindows用COBOLコンパイラまとめ〜
http://labs.netbata.com/cobol/
ここら辺りを見たら？
0156デフォルトの名無しさん
2007/04/08(日) 23:01:400157デフォルトの名無しさん
2007/04/09(月) 22:38:18どうもありがとうございます！
0158デフォルトの名無しさん
2007/04/10(火) 13:12:44生成されるコードはアセンブリとは程遠いんじゃまいか？
それとも最近は改善された？
0159デフォルトの名無しさん
2007/04/10(火) 21:49:27命令10個おぼえれば仕事できる
もう10年も前に足あらったが今はこぼるがいとおしい
0160デフォルトの名無しさん
2007/04/10(火) 22:22:12現場で動いてるグッチャグッチャなソース
0161デフォルトの名無しさん
2007/04/11(水) 14:17:320162デフォルトの名無しさん
2007/04/11(水) 23:39:07教科書だったら明日から使うけど。
0163デフォルトの名無しさん
2007/04/12(木) 22:20:352chtable から ita_bangou というデータを埋め込みsqlでとってくる。
fitchでITA-BANGOUにいれる。
ita_bangouがnullの場合、ITA-BANGOUには何がはいるんでしょうか？
後に IF ITA-BANGOU = NULL と同じ意味になる文を作りたいです。
0164デフォルトの名無しさん
2007/04/13(金) 06:33:46データベースのtableにある小数点以下まである数値を
SQLで読み込んで演算し結果を表示したいのですが、
小数点が表示されなくなったりしてうまくいきません。
どうすればよいか教えていただけないでしょうか？
0165デフォルトの名無しさん
2007/04/13(金) 08:47:380166デフォルトの名無しさん
2007/04/14(土) 14:47:51周りについていけないです（＞＜）
0167デフォルトの名無しさん
2007/04/15(日) 23:44:00あ、それはもう転職したほうがいい。。
別にプログラムできなくても人生なんにも困らん。
0168デフォルトの名無しさん
2007/04/19(木) 15:39:310169デフォルトの名無しさん
2007/04/19(木) 21:24:52「COPY コピー句名.」だとエラーは出ず、
「COPY コピー句名 DISJOINING AA JOINING BB AS PREFIX.」だと
展開されてるっぽいんだけど文字が置き換わってません。
これだけの情報でもし原因がわかる方がいたらお願いします。
0170デフォルトの名無しさん
2007/04/19(木) 22:24:46仕様書に、レコード長５０、ブロック長５０って書いてあります。
BLOCK CONTAINS 50 RECORDS でいいんですか？
0171デフォルトの名無しさん
2007/04/20(金) 01:07:060172デフォルトの名無しさん
2007/04/20(金) 01:38:02CURSOR変数にINTOしてやればFETCHできるんじゃない？
0173デフォルトの名無しさん
2007/04/20(金) 01:46:54ブロック長って指定できたっけ？
>>168
COBOLにwait命令なんて無いから、ミドルウェアの機能を呼び出す。
なければ、Cライブラリのsleepでも呼び出す機能を自前で作る。
0174デフォルトの名無しさん
2007/04/21(土) 00:58:16CURSOR式のCURSORは親レコードがFETCHされた時暗黙でOPENされるから(次の行をFETCHする時CLOSEされる)、
OPENとかCLOSEとか考えずにFETCHすれば良い。
0175デフォルトの名無しさん
2007/04/23(月) 21:18:46COBOLでJAVAを読む方法を教えてください。
0176デフォルトの名無しさん
2007/04/23(月) 23:02:54こんな感じか？
0177デフォルトの名無しさん
2007/04/24(火) 22:51:02入力ファイルの
SHOHIN-CODE PIC X(１) の中身が１かつ２なら正常でそのまま出力ファイルの同項目に書き込み、それ以外なら、
ERR-KBN PIC X(1) （注：OCCURS 5 TIMES になっている）のエラー区分(1)に１を入力するという
処理なのですが、IF SHOHIN-CODE = 1 OR 2 THEN CONTINUE ELSE MOVE 1 TO
ERR-KBN(1) END-IF. でいいのでしょうか？
0178デフォルトの名無しさん
2007/04/24(火) 23:11:51こりゃこれは1レコードを1ブロックとする指定
つーつブロックはJCLで指定しなさい
0179デフォルトの名無しさん
2007/04/24(火) 23:12:430180デフォルトの名無しさん
2007/04/25(水) 01:10:32>１かつ２なら
１または２なら〜だろ。
>IF SHOHIN-CODE = 1 OR 2 THEN
文字だから'1'にしないと一致しないかも。あと
SHOHIN-CODE = '1' OR SHOHIN-CODE = '2'
解釈確認するの面倒だから愚直に書くほうがいい。
0181177
2007/04/25(水) 23:47:41ありがとうございます。
調べまくったのですが、ERR-KBN OF 集団項目 というふうにすればＯｋですか？
0182デフォルトの名無しさん
2007/04/25(水) 23:58:16集団項目なくてもコンパイルは通る。いれるのは気分次第かね。
0183177
2007/04/26(木) 22:35:24本当ですか？
MOVE A TO B などのように、語と語の間は空白をあけますが、
十字キーでカーソル移動しないと、スペースキーだと空白と認識してしまい、
ビルドしたときにエラーの嵐で大変だと聞いたことがあります。
0184デフォルトの名無しさん
2007/04/27(金) 07:28:36どのような命令を出せばいいんですか?
初心者なんでよくわからないんです
誰か教えてください
0185デフォルトの名無しさん
2007/04/27(金) 08:09:14スペースキーでいいよ。ただ漢字の全角空白だとエラーになる。
>>184
COMPUTE SYOKEI-A = 1 + 2 + 3
0186デフォルトの名無しさん
2007/04/27(金) 20:25:540187デフォルトの名無しさん
2007/04/28(土) 00:06:160188183
2007/04/28(土) 00:38:03エディターで最初に全部右シフトとかしないといけなかったようです。
どうもありがとう。
0189デフォルトの名無しさん
2007/04/28(土) 09:10:34そのファイルがクラスの昇順になっているものとして
1 クラスをキーとしてワークエリアに定義しておく
eg 03 WK-KEY01
05 WK-CLASS01 PIC 9(XX)
03 WK-KEY02
05 WK-CLASS02 PIC 9(XX)
2 ファイルを読み出す
3 クラスをキーに入れる
4 最初のみ WK-KEY01をWK-KEY02にセットする
5 ファイルを読んでいく
6 集計するものはこの間にクラス計と全合計に加算
7 キーが違えば 集計分を出力 クラス計の変数を初期化
8 最後までこの繰り返し
9 最後になればクラス計と全合計を出力して終了
0190デフォルトの名無しさん
2007/04/28(土) 13:28:03２つのセクションんってどうちがうんですか？
0191デフォルトの名無しさん
2007/04/28(土) 13:53:05その単語が意味する通り。
FILE SECTION はファイル入出力用の領域。
WORKING-STORAGE SECTION は作業用の一時領域。
0192デフォルトの名無しさん
2007/04/28(土) 23:09:13出力で3行以上空けてから文字を打ち出したいときはどうしたらいいのでしょうか。
0193デフォルトの名無しさん
2007/04/28(土) 23:28:58１行改行を３回書けばいいだろ。
0194デフォルトの名無しさん
2007/04/28(土) 23:39:20すみません、よく理解していなくて。
0195デフォルトの名無しさん
2007/04/29(日) 00:31:01だから、改行文字を３文字書けよ。
0196デフォルトの名無しさん
2007/04/29(日) 01:51:240197デフォルトの名無しさん
2007/04/29(日) 01:54:04その調子だ
0198デフォルトの名無しさん
2007/04/29(日) 12:37:34これいっぱい出力したらどうなるかぁ
0199デフォルトの名無しさん
2007/04/30(月) 12:49:240200デフォルトの名無しさん
2007/05/01(火) 19:26:50二つのファイルのマッチングをやるんですが、なぜ事前にソートするのか？って
聞かれました。効率がいいからではないんですか？ソートしていないバラバラの
状態では、マッチングできないんですか？
0201デフォルトの名無しさん
2007/05/01(火) 22:47:45そんなの自分で両方ともトレースしてどっちが効率いいか比べろ。
それも研修のうちだ。
いっとくけど、ソートしないほうは「ソート」という下ごしらえが不要で
ソートしておく方は余計な作業が必要だな。
その辺のアルゴリズムも考えて総合的に比較しろよ。
現実、ソートなんてユーティリティまかせだけど、それも所詮人間の作った仕組みなんだから
絶対考慮しろよ！
ま、開発効率は言うまでもなくry(
0202デフォルトの名無しさん
2007/05/02(水) 00:00:470203デフォルトの名無しさん
2007/05/02(水) 00:36:090204デフォルトの名無しさん
2007/05/02(水) 01:20:40順ファイルは、いわばカセットテープ。
頭出しができないから、あらかじめ昇順しておくと、先頭から何度も読み込みする必要はなくなる。
0205デフォルトの名無しさん
2007/05/02(水) 02:49:49ちなみにCOBOLの新規開発なんてあるの？
既存システムへの機能追加じゃなくて、純新規の開発。
0206デフォルトの名無しさん
2007/05/04(金) 11:02:48OracleがPro*COBOLを提供しているからね Pro*Cよりも開発が楽で生産性が高い
0207デフォルトの名無しさん
2007/05/04(金) 12:14:45もっともそういう現場には逝かないような会社を選んで就職したわけだが
0208デフォルトの名無しさん
2007/05/04(金) 19:58:300209デフォルトの名無しさん
2007/05/04(金) 21:25:12来年度に始まる新しい保健制度もCOBOLでやるし。
0210デフォルトの名無しさん
2007/05/04(金) 22:24:07みずほ統合の際にも話題になったけど、○○銀行は日立、○○銀行はIBMみたいに、
これらの業界では汎用機メーカーが勢力争いでがっちり縄張り持ってるからな。
OSからソフトから運用保守まで全てをクローズドな技術として自分たちの手のうちに
できるメインフレームシステムは、他へのリプレースが非常に困難な上に利益率が
90％以上という恐ろしく儲かる世界。
無料のオープンソースが採用できたり利益率が低かったりするフロント側とは
比べ物にならないくらいおいしいビジネスなんだよ。
同じシステム開発でも、情報系と基幹系は別世界だと考えた方がいい。
0211デフォルトの名無しさん
2007/05/05(土) 00:21:160212デフォルトの名無しさん
2007/05/12(土) 10:38:03SPACEを出力領域に送らなければならないのですか？
0213デフォルトの名無しさん
2007/05/12(土) 10:47:070214デフォルトの名無しさん
2007/05/12(土) 10:48:37月曜日にやってみます！
0215デフォルトの名無しさん
2007/05/12(土) 13:10:300216デフォルトの名無しさん
2007/05/12(土) 22:10:02|||n ; '"__ ﾞ 、
＿＿__/二ﾆヽ､=_ ; ⊂/ ;
／_／| ,.l ,ｨ'''" ii')´） / / ,
/__/ ,.ｨ'" i ,,,.ｨ'｀ / /
/〆｀´ ｀"" ー――――‐ /
ﾛ0~l "〃〃" __,,.ｨ-‐'" ＜ コブラと聞いてやってまいりました
%====,≧j＿,,...()８８三--―''""~
/ /ヽ､ ヽ､
｀￣￣￣｀￣￣￣￣￣￣´
0217デフォルトの名無しさん
2007/05/14(月) 21:27:26６が最終キーですよね？
0218デフォルトの名無しさん
2007/05/15(火) 21:43:55> 来年度に始まる新しい保健制度もCOBOLでやるし。
それマジ？後期医療保険制度のことでしょ？
0219209
2007/05/16(水) 00:42:42保健って書いていたね。ごめん。後期医療の事ですもちろん。
自分の取引先だと既存システムが汎用機でシステム組んでいるため、
それらと連携を取るためにも汎用機のシステムの方が都合の良いケース
も考えられるし。
そんな場合だと当然COBOLになってしまう。
0220デフォルトの名無しさん
2007/05/16(水) 00:47:070221デフォルトの名無しさん
2007/05/18(金) 13:17:18そういえばORCAもCOBOLだったな
0222デフォルトの名無しさん
2007/05/24(木) 15:09:04教えてください。
0223デフォルトの名無しさん
2007/05/24(木) 16:25:50JCLでやるべきなんじゃないの？
0224デフォルトの名無しさん
2007/05/24(木) 19:26:260225デフォルトの名無しさん
2007/05/25(金) 11:43:42どうすればいいでしょうか？
0226デフォルトの名無しさん
2007/05/25(金) 11:45:56まじれすしちゃだめぽ
0227デフォルトの名無しさん
2007/05/25(金) 11:57:410228デフォルトの名無しさん
2007/05/26(土) 00:12:57こんな会社があるとは…
昔 汎用機オペ 〜オフコンプログラマー やってたが
オープン系にシフトして Object指向に馴染めず 欝で 失職した
元PGだが またコボラーに 戻れるかな＞＞？
0229デフォルトの名無しさん
2007/05/26(土) 01:09:210230デフォルトの名無しさん
2007/05/26(土) 05:42:550231デフォルトの名無しさん
2007/05/27(日) 22:19:270232デフォルトの名無しさん
2007/05/28(月) 12:09:43特に基幹システムでは、既存システムへの投資を無駄にすることなく、変化に強い新システムへ
進化できることが何よりも重要です。既存のCOBOLビジネスロジックを再利用可能なサービスに分解し、
ビジネスプロセスに合わせてそれらのサービスを組み合わせる。さらに、ビジネスプロセスの変化に対し、
サービスを再利用してシステムを再構築する、というアプローチを多くの先進企業が始めています。
今回の「COBOLフォーラム2007」では、SOAと .NETで実現する変化に強い新基幹システム構築のための
技法を解説し、最新のCOBOL活用事例をご紹介します。
この機会に是非ご参加いただきたく、ご案内申し上げます。
■COBOLフォーラム2007 開催概要
主催： マイクロフォーカス株式会社
協賛： 日本アイ･ビー･エム株式会社／マイクロソフト株式会社／日本ユニシス株式会社
開催日時： 2007年6月7日（木） 13：30〜17:10（開場13:00）
開催場所： ヴィラフォンテーヌ汐留 コンファレンスセンター（東京都港区東新橋1-9-2）
[地図] 汐留シオサイト地上MAP
[地図] 汐留シオサイト地下歩道MAP
受講料： 無料（事前登録制）
ttps://ssl2.oneoffice.jp/ssl.ai-privacy.jp/cobolforum/index.html
>日本ユニシス株式会社 w
これって、リプレイスしない方法ってことなの？
詳しい人よろしく
0233デフォルトの名無しさん
2007/05/28(月) 13:44:440234デフォルトの名無しさん
2007/05/29(火) 00:07:49話はそれからだ
0235デフォルトの名無しさん
2007/05/29(火) 12:33:29米『Computerworld』誌は24日(現地時間)、「死んだ(または死につつある)コンピュータスキル」を10種挙げるという
記事を公開した。サブタイトルには「あなたのスキルをアップデートすべきでは?」とあり、どちらかというと前向きな
提言というニュアンスを込めたいのかもしれないが、必ずしもそう感じられる文章ではない点は少々残念なところだ。
以下、そのリストと説明文を紹介しておこう。
1. COBOL
Y2Kは、腕をふるう機会が減りつつあったCOBOLプログラマにとって「2度目のゴールドラッシュ」となった。しかし、
それから7年近く経過した現在、この忘れられつつある言語の救世主の影もまったく見えない。同時に、コンピュータ
サイエンス関連の大学のカリキュラムでCOBOLが教えられることもほとんどなくなっているが、「メンテナンスを続け
なくてはいけないCOBOLアプリケーションを運用している組織はまだ何千も存在している」という声もある。
http://journal.mycom.co.jp/articles/2007/05/28/deadskills/index.html
0236デフォルトの名無しさん
2007/05/29(火) 12:35:14リスクを考え転職するか悩む
Mさんは大学卒業後、小規模なソフトハウスに入社しました。大学の専攻は文系学部でしたが、ITスキルが
将来重要になると考え、IT業界を中心に就職活動をし、3社から内定をもらうことができました。その中から、
規模は小さいものの、いろいろ先輩から教わることもできそうな、幅広い年齢層の先輩がいる企業に入社を決めました。
Mさんは入社後に汎用機の保守を中心に行う部署に配属されました。学生時代はITに関してほとんど接する
ことがなかったMさんにとっては、汎用機だろうと保守だろうと新しいことばかりでした。
しかしIT業界のことを少しずつ学んでいく中で、汎用機の保守作業のキャリアは評価があまり高くないということを
知るようになったのです。
会社の中では、上流工程に携わっているITエンジニアもいます。しかし、上流工程にかかわることのできる社員は、
ほとんど自分よりもかなり年齢が高い人ばかりでした。汎用機以外の仕事ができる可能性を求めてプロジェクトの
転換を希望してみましたが、思いどおりになりませんでした。
（全文）
http://jibun.atmarkit.co.jp/lcareer01/rensai/debug05/debug01.html
0237デフォルトの名無しさん
2007/05/29(火) 13:53:38上２つの文から受けた印象は
メンテナンスを続けなければならないCOBOLを運用している組織が
まだ何千も存在しているならば、まもなく定年を迎える人たちが
携わっている上流工程を保守できるスキルは評価される機会はある。
って感じ。
0238デフォルトの名無しさん
2007/05/30(水) 01:37:18誰がうまいことを書けとｗ、、、。
0239デフォルトの名無しさん
2007/06/07(木) 17:55:560240デフォルトの名無しさん
2007/06/14(木) 03:13:13しかし、Lispは古くさい言語だとは思われてない。
COBOLはLispより新しいし、今もなおLispとは比べるまでもない大勢力だ。
それなのに古くさいカビの生えた前世紀の遺物と思われてる。
この差はいったいなぜ？
COBOLにだって今もなお学ぶべき優れた点があるというのに。
可読性を重視し、読みづらい省略表記を使わないという長所なんて、
未だにCOBOLに遠く及ばない言語も多数あるというのに。
(たとえばPerlとかPerlとかPerlとか)
なぜCOBOLにはこんなに古くさい、
いまさら取り上げるべき長所なんか皆無の
惰性だけで使われてる言語という
イメージができてしまったのだろうか？
0241デフォルトの名無しさん
2007/06/14(木) 08:45:55一番効いてるのは、使ってるプログラマ層の差だろうね。
0242デフォルトの名無しさん
2007/06/16(土) 04:26:47安価で導入が楽な、個人PC用の決定的な環境が
無いことなんじゃないかなぁと。
Lispはフリーのエディタに付いてくるし
そもそも主なターゲットである言語研究者なら
自分で実装できてしまうようなシンプル設計。
PerlはWinならActivePerlをインスコすればOK、Linux系なら準標準。
書き捨て言語と割り切ってる設計だから慣れれば速記性がある。
文字列処理に強いのもポイント高い。
今でこそテキスト処理に重点を置いたスクリプトが台頭して
PHPみたいなWeb専門の言語もあるが、一昔前は
CGIをやりたいが為に導入した奴もかなり多いと思う。
PascalはDelphiで覚えた奴が多そう。普及に一役かっただろうな。
入力補助してくれるIDEがあれば冗長性も大して気にならないし
あれだけのライブラリがあれば言語関係なく使えると思う。
COBOLのフリー環境はあるが、ライブラリが不足だったり
中途半端だったりインストールが面倒だったり。
あの冗長なコードをテキストエディタで書くのもちょっと…。
かと言って、商用は異様に高いし…。
やはり汎用機の時代を引きずってる印象は否めないんだよなぁ。
0243デフォルトの名無しさん
2007/06/17(日) 17:50:57大学で仕方なく覚えたやつも多そう
0244デフォルトの名無しさん
2007/06/17(日) 22:06:43COBOLが帳票出力言語な事につきるんじゃねー？
使いやすいフリーのIDEがあったとしても、
帳票出すプログラムなんて個人ユースには必要ない
0245デフォルトの名無しさん
2007/06/19(火) 21:25:02PCユーザとは全く無縁の所でしか使われてないから
PCユーザにとっては「COBOL？ なにそれ？」になってしまう。
そして現代のコンピュータユーザの95%はPCユーザだ。
同じ古い言語でもLISP、C、PASCALなどは
PCの世界で使われてるからPCユーザが目にする機会は多い。
違いといえばそれだけだろう。
0246デフォルトの名無しさん
2007/06/20(水) 09:25:33COBOLスレでコンシュマーな話されても。。。
0247デフォルトの名無しさん
2007/07/06(金) 10:37:54田原いわく、社保庁の不祥事は「COBOLが悪い」のだとさ。（爆笑）
http://www.nikkeibp.co.jp/style/biz/column/tahara/070705_18th/
田原のぞっとするほどの無知無学さに喫驚。っていうか、呆れた。
0248デフォルトの名無しさん
2007/07/06(金) 15:14:19> これは彼が学生時代に使っていたもので、40年も前のものだ。
> つまりこの年金の問題は、あまりにも古いシステムとハードを使っていることから起きたのだ。
> なぜこのようなことが起きたのかというと、まさに社保庁は倒産しないからだ。
> 一般企業ではそんな古いものを使っていれば、数字が無茶苦茶になって倒産するから、
> 何年かに1回は切り替えている。それを社保庁は、40年も切り替えないできた。
ﾋﾃﾞｰ。言語やハードがいくら古かろうが
コンピュータは寸分の狂いもなく "命令どおり" に動いているというのに・・・
手持ちの電卓たたいて変な数字が出てきたら誰のミスか？ということを考えなおして欲しい。
0249デフォルトの名無しさん
2007/07/06(金) 20:38:40うちの病院はもう40年もシステムを継ぎ接ぎ継ぎ接ぎしながら
使い続け、一円のミスも起こしてませんが・・・・・・・・・・・・・
COBOLなんですけど・・・
0250デフォルトの名無しさん
2007/07/06(金) 23:14:17「時効年金」受給申請初日、連絡不手際で一部受理されず
http://www.yomiuri.co.jp/national/news/20070706it07.htm
今日から年金の時効を撤廃する法律が施行されたのに、社会保険庁からの
指示のメールを社会保険事務所の馬鹿が見てなくて「社会保険庁から何も
聞いておらず、手続きの方法も指示されていません」と言って申請に来た人を
追い返したそうだ
こんな馬鹿にはどんなシステム作ってやっても無駄じゃねえのか？
システム入れ替える前に人を入れ替えろやっ！
0251デフォルトの名無しさん
2007/07/07(土) 00:00:47俺に立派な大学を出られる頭脳と財力があったら社保庁入りたい。
0252デフォルトの名無しさん
2007/07/07(土) 01:00:07なのに、社保庁のCOBOLだけが悪いのかが不明。
しかし国会議員の無知は怖い。
システムの移行に2年や4年でできると思っているのか。
第3次オンライン後、ハード、ソフトを新規で完全にリプレイスした銀行ってどこよ。
■ このスレッドは過去ログ倉庫に格納されています