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 ... 36 37 38 (39) 40 41 42 ... 84 »

1 ログの抽出をJCLで出来ないか?
うどん 2008-3-26 8:35:00  [返信] [編集]

お世話になります。



STN000で実施している「ログの抽出」ですが、

JCLで出来ないのかなと...

どっかのマニュアルにはダメと書いてあった様な...
2 Re:ログの抽出をJCLで出来ないか?
富山清風 2008-4-4 11:04:00  [返信] [編集]

「ログの抽出」とは、#FLCNVで以下でできませんか?



/RUN #FLCNV,FIL=SYS@LML;
IDE=MSD000_
IFI=SYS@LOG0_
IFO=SHARE     _
ODE=MSD   _
OFI=F256_
LST=NO _
ERR=ABORT _
MOD=CREATE_
AMD=LOGICAL _
UMD=NO _
DEL=NO _
CLR=NO _
/> ;



または、別のことをやりたい?



的が外れていたら、すみませんです。

3 Re:ログの抽出をJCLで出来ないか?
0e0e 2008-4-9 10:43:00  [返信] [編集]


/SET SKIP;                                                                 0001
/RUN #LGEDT;                                                               0002
02_SYS@LOG_XXXJOBLOG_MSD_MSD001_                                           0003
/> ;                                                                       0004
/RUN XXXXXX,FIL=XXX-LML,DEV=MSD;                                           0008
/> ;                                                                       0009
/RUN #ABC,DEV=MSD;                                                         0010
MN1=01_MN2=01_MN3=02_PA1=MSD001_PA2=XXXJOBLOG_O03=YES_EXP=YES_             0011
MN1=99_                                                                    0013
/> ;                                                                       0014


こんなのでXXXJOBLOG(仮)というファイルに抜けます。

 256/1 RELATIVE

そのままでは中身が見えませんので、COBOLのプログラムの最初で
CALL ”SYSEDWR” を使ってファイルの最後にEODをつけます。
あとは好き勝手にデータ処理できます。
4 Re:(統合管理ツール)ログの抽出をJCLで出来ないか?
江須扇 2008-6-2 12:27:00  [返信] [編集]

またまた、亀レス、失礼します。



A-VX01 R4.0 からですが、

統合管理ツールというのがあります。

これでジョブログを見ることも可能と書いてあります。

まだ、私も使ってないので確かなことは言えませんが・・・・

http://www.nec.co.jp/pfsoft/a-vx/AMT/
全部読む 最新50 1-100 板のトップ リロード

1 ラインプリンタからレーザープリンタ
もも 2008-3-12 15:22:00  [返信] [編集]

COBOLで今までラインプリンタに印字するプログラムを作成してきました。プログラムを変更しないで、そのまま使用して、レーザープリンタに印刷できるのしょうか?

SGではレーザー用に印刷するように指定してあるのですが、1行しか印刷されず、しかも、重なって印刷されています。

すみませんが、教えて下さい。

それから、#ABCの印刷でもレーザーに印刷できるのでしょうか?

(SGの設定は、きちんと行なわれていると仮定して・・・)
2 Re:ラインプリンタからレーザープリンタ
回転の達人 2008-3-13 12:22:00  [返信] [編集]

 NECのMultiWriterなどのN型番のレーザープリンタならプログラムは触らなくても、OKです。 逆にN型版でないとダメですね。 WSEの制限事項にのっていると思います。 昔はエプソンのレーザプリンタなどで、N型にエミュレートされて正常に印字出来ていた事もありますが、今はダメではないでしょうか。
3 Re:ラインプリンタからレーザープリンタ
c4 2008-4-4 14:05:00  [返信] [編集]

ラインプリンタのエミュレータがあれば印字出来るんでしょうが…。

COBOLにエミュレーションスイッチって無かったでしょうか?

不確かな記憶で申し訳ありません。
4 Re:ラインプリンタからレーザープリンタ
オフコン人 2008-4-5 8:45:00  [返信] [編集]

SG設定がされてるって記載されるなら、単にラインプリンタのプログラムだけでなく、具体的に記載しないとアドバイスできませんよ。

ラインプリンタ専用の制御をされている場合だと、PrintBridgeを使えばできるようですね。BizReportingでも書式オーバレイの移行をすればこれもできますね。

書式オーバレイや制御が無いのなら、エミュレータ接続のページプリンタに印字できますね。

#ABCだと、何の問題もなく、エミュレータ接続のプリンタに印字できていますよ。
全部読む 最新50 1-100 板のトップ リロード

1 #NFCNV
ひろぴ 2008-2-26 13:26:00  [返信] [編集]

X(1) ”A”

X(1) ” ”

X(1) ”B”

をCSV2カンマ区切りでDOS変換した場合

A, ,B となりますが

A,,B のようにスペースを詰める方法はないでしょうか?
2 Re:#NFCNV
うどん 2008-2-26 18:42:00  [返信] [編集]

#NFCNVでスペースを詰める方法は無かったような...
全部読む 最新50 1-100 板のトップ リロード

1 フロッピーディスクの変換について
Plus 2008-2-19 21:21:00  [返信] [編集]

最近A-VXサーバーが新しくなり、フロッピーディスクへの保存形式が変更になり、PAFDUと言う名前のファイルになっています。

このファイルをWindowsで読めるファイルに変換するユーティリティはないでしょうか?

初めて書き込むのですが、よろしくお願いします。

2 Re:フロッピーディスクの変換について
ターラヤン 2008-2-21 1:06:00  [返信] [編集]

Plusさん、こんにちは。



A?VXの#NFCNVというもので変換する方法があります。



PAFDUという名前は、Windowsから見た名前ですが、

PAFDUの中にA−VXのファイルとして入っているので、

このA−VXのファイルの名前が必要です。

http://www.geocities.jp/tahrayan/utili/nfcnv.html

ファイル変換ユーティリティの辺りも参考に。

このページの例では、装置名はMSDxxxになっていますが、フロッピーディスクなので、

装置名はおそらくFDU000です。

3 Re:フロッピーディスクの変換について
Plus 2008-2-21 10:29:00  [返信] [編集]

ターラヤンさん、回答ありがとうございました。

さっそくやってみます。



あと、サーバーのD:AVXの中にFDTool.exeというユーティリティーがあるのですが使用方法はご存じですか。知っておられるようでしたら教えて頂けませんでしょうか。

よろしくお願いします。



A-VXのサイトは少ないので、初心者には心強いサイトですね!

ありがたいです。
4 Re:フロッピーディスクの変換について
温泉好きのうさぎ 2008-2-21 19:04:00  [返信] [編集]

A-VX01形式のフロッピーの実体であるPAFDU000という名の拡張子の無いファイルは、フロッピー一枚をそのまま一つのファイルにした状態です。

ご質問は、このファイルをA-VXを使わずに、Windowsからデータを参照したいということですよね?



このためには、

「データ管理説明書」の

 第2章 ボリューム形式とラベル

  2.2 フロッピィディスク

 第4章 ファイル処理機能

  4.2.4 フロッピィディスク上のファイル形式

このあたりが、ほぼ完璧に理解できているぐらいのスキルの持ち主でもない限り、Windowsからそのファイルの中が見えたとしても、そこから必要なデータを切り出していくのは非常に困難だと思います。

たいへん失礼ながら、「初心者」とのことですので、まず不可能なのではないでしょうか。



具体的なことを書きますと、PAFDU000はオフコンのデータですから、コードセットはEBCDICとなっています。Windowsのメモ帳等で開いてみても、意味不明の文字列しか見えないのはこのためです。

例えば、スペースを表わすEBCDICコードの ””40”” は、ASCIIでは、「@」なので「@」がたくさん見られると思います。

また、漢字等の2バイト系文字は、A-VX の独自コードになっていますので、それをWindows側のコードセットに変換するのは、工夫がいるかもしれません。



さて、PAFDU000のファイルサイズは、1,355,776 バイトですが、有効なデータは、先頭の998,972 バイトのみです。フロッピーディスクに空き領域ができないようにするために、ダーミーデータが付加されていると思われます。



次に、この先頭からボリュームラベルおよびファイルラベルが記録されている VTOC があります。

A-VXでは、データの単位として「セクタ」というものがあります。通常は、1セクタ = 256バイトであり、磁気ディスクや両面倍密度フロッピー (2HD型) がそうなのですが、フロッピーに関しては片面単密度フロッピーとの互換性のために、VTOCの片面のみ 1セクタ = 128バイトとなっています。



ボリュームラベルは重要では無いですが、ファイルラベルの解析は重要です。

そして、このファイルラベルから目的のファイルをさがし、必要なデータがどのアドレスにあるのかを判断しなければなりません。そのアドレスもシリンダ、トラック、セクタによる表現のため、実際に何バイト目を示しているのかを計算するのは非常にやっかいです。



目的のファイルのレコード長が 256バイトであれば、レコード単位でデータを見ることはまだ容易でしょうが、他のレコード長やブロック化されていたりすると、これを展開させるのがまたやっかいなことになります。



そのファイルが順編成や相対編成であれば、データは順番に入っているので、EOF と削除レコードの判断ができれば、これで終了となります。

しかし、索引順編成ファイルであれば、どれが有効レコードなのか、ほとんど判断不能です。索引ブロックが階層化されるぐらいデータ件数が多くなると、もうお手上げ状態です。



以上はデータファイルについてですが、プログラム等の入っている SUL の中から一本の COBOL のソースを読み出したいというのでしたら、無理と判断したほうが早いです。待機編成ファイルの構造が理解されていないと不可能です。

素直に A-VX で SUL からソースを抽出して #NFCNV で変換するのが最善です。



質問者様が具体的に何をなさりたいのかがわかりませんので、長々と書きましたが、有意義な回答であったかどうか。

あくまで、PAFDU000は、A-VXのみで使うファイルであり、Windows側から参照する必要はないと思います。

5 Re:フロッピーディスクの変換について
ターラヤン 2008-2-21 23:52:00  [返信] [編集]

FDTool.exeの使い方は「概要マニュアル」というマニュアルに書いてあります。

昔のフロッピーディスクからPAFDUに変換するものです。



たしかサーバのモデルによって、使える機種と使えない機種があったはずです。

6 フロッピーディスクの変換についてお礼
Plus 2008-3-4 8:28:00  [返信] [編集]

皆さん回答ありがとうございました。

結局#NFCNVで変換する事にします。

ただ、オフコンの担当者はハードディスクのデータが心配で使用を渋っていますが一緒にやってみます。



これからも頼りにしていますのでよろしくお願いします。
全部読む 最新50 1-100 板のトップ リロード

1 JCL(JS)について
汎用機SE 2008-1-17 18:27:00  [返信] [編集]

初めて投稿させて頂きます。

JCLの機能について教えて下さい。



JCLにデータをSYSINとして定義できるのでしょうか?



やりたい事は、COBOLソースをCドライブにテキスト形式と

して一括で#NFCNVでコンバートしたいと考えています。



やり方は、ここの掲示板に記載されていた情報を参考にしました。



汎用機では機能があるので、A−VXでも出来るのでは?

と思いまして・・・



申し訳ありませんが宜しくお願い致します。





2 Re:JCL(JS)について
ターラヤン 2008-1-17 23:59:00  [返信] [編集]

NECのオフコンには、SYSIN、SYSOUTはありません。



COBOLソースを一括で変換するのが目的ということですが、

自動でソースの一覧だけを#NFCNVに渡すのが難しいですね。

簡単にできる方法があればよいのですが。



3 Re:JCL(JS)について
うどん 2008-1-18 19:14:00  [返信] [編集]

色々方法があるのかも知れませんが、

うちで動いているのを。



1.ソースライブラリのプログラム一覧をデータで作成する。



2.#LBMのACT=SELECT という機能でソースライブラリから

  データファイルに作成できるので、1.で作成したデータr

  1件ずつ読んで、スパンマクロ(WAITモード)で#LBMを

  動かすコボルプログラムを作成する。



 ちなみに、ソースライブラリの一覧を作成するのは、

 #ABCでソースライブラリの一覧をスプールに落として、

 データをゴチョゴチョして作ってます...



 一応書いてみたけど、簡単には行かないみたい?

 もっと楽な方法があれば、私も知りたいです。
4 Re:JCL(JS)について
ソーステキスト太郎 2008-1-18 21:38:00  [返信] [編集]

私のやっているオフコンのソースをテキスト形式に

変換する方法をお知らせします。



1組目のJS

(JSL名:SU-CNV JSファイル名:AAA-JSL)
/RUN SE&ST0,DEV=MSD,FIL=XXX-LML;
/> ;
/RUN #LBM;
PRD=_MDE=MSD_MFI=&5_ACT=SELECT_ODE=MSD_OFI=F80_NAM=&0_
ODE=_ACT=_DIR=_MDE=_
/> ;
/RUN #FLCNV;
MN=C_MN2=AD_PA1=MSD_PA2=_PA3=F80_PA4=1_PA5=C80_PB1=&4_
PB2=CSV1_PB3=EXCLUSIVE_PB4=COMMA_PB7=C_PB8=CREATE_MN1=Q_
/> ;


2組目のJS

(JSL名:XXXXXX)
/RUN SU-CNV,DEV=MSD,FIL=AAA-JSL,(AAAAA1,D,OC,TXT,,BBB-SUL);
/RUN SU-CNV,DEV=MSD,FIL=AAA-JSL,(AAAAA2,D,OC,TXT,,BBB-SUL);
/RUN SU-CNV,DEV=MSD,FIL=AAA-JSL,(AAAAA3,D,OC,TXT,,BBB-SUL);
/RUN SU-CNV,DEV=MSD,FIL=AAA-JSL,(AAAAA4,D,OC,TXT,,BBB-SUL);
/RUN SU-CNV,DEV=MSD,FIL=AAA-JSL,(AAAAA5,D,OC,TXT,,BBB-SUL);
/RUN SU-CNV,DEV=MSD,FIL=AAA-JSL,(AAAAA6,D,OC,TXT,,BBB-SUL);


上記の2種類のJSを作成し、2組目のJSを実行するとテキスト形式に展開されたソースが

指定された場所に出来上がります。

(説明)

BBB-SUL:変換したいソースが入っているSUL名
AAAAA1〜6:変換したいメンバ名
D :ドライブ名
OC :フォルダ名
TXT:拡張子


1組目のJS内のSE&ST0について

SE&ST0:COBOLでの自作プログラムです

機能:&0,&1,&2,&3より&4を作成します
例:&0=AAAAA1
:&1=D
:&2=OC
:&3=TXT

:&4=D:\OC\AAAAA1.TXT


自作プログラムを作成したくない場合は、1組目のJSの&部分を取り込んでしまったものを、

複写していただければ、可能です

下記のように

/RUN #LBM;
PRD=_MDE=MSD_MCI=_MFI=BBB-SUL_ACT=SELECT_ODE=MSD_OCI=_OFI=F80-1_
NAM=AAAAA1_ODE=_ACT=_DIR=_MDE=_
/> ;
/RUN #NFCNV,DEV=MSD;
MN1=C_MN2=AD_PA1=MSD_PA2=_PA3=F80-1_PA4=1_PA5=C80_
PB1=D:OCAAAAA1.TXT_PB2=CSV1_PB3=EXCLUSIVE_PB4=COMMA_PB7=C_
PB8=CREATE_MN1=Q_
/> ;
/RUN #LBM;
PRD=_MDE=MSD_MCI=_MFI=BBB-SUL_ACT=SELECT_ODE=MSD_OCI=_OFI=F80-1_
NAM=AAAAA2_ODE=_ACT=_DIR=_MDE=_
/> ;
/RUN #NFCNV,DEV=MSD;
MN1=C_MN2=AD_PA1=MSD_PA2=_PA3=F80-1_PA4=1_PA5=C80_
PB1=D:\OC\AAAAA2.TXT_PB2=CSV1_PB3=EXCLUSIVE_PB4=COMMA_PB7=C_
PB8=CREATE_MN1=Q_
/> ;


ここで、問題になるのが2組目のJSの作り方だと思います。
一般的には、「うどん」さんの方法になると思います。

「うどん」さんの方法(多分こうしておられるのではないかと想像しました)

1.ディレクトリ一覧をスプールに落とす
2.#ABC;複写-->ファイル-->SYS@SP????-->F256-->オプション=YES-->出力形式=FIXED-->あとは指示に従ってください
3.F256の8桁目から6文字がメンバ名ですので、#ABC;などでF256からF80に抽出し、加工します。
 抽出時のフィールド編集で(@***@),(8,6),(@+++@)などとしています
4.F80を#TEDITで読み込みSコマンドで
S ALL S”***”,”/RUN SU-CNV,DEV=MSD,FIL=AAA-JSL,(”
S ALL S”+++”,”,D,OC,TXT,,BBB-SUL);”
5.メンバ名をつけて保存し、実行します。

(注)SYS@SP????の????は数字ですが、スプール表示の番号-1を指定します。

以上、長々と書きましたが、参考にならば幸いです。

5 Re:JCL(JS)について
汎用機SE 2008-1-20 21:47:00  [返信] [編集]

ターラヤン様、

うどん様、

ソーステキスト太郎様



有り難う御座いました。

参考になりました。



また、何かありましたら

宜しくお願い致します。
全部読む 最新50 1-100 板のトップ リロード

 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ 
« 1 ... 36 37 38 (39) 40 41 42 ... 84 »

BluesBB ©Sting_Band