ＮＥＣのオフコン情報掲示板（ノウハウ系）
| ＮＥＣのオフコンを活用するためのノウハウを話し合うための掲示板です。 |
| 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
| COBOL85でシステム行へのdisplay | |
| 回転の達人 2006-4-10 19:12:00
[返信] [編集] 初めて投稿します。 先週、COBOL4のプログラムをCOBOL85に変換したのですが、このプログラムが画面をぎっしりつかっていて、エラーメッセージはシステム行に表示（DISPCRT(0,1) ”XXXXXX”) しています。 COBOL85ではどうしたらシステム行に印字できるのでしょうか？ このサイトで覚えた、オフコンからエクセルを起動する手法は大変役に立ちました。 ありがとうございます。 | |
| PrintView+Spoolernetについて | |
| Q太郎 2006-4-10 12:24:00
[返信] [編集] AVX4を使用中の顧客から、リストをPDFで管理したいという要望があり、PrintView+Spoolernetを考えていますが、 注意点/留意点/落とし穴/運用面での問題点/などなどがありましたら、教えてもらえませんか? | |
| 自己レス：解決しました | |
| Tama 2006-4-6 10:38:00
[返信] [編集] あれからソースを見直していたのですが、８インチフロッピーやＭＴＵに入っていてソースが取り出せなかったりと時間がかかってしまいましたが、結論から申しますと私の早とちりでしたお騒がせしまして大変申し訳ございませんでした。 SELECt命令に問題があると思い込んでいたのですがSORT命令が原因でした。 SYS@WK1を一時ファイルに指定することでファイルの使用中はおこらなくなりました。 COBOL85プログラム手引書の4.5.2整列ファイルの項にもきちんと「整列プログラムを複数起動する場合は、整列用ファイルを一時ファイルとして使用することをお勧めします」と書いてありました、もう一度マニュアルを読んで勉強しなおすことにします。 | |
| 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システムサブルーチン説明書によれば、データ名?２は、「メディア識別名」ですね。お使いになりたいフォーム名をセットしてあげれば宜しいのでは。 もう何年もフォームオーバーレィは使っておりませんが・・・・ 間違っていたらごめんなさい、そろそろボケが始まったのかもしれません・・・・ | |
| Re:SELECT命令でのSYS@WK1の競合 | |
| Tama 2006-3-28 13:29:00
[返信] [編集] ＭＳＤ０００には２０万セクターが連続した空き領域があり ます。 下記のメッセージが表示されました。 I L1090: ファイルは使用中です;MSD000/AVX000/SYS@WK1 . 今までのお話を伺いますとコーディングに問題がありそうな気がしますのでマニュアルを見直してみることにします。 単純なミスを犯しているような気がしてきました、お騒がせして申し訳ありません。 | |
| Re:SELECT命令でのSYS@WK1の競合 | |
| NNN3 2006-3-28 12:50:00
[返信] [編集] ディスクの未使用領域が、足らないとか 連続した未使用領域が ないとかありませんか．．．．．．．？？？ 特にＭＳＤ０００．．．．．． | |
| Re:SELECT命令でのSYS@WK1の競合 | |
| 富山清風 2006-3-28 12:37:00
[返信] [編集] 私も、NNN3の意見に賛成です。 原因は別のところにあると思います。 SELECT命令を使用しているプログラムを同時に実行しても全く問題ありません。 「空き容量の問題とか」、「同一プログラムで同時にSORTを使用しているがTEMPORARYになっていないとか」が考えられますが。 ちなみに、エラーメッセージはどんなエラーメッセージでしたか? | |
| Re:SELECT命令でのSYS@WK1の競合 | |
| NNN3 2006-3-28 12:32:00
[返信] [編集] DEALOCATE-->DEALLOCATEのスペル間違っていました。 | |
| Re:SELECT命令でのSYS@WK1の競合 | |
| NNN3 2006-3-28 12:18:00
[返信] [編集] Express640xi SYS@WK1がなくても動作します。 DEALOCATEして実行してみました。 実行時にSYS@WK2が生成されて動いています。 400,000件分データをCOBOLでSELECTを何本も実行しても 何でもないです。 | |
| Re:SELECT命令でのSYS@WK1の競合 | |
| Tama 2006-3-28 11:13:00
[返信] [編集] 説明のしかたが悪かったようです。 簡単に症状を説明しますと、ＳＥＬＥＣＴ命令を使用している ＣＯＢＯＬプログラムを２本以上動かすと、ＳＹＳ＠ＷＫ１使 用中が表示されて待ち状態になるのをどうにか出来ないかと思 案しているのですが。 | |
| Re:SELECT命令でのSYS@WK1の競合 | |
| NNN3 2006-3-28 10:35:00
[返信] [編集] ＣＯＢＯＬプログラムでＲＤＢファイルをＳＥＬＥＣＴ命令 で使用するとＳＹＳ＠ＷＫ１を使用してしまう為に他のＳＹ Ｓ＠ＷＫ１を使用しているプログラムがファイル使用中で止 まってしまいます。 ------------------------------------------------------ 上記の概念で言うと同じプログラムが、２個以上動かない 見たいですけど、実際は、同時に数本動きます。 別の原因があるのでは．．．．．．．．．．． −−−−−−−−−−−−−−−−−−−−−−−−−−− テストで ＣＯＢＯＬプログラムでＲＤＢファイルをＳＥＬＥＣＴ命令 のプログラムの実行と裏で#SORTでSYS@WK1を利用してＳＯＲＴ を実行しても 特に 変わったことは、ないけど．．．．．．．． | |
| SELECT命令でのSYS@WK1の競合 | |
| Tama 2006-3-28 9:47:00
[返信] [編集] ＣＯＢＯＬプログラムでＲＤＢファイルをＳＥＬＥＣＴ命令 で使用するとＳＹＳ＠ＷＫ１を使用してしまう為に他のＳＹ Ｓ＠ＷＫ１を使用しているプログラムがファイル使用中で止 まってしまいます。 現状でＳＥＬＥＣＴ命令を使用しているプログラムが相当数 あり業務が停滞して困っています、＃ＳＯＲＴのようにテン ポラリーファイルを指定する方法か何か別の解決策はないで しょうか、どうかお知恵をお貸し下さい。 | |
| Re:システムサブルーチンでのプリンタ番号の変更について | |
| Tama 2006-3-28 9:36:00
[返信] [編集] お返事遅れて申し訳ありませんでした。 色々試したのですが”CBLASGN”でプリンター番号を変更 した際にFILE-CONTROLで指定したフォーム名が消えて しまうようです。 引き続き調べてみたいと思います。 | |
| Re:SELECT命令での部分検索 | |
| hiko 2006-3-24 16:17:00
[返信] [編集] こんな記述では上手くいきませんか？ 数年前に試したきりで未確認です。間違ってたらゴメンなさい。 <前方一致> SELECT SYOMST WHERE SYO-NAME CHARACTERS LEADING WK-NAME <後方一致> SELECT SYOMST WHERE SYO-NAME CHARACTERS TRAILING WK-NAME <部分一致> SELECT SYOMST WHERE SYO-NAME CHARACTERS WK-NAME | |
| 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 | |
| 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を変換することかなぁ | |
| ＬＭＬをメールで送る | |
| 田代 2006-3-22 15:25:00
[返信] [編集] 数年前にＬＭＬがメールで送れる内容の記事を見ました。 ＬＭＬを管理している場所とそれを使って処理している所が 離れているのでＦＤでのやり取り以外の方法がしりたいです。 ＨＥＬＰ！ | |
| Re:ブザー＋リセットのVALUE | |
| やぎ 2006-3-13 15:02:00
[返信] [編集] ありがとうございました。 大変参考になりました。 これからもよろしくお願いします。 | |
| Re:システムサブルーチンでのプリンタ番号の変更について | |
| NNN3 2006-3-10 14:10:00
[返信] [編集] フォームオブジェクトファイルがプリンタの機種によりSYS@FOL0〜SYS@FOL7に フォームをいれて置かないとうまく動作しないみたいです。 簡単に説明すると同じ型番のKLP100Cが２台ありPRN010 PRN011という構成なら プログラムでプリンタ装置を変更すれば、出力が、可能と思います。 違う型番のフォーム対応のプリンタの場合は、共有でフォームが、利用出来ない 場合もあり、個別に プリンタとフォームをセットして出力を切り替えないと うまく出力出来ないと思います。 フォームの作成が２台とも共通の指定が、出来ていればフォームをSYS@FOL0 SYS@FOL5 に入れてあれば、可能だと思います。 コピーで入れるのではなく #FORM で個別に作成したものを入れてください。 | |
| システムサブルーチンでのプリンタ番号の変更について | |
Tama 2006-3-10 10:28:00
[返信] [編集]上記のような記述でプログラム実行時にプリンタ番号を 変更しているのですがフォームが出力されません。 装置アドレスを変更しているのが原因だとは思うのです がどのように記述すればよいのかで行き詰っています、 回避策を教えて頂けないでしょうか。 |
| 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
BluesBB ©Sting_Band