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

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

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

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

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

 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ 
« 1 ... 11 12 13 (14) 15 16 17 ... 108 »

他のプログラムでファイルAがオープンしていたら画面にメッセージを出す、 といったプログラムを作りたい
ig 2013-6-5 10:22:11  [返信] [編集]

こんにちは。いつもお世話になっております。
他のプログラムで、
ファイルAがオープンしていたら、
画面にメッセージを出す、
といったプログラムを作りたいのですが、
可能でしょうか。

業務時間中、バッチ更新をしなければならない事情があります。
ユーザーがある業務画面を開いていないか、
予防するためです。

事前に連絡して、
バッチ処理中は、画面を開かないよう、ユーザーに徹底はしています。
しかし人間ですから、誤って業務画面を開いてしまうことがあります。
それを予防したいです。




Re: #MENUMのエラー
ターラヤン 2013-6-1 0:25:52  [返信] [編集]

kenkenさん、こんにちは。

はっきりはわかりませんが、1つ気になるところが。

「A%#MENUP 01」となっていますが、Aの次が「%」になっていますよね。これが気になります。
たぶん、サーバ(オフコン)が複数台(例えば、自分のいる事務所と他の支社や本社とか)あるのですよね。

例えば、ここに%があるときは正しく動いて、%が無い時はダメ(逆に%があるときはダメで%が無い時はOK)というようなことはないでしょうか。
あるいは同じ%が表示されていても、実はAというオフコンに接続している画面とBというオフコンに接続している画面があって、2つのオフコンのメニューが似ているので、どっちのオフコンにつながっているか分からない状態になっている。そしてダメだなと思っていろいろ操作しているうちに画面が切り替わって、正しい方のオフコンのメニュー画面が表示されたとか。

つまり、接続先のサーバが違うのだが、メニューが似ているので気付かないということはないでしょうか。

%の印は、自分のところのオフコンとは別のオフコンに接続して使っているよ、という印です。(VWSという機能を使っている印)
#MENUMのエラー
kenken 2013-5-31 9:48:56  [返信] [編集]

#MENUMでプログラムを読んでるのすが、
最近になって、違うプログラムを読んでくることがあります。

      生産管理システム                                   
          
 01 ..... システム1   (ME01)                     
 02 ..... システム2  (ME02)                      
 03 ..... システム3   (ME03)                
                                                
 メニュー番号を入れなさい [  ]  
                           A%#MENUP 01

3を選択しても、1を呼ぶときがあります。
何度かやり直すと直ります。
どうしてでしょうか?解決策はありますか?
こんな事、みなさんの所でもありますか
Re: タイトルにベーシックと書いてあるにも関わらず
TOM 2013-4-17 13:21:33  [返信] [編集]

回答有難うございました。

・開発者は1.5名、ASでCOBOLは使用しない。
という状況でした。マイグレーション率は100%+αで完了。

ASでCOBOLは使用しなくて、マイグレーション率100%+α

とはすごいですね。COBOL-->RPGへツールが性能が良いんでしょうね。
私の周りではCOBOLはCOBOL、SMARTはRPGで作り直しというお話は伝わってきますが。
Re: タイトルにベーシックと書いてあるにも関わらず
富士通系SE 2013-4-12 11:31:31  [返信] [編集]

TOM様

前提として
・Express5800/750+AVX3、640AD+AVX4から
 AS/400 System iへマイグレーション+システム統合
・NEC開発者は不在、NEC側での開発は簡単なものしか出来ない
 「マニュアル」と「オフコン練習帳」が頼り
・開発者は1.5名、ASでCOBOLは使用しない。
という状況でした。マイグレーション率は100%+αで完了。
AS側の開発、実行環境の詳細はご勘弁を。

苦労した点
 ・ハード、ソフトの仕様がない
  あるのはファイル設計書だけでした。
 ・漢字変換
  FTPで受信したHEX値とNFCNVで変換したファイルから
  変換テーブルを作成しました。
 ・エラーコードの意味と発生原因(特に全銀、JCA、FTP等)
  開発者が不在だとこうなりますね・・・
  マニュアルと手順書で何とかなりましたけど、
  本番移行時はとても恐ろしかったのを覚えています。
 ・データ更新
  開発者が不在なので、AS側でAVX仕様のファイルを作成し
  AVXに更新を掛ける方法で何とか逃げ切れました。

移行後のメリット
 ・RDBが強力
  制約がより少ないという表現の方が正しいかもしれません。
 ・PCとの親和性が高い
  一時的なリストやデータ取得はADOやODBC等を利用して
  データベースを直接引いて、Excel、Access等に取り込み等
  Office使用率を大幅に引き上げた。
その他いろいろとありますが割愛いたします。
システム的には
・AVXで出来ることはASでも出来る。
・ASで出来ることでAVXでは出来ないことが多い。
というのが感想です。

ここから余談ですが・・・
オフコン練習帳のおかげ
 ・基本操作
  特に「ユーティリティ逆引き」は助かりました。
 ・ソーステキスト変換
  説明資料と掲示板のおかげで、全SRCリストが手に入りました。
 ・掲示板
  困った事は過去ログに掲載されていることが多かったです。

この程度でいいでしょうか?答えになってないような気が・・・

Express5800/640ADを3月末に廃棄しました。
サーバールームがちょっと淋しくなりました(笑)
Re: Intel 8254(BEEP音をPC/WSエミュレータで利用)
江須扇 2013-4-10 17:03:04  [返信] [編集]

EXCHANGEさん、いつもお世話になります。

読解力がないので読み違いをしているかもしれませんが、

要約すると
1.Windows7ではIntel8254プログラマブル・インターバル・タイマー・チップを使ってない
2.従って8254は停止させている
3.又はマザーボードについてない

てこうとですかね。
NEC MATEタイプMB MK32/B−F Windows7
は8254が付いてないという事になるのでしょうか?

ターラヤンさんへ
削除ありがとうございます。
お手数をかけました。
Re: BEEP音をPC/WSエミュレータで利用
EXCHANGE 2013-4-10 4:59:10  [返信] [編集]

☆ 参考資料です。

「Windows 7のBeep ドライバってどうなったのさ?」
http*//cpplover.blogspot.jp/2010/01/windows-7beep.html
Re: BEEP音をPC/WSエミュレータで利用
江須扇 2013-4-8 23:34:35  [返信] [編集]

ターラヤンさんすいません。
オートコンプリートが外れていて名前とパスワードをいれわすれました。
名前を付けて再投稿しました。
名無しさんを削除してください。
---------------------------------------------------------------------
機種を再確認をしました。
NEC MATEタイプMB MK32/B−F Windows7

エラーは
---------------------------------------------------------------------
Microsoft Windows [Version 6.1.7601]
Copyright (c) 2009 Microsoft Corporation. All rights reserved.

C:\Users\Administrator>net start beep
要求したサービスは既に開始されています。

NET HELPMSG 2182 と入力すると、より詳しい説明が得られます。


C:\Users\Administrator>echo ^G


C:\Users\Administrator>net stop beep
Beep サービスを停止中です........
Beep サービスを停止できませんでした。


C:\Users\Administrator>echo ^G


C:\Users\Administrator>net start beep
サービスを開始しているか、または停止中です。後で再試行してください。


C:\Users\Administrator>echo ^G


C:\Users\Administrator>
---------------------------------------------------------------------
もちろん中にある”echo ^G”で音はでません。
Re: タイトルにベーシックと書いてあるにも関わらず
TOM 2013-4-5 16:10:53  [返信] [編集]

ASへのマイグレーションは終了しているか思いますが、全体的にコンバージョン率は如何ほどでしたか?

ご苦労された点はどのあたりでしょうか?

差しさわりの無い程度で結構です。お教ください。
BEEP音をPC/WSエミュレータで利用
江須扇 2013-4-2 22:00:14  [返信] [編集]

こんばんは、江須扇です。
最近なぞな事があります。

最近購入したパソコン(NEC MATE タイプMB Windows7)でBEEP音がでません。一台ではなく複数台ですので仕様が変わったのでしょうか?

コマンドプロンプトで
C:\Windows\system32>net start beep
要求したサービスは既に開始されています。

がでたり、システムエラー5がでます。

しかし実際は鳴りません。

コマンドプロンプトで
echo ^G
(Ctrl+G)
を実行しても同じです。

net stop beep
を実行しても実行できないというエラーになります。

PC/WSエミュレータで
なぜ、BEEP音にこだわるかというとエラー音の時
サウンド(WAV)を利用するとボリューム調整となります。
BEEP音はそれに影響されないからです。

NECパソコンで最近そのような仕様変更があったのでしょうか?
Re: ファイルの各種情報をファイルに出力したい
ろろけい 2013-3-8 19:06:30  [返信] [編集]

TOMさん

なるほど!
そういうことなのですね!
よくわかりました!

まだプログラムは組んでいませんが、光が見えてきました。

助かりました。

ありがとうございました!
Re: ファイルの各種情報をファイルに出力したい
TOM 2013-3-8 17:25:00  [返信] [編集]

削除レコード数が瞬時に出力される仕掛けは
MISのデータを前提で

最終レコードアドレスが83バイト目にあります。データ部ですから、第1エクステント、第2エクステント・・と順番にデータはかかれます。
83バイト目には最終にデータを出力した位置を示しております。第1エクステントから最終にデータを出力した位置を計算すると、何レコードが作成されているかを知ることが出来ます。そこから有効レコード数を減算すれば、その差が削除レコード数となります。
Re: ファイルの各種情報をファイルに出力したい
ろろけい 2013-3-6 14:39:48  [返信] [編集]

TOMさん

早速の返信ありがとうございます。

いただいた情報で計算してみたら、#MAPと同じ情報を得られました。
ありがとうございました。

ただ、ごめんなさい、この場合、削除レコードの数も「空き」側に入ってしまいますよね。

常時使われているファイルなので、あまり#MIXGNができない状態だったりするのです。
なので、削除レコードがたまってきたころに、タイミングを見計らって、
古いデータを削除したり#MIXGNを実行したりという運用なのです。

余談ですが、最近になってやっと、#AJOBCやA-VX自動運転管理ユーティリティの存在を知ったので、
先ほども述べたように、定期的に深夜にでも自動で#MIXGNを実行すれば、
削除レコードの心配はなくなりますよね。

なので、もはや「興味」の域に入ってしまっていますが。
#MAPで瞬時に削除レコード数が表示されるということは、その情報またはそれを導きだせる情報が、
SYS@FDF等のどこかに含まれているのかな?と思い投稿させていただいたというわけです。
Re: ファイルの各種情報をファイルに出力したい
TOM 2013-3-6 11:57:34  [返信] [編集]

SYS@FDF内の項目から「あと何件入るか」は計算できます。
例えば 順編成ファイルの時のSYS@FDFからは

1.ファイル編成=S 29バイト目
2.現在アロケートされている容量を計算する
 217バイト目から257バイト目に第nエクステント終了、開始がありま す。この値はセクタ数かと思います。
3.レコード長とブロック長から2項のエクステント内に最大収容データ 件数を計算する。
4.有効レコード数 43バイト目を3項から減する。
 結果が空いているレコード数が求められます。
5.MIXのデータ部も同じように求めることができます。
 ただし、索引順編成場合は、3項にはキー部とデータ部が一緒に入っ ているため、ある程度のキー部容量を減してあげる必要があります。

昔々これらを計算し印刷するプログラムを作ったのですが、現時点で は所在が不明です。見付かればあげることが出来ますが。
Re: ファイルの各種情報をファイルに出力したい
ろろけい 2013-3-6 10:08:53  [返信] [編集]

なんと2年ぶりのろろけいです。

引き続き、SYS@FDFから情報を取得する件なのですが。

2年前は、とりあえず「有効レコード数」を得られればそれでよしとしていました。
ですが最近になって、#MAPで表示されるその他の項目も得られるとなおよいなと感じまして、
データ管理説明書から得られる情報をもとになんとか算出しようと試みたのですが、
残念ながら答えを導き出せずにいます。

下記の情報を得るのはどのようにすればよいか、ヒントを教えていただけると助かります。

USED RECORD COUNT : 15066
DELETED RECORD COUNT : 137
UNUSED RECORD COUNT : 14797

欲しいのは、この3項目(USEDは直接得られるのでその他の2項目)だけなのです。
ファイルの種類は、MIXのデータ部だけでOKです。

ファイル名がキーになっている「使用ファイルマスタ」みたいなものを用意して、
そこに、上記3項目を入れ込むプログラムを作れば、それを定期的にチェックすることで、
オーバーフロートラブルを防げるというわけです。

まぁ、上記3つを合計した「総レコード数」は、そうそう変動するものではないのだから、
「使用ファイルマスタ」にあらかじめ入れておけばいいだろ!ですし、
削除レコードだって、たとえば毎晩バッチで#MIXGNを実行しておけば、
そうそうたまることもないだろう!ではあるのですが…(^^;

もしもSYS@FDFからこれらを得られるのであれば、それも知っておきたいなと思ったので、
質問させていただきました。

いかがでしょうか。
Re: マイグレーションについて
ターラヤン 2013-3-1 0:31:11  [返信] [編集]

雑誌に掲載された内容の転載なので、既にご存知かもしれませんが
ITPROというサイトに「COBOLからJavaの自動変換」の記事が載っていました。

http://itpro.nikkeibp.co.jp/article/COLUMN/20130220/457386/

去年日立もCOBOLからJavaの無料セミナーをやっていたみたいですし、COBOLからJavaへの流れが急速に進んでいるのかもしれません。
Re: 参照いろいろ(#NFCNVでのJ/操作登録について)
岡 2013-2-25 15:01:51  [返信] [編集]

江須扇様

詳細な情報、ありがとうございます。

>大変失礼ですが貴殿のA−VXスキルが不明なので参考できるところをご紹介します。

まったく、初めて触ります。(触らないといけなくなった。。。)

記入されている、事項を、行っていこうと思います。

不明点がでれば、また、よろしくお願いいたします。

以 上  感謝!!
Re: #NFCNVでのJ/操作登録について
岡 2013-2-25 14:58:30  [返信] [編集]

森さま

 早々の回答ありがとうございました!!

 Runの画面で、コマンド入力するとの事ですね。


引用:

森さんは書きました:
操作登録の時にファイル名とパラメータ名を設定しましたよね。
パラメータ名,ファイル名;で実行でます。
編集はメンバー名(パラメータ名)ライブラリ(ファイル名)です。
Re: 参照いろいろ(#NFCNVでのJ/操作登録について)
江須扇 2013-2-25 9:56:55  [返信] [編集]

江須扇と申します。

大変失礼ですが貴殿のA−VXスキルが不明なので参考できるところをご紹介します。

ターラヤンさんが作られたこのサイトには情報がいっぱいあります。
なお、アップロード時エラーになりますので、*が追加してありますので参照時には削除してください。

実行する方法は
h*ttp://www.offcom.jp/modules/firststep/index.php/ouyo/rensyugasetu.html
JCLの説明は
h*ttp://www.offcom.jp/modules/firststep/index.php/ouyo/nfdcopyprg.html
#NFCNVの説明は
h*ttp://www.offcom.jp/modules/amanual/index.php/uti/at/nfcnv/nfcnv.html
自画自賛ですがインストールすると便利な開発統合ソフトは
h*ttp://www.offcom.jp/modules/amanual/index.php/cobol/devlop/devlop.html
h*ttp://www.offcom.jp/modules/bluesbb/thread.php?thr=504&sty=2&num=3
Re: #NFCNVでのJ/操作登録について
森 2013-2-23 19:20:35  [返信] [編集]

操作登録の時にファイル名とパラメータ名を設定しましたよね。
パラメータ名,ファイル名;で実行でます。
編集はメンバー名(パラメータ名)ライブラリ(ファイル名)です。

 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ 
« 1 ... 11 12 13 (14) 15 16 17 ... 108 »

BluesBB ©Sting_Band