Google
オフコン練習帳内を検索
インターネット全体を検索

NECオフコン関連
オフコン一般
情報

NECのオフコン情報掲示板(ノウハウ系)

NECのオフコンを活用するためのノウハウを話し合うための掲示板です。

1: #NFCNVの制限?(2)   2: LLNIPの印刷(3)   3: #BKUPでusbに直接出力できますか?(3)   4: A−VXのプリンタ設定方法が分かりません(2)   5: OSのCDについて(4)   6: 初期プログラムに関する質問(4)   7: ボリュームMAPにあるが、#ABCだとファイルがみつからない(2)   8: SYS@DDFの復旧(2)   9: スプールデータの取り出し方法についての質問(10)   10: SG処理にて、PAGW実行中にエラーが発生しました(9)   11: ソースライブラリの一括検索(9)   12: 帳表をPDF印刷する方法(PRINTVEWを使わず)はありますか(2)   13: SKYLINKでテーブルを検索するとエラーとなる(1)   14: オフコン(3)   15: 管理人さんへの質問です(3)   16: #LTEDITでフォームのソースを指定するとメンバーが見つからないと表示される(4)   17: UPS無しの構成へのシステム移行(12)   18: #NFCNV でパソコンへ転送すると、データの先頭に空白がついてしまう(3)   19: CBL85資産をOPENcobolに移行する(3)   20: COBOLソースから仕様書の鏡作成ツール(3)   21: PrintBridgeの使い方(8)   22: WSエミュレータをWindows7Pro32bitSP1PCにインストール出来なくなった(1)   23: 漢字とANKの縮小印字について(3)   24: #NFCNVで先頭のカラムが0になるのは?(2)   25: N7884-14Bと互換性があるプリンタについて(2)   26: 表示(印刷)を任意の順番にしたいのですが・・・(6)   27: JSまたはPMのコールが間違っています(3)   28: ページプリンターのSG方法(2)   29: SMARTの画面明細項目が終われない(8)   30: AVXでの外字(槇)について(6)  

 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ 
« 1 ... 68 69 70 (71) 72 73 74 ... 108 »

Re:COBOL85でシステム行へのdisplay
Tama 2006-4-11 9:54:00  [返信] [編集]

書き込んでいる間にレスついてました^^;;



別件ですが、最近タイトルをクリックしてから内容が表示されるまでにかなり時間がかかるようになったのですが(30秒くらい)私だけでしょうか?
Re:COBOL85でシステム行へのdisplay
Tama 2006-4-11 9:47:00  [返信] [編集]

私が普段使っている方法は



WORKING-STORAGE   SECTION.
77 L0  PIC  9(2)  VALUE  ZERO.


SCREEN SECTION.
01 TEST.
   02  LINE L0  COLUMN 01  PIC X(4)  ”TEST”.

PROCEDURE DIVISION.
   DISPLAY TEST.



上記の記述で画面最下行(25行目)に表示されます。

25行目は80桁フルには使えなかったと思いますが何桁までかは確認とれてないです。
うろ覚えですが、以前のSYSTEM3100時代は画面最上段に表示されていたと思います。
Re:COBOL85でシステム行へのdisplay
totoo 2006-4-11 9:46:00  [返信] [編集]

もろにかぶりました。時刻もいっしょ・・・・・(笑
Re:COBOL85でシステム行へのdisplay
温泉好きのうさぎ 2006-4-11 9:45:00  [返信] [編集]

0行目へ表示するには、以下のようにすれば可能です。



SCREEN SECTIONで、LINE句に数字で「0」と書くとコンパイルエラーになりますので、WORKING-STORAGE SECTIONで定義した数字項目を設定します。

この数字項目の値に「0」を入れて、DISPLAY命令を実行すれば、0行目のシステム領域に表示できます。

Re:COBOL85でシステム行へのdisplay
totoo 2006-4-11 9:45:00  [返信] [編集]

みなさん、おはようございます。



いくつかの方法があるようですね。

もしかすると環境に依存するかもしれませんが、私は、0(ZERO)行目に表示をすることで実現しています。

SCREEN SECTIONでLINEを変数とし、その変数をZEROにしてDISPLAY命令を実行しています。

SGのWSモードの設定値に従って、0行目あるいは25行目に表示されます。

はずしていたらゴメンなさい。

使用OS:A-VXIV R2.52 (A-VX10の頃もできていました。)



お節介ながら、うどん様がお書きになっていらっしゃる方法(GDD)についてCOBOL85言語説明書のDISPLAY命令から引用しての補足ですが「最大表示桁数59/0行目の22桁目から表示(ワークステーションにより異なる)」と記されています。0行目はシステム行と読み替えることで宜しいでしょう。桁数と表示桁位置に制限が有るということですね。それ以外は御説明のとおりですね。



私は、勝手な桁位置を定義して表示しています。そのかわり、ブザー等はオウンコーディングしています。
Re:COBOL85でシステム行へのdisplay
うどん 2006-4-11 8:50:00  [返信] [編集]

システム行に表示するには、下記の様にしています。
はずしていたら、すみません。


 ENVIRONMENT DIVISION.               
 CONFIGURATION   SECTION.          
 SPECIAL-NAMES.  GDD  IS  XXXX. ←これを記述 
 INPUT-OUTPUT    SECTION.          

 PROCEDURE DIVISION.   
  DISPLAY " TEST " UPON XXXX.                     


 上記のDISPLAYが実行されると、うちの環境では、

 画面の最下部(25行目?)にブザー音と同時に表示され、

 リセットキーで解除になります。

 

 COBOL85言語説明書のP455に、特殊名(SPECIAL-NAMES)があります。

 書いてる事が、良く分かりませんが...
Re:PrintView+Spoolernetについて
オフコン人 2006-4-10 22:41:00  [返信] [編集]

質問があまりにも漠然としていませんか?

突然、注意点/留意点/落とし穴/運用面と言われても・・・



・利用されるバージョンによって、600サーバのみしか利用できない場合と、別サーバでも利用できる場合がありますよね。Adobe Acrobatを600サーバにインストールする懸念

・何ページくらいを一度にPDFにするかでのCPU使用率

・元々Windows製品ですからAdobe AcrobatにはLP帳票はありません。改ページが正しく行われているか。

・外字があるか?

・変換したPDFにセキュリティを設定するか。

等、山積みだと思いますが。
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  [返信] [編集]

あれからソースを見直していたのですが、8インチフロッピーやMTUに入っていてソースが取り出せなかったりと時間がかかってしまいましたが、結論から申しますと私の早とちりでしたお騒がせしまして大変申し訳ございませんでした。

SELECt命令に問題があると思い込んでいたのですがSORT命令が原因でした。

SYS@WK1を一時ファイルに指定することでファイルの使用中はおこらなくなりました。

COBOL85プログラム手引書の4.5.2整列ファイルの項にもきちんと「整列プログラムを複数起動する場合は、整列用ファイルを一時ファイルとして使用することをお勧めします」と書いてありました、もう一度マニュアルを読んで勉強しなおすことにします。
Re:システムサブルーチンでのプリンタ番号の変更について
totoo 2006-3-28 14:42:00  [返信] [編集]

皆さん初めまして。

こちらの掲示板をいつも「楽しく」拝見いたしておりますtotoo(ととお)と申します。どうぞ、宜しくお願いいたします。

ITOS時代からかれこれ10何年かオフコンと戯れてまいりました。



さて、Tamaさんのお困りの現象ですが、既に最初の御自身の書き込みに答えが出ているように思えますが・・・・



> WORKING-STORAGE SECTION.

> 77 PRN-DATA1 PIC X(6) VALUE ”PRN123”.

> 77 PRN-DATA2 PIC X(6) VALUE ” ”.



COBOL85システムサブルーチン説明書によれば、データ名?2は、「メディア識別名」ですね。お使いになりたいフォーム名をセットしてあげれば宜しいのでは。

もう何年もフォームオーバーレィは使っておりませんが・・・・

間違っていたらごめんなさい、そろそろボケが始まったのかもしれません・・・・
Re:SELECT命令でのSYS@WK1の競合
Tama 2006-3-28 13:29:00  [返信] [編集]

MSD000には20万セクターが連続した空き領域があり

ます。

下記のメッセージが表示されました。

I L1090: ファイルは使用中です;MSD000/AVX000/SYS@WK1 .



今までのお話を伺いますとコーディングに問題がありそうな気がしますのでマニュアルを見直してみることにします。



単純なミスを犯しているような気がしてきました、お騒がせして申し訳ありません。



Re:SELECT命令でのSYS@WK1の競合
NNN3 2006-3-28 12:50:00  [返信] [編集]

ディスクの未使用領域が、足らないとか 連続した未使用領域が

ないとかありませんか.......???

特にMSD000......

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  [返信] [編集]

説明のしかたが悪かったようです。



簡単に症状を説明しますと、SELECT命令を使用している

COBOLプログラムを2本以上動かすと、SYS@WK1使

用中が表示されて待ち状態になるのをどうにか出来ないかと思

案しているのですが。
Re:SELECT命令でのSYS@WK1の競合
NNN3 2006-3-28 10:35:00  [返信] [編集]

COBOLプログラムでRDBファイルをSELECT命令

で使用するとSYS@WK1を使用してしまう為に他のSY

S@WK1を使用しているプログラムがファイル使用中で止

まってしまいます。

------------------------------------------------------

上記の概念で言うと同じプログラムが、2個以上動かない

見たいですけど、実際は、同時に数本動きます。

別の原因があるのでは...........

−−−−−−−−−−−−−−−−−−−−−−−−−−−

テストで

COBOLプログラムでRDBファイルをSELECT命令

のプログラムの実行と裏で#SORTでSYS@WK1を利用してSORT

を実行しても 特に 変わったことは、ないけど........

SELECT命令でのSYS@WK1の競合
Tama 2006-3-28 9:47:00  [返信] [編集]

COBOLプログラムでRDBファイルをSELECT命令

で使用するとSYS@WK1を使用してしまう為に他のSY

S@WK1を使用しているプログラムがファイル使用中で止

まってしまいます。

現状でSELECT命令を使用しているプログラムが相当数

あり業務が停滞して困っています、#SORTのようにテン

ポラリーファイルを指定する方法か何か別の解決策はないで

しょうか、どうかお知恵をお貸し下さい。

Re:システムサブルーチンでのプリンタ番号の変更について
Tama 2006-3-28 9:36:00  [返信] [編集]

お返事遅れて申し訳ありませんでした。

色々試したのですが”CBLASGN”でプリンター番号を変更

した際にFILE-CONTROLで指定したフォーム名が消えて

しまうようです。

引き続き調べてみたいと思います。

 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ 
« 1 ... 68 69 70 (71) 72 73 74 ... 108 »

BluesBB ©Sting_Band