ＮＥＣのオフコン情報掲示板（ノウハウ系）
| ＮＥＣのオフコンを活用するためのノウハウを話し合うための掲示板です。 |
| 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
| ■▲▼ | ||
| 1 | SELECT命令でのSYS@WK1の競合 | |
| Tama 2006-3-28 9:47:00
[返信] [編集] ＣＯＢＯＬプログラムでＲＤＢファイルをＳＥＬＥＣＴ命令 で使用するとＳＹＳ＠ＷＫ１を使用してしまう為に他のＳＹ Ｓ＠ＷＫ１を使用しているプログラムがファイル使用中で止 まってしまいます。 現状でＳＥＬＥＣＴ命令を使用しているプログラムが相当数 あり業務が停滞して困っています、＃ＳＯＲＴのようにテン ポラリーファイルを指定する方法か何か別の解決策はないで しょうか、どうかお知恵をお貸し下さい。 | ||
| 2 | Re:SELECT命令でのSYS@WK1の競合 | |
| NNN3 2006-3-28 10:35:00
[返信] [編集] ＣＯＢＯＬプログラムでＲＤＢファイルをＳＥＬＥＣＴ命令 で使用するとＳＹＳ＠ＷＫ１を使用してしまう為に他のＳＹ Ｓ＠ＷＫ１を使用しているプログラムがファイル使用中で止 まってしまいます。 ------------------------------------------------------ 上記の概念で言うと同じプログラムが、２個以上動かない 見たいですけど、実際は、同時に数本動きます。 別の原因があるのでは．．．．．．．．．．． −−−−−−−−−−−−−−−−−−−−−−−−−−− テストで ＣＯＢＯＬプログラムでＲＤＢファイルをＳＥＬＥＣＴ命令 のプログラムの実行と裏で#SORTでSYS@WK1を利用してＳＯＲＴ を実行しても 特に 変わったことは、ないけど．．．．．．．． | ||
| 3 | Re:SELECT命令でのSYS@WK1の競合 | |
| Tama 2006-3-28 11:13:00
[返信] [編集] 説明のしかたが悪かったようです。 簡単に症状を説明しますと、ＳＥＬＥＣＴ命令を使用している ＣＯＢＯＬプログラムを２本以上動かすと、ＳＹＳ＠ＷＫ１使 用中が表示されて待ち状態になるのをどうにか出来ないかと思 案しているのですが。 | ||
| 4 | Re:SELECT命令でのSYS@WK1の競合 | |
| NNN3 2006-3-28 12:18:00
[返信] [編集] Express640xi SYS@WK1がなくても動作します。 DEALOCATEして実行してみました。 実行時にSYS@WK2が生成されて動いています。 400,000件分データをCOBOLでSELECTを何本も実行しても 何でもないです。 | ||
| 5 | Re:SELECT命令でのSYS@WK1の競合 | |
| NNN3 2006-3-28 12:32:00
[返信] [編集] DEALOCATE-->DEALLOCATEのスペル間違っていました。 | ||
| 6 | Re:SELECT命令でのSYS@WK1の競合 | |
| 富山清風 2006-3-28 12:37:00
[返信] [編集] 私も、NNN3の意見に賛成です。 原因は別のところにあると思います。 SELECT命令を使用しているプログラムを同時に実行しても全く問題ありません。 「空き容量の問題とか」、「同一プログラムで同時にSORTを使用しているがTEMPORARYになっていないとか」が考えられますが。 ちなみに、エラーメッセージはどんなエラーメッセージでしたか? | ||
| 7 | Re:SELECT命令でのSYS@WK1の競合 | |
| NNN3 2006-3-28 12:50:00
[返信] [編集] ディスクの未使用領域が、足らないとか 連続した未使用領域が ないとかありませんか．．．．．．．？？？ 特にＭＳＤ０００．．．．．． | ||
| 8 | Re:SELECT命令でのSYS@WK1の競合 | |
| Tama 2006-3-28 13:29:00
[返信] [編集] ＭＳＤ０００には２０万セクターが連続した空き領域があり ます。 下記のメッセージが表示されました。 I L1090: ファイルは使用中です;MSD000/AVX000/SYS@WK1 . 今までのお話を伺いますとコーディングに問題がありそうな気がしますのでマニュアルを見直してみることにします。 単純なミスを犯しているような気がしてきました、お騒がせして申し訳ありません。 | ||
| 9 | 自己レス：解決しました | |
| Tama 2006-4-6 10:38:00
[返信] [編集] あれからソースを見直していたのですが、８インチフロッピーやＭＴＵに入っていてソースが取り出せなかったりと時間がかかってしまいましたが、結論から申しますと私の早とちりでしたお騒がせしまして大変申し訳ございませんでした。 SELECt命令に問題があると思い込んでいたのですがSORT命令が原因でした。 SYS@WK1を一時ファイルに指定することでファイルの使用中はおこらなくなりました。 COBOL85プログラム手引書の4.5.2整列ファイルの項にもきちんと「整列プログラムを複数起動する場合は、整列用ファイルを一時ファイルとして使用することをお勧めします」と書いてありました、もう一度マニュアルを読んで勉強しなおすことにします。 | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| ■▲▼ | ||
| 1 | ＬＭＬをメールで送る | |
| 田代 2006-3-22 15:25:00
[返信] [編集] 数年前にＬＭＬがメールで送れる内容の記事を見ました。 ＬＭＬを管理している場所とそれを使って処理している所が 離れているのでＦＤでのやり取り以外の方法がしりたいです。 ＨＥＬＰ！ | ||
| 2 | Re:ＬＭＬをメールで送る | |
| NNN3 2006-3-23 12:45:00
[返信] [編集] １．#LBMでLMLのプログラムをSEQに１取り出して#NFCNVで変換して LMLのバイナリィファイルが、そのままTXTに出力されます。 それをAVXのSEQに#NFCNVで変換して#LBMでLMLにCOPYすればできると思いますが、 この方法は、たぶん問題の方が、多いので 推奨できないです。 テキスト形式時にデータを触った場合、機械語なので、ABORTする だけならいいけど、最悪のケースになる場合も考えられます。 ２．FDTOOLを利用して変換したイメージファイルを配布して(FDU(FAT)形式PAFDU000) FDUTOOLでまた変換してIBM形式に戻して運用した方が、いいと思います。 手間は、FDUを変換することかなぁ | ||
| 3 | Re:ＬＭＬをメールで送る | |
| 江須扇 2006-3-24 12:48:00
[返信] [編集] 既にNNN3さんが回答していただいておりますので、 このサイトの参照ページを書き込みます。 １番に関しては http://otd10.jbbs.livedoor.jp/tahrayan01/bbs_reply?reply=341 の回答ページをたどってください ちょっと的外れですが http://www.geocities.jp/tahrayan/geo/0018.html ２番に関しては http://www.geocities.jp/tahrayan/sonota/avx01fd.html | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| ■▲▼ | ||
| 1 | システムサブルーチンでのプリンタ番号の変更について | |
Tama 2006-3-10 10:28:00
[返信] [編集]上記のような記述でプログラム実行時にプリンタ番号を 変更しているのですがフォームが出力されません。 装置アドレスを変更しているのが原因だとは思うのです がどのように記述すればよいのかで行き詰っています、 回避策を教えて頂けないでしょうか。 | ||
| 2 | Re:システムサブルーチンでのプリンタ番号の変更について | |
| NNN3 2006-3-10 14:10:00
[返信] [編集] フォームオブジェクトファイルがプリンタの機種によりSYS@FOL0〜SYS@FOL7に フォームをいれて置かないとうまく動作しないみたいです。 簡単に説明すると同じ型番のKLP100Cが２台ありPRN010 PRN011という構成なら プログラムでプリンタ装置を変更すれば、出力が、可能と思います。 違う型番のフォーム対応のプリンタの場合は、共有でフォームが、利用出来ない 場合もあり、個別に プリンタとフォームをセットして出力を切り替えないと うまく出力出来ないと思います。 フォームの作成が２台とも共通の指定が、出来ていればフォームをSYS@FOL0 SYS@FOL5 に入れてあれば、可能だと思います。 コピーで入れるのではなく #FORM で個別に作成したものを入れてください。 | ||
| 3 | Re:システムサブルーチンでのプリンタ番号の変更について | |
| Tama 2006-3-28 9:36:00
[返信] [編集] お返事遅れて申し訳ありませんでした。 色々試したのですが”CBLASGN”でプリンター番号を変更 した際にFILE-CONTROLで指定したフォーム名が消えて しまうようです。 引き続き調べてみたいと思います。 | ||
| 4 | Re:システムサブルーチンでのプリンタ番号の変更について | |
| totoo 2006-3-28 14:42:00
[返信] [編集] 皆さん初めまして。 こちらの掲示板をいつも「楽しく」拝見いたしておりますtotoo(ととお)と申します。どうぞ、宜しくお願いいたします。 ITOS時代からかれこれ１０何年かオフコンと戯れてまいりました。 さて、Tamaさんのお困りの現象ですが、既に最初の御自身の書き込みに答えが出ているように思えますが・・・・ > WORKING-STORAGE SECTION. > 77 PRN-DATA1 PIC X(6) VALUE ”PRN123”. > 77 PRN-DATA2 PIC X(6) VALUE ” ”. COBOL85システムサブルーチン説明書によれば、データ名?２は、「メディア識別名」ですね。お使いになりたいフォーム名をセットしてあげれば宜しいのでは。 もう何年もフォームオーバーレィは使っておりませんが・・・・ 間違っていたらごめんなさい、そろそろボケが始まったのかもしれません・・・・ | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| ■▲▼ | ||
| 1 | ブザー＋リセットのVALUE | |
| やぎ 2006-3-9 18:27:00
[返信] [編集] いつも勉強させていただいています。 とても基本的なことなのですが メッセージとともにブザーを鳴動させる場合 X(03) VALUE ””27”J””05”” ブザー＋リセット待ちの場合 X(03) VALUE ””27”J””05”” とSCREEN SECTIONに記述しますが、 そのVALUEが””27”B”01””の場合 どのような作用になるのでしょうか？ またそのようなことはマニュアルに書いてあるのでしょうか？ COBOL自体をほとんどソースを見ることで覚えてきたので こういう場合、どのように調べていいのかが分からず いざ自分が人に教える立場になり 戸惑っています。 大変基本的なことですが、ご教授願えますか？ | ||
| 2 | Re:ブザー＋リセットのVALUE | |
| ターラヤン 2006-3-10 0:03:00
[返信] [編集] ブザーについての説明は、 「データ管理説明書」の「第13章 ワークステーション」の 「13．６ ワークステーションの制御符号」のところに 書いてあります。 章番号は説明書のバージョンによって異なるかもしれません。 VALUEが””27”B”01””は書いていないので、エラーになるか、 何も起きないかのどちらかでしょう。 | ||
| 3 | Re:ブザー＋リセットのVALUE | |
| 温泉好きのうさぎ 2006-3-10 10:06:00
[返信] [編集] 簡単なプログラムを作って実際にどうなるのかを見れば、すぐにわかりますよ。 ””27”B”01”” すなわち ””27C201”” の値を DISPLAY 命令で実行した場合、３バイト目の値に応じた長さのブザーが鳴動した後、一時的に待ち状態となります。 この待ち状態は、リセットキーやファンクションキー等の押下により解除されます。 通常のリセット待ちとは異なり、システムファンクションキーでも解除されるため、画面切離→画面接続を行っても解除されてしまいます。 正しいリセット待ちを行うためには、COBOL言語説明書にもあるとおり 画面節で「WAIT」句を指定します。 また、データ管理説明書に記載されている ””27”J”01”” すなわち ””27D101”” は、ブザーの鳴動のみ行われ、指定時間鳴動後あるいは、鳴動中のリセットキー等の押下後は待ち状態にはならず、次の処理に進みます。 (注)上の説明で３バイト目を ””01”” としていますが、その値によってブザーの鳴動時間が変わります。 ””FF”” にすれば、鳴りっぱなしです。 | ||
| 4 | Re:ブザー＋リセットのVALUE | |
| やぎ 2006-3-13 15:02:00
[返信] [編集] ありがとうございました。 大変参考になりました。 これからもよろしくお願いします。 | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| ■▲▼ | ||
| 1 | 自然対数の算出 | |
| NTK 2006-3-6 19:18:00
[返信] [編集] はじめまして。 オフコンの事で教えて頂きたい事があり参りました。 EXCELの関数にも用意してあるLN関数(自然対数)を オフコンで実現したいのですが 過去に作られた方やご存じの方などいらっしゃいましたら どのようにしたらよいか、アドバイスを頂けますでしょうか？ よろしくお願いいたします。 | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
BluesBB ©Sting_Band