ＮＥＣのオフコン情報掲示板（ノウハウ系）
| ＮＥＣのオフコンを活用するためのノウハウを話し合うための掲示板です。 |
| 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
| Re:ＭＩＸ項目時のＦＥＰ起動について | |
| 富山清風 2005-6-29 13:01:00
[返信] [編集] > MIX項目の入力をしたいので、USAGE MIXEDと指定しました。 ｢USAGE MIXED｣などという便利な指定があるとは全くしりませんでした。やっぱり、私の回答はまとはずれでしたね。 OeOeさんの回答でやってみて関心しました。今後の開発に生かしたいと思います。このコーナーは非常に参考になりますね。みなさん、もっと活用しましょう。 | |
| 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タイプで指定しているので、 当たり前といったらそうなんですが。そこをどうにかならないの かなぁと思った次第です。 無理な話ですかね。 | |
| Re:ＭＩＸ項目時のＦＥＰ起動について | |
| 0e0e 2005-6-28 12:45:00
[返信] [編集] 普通はFEP OFFで起動するようですね。 試しにソースのUSAGE IS MIXED PIC X( ) をN( )に変えてみましたがコンパイルではねられました。(^^;; 日本語入力のON/OFFの制御でSCREEN SECTION以外にプロパティがあれば出来るんでしょうけど・・・ | |
| Re:ＭＩＸ項目時のＦＥＰ起動について | |
| 富山清風 2005-6-27 12:58:00
[返信] [編集] > ＭＩＸ項目に入力する場合、ＡＣＣＥＰＴ命令をかけると > ＦＥＰがＯＦＦ(半角のみ入力可)になります。 > 日本語の入力が主なので、ＦＥＰは最初からＯＮ（漢字入力可） > になって欲しいのですが．． > > どなたかご存じですか？ 質問の意味がよくわからないので、トンチンカンな回答になるかもしれませんが、ＣＯＢＯＬであれば、ACCEPT時のSCREEN SECTIONのPIC記述に依存すます。 もし、ANKとJIPの混在にしたいのであれば、SCREEN SECTIONを２つ書き（line/columnを重ねる）その２つを使い分けることになるとおもいます。たとえばPF10を押下されたらANK入力モードに、再度PF10を押下されたらJIP入力モードにとプログラムで入力モードを切り分けます。 ご質問の回答になっているでしょうか？ | |
| ＭＩＸ項目時のＦＥＰ起動について | |
| うどん 2005-6-23 16:31:00
[返信] [編集] ＭＩＸ項目に入力する場合、ＡＣＣＥＰＴ命令をかけると ＦＥＰがＯＦＦ(半角のみ入力可)になります。 日本語の入力が主なので、ＦＥＰは最初からＯＮ（漢字入力可） になって欲しいのですが．． どなたかご存じですか？ | |
| ありがとうございました | |
| あゆりーな 2005-6-17 20:11:00
[返信] [編集] 皆様ありがとうございました。 画面を範囲選択してコピーしたり、 スプールを出力して一覧を作ったり、 ということはやっていたのですが どうしても手作業が多いのが気になっていました。 （でもありがとうございました、うどんさん、0e0eさん） 早速NECに問い合わせてみたところ、 RPQに書くようにとフォーマットをくれました。 あとは安いことを祈るのみです（無料だといいな…）。 しかし便利なものを隠し持っているのですね。 もっと公開してくれればいいのに。 | |
| Re:SULのメンバー一覧 | |
| 0e0e 2005-6-15 16:20:00
[返信] [編集] SYS@SPnnnn => #ABC 複写 => SEQファイル このとき オプション機能 出力形式で 01.FIXEDを選択すると 固定位置でデータ化できます。 それ知るまではうどんさんと同じやりかた？（かな）でプログラム 組んでやってました。(^^; 今毎日うごいているのは、CALL ”QL*GET”使っています。 3100の頃にRPQ入手したものですが、A-VXIVでも動いているようです。 | |
| 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 ～ といった命令によって行います。 もちろん、ディレクトリ情報の取得だけではなく、他にもいろいろな命令があり、個々のメンバに対する読み込みや書き出し、ヘッダ情報の変更などもできます。 残念ながら、このサブルーチンの入手方法は不明です。 | |
| Re:SULのメンバー一覧 | |
| BLUELION 2005-6-14 23:07:00
[返信] [編集] 私も使ったことはありませんが 確か待機結合編成のファイルを操作するサブルーチンがあるとこのサイトで過去に読んだ記憶があります。 実際、ほかのメーカーのオフコンなら標準機能です なぜ非公開なんでしょうね？ 東芝なんてメンバーをシーケンシャルファイルとしてＲＥＡＤ＆ＷＲＩＴＥできるんでとっても便利でした | |
| Re:SULのメンバー一覧 | |
| うどん 2005-6-14 19:16:00
[返信] [編集] いつもＲＯＭばっかりなので、たまには恩返しを．． そちらの環境で動くかどうは解りませんが、参考までに。 １．メンバをスプール（ファイル）出力する。 #ABCでディレクトリの印刷をシステムスプールに出力する。 この時、実行結果リスト(PRD=)にSPOOLと指定する。 ※この時スプールライタが起動していると、紙が出てしまうので スプールライタは止めておく。 ２．出来たファイルの確認 MSD000にSYS@SPxxxx(xxxxは数値です)というファイルが作成 されます。そのファイルの内容を見ると、位置はバラバラですが、 メンバ一覧があります。規則性がありますので、プログラムを\r 作成すればメンバ等を拾えます。ちなみに44(16進)という値で 改行して、数バイト先からメンバ名、リビジョン、登録日、 更新日と入っている様です。 うちでは、朝一番のバッチ処理で、昨日修正，新規，削除になった プログラムがどれだけ有ったかというリストを出しています。 | |
| SULのメンバー一覧 | |
| あゆりーな 2005-6-14 12:32:00
[返信] [編集] たびたびすみません。 最近は小細工も覚えてきて、SULのメンバを#NFCNVでテキストに出力することもできるようになりました。 たとえばAAA BBB CCCという3プログラムがあったら プログラム一覧をソースコードに貼り付けると、自動的にSUFを経由してAAA.TXT?CCC.TXTまで作るようにするというものです。 でも本当は、SULの中に何が入っているかを取得できれば もっと簡単にできるはずなのです。 SULの中身一括コンパイルとかもできるようになるはず。 そう思って調べてみたのですが、 ファイルの属性はSYS@FDFで確認できても SULのメンバを知る方法が分かりませんでした。 どなたかご存知ではないでしょうか。 | |
| ありがとうございました | |
| あゆりーな 2005-6-10 18:55:00
[返信] [編集] 皆様の返信、大変参考になりました。 一文字ずつ変換するルーチンも作れそうです。 これでデータ変換できます。 ありがとうございました。 | |
| Re:半角文字？ | |
| 温泉好きのうさぎ 2005-6-7 13:41:00
[返信] [編集] 上記の私の投稿中に、２バイト半角文字として、NX”2B21”からNX”2B7E”も含まれていることが、抜けていました。これらの前半１バイトの内部コードは、””69””です。 これらの文字は、罫線文字とクオーテーションやカッコなどの記号ですが、私のＷＳエミュレータでは正しく表現できていません。罫線文字は全角と同じ大きさになっており、その他の記号は空白となっています。（そのため、上の投稿で見落としていました） | |
| Re:ルート（平方根）の計算って | |
| 温泉好きのうさぎ 2005-6-7 13:39:00
[返信] [編集] べき乗を使って、 ＣＯＭＰＵＴＥ Ａ ＝ Ｂ ＊＊ ０．５ とすればいいんじゃないでしょうか。 ただし、ＲＯＵＮＤＥＤの指定がないと、Ｂ＝４のときに、 Ａ＝１．９９９９９９９ になってしまいます。 | |
| Re:半角文字？ | |
| 温泉好きのうさぎ 2005-6-7 0:22:00
[返信] [編集] これは外字ではなく、２バイト半角文字です。ＪＩＳコードでいうと、NX”2921”からNX”297E”およびNX”2A21”からNX”2A7E”であり、内部コードで表現すると、前半１バイトが””67””および””68””となります。 ２バイト系文字でありながら、通常の全角文字の半分の幅しかなく、またプリントするときにピッチ詰めも可能なので、ＡＮＫでは１行に１３６桁しか印字できないところを、１８０桁ほど印字できるようになります。 Express5800/600シリーズのＡ－ＶＸでは、画面、印字ともに正常に表現されるはずです。 また、＃ＮＦＣＮＶでは変換しても、ＤＯＳには該当する文字がありませんので、「・」になってしまうのでしょう。 ちなみに、外字は内部コードで表現すると、前半１バイトが””EB””から””EF””までと””FA””から””FF””までです。 | |
| Re:半角文字？ | |
| ターラヤン 2005-6-7 0:02:00
[返信] [編集] ２バイト半角文字は、ＮＥＣ拡張文字です。 Ｓ１００内部コードの6760から68EFあたりの文字が、 ＪＩＳコードの2921から2B7E辺りに割り当てられています。 文字の名前に「ＮＥＣ」と付いていることで分かるように、 Ｗｉｎｄｏｗｓ上には無い文字です。 あまり役に立たないかと思いますが、ＮＥＣ拡張文字の Ｓ１００内部コードとＪＩＳコードの対応表です。 http://www.geocities.jp/tahrayan/utili/neckakucho.lzh Ｗｉｎｄｏｗｓ側のＪＩＳコードの位置には文字が無いので、 この表のまま変換できません。 表の後ろの２列は、半角に変換した場合です。 | |
| ルート（平方根）の計算って | |
| がしまる 2005-6-6 16:48:00
[返信] [編集] はじめまして。 ITOS時代からCOBOLでシステム開発をしておりますが （現在はA-VXⅣ） COBOLではルート（平方根）の計算はできないでしょうか？ 現在は自分で作ったルーチンで計算させておりますが、 いまいち頼りない感じです・・・(泣） なにか、良い方法ってありますかね？ | |
| Re:半角文字？ | |
| あゆりーな 2005-6-5 18:41:00
[返信] [編集] 回答ありがとうございました。 その後もう一度調べたのですが、 7200のDAM端から、日本語項目で「半角」を押して 数字やカタカナを入力してみたところ 同じ結果になったので、DAM端の機能のようです。 Ｇ１集合かどうなのかは、調べたのですがよく分かりませんでした。 状況としては、 「客先のデータを社内に持ち込んでRDBQなどで見てみたところ 半角のカタカナなどで表示されるものの、 #NFCNVでDOSに変換すると文字化けする」ということです。 説明が足りなくて申し訳ありません。 何らかの対応コード表さえあれば 力技で変換できるのでしょうが、 ｶﾀｶﾅの対応コードがよく分かりません… 52DISKLは試していないのですが、やってみる価値はありそうです。 ともかくもありがとうございました。 | |
| Re:半角文字？ | |
| BLUELION 2005-6-4 4:01:00
[返信] [編集] > S3100のデータのDOS変換をすることになりました。 > ところが、全角のところに半角のような文字が入っていることがあり、 > これをDOSに変換すると「・」みたいになって変換されません。 > > どうも事情を確認すると「全角のところで「英数」のボタンを押すと入力することができる。 > 画面上は半角のようだが全角分の幅をとっていて、 > 印字すると半角文字に詰まって印字できる」ということです。 > 多分Ｇ１集合で定義されている外字文字ではないでしょうか？ 通常600シリーズやS7200シリーズで動作する #NFCNVや#FTCNVでA-VX形式（JIPS-E）からDOSに変換する時は Ｇ１集合の外字は同じコードでDOSに変換されます どのツールやユーティリティーを使用されているのでしょうか？ > 600で再現しようと思ったのですができませんでした。 > 3100だから？DAM端だからでしょうか？ > > コードを調べたのですが、最初の１バイトが””67””か””68””のものが対象で、 > ””67””関係は英数字関係なのでその次の１バイトをXタイプにしてNタイプに送れば > うまく変換されそうですけれども大変そうです。 > Ｍた、””68””関係はカタカナなのですが、これはどうやって対応表を作っていいかも > 見当つきません。どんな文字体系なのでしょう。 > > どなたかよい解決法をご存知だったらいいのですが。 > よろしくお願いいたします。 > Ａ－ＶＸの文字コードは Ｓ１００内部コードやＪＩＰＳコードやＪＩＳコードなど、いろいろなコードがありかなり大変です とくにＳ１００内部コードなんて、私には理解できませんでした（笑） ＦＤのデータならコンバートスターや５２ＤＩＳＫなんとかというＷｉｎｄｏｗｓのソフトと変換するのが簡単ですが、Ｇ１の外字エリアはやはり細工をしないと変換できないと思いました Ｇ０の外字（通常のユーザー外字エリアの外字）などは対応する外字エリアにＡ－ＶＸのSYS@GAIJやSYS@DG2などから変換すればあるていどwindowsでも同じように表示されるはずです 以上乱文ですみませんが、私の表現力および技術力ではこのくらいしか説明できません | |
| 半角文字？ | |
| あゆりーな 2005-6-3 16:55:00
[返信] [編集] はじめまして。 たまに拝見するのですが投稿するのは初めてです。 もしお分かりの方がいらしたら教えてください。 S3100のデータのDOS変換をすることになりました。 ところが、全角のところに半角のような文字が入っていることがあり、 これをDOSに変換すると「・」みたいになって変換されません。 どうも事情を確認すると「全角のところで「英数」のボタンを押すと入力することができる。 画面上は半角のようだが全角分の幅をとっていて、 印字すると半角文字に詰まって印字できる」ということです。 600で再現しようと思ったのですができませんでした。 3100だから？DAM端だからでしょうか？ コードを調べたのですが、最初の１バイトが””67””か””68””のものが対象で、 ””67””関係は英数字関係なのでその次の１バイトをXタイプにしてNタイプに送れば うまく変換されそうですけれども大変そうです。 Ｍた、””68””関係はカタカナなのですが、これはどうやって対応表を作っていいかも 見当つきません。どんな文字体系なのでしょう。 どなたかよい解決法をご存知だったらいいのですが。 よろしくお願いいたします。 |
| 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
BluesBB ©Sting_Band