NECのオフコン情報掲示板(ノウハウ系)
NECのオフコンを活用するためのノウハウを話し合うための掲示板です。 |
新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
■▲▼ | ||
1 | 「ジョブ起動ユーティリティ」のUWSCでの代替方法 | |
江須扇 2006-8-19 23:22:00
[返信] [編集] パソコン側でデータを作った後に、自動的に、オフコン側での処理を する場合は、通常は「ジョブ起動ユーティリティ」を使いますが、 パソコン側の自動実行を含めて実行する場合はフリーソフトの、 UWSCを使うと便利です。 http://www.h7.dion.ne.jp/~umiumi/ 具体的にはWeb-EDIのデータを自動的にオフコンに取り込む処理で 使っております。 そのエミュレータの起動のサンプルスクリプトです。 参考になればとアップロードしました。 SAMPLEというAPを実行して終わるサンプルです。 WindowsXPでは巧くいきますがなぜかMeでは画面が読み取れません、 従ってXPのみの対応です。 但し SGは WSモード WSM=25R でエミュレータのフォントサイズは24にしてあります。
| ||
全部読む 最新50 1-100 板のトップ リロード |
■▲▼ | ||
1 | 16進を10進に変換する方法 | |
ゼロ 2006-8-5 8:59:00
[返信] [編集] SYS@FDF内よりデータを抜き出してファイルを管理するデータベースを作りたいと思ったのですが、肝心な部分(更新回数、更新日等)が16進の為にそのままでは利用できませんでした。 COBOLで16進から10進に変換する方法を教えてもらえないでしょうか? COBOLを利用する以外の方法でもかまいませんのでお願いします。 | ||
2 | Re:16進を10進に変換する方法 | |
江須扇 2006-8-5 18:14:00
[返信] [編集] はじめましてゼロさん、江須扇と申します。 2バイト単位しか利用できませんが、USAGE COMP-1 を利用したらいかがでしょうか? 全く違う利用例ですがこの掲示板の181番にUSAGE COMP-1 を使ったCOBOLリストが載っております。 | ||
3 | Re:16進を10進に変換する方法 | |
ちょっと前までA-VXユーザ 2006-8-17 23:18:00
[返信] [編集] USAGE COMP-1 って、2進数ですね。 16進数は、4bits表現で、0〜9,A〜Fですよね。 きっと間違っていないと思いますが、ちょっと気になって、 余計なお世話だったかな? 以上 | ||
4 | Re:16進を10進に変換する方法 | |
ゼロ 2006-8-18 10:18:00
[返信] [編集] 遅くなりましたが、江須扇様レスありがとうございました。 USAGE COMP-1を使用してレコード長、ブロック長、更新回数は問題なく10進に変換できました。
これで、WORK-RSIZ1の内容が’256d’になっていました。 USAGE COMP-1の仕組みがよく理解できていないので結果論ですが、16進数→10進数の変換は出来たようです。 問題になったのが第1〜第4エクステント開始終了アドレス。 これは上記の方法で変換するとまったく意味不明な値が帰ってきたので下記のような変換テーブルを作って1バイトづつ判断して内部16進から外部16進に変換しました。 あとは16進→10進への計算ルーチンを作って10進にしました。 もっといい方法があるかもしれませんがこれしか思いつきませんでした。
| ||
5 | Re:16進を10進に変換する方法 | |
江須扇 2006-8-19 7:35:00
[返信] [編集] >2バイト単位しか利用できませんが、USAGE COMP-1 >を利用したらいかがでしょうか? という事で、4バイトの場合は、 USAGE COMP-2 を利用していただくこととなります。 但し、 COMP-1 が−32768≦x≦32767 COMP-2 が−2147483648≦y≦2147483647 となります。 詳しくは、COBOL言語説明書、2.4.3.4 データの表現形式 をご覧下さい。 | ||
6 | Re:[5]:16進を10進に変換する方法 | |
江須扇 2006-8-19 16:49:00
[返信] [編集] ご指摘の通りですね。
| ||
7 | Re:[5]:16進を10進に変換する方法 | |
ゼロ 2006-8-22 13:02:00
[返信] [編集] ありがとうございます、希望通りの結果を得ることができました。 プログラムもすっきりして大満足です。 上1桁が負を表すってことをすっかり忘れていました、2進数なんて20年近く前に情報処理二種の試験勉強した依頼なんで。 次の課題はデータのデータ上に直接持っていないデータの追加可能件数をどうやって求めるか頭をひねってみようと思います。 | ||
全部読む 最新50 1-100 板のトップ リロード |
■▲▼ | ||
1 | 変換するソースの指定画面での全ソース指定 | |
ヨード 2006-7-28 11:22:00
[返信] [編集] はじめまして。「ヨード」といいます。 今まで全くさわったことのないA-VXですが その上で稼動しているシステムをコンバートすることになりました。 で色々と情報を探してここにたどり着きました。とても助かっています。(基本的にA-VXを無くす向けの作業なのですが・・・) COBOLソースをWindowsなどのテキスト形式ファイルに変換を 参考にさせていただきながら、現行システムのソースを変換しています。 変換するソースの指定画面の画面で「番号」か「ソース名」を入力しますが、ここで全ソースを指定したい場合はどのように入力したらよいのでしょうか? 手元にマニュアルがないため、どうかご教示下さい。 | ||
5 | Re:変換するソースの指定画面での全ソース指定 | |
ターラヤン 2006-7-31 0:26:00
[返信] [編集] たいしたものではありませんが、バッチプログラムを作ってみました。 いちいちパラメータを入力する必要がなくなります。 MSD000のSYS@JSLに入れてください。 名前は何でも良いですが、SUWINでもしてください。 使い方は、RUNコマンド行で「SUWIN,(RANDT);」のように「JS名,(変換したいSU名);」と入力して実行します。 /RUN #LBM,DEV=MSD; PRD=PRN999_MDE=MSD000_MFI=TESTAPSUL_ACT=SELECT_ODE=MSD000_OFI=TESTAPSEQ_ NAM=&0_ODE=999_ACT=999_DIR=NO_MDE=END_ /> ; /RUN #NFCNV,DEV=MSD; MN1=C_MN2=AD_PA1=MSD000_PA3=TESTAPSEQ_PA4=1_PA5=C80_ PB1=ZZZ.TXT_PB2=TXTJ_PB3=EXCLUSIVE_PB7=C_PB8=CREATE_ MN1=Q_ /> ; 上のプログラムをテキストファイルにして、 http://www.geocities.jp/tahrayan/utili/avxdos-cobol.html でJSに変換します。 #LBMのパラメータはMDE=MSD000,MFI=SYS@JSL,ACT=ADD,TYP=JCLとしてください。 | ||
6 | バグかな? | |
ターラヤン 2006-7-31 0:55:00
[返信] [編集] 本当は#NFCNVのところで、「PB1=&0_」とやりたかったのですが、なぜかエラーになってしまいました。 #NFCNVは置換機能も一時切り換え機能も使えないようです。 これらの機能が使えないのでは、バッチとして役に立ちません。 他のユーティリティに使えないものがあるのならばそういうものかと納得できますが、#NFCNVだけ使えないというのはバグではないのでしょうか? | ||
7 | Re:変換するソースの指定画面での全ソース指定 | |
ヨード 2006-8-2 20:55:00
[返信] [編集] 富山清風さん、ターラヤンさん ありがとうございました。 今まで全くさわったことのないA-VXで いきなりJSの登録なども怖かった^^;) ので 頑張って、目と手で1つ1つ変換しました。 ところで、 コピー句はSULに入ってないのが普通なのでしょうか? ファイルレイアウトの資料も怪しいものしかなく なんとかCOPY句でレイアウトと項目名を確認しようと 思っていたのですが、SULから変換したTEXTには無いようです。 なんとか既存ファイルのレイアウトを確認する方法は無いものでしょうか? (実はファイル定義のようなものを見たほうが確実?) レイアウトの件は、もとの質問からは外れるので 件名を新たにして別投稿とした方が過去ログで役にたつのかも 知れませんが、ご教示の程、宜しくお願いします。 | ||
8 | Re:変換するソースの指定画面での全ソース指定 | |
ゼロ 2006-8-3 11:16:00
[返信] [編集] ヨードさん始めまして 一般的かどうかは、分かりませんが私はCOPY句で使用するソースは別SULにまとめて管理するようにしています。 業務ごとにSULは分けていますがCOPY句で使用するSULは他業務でも使用することがあるのでファイルレイアウトの変更等が発生した場合の管理がしやすいからです。 COBOLソース内にどの登録集を使用しているか明記しておくといいかもしれません。 | ||
9 | 順序が逆では??? | |
EXCHANGE 2006-8-3 11:48:00
[返信] [編集] * DBを使った部分なら#DDMとか、RDBQ2等で調べれば分かると思います。 * ただ、事情はよく分からないのですが、 > 頑張って、目と手で1つ1つ変換しました。 > なんとか既存ファイルのレイアウトを確認する方法は無いものでしょうか? という下りはちょっといただけないのでは。。 先にCOPY句も含めてどこに入っているか確認してから コンバートした方が。。 > ファイルレイアウトの資料も怪しいものしかなく ということは、前任者とのコンタクトが取れない状況のように 思われます。 と、言うことは−−−>現在SULに入っているソースが 稼働中システムと一致しているとどうして保証できるのでしょうか??? * ソースコンバートによるマイグレーションは、 前任者の協力が必要な場合が多いように思います。 * 私だったら前任者の協力が得られない場合は、 新規システムとして構築しなおす(再構築する)でしょうね。 どのみち現時点となっては、 顧客側の要件も変わっているでしょうし。。 * すみません。取り越し苦労でしょうか。 | ||
10 | Re:順序が逆では??? | |
ヨード 2006-8-7 12:00:00
[返信] [編集] 書き込みありがとうございます。 ご指摘頂いた点は、取り越し苦労ではなくまさにその通りです。 現状は、 ・前任者の協力が得がたい状況にある。 ・稼働中システムとSULの一致は保障できない。 という状況にあります。 それを踏まえて ・出来うる限り前任者の協力を要請 (ソースの有りかすら不明な状況) それと並行して ・現状システムの分析 ・業務フローの再確認と顧客要件(追加、変更)の確認 を実施している状況にあります。 結局のところは再構築となるだろう言う認識のもと できる限り拾える情報は、拾っておこうというのが 現状といったところでしょうか。 | ||
11 | ご苦労様です | |
EXCHANGE 2006-8-8 7:57:00
[返信] [編集] * ヨードさんこんにちわ。なかなかたいへんみたいですね。 乗せ換えというのは、何度経験してもいつも何か隘路があるようです。 * さて、レイアウトの件の続きですが、#DDMを使ってSYS@DDFをプリントアウトすることが出来ればCOPY句がなくてもかなりな情報が手にはいると思います。 * RUN #DDM; −−−> MSD SYS@DDF 1.OK −−−> 6.リスト出力 −−> 全印刷 登録順 PRN999 1.OK で、少なくともデータベースに登録されている表名(物理ファイル、論理ファイルを含めて)および、項目名(前任者がよほど変わった方でない限りCOBOL上の項目名のまま)を印刷出力できます。 * ただしこの方法は次の点に注意です。 (1)SYS@DDFは現状の運用システムに使われているので、内容の信憑性は高いが、変更を加えると現状システムに重大な問題が起こることがあるので、A?VX未経験者の場合「リスト出力」程度にした方が安全。 たいていの場合SYS@DDF以外にももう一つXXX@DDFという名前のユーザDDFがアロケートされていると思いますので、まずこちらで確かめてからの方がいいでしょう。(前述の MSD SYS@DDFのところを MSD XXX@DDFに換えて下さい) (2)このシステムが カンパニーで運用されている場合は(チェンジDIRにて、カレントディレクトリ上で運用されている場合は)その状態でリストを出力しても他のカンパニーやグローバルのDB表は出力されません。 (3)#DDMで確認できるのはDB表のみですので、#MAPで確認したときの複数索引順編成ファイルのみになります。 相対編成ファイル、シーケンシャルファイル、それから旧式索引順編成等は確認できません。 (4)リスト出力はかなりの分量になりますのでたくさんのストックフォームをご用意下さい。リスト出力中のJOBのキャンセル(強制終了)は問題ないと思います。 事前にユーザDDF上でDB表1個、1個出力してみて練習することをおすすめします。 もちろんSYS@DDFの場合も1個1個個別にプリントアウトできます。 (5)SYS@DDFをいじくることに自信が持てないときはユーザDDFを対象にして下さい。(ただし現状運用システムと完全に一致してる保証はありませんが。。) (6)項目名が分からなくても属性のみ分かれば良いのであれば RUN RDBQ2; にてDBのデータを直接覗いてみれば良いでしょう。 こちらはエンドユーザ向けのツール(ACCESSの初歩みたいなもの)ですので直接データを更新したりしない限り便利な道具です。ココには各項目の属性が表示されます。 | ||
12 | ご苦労様です−2 | |
EXCHANGE 2006-8-8 8:22:00
[返信] [編集] * 内容の補足です。説明がワンステップ抜けていました。 差し替えて下さい。 * RUN #DDM; −−−> 2.表定義 −−> MSD SYS@DDF 1.OK −−> (以下同様です)。。。 | ||
13 | ご苦労様です−3 (聞くと怖い話) | |
EXCHANGE 2006-8-8 8:52:00
[返信] [編集] * もう一つ言い忘れたことがありました。 * SYS@DDFには現状運用システムと一致した内容がある。と申しましたが、実はこれには重大な注意事項があります。 * A−VXでは、COBOLの項目定義とDDFのDB定義とが別々に管理されているため、両者に不一致があってもCOBOLプログラムとしては問題なしに稼働してしまう。という問題があります。 * AS/400等では、例えばCRTPFコマンドを実行するとDDSの定義に基づいて、物理ファイルのアロケートとディクショナリへの登録を同時に実行してくれるので、DDS定義(項目定義)、物理ファイル、ディクショナリ定義簿の三者が完全に一致するのですが、 A−VXでは歴史的にファイルベース−−>データベースと追加されてきた経緯からか、このような厳密さがありません。 * コピー句とDD定義の不一致を調べる方法としては、RDBQ2等でデータを覗いてみて、中身が妥当かどうか(桁ずれなども含めて)確認するぐらいしか方法がないようです。 | ||
14 | Re:ご苦労様です−3 (聞くと怖い話) | |
ちょっと前までA-VXユーザ 2006-8-17 23:15:00
[返信] [編集] 今は、A-NXが手元で使えないので、詳細に分かりませんが、 確か、#SABC4 と言うUTLで、COBOL85で作ったLMから、 リンクされているCU名、REV(=SU のREV)が表示出来たはずですね。 COPY原文名、REVも表示(印刷?)出来たと思います。 IDSPと言う、シンボルデバッガがリリースされて少し経ってから この機能が追加されたと記憶。 COBOL85の翻訳時に、DDFから直接COPY原文を生成出来ましたね。 この辺りを使っていると、非常に便利だった と記憶。 違っていたら、ごめんなさい。 以上 | ||
全部読む 最新50 1-100 板のトップ リロード |
■▲▼ | ||
1 | KLP-210CM2 エラー | |
わかば 2006-7-20 9:54:00
[返信] [編集] お世話になります。 新しく導入した KLP-210CM2 のトラブル報告です。 同プリンターのパネルに、下記メッセージが表示され、印刷できません。 53 BLOWER1 STOP 何度も出ているメッセージなのですが、初めのころは、電源再投入で復活していたのに・・・ 今日は、全端末からエミュレータが使えなくなってしまう一大事となってしまいました。 現在、販社へ調査依頼中です。 些細なことでも結構です。なにか情報をお持ちの方がいらっしゃいましたら、ご教示願います。 | ||
2 | Re:KLP-210CM2 エラー | |
わかば 2006-7-20 16:13:00
[返信] [編集] こんにちは。 「ハードウェアエラー」とのことでした。 お騒がせしました。 | ||
3 | Re:KLP-210CM2 エラー | |
ターラヤン 2006-7-20 21:30:00
[返信] [編集] なによりも無事解決して良かったです。 これで未接続の問題も解決するとよいのですが。 | ||
4 | Re:KLP-210CM2 エラー | |
わかば 2006-7-21 9:13:00
[返信] [編集] お気に留めていただきまして、ありがとうございます。 昔のラインプリンタ(240万円とか)と比較すると、 ずいぶんリーズナブルな値段に近づいたと思います。 しかし、高額なプリンターには変わりませんので 費用に見合った安心を享受したいですネ。 # 個人的には、KLP-210CM2 好きです。 http://www.sw.nec.co.jp/products/printer/express/product/klp210cm2/klp210cm2.html | ||
5 | Re:KLP-210CM2 エラー | |
こうもと 2006-7-24 18:33:00
[返信] [編集] KLP-240CM2が当社にもやっと導入されました。 印刷が静かになったような気がします。 KLP-240CM2ネタなのでこちらに書き込みます。 このプリンタは節電モードがあるようで”セツデン” 表示中に印刷を実行すると”準備ができていません” を表示して印刷できなくなります。 節電モードがデフォルトで有効になっているので無効 にしたところ症状が出なくなりました。 設定変更方法はプリンタのマニュアルに記載されてい ます。変更箇所はメモリスイッチ3-8をONにすれば無効 になります。 | ||
6 | Re:KLP-210CM2 エラー | |
わかば 2006-7-26 13:08:00
[返信] [編集] 貴重な情報をありがとうございますm(__)m 仰るとおり、 マニュアルのP53に MSW「3-8 節電機能の切り替え」とありましたので、 早速、[ON]にしました。 これで直れば、万々歳です ^^ | ||
7 | Re:KLP-210CM2 エラー その後 | |
わかば 2006-8-25 14:43:00
[返信] [編集] いつもお世話になっています。こんにちは。 かれこれ、1ヶ月経ちました。 節電モードをOFFにしてから、すこぶる順調です(感謝) 印刷時に、エミュレータへ「未接続」とエラーが出る事象も、 1回だけ発生しましたが、原因はツイストペアケーブルに あった(と思われる)ので、問題ナシです。 ※新しいツイストペアケーブルと交換してから、 未接続は解消されました うちのツイストペアケーブルの原因は、2つ考えられました。 1) 機器の周りを清掃したときに、近くの電源タップにツイストペアケーブルがグルグルと巻きついていたf(^^; 2) (たぶん)ツイストペアケーブルの規格があっていなかった。 このときは、DOSコマンドの Ping が通らなかったです。 以上、ご報告まで。 | ||
全部読む 最新50 1-100 板のトップ リロード |
■▲▼ | ||
1 | SMARTのデータ入力プログラムについて | |
MAKI 2006-7-15 11:47:00
[返信] [編集] 最近さわる機会がないので懐かしく拝見しています。 SMARTは結構使って、いろいろこわいところも知って いるつもりです。 簡易なデータ入力プログラムを作る で作られたSMARTで気になるところがありましたので 一言。 それは、出力方法 OTY=CRE というところです。 簡略質問で作られたということなのでデフォルト 設定が入ったのかもしれませんが、プログラムを 立ち上げる度に、既存のデータをクリアしますの で、ちゃんと理解したうえで使わないと、データ が消えたとかいうトラブルになるわけです。 以前同じようなトラブルを聞いた事もありますの で注意が必要かと思います。 | ||
2 | Re:SMARTのデータ入力プログラムについて | |
ターラヤン 2006-7-15 13:12:00
[返信] [編集] MAKIさん、こんにちは。 たしかに出力方法 OTY=CREでは、プログラムを起動する毎に今まで入れたデータが消えてしまいます。 SMARTの説明は最終的にはデータを集計して印刷するところまで書こうと思っていたのですが、、今から覚えるならSMARTIIの方がいいかと気が付き、中途半端に中断してしまっていました。 Web上には(6)までしか公開していませんが、(8)(9)辺りまでは書いていたはずなので、後でアップします。 説明不足な点、誤解を招きそうな説明、間違っている所は多々あるはずなので、指摘していただければ直します。 | ||
3 | Re:SMARTのデータ入力プログラムについて | |
MAKI 2006-7-22 12:52:00
[返信] [編集] 間違いというわけではないですが、危険な選択だと思います。 SMARTとSMARTIIについては、追加機能はありますが、基本的には変わらないものだと思っています。 特に、始めるのならSMARTの方がいいように思います。 SMARTがわかればSMARTIIは簡単に使えます。 そういう意味では、SMARTをつづけられたらいいんじゃ ないかと思います。 | ||
4 | Re:SMARTのデータ入力プログラムについて | |
ターラヤン 2006-7-31 0:37:00
[返信] [編集] 返事が遅くなりました。 「(8)プログラムを修正してみる」を追加してみましたが、いかがでしょう。 データを上書きするプログラムを追加するプログラムに直しています。 | ||
5 | Re:SMARTのデータ入力プログラムについて | |
MAKI 2006-8-6 16:56:00
[返信] [編集] 最初から修正する予定でしたか。 余計なことを言いました。 SMARTを使うんだったら、特に修正のときは F3,F4,F9,ADVANCEなどのキーの使い方を覚えると 効率がよくなります。 お勧めします。 | ||
全部読む 最新50 1-100 板のトップ リロード |
新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ |
BluesBB ©Sting_Band