ＮＥＣのオフコン情報掲示板（ノウハウ系）
| ＮＥＣのオフコンを活用するためのノウハウを話し合うための掲示板です。 |
| 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
| ■▲▼ | ||
| 1 | RDBのキー印刷について | |
| あずやん 2005-7-7 11:34:00
[返信] [編集] 初めまして、あずやんと申します。 RDBのキー情報を数字（桁位置、桁数）ではなく、項目名で 出力する方法は無いでしょうか？ #DDM等を参照しましたが、キーを印刷する方法が見あたりません。 何か良い方法はないでしょうか？ | ||
| 2 | RDBのキー印刷について | |
| あずやん 2005-7-7 11:41:00
[返信] [編集] すいません、環境を書いていませんでした。 EXPRESS5800 640ADを使用しております。 OS以外に、RDBサーバ・SMART�兇�入っております。 よろしくお願いします。 | ||
| 3 | Re:RDBのキー印刷について | |
| 江須扇 2005-7-10 7:27:00
[返信] [編集] 初めまして江須扇と申します。 > RDBのキー情報を数字（桁位置、桁数）ではなく、項目名で > 出力する方法は無いでしょうか？ 結論から申しますと私の知っている限りではありません。 ここらへんが、Ａ−ＶＸ／ＲＤＢの弱いところで、他社から似非ＲＤＢと言われる所以と 思います。 ＩＴＯＳ（敢えてＡ−ＶＸと言わず）の歴史を考えると、 複数索引編成ファイルと言うものが作られてその後にＩＴＯＳ／ＲＤＢが出来たと思いま す。 強引に複数索引編成ファイルを使ってＲＤＢもどきを乗っけたと言われてもしかたがあり ません。 ただ、その逆でメリットとしては、一般ファイルとしても使えるのでＲＤＢＱ、ＲＤＢＱ２ 以外の＃ＦＩＬＥＭ等のユーティリティでも、利用が可能です。 正式には＃ＤＤＭで物理ファイルのアロケーションやディアロケーションをデータ部、キー 部とも登録削除するのが正しいのでが、その時登録するキー情報はＳＹＳ＠ＤＤＦには、 何も残りません。 つまり、ＳＹＳ＠ＦＤＦ、ＳＹＳ＠ＣＡＴ、ＳＹＳ＠ＤＤＦ、ＳＹＳ＠ＤＢＤＩＲの４つ のシステムファイルの整合性をとる必要性が有るのですが、その他のシステムメニューや ＃ＡＢＣ、＃ＡＬＬＯＣ等でも物理ファイルの登録削除ができてしまうので、ＳＹＳ＠Ｄ ＤＦにわざとキー情報を登録しなかったのか、単なる最初の設計者のミスかその後の設計 者が拡張しなかったの理由はわかりませんが、現状では情報として、ＳＹＳ＠ＤＤＦには 無いと思います。（これはメーカー的言い訳で利用者には何の関係もありませんが・・・） | ||
| 4 | Re:RDBのキー印刷について | |
| あずやん 2005-7-12 11:34:00
[返信] [編集] 大変丁寧なご説明ありがとうございます。 そうですか、印字は出来ませんか・・・ 今、A-VX RDBをSQLサーバに移行中なんですが、キーの移行を 何とか簡単に移せないかと考えているところでして、キーが 項目名で出せればちょっとは楽出来るかと思っていました。 何か別の方法を考えます。 ありがとうございました。 | ||
| 5 | Re:RDBのキー印刷について | |
| bluelion 2005-7-13 16:54:00
[返信] [編集] いろいろ プログラムを作ればいけそうですけど 手間が... SYS@DDFをＤＵＭＰしてみました 項目の位置とタイプと桁数と名称はＤＤＦのレコードからとれそうなので そのＲＤＢのキーの位置がわかればそれから検索すれば漢字名称を出すことは可能ですね | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| ■▲▼ | ||
| 1 | はしご高の出し方 | |
| tama 2005-6-30 9:51:00
[返信] [編集] Ａ−ＶＸで「高」の旧漢字「はしご（高）」の出し方を 教えて下さい。 「高」でもいいと思ったのですが、社長の名前だからちゃんとし た字を使うようにとおしかりを受けました。 使用環境は、Ｅｘｐｒｅｓｓ５８００ ６００ＡＩでＷＳエミュ レーターを使用しています。 よろしくお願いします。 | ||
| 2 | Re:はしご高の出し方 | |
| 0e0e 2005-6-30 19:31:00
[返信] [編集] １．PCでエミュレータ画面にMSIMEで入力するとはねつけられました。 ２．TXTから#NFCNVで取り込むと〓マークに化けました。 ってことで、この文字コードはAVXでは嫌われているようですね。 | ||
| 3 | Re:はしご高の出し方 | |
| オフコン人 2005-6-30 21:42:00
[返信] [編集] １．外字登録をする。 ２．G1文字集合関連製品を購入する。 のどちらかでしょうね。 600シリーズの場合に外字登録するには、日本語文字拡張セットが必要になります。 １文字だけなら、外字登録の方が安くて済むでしょう。 後、印字するプリンタですが、ラインプリンタでも接続方式によって、外字をどこに登録するかが変わります。 | ||
| 4 | Re:はしご高の出し方 | |
| Tama 2005-6-30 23:56:00
[返信] [編集] レスありがとうございました。 外字登録の方法を試してみます、それかお金がかかると 言えば諦めてくれると思いますし。 お金のかかることにはシビアな会社ですので＾＾；； | ||
| 5 | Re:はしご高の出し方 | |
| ターラヤン 2005-7-1 7:31:00
[返信] [編集] いろいろと忙しくてなかなかＨＰを更新できていないターラヤンです。 外字登録するか、あきらめるかという方向になっているようですが、 外字を使うと、Ｗｉｎｄｏｗｓファイルにデータを変換した時に、外字登録していないＰＣで 見ると〓（ゲタ）になってしまいます。 例えば将来Ｗｉｎｄｏｗｓに移行することも考えているなら、そこも考慮した方がよいかと。 Ｗｉｎｄｏｗｓサーバに移行したとたん、社長の名前がどれもこれも出ないとなると。。。 実際データ以降の際に問題となることの１つが、何の配慮も法則もなく、きままに登録された外字をどのように変換するか？ということですから。 ＡーＶＸで外字登録すると、当然ＰＣ端末にも外字を入れる必要があります。 はしご高は、ＡーＶＸの世界では、Ｇ１集合つまり拡張漢字扱いです。 はしご高は、ＪＩＳに登録されている漢字ではないので、普通ならばパソコンにも入っていないはずの漢字です。 （最近のＷｉｎｄｏｗｓのバージョンでは、変換されるようですが） Ｗｉｎｄｏｗｓ以外のＯＳだと入力できないことがほとんどです。 (Ｍａｃ etc.) | ||
| 6 | Re:はしご高の出し方 | |
| bluelion 2005-7-4 9:19:00
[返信] [編集] ＭＳ明朝の拡張エリアにあるはしご高のパターンを使って同じものＡ−ＶＸ領域の外字エリアに作成してください。 同様の方法で使用するWINDOWSの外字エリアにも作成すると表示されるはずです その時に注意することは Ａ−ＶＸの先頭とWINDOWSと先頭からの位置を同じにしないとNFCNVやFTCNVで変換時にずれます 販売の構成がいまいちわかってないのですが600シリーズってＧ０領域編集もオプションなんですか？ PATMEXとかは確かに有償でしたからね | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| ■▲▼ | ||
| 1 | ＭＩＸ項目時のＦＥＰ起動について | |
| うどん 2005-6-23 16:31:00
[返信] [編集] ＭＩＸ項目に入力する場合、ＡＣＣＥＰＴ命令をかけると ＦＥＰがＯＦＦ(半角のみ入力可)になります。 日本語の入力が主なので、ＦＥＰは最初からＯＮ（漢字入力可） になって欲しいのですが．． どなたかご存じですか？ | ||
| 2 | Re:ＭＩＸ項目時のＦＥＰ起動について | |
| 富山清風 2005-6-27 12:58:00
[返信] [編集] > ＭＩＸ項目に入力する場合、ＡＣＣＥＰＴ命令をかけると > ＦＥＰがＯＦＦ(半角のみ入力可)になります。 > 日本語の入力が主なので、ＦＥＰは最初からＯＮ（漢字入力可） > になって欲しいのですが．． > > どなたかご存じですか？ 質問の意味がよくわからないので、トンチンカンな回答になるかもしれませんが、ＣＯＢＯＬであれば、ACCEPT時のSCREEN SECTIONのPIC記述に依存すます。 もし、ANKとJIPの混在にしたいのであれば、SCREEN SECTIONを２つ書き（line/columnを重ねる）その２つを使い分けることになるとおもいます。たとえばPF10を押下されたらANK入力モードに、再度PF10を押下されたらJIP入力モードにとプログラムで入力モードを切り分けます。 ご質問の回答になっているでしょうか？ | ||
| 3 | Re:ＭＩＸ項目時のＦＥＰ起動について | |
| 0e0e 2005-6-28 12:45:00
[返信] [編集] 普通はFEP OFFで起動するようですね。 試しにソースのUSAGE IS MIXED PIC X( ) をN( )に変えてみましたがコンパイルではねられました。(^^;; 日本語入力のON/OFFの制御でSCREEN SECTION以外にプロパティがあれば出来るんでしょうけど・・・ | ||
| 4 | Re:ＭＩＸ項目時のＦＥＰ起動について | |
| うどん 2005-6-29 8:34:00
[返信] [編集] 富山清風さん、いつも済みません．．．m(_ _)m 0e0eさん、試して頂いて有り難うございます。 MIX項目の入力をしたいので、USAGE MIXEDと指定しました。 WORKING-STORAGE SECTION. 01 A PIC X(50). SCREEN SECTION. 01 B LINE 1 COLUMN 1 PIC X(50) USING A USAGE MIXED. PROCEDURE DIVISION. ACCEPT B. ← この命令時にFEPの初期値がON(日本語入力可)と なって欲しい。 >>ACCEPT時のSCREEN SECTIONのPIC記述に依存 ACCEPT命令を実行直後、FEPはOFFとなります。 SCREEN SECTIONで B は、X(50)とXタイプで指定しているので、 当たり前といったらそうなんですが。そこをどうにかならないの かなぁと思った次第です。 無理な話ですかね。 | ||
| 5 | Re:ＭＩＸ項目時のＦＥＰ起動について | |
| 富山清風 2005-6-29 13:01:00
[返信] [編集] > MIX項目の入力をしたいので、USAGE MIXEDと指定しました。 ｢USAGE MIXED｣などという便利な指定があるとは全くしりませんでした。やっぱり、私の回答はまとはずれでしたね。 OeOeさんの回答でやってみて関心しました。今後の開発に生かしたいと思います。このコーナーは非常に参考になりますね。みなさん、もっと活用しましょう。 | ||
| 6 | Re:ＭＩＸ項目時のＦＥＰ起動について | |
| 江須扇 2005-7-6 12:54:00
[返信] [編集] はじめまして、江須扇と申します。 久しくここに顔をだしておりませんでした。 みなさまご無沙汰しております。 亀レスします。 ＵＳＡＧＥ ＭＩＸＥＤ の件は ＩＮＰＵＴ ＭＯＤＥ ＩＳ ＫＡＮＡ−ＳＨＩＦＴ 等を試みましたがだめでした。 自動的に切り替わらないＩＭＥ（ＦＥＰ？）を探すしかないのかもしれませんね。 ところで、現状のＡ−ＶＸでも私も含めて知らない機能がいろいろとあると思います。 私なりに「旧家イトウ家の小技裏技」シリーズを投稿しましたが、 現在ネタ切れ中です。 ここで、いろいろな人がいろいろな「技」をご披露していただけるとありがたいと思っております。 例えば、皆様、データベース機能のＣＯＭＭＩＴやＲＯＬＬＢＡＣＫ を使っていらしゃるのでしょうか また、トランザクション機能のＭＦＤを使っていらっしゃるのでしょうか？ 実際に使っている方がいらしたら、使いごこちをご披露していただけないでしょうか？ > > MIX項目の入力をしたいので、USAGE MIXEDと指定しました。 > ｢USAGE MIXED｣などという便利な指定があるとは全くしりませんでした。やっぱり、私の回答はまとはずれでしたね。 > OeOeさんの回答でやってみて関心しました。今後の開発に生かしたいと思います。このコーナーは非常に参考になりますね。みなさん、もっと活用しましょう。 > | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| ■▲▼ | ||
| 1 | SULのメンバー一覧 | |
| あゆりーな 2005-6-14 12:32:00
[返信] [編集] たびたびすみません。 最近は小細工も覚えてきて、SULのメンバを#NFCNVでテキストに出力することもできるようになりました。 たとえばAAA BBB CCCという3プログラムがあったら プログラム一覧をソースコードに貼り付けると、自動的にSUFを経由してAAA.TXT?CCC.TXTまで作るようにするというものです。 でも本当は、SULの中に何が入っているかを取得できれば もっと簡単にできるはずなのです。 SULの中身一括コンパイルとかもできるようになるはず。 そう思って調べてみたのですが、 ファイルの属性はSYS@FDFで確認できても SULのメンバを知る方法が分かりませんでした。 どなたかご存知ではないでしょうか。 | ||
| 2 | Re:SULのメンバー一覧 | |
| うどん 2005-6-14 19:16:00
[返信] [編集] いつもＲＯＭばっかりなので、たまには恩返しを．． そちらの環境で動くかどうは解りませんが、参考までに。 １．メンバをスプール（ファイル）出力する。 #ABCでディレクトリの印刷をシステムスプールに出力する。 この時、実行結果リスト(PRD=)にSPOOLと指定する。 ※この時スプールライタが起動していると、紙が出てしまうので スプールライタは止めておく。 ２．出来たファイルの確認 MSD000にSYS@SPxxxx(xxxxは数値です)というファイルが作成 されます。そのファイルの内容を見ると、位置はバラバラですが、 メンバ一覧があります。規則性がありますので、プログラムを\r 作成すればメンバ等を拾えます。ちなみに44(16進)という値で 改行して、数バイト先からメンバ名、リビジョン、登録日、 更新日と入っている様です。 うちでは、朝一番のバッチ処理で、昨日修正，新規，削除になった プログラムがどれだけ有ったかというリストを出しています。 | ||
| 3 | Re:SULのメンバー一覧 | |
| BLUELION 2005-6-14 23:07:00
[返信] [編集] 私も使ったことはありませんが 確か待機結合編成のファイルを操作するサブルーチンがあるとこのサイトで過去に読んだ記憶があります。 実際、ほかのメーカーのオフコンなら標準機能です なぜ非公開なんでしょうね？ 東芝なんてメンバーをシーケンシャルファイルとしてＲＥＡＤ＆ＷＲＩＴＥできるんでとっても便利でした | ||
| 4 | Re:SULのメンバー一覧 | |
| 温泉好きのうさぎ 2005-6-15 11:38:00
[返信] [編集] NECおよび関係会社の開発部門向けに、「SUL/PML/JSL入出力サブルーチン」というものが提供されています。 通常のユーザーマシンには 99%無いとは思いますが、万一、そちらのA-VXのSYS@CUL等の中に 「CBL@XL」というメンバが有れば、COBOLのプログラムを組むことによって、SULやPML、JSLのディレクトリ情報を取得することができます。（CUL、LMLは不可） CALL ”QLOPEN” USING 〜 や、CALL ”QLSFGET” USING 〜 といった命令によって行います。 もちろん、ディレクトリ情報の取得だけではなく、他にもいろいろな命令があり、個々のメンバに対する読み込みや書き出し、ヘッダ情報の変更などもできます。 残念ながら、このサブルーチンの入手方法は不明です。 | ||
| 5 | Re:SULのメンバー一覧 | |
| 0e0e 2005-6-15 16:20:00
[返信] [編集] SYS@SPnnnn => #ABC 複写 => SEQファイル このとき オプション機能 出力形式で 01.FIXEDを選択すると 固定位置でデータ化できます。 それ知るまではうどんさんと同じやりかた？（かな）でプログラム 組んでやってました。(^^; 今毎日うごいているのは、CALL ”QL*GET”使っています。 3100の頃にRPQ入手したものですが、A-VXIVでも動いているようです。 | ||
| 6 | ありがとうございました | |
| あゆりーな 2005-6-17 20:11:00
[返信] [編集] 皆様ありがとうございました。 画面を範囲選択してコピーしたり、 スプールを出力して一覧を作ったり、 ということはやっていたのですが どうしても手作業が多いのが気になっていました。 （でもありがとうございました、うどんさん、0e0eさん） 早速NECに問い合わせてみたところ、 RPQに書くようにとフォーマットをくれました。 あとは安いことを祈るのみです（無料だといいな…）。 しかし便利なものを隠し持っているのですね。 もっと公開してくれればいいのに。 | ||
| 7 | もらえました！ | |
| あゆりーな 2005-7-15 18:38:00
[返信] [編集] 先日は皆様に回答いただき大変助かりました。 あれからＮＥＣにＲＰＱを出したところ、 無償で提供してもらえました。 いただいたのはサブルーチンが２つと説明書です。 CBL@XL（QL編成 SUL JCL PML CUL用） CBL@XM（QP編成 LML用） こんないいものがあるなら 最初から配布してくれればいいのに… 他にも隠し持っているものがあるかも？？？ 早速これからテストしてみます！ | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| ■▲▼ | ||
| 1 | ルート（平方根）の計算って | |
| がしまる 2005-6-6 16:48:00
[返信] [編集] はじめまして。 ITOS時代からCOBOLでシステム開発をしておりますが （現在はA-VX�検� COBOLではルート（平方根）の計算はできないでしょうか？ 現在は自分で作ったルーチンで計算させておりますが、 いまいち頼りない感じです・・・(泣） なにか、良い方法ってありますかね？ | ||
| 2 | Re:ルート（平方根）の計算って | |
| 温泉好きのうさぎ 2005-6-7 13:39:00
[返信] [編集] べき乗を使って、 ＣＯＭＰＵＴＥ Ａ ＝ Ｂ ＊＊ ０．５ とすればいいんじゃないでしょうか。 ただし、ＲＯＵＮＤＥＤの指定がないと、Ｂ＝４のときに、 Ａ＝１．９９９９９９９ になってしまいます。 | ||
| 3 | Re:ルート（平方根）の計算って | |
| がしまる 2005-7-4 17:02:00
[返信] [編集] 返信有難うございます。御礼遅くなってすいません。 > べき乗を使って、 > ＣＯＭＰＵＴＥ Ａ ＝ Ｂ ＊＊ ０．５ > とすればいいんじゃないでしょうか。 よろこんで早速やってみたのですが、A-VX�犬蓮△戮�乗の 小数点以下は無視されるみたいです。0乗ということになり Bに何を入れてもすべてAには1が返って来てしまいます。また ＣＯＭＰＵＴＥ Ａ ＝ Ｂ ＊＊ -2 のようにするとべき乗が0以下であるというエラーになってしまうようです。 | ||
| 4 | Re:ルート（平方根）の計算って | |
| Tama 2005-7-4 20:38:00
[返信] [編集] 一つ確認していただきたいのですが、Ａ，Ｂは 9V9(7) のように 小数点以下も定義されているでしょうか？ | ||
| 5 | Re:ルート（平方根）の計算って | |
| がしまる 2005-8-16 11:13:00
[返信] [編集] > 一つ確認していただきたいのですが、Ａ，Ｂは 9V9(7) のように > 小数点以下も定義されているでしょうか？ はい。定義しています。しかしながら、前述のようにうまく計算されません。 困って、オフコンの購入元の大塚商会に確認しましたら、平方根の計算はA-VXのCOBOLはサブプログラム等を作成しないと出来ないそうです。 | ||
| 6 | Re:ルート（平方根）の計算って | |
| bluelion 2005-8-18 9:26:00
[返信] [編集] > 困って、オフコンの購入元の大塚商会に確認しましたら、平方根の計算はA-VXのCOBOLはサブプログラム等を作成しないと出来ないそうです。 勉強になりました ＮＥＣもFORTRANあるんだから、標準でサブルーチン化して提供すればと思うのは私だけでしょうか？ | ||
| 7 | Re:ルート（平方根）の計算って | |
| 苦労人 2006-2-9 16:32:00
[返信] [編集] >困って、オフコンの購入元の大塚商会に確認しましたら、 >平方根の計算はA-VXのCOBOLはサブプログラム等を作成しないと >出来ないそうです。 確かに私もプログラムで対応しました。 下記のロジックで限りなく良い結果が出た気がします。 | ||
| 全部読む 最新50 1-100 板のトップ リロード | ||
| 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
BluesBB ©Sting_Band