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 ... 22 23 24 (25) 26 27 28 ... 108 »

「WSエミュレータ再接続キットはエラーが発生したため閉じ・・・」 解決済
たぬき丸 2011-6-8 9:30:10  [返信] [編集]

解決済みですが、情報提供のため投稿します。参考になれば幸いです。

【現象】
ある日の昼休みに、全WS-EMLの画面に「WSエミュレータ再接続キットはエラーが発生したため閉じられました」とのメッセージが表示された。
AVXサーバを再起動すると復旧するが数日後に再発。

【対処】
保守会社に連絡して調査してもらうと「WSエミュレータ再接続キット」の障害と判明。パッチがあるのでそれを適用して完了。

【発生環境】
AVXサーバ:Express 5800/640xi
AVX OS:AVX01 R3.01
WS-EML:Ver 16.0
「1行181文字を印字する」サブルーチン公開
富山清風 2011-6-7 8:39:33  [返信] [編集]

「プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定」のスレッドの中の
「回転の達人_2011-5-19_12:58:21」_で「1バイト半角132文字が176文字印字可能になります」がありました。
そこで小生の作成したサブル-チンで同様なものがありましたので公開します。

1行181文字印字可能になります
(181とは:136*4/3→181.333→切り捨て181文字です)
実際は180文字までしか印字したことがありませんが、理論上は181文字印字可能です。

COBOLのわかる方であれば、LINKしてみてください。
そもそも、1行137文字以上で設計すること自体が無理があるのですが・・・
長々と書きますがご容赦ください。

概要は:
ANK:ANK1文字を2バイト系半角文字に変換しセット
JIP:そのままセット(処理の都合上2バイト系の上1桁と下1桁を分けてセット)

(注)ラインプリンタで印字する場合は、ラインプリンタのパネル部のスイッチ?で
  2/3,1/2,・・・のディップスイッチを/2しなければならなかったような???
  記憶があいまいです。

メインからのパラメータは4つです。
1.入力データ____QATJ-INPUT_______X(250)
2.入力データ長__QATJ-INPUTSIZE___9(03)
3.出力データ____QATJ-OUTPUT______X(505)
4.出力データ長__QATJ-OUTPUTSIZE__9(03)


メインの例:
_____MOVE____PR-01___________TO______QATJ-INPUT.____________印字しようとしている文字列
_____MOVE____180_____________TO______QATJ-INPSIZE.__________桁数
_____CALL____"AAQATJ"________USING___QATJ.__________________サブルーチンをCALL
_____WRITE___LP-RC___________FROM____QATJ-OUTPUT_AFTER_1.___結果を印字

サブルーチンは」以下の通りです。

000010_IDENTIFICATION___________DIVISION.
000020_PROGRAM-ID.______________AAQATJ.
000030******************************************************************
000040*____ANK から 日本語文字へ変換サブルーチン  ____     *
000050******************************************************************
000060_DATE-COMPILED.
000070_ENVIRONMENT_________DIVISION.
000080_CONFIGURATION_______SECTION.
000090_SOURCE-COMPUTER.____SYSTEM150.
000100_OBJECT-COMPUTER.____SYSTEM150.
000110_DATA____________________DIVISION.
000120_WORKING-STORAGE_________SECTION.
000130******************************************************************
000140_01__CBL01.
000150_____05__CBL0101_____________PIC__X(256).
000160_____05__CBL0101R____________REDEFINES_CBL0101.
000170_______07__CBL0101O__________OCCURS_256.
000180_________09__CBL010101_______PIC__X(01).
000190_01__CBL02.
000200_____03__CBL0201_____________PIC__9(04)__VALUE__256.
000210****
000220_01__CBL03.
000230****____________________________________________0123456789ABCDEF
000240_____03__F___________________PIC__X(16)__VALUE_"AAAAJAJAJJJAAAAA"._0
000250_____03__F___________________PIC__X(16)__VALUE_"AAAAJAAJAAJJAAAA"._1
000260_____03__F___________________PIC__X(16)__VALUE_"JJJJJJAAJJJJJAAA"._2
000270_____03__F___________________PIC__X(16)__VALUE_"JJAJJJJAJJJJAAJA"._3
000280_____03__F___________________PIC__X(16)__VALUE_"AAAAAAAAAAAAAAAA"._4
000290_____03__F___________________PIC__X(16)__VALUE_"AAAAAAAJAJAAAAAA"._5
000300_____03__F___________________PIC__X(16)__VALUE_"AAJJJJJJJJJAAAAA"._6
000310_____03__F___________________PIC__X(16)__VALUE_"JJJJJJJJJJAAAAAA"._7
000320_____03__F___________________PIC__X(16)__VALUE_"JAAAAAAAAAAJAAAA"._8
000330_____03__F___________________PIC__X(16)__VALUE_"AAAAAAAAAAAJJAAA"._9
000340_____03__F___________________PIC__X(16)__VALUE_"JJAAAAAAAAAJAAAA"._A
000350_____03__F___________________PIC__X(16)__VALUE_"JAJJJJJJJJAAAAAA"._B
000360_____03__F___________________PIC__X(16)__VALUE_"JAAAAAAAAAJJJJJJ"._C
000370_____03__F___________________PIC__X(16)__VALUE_"AAAAAAAAAAJJJJJJ"._D
000380_____03__F___________________PIC__X(16)__VALUE_"AJAAAAAAAAJJJJJJ"._E
000390_____03__F___________________PIC__X(16)__VALUE_"AAAAAAAAAAJJJJJJ"._F
000400****_漢字文字ピッチ 10.8ポイント
000410_01__PR-START.
000420__________03__F_______________PIC_X(05)_VALUE_""3FE04F40A0"".
000430****_漢字文字ピッチ 14.4ポイント
000440_01__PR-END.
000450__________03__F_______________PIC_X(05)_VALUE_""3FE04FE080"".
000460_01__PR-END-R____________REDEFINES_PR-END.
000470_____03__TBL-END-O_______OCCURS__5.
000480_______05__TBL-END1______PIC__X(01).
000490_01__TBL-CNV.
000500_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".00-0F
000510_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".10-1F
000520_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".20-2F
000530_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".30-3F
000540_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".40-4F
000550_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".50-5F
000560_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".60-6F
000570_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".70-7F
000580_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".80-8F
000590_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".90-9F
000600_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".A0-AF
000610_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".B0-BF
000620_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".C0-CF
000630_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".D0-DF
000640_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".E0-EF
000650_____03__F___PIC_N(16)_VALUE_NC"・・・・・・・・・・・・・・・・".F0-FF
000660_01__TBL-CNV-R___________REDEFINES_TBL-CNV.
000670_____03__TBL-CNR-O_______OCCURS_256.
000680_______05__TBL-JIP1______PIC__X(01).
000690_______05__TBL-JIP2______PIC__X(01).
000700_01__TBL-CNV-RR__________REDEFINES_TBL-CNV.
000710_____03__TBL-CNR-OO______OCCURS_256.
000720_______05__TBL-JIP_______PIC__N(01).
000730_01__WK-CNV-COLUMN___________PIC_9(03).
000740****_""00""+""XX""→COMP-1へ
000750_01__WK-CNV-COMP_________________COMP-1.
000760_01__WK-CNV-COMP-R___________REDEFINES_WK-CNV-COMP.
000770_____03__WK-CNV-00___________PIC_X(01).
000780_____03__WK-CNV-ANK__________PIC_X(01).
000790*************************************************_IX
000800_01__IX-AREA.
000810_____03__IX-INP______________PIC_9(03).
000820_____03__IX-OUT______________PIC_9(03).
000830_____03__IXPR________________PIC_9(02).
000840******************************************************************
000850_LINKAGE_________________SECTION.
000860****_入力データ、入力サイズ、出力結果(変換結果)、出力サイズ
000870_01__QATJ.
000880_____03__WK-INPUT.
000890_________05__WK-INPDATA______OCCURS__250______PIC_X(01).
000900_____03__WK-INPUTSIZE________PIC_9(03).
000910_____03__WK-OUTPUT.
000920_________05__WK-ESC0_________PIC_X(05).
000930_________05__WK-OUTDATA______OCCURS__505______PIC_X(01).
000940_____03__WK-OUTPUTSIZE_______PIC_9(03).
000950******************************************************************
000960_PROCEDURE_______________DIVISION____USING__QATJ.
000970_ST.
000980****_出力エリアのクリア
000990_____MOVE____LOW-VALUE_______TO______WK-OUTPUT.
001000****_出力エリアに10.8ポイントを先頭に設定
001010_____MOVE____PR-START________TO______WK-ESC0._____________________
001020****
001030_____PERFORM_RECORD-CNV-RTN__THRU__RECORD-CNV-EXT.
001040****_出力レングス設定
001050_____MOVE____IX-OUT__________TO______WK-OUTPUTSIZE.
001060_ST-END.
001070_____EXIT____PROGRAM.
001080******************************************************************
001090_RECORD-CNV-RTN.
001100****_入力データをコード変換しANK/JIP(A/J)に置き換える
001110_____MOVE____WK-INPUT________TO______CBL0101.
001120_____CALL___"CBLCODE"________USING___CBL01
001130_____________________________________CBL02
001140_____________________________________CBL03.
001150****_以下1文字づつチェックしANK/JIPの判断を行いながら出力エリアへ
001160****_ANK:ANK1文字を2バイト系半角文字に変換しセット
001170****_JIP:そのままセット(処理の都合上2バイト系の上1桁と下1桁をセット
001180_____MOVE____0_______________TO______IX-INP.
001190_____MOVE____0_______________TO______IX-OUT.
001200_RECORD-CNV-10.
001210_____ADD_____1_______________TO______IX-INP.
001220_____IF____(_IX-INP__________>_______250)
001230_______________________________________________GO_RECORD-CNV-90.
001240_____IF____(_IX-INP__________>_______WK-INPUTSIZE)
001250_______________________________________________GO_RECORD-CNV-90.
001260_____MOVE____LOW-VALUE__________TO_____WK-CNV-00.
001270_____MOVE____WK-INPDATA(IX-INP)_TO_____WK-CNV-ANK.
001280_____COMPUTE_WK-CNV-COLUMN___=______WK-CNV-COMP_+_1.
001290_____IF____(_CBL010101(IX-INP)___=___"A"_)
001300_________COMPUTE_IX-OUT__________=_______IX-OUT_+_1
001310_________MOVE____TBL-JIP1(WK-CNV-COLUMN)
001320_________________________________TO______WK-OUTDATA(IX-OUT)
001330_________COMPUTE_IX-OUT__________=_______IX-OUT_+_1
001340_________MOVE____TBL-JIP2(WK-CNV-COLUMN)
001350_________________________________TO______WK-OUTDATA(IX-OUT)
001360_____ELSE
001370_________COMPUTE_IX-OUT__________=_______IX-OUT_+_1
001380_________MOVE____WK-INPDATA(IX-INP)
001390_________________________________TO______WK-OUTDATA(IX-OUT)
001400_________COMPUTE_IX-OUT__________=_______IX-OUT_+_1
001410_________COMPUTE_IX-INP__________=_______IX-INP_+_1
001420_________MOVE____WK-INPDATA(IX-INP)
001430_________________________________TO______WK-OUTDATA(IX-OUT)
001440_____END-IF.
001450_______________________________________________GO_RECORD-CNV-10.
001460_RECORD-CNV-90.
001470****_印字の後ろに14.4ポイントを付加する(元にもどす)_________14.4
001480_____PERFORM______________________________________________________14.4
001490_________VARYING__IXPR__FROM__1___________________________________14.4
001500________________________BY____1___________________________________14.4
001510_________UNTIL____IXPR__>_____5___________________________________14.4
001520____________ADD____1________________TO__IX-OUT____________________14.4
001530____________MOVE___TBL-END1(IXPR)___TO__WK-OUTDATA(IX-OUT)________14.4
001540_____END-PERFORM._________________________________________________14.4
001550_RECORD-CNV-EXT.
001560_____EXIT.
使用時は下線("_")をスペース(" ")で置き換えてください。

000500-000650の・・・・の部分が#NFCNVで上手く変換できなかったので使用時は「手修正」をお願いします。
000500:"________________"_00-0F 
000510:"________________"_10-1F
000520:"________________"_20-2F
000530:"________________"_30-3F
000540:"_。「」、・ヲァィゥ[.<(+!"_40-4F
000550:"&ェォャュョゥ_ー_]\*);_"_50-5F
000560:"-/_________,%_>?"_60-6F
000570:"__________:#@'=""_70-7F
000580:"_アイウエオカキクケコ_サシスセ"_80-8F
000590:"ソタチツテトナニヌネノ__ハヒフ"_90-9F
000600:"__ヘホマミムメモヤユ_ヨラリル"_A0-AF
000610:"__________レロワン゙゚"_B0-BF
000620:"_ABCDEFGHI______"_C0-CF
000630:"_JKLMNOPQR______"_D0-DF
000640:"__STUVWXYZ______"_E0-EF
000650:"0123456789______"_F0-FF
上記のN(16)はいずれも漢字の半角文字です。
使用時は下線("_")を2バイト系の半角スペースで置き換えてください。

質問などがあれば本掲示板にてお願いします。

以上です。

使用された方は感想をお願いします。

ガンバレ東日本!!
ガンバレOPユーザー!!
Re: 制御コードはなんですか?(プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定)
富山清風 2011-6-3 12:04:46  [返信] [編集]

>>制御コードはなんですか
たぶん下記の内容だと思います。(あくまで想像ですが)

ANK部分
「汎用用紙に160文字(ANK)を編集している」とは、たぶん163文字印字しているのだと思います。
(163とは:136*12CPI/10CPI→163.2→切捨てで163)

漢字部分
(163とは:136*14.4ポイント/12.0ポイント→163.2→切捨てで163)

小生は下記コーディングにて「汎用用紙に163文字(ANK/漢字混在可)を印字」しています


01 PR-01.
__03 FILLER PIC X(08) VALUE ""3F46405079407DA0"". 12CPI     ANK文字サイズ(ANK開始用)
__03 FILLER PIC X(05) VALUE ""3FE04F7F75"".    12.0ポイント 文字ピッチ(漢字開始用)
__03 PR-163 PIC X(163).
__03 FILLER PIC X(05) VALUE ""3FE04FE080"".    14.4ポイント 文字ピッチ(漢字終了用)
__03 FILLER PIC X(08) VALUE ""3F46407D59404D76"". 10CPI     ANK文字サイズ(ANK終了用)
Re: 制御コードはなんですか?(プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定)
江須扇 2011-5-29 17:38:23  [返信] [編集]

大変失礼ですが、下記の内容が良くわからないのですが?

>COBOLでプリンタ制御コード(文字ピッチ指定)を使って、汎用用紙に160文字(ANK)を編集している

汎用用紙とは11x15インチの連続用紙のことですか?

160文字(ANK)とは1バイト系を指定しているのですか?
それともプリンタの出力レコードがPICTURE X(160)を意味しているのです?

文字ピッチ指定とは
CP(CEX c”$”P1、x”3FE0”P1)ですか?
これは、2バイト用ですよね
AGS(CEX x”46”P1P1、x”3F46”P1P2)
は1バイト系の文字サイズ指定ですが、1バイト系は文字サイズしか指定出来ず。しかもNIP(レーザープリンタ)しか対応してません。
質問内容が抽象的ですと皆様の回答も抽象的になると思います。

修正前プログラムをそのままコンパイルしたらどうなるのでしょうか? 
その場合はちゃんと出力されると言うことですか?

制御コードが正しく実行できないと、全く出力されないのでは、現象がちがうとおもいます。

全く出力されないという事であれば、大変失礼ですが、別の原因が考えれれます。
例えば
1.サブプログラムをリンクする必要があるがリンクできてない
2.直接スプール出力でスプールに印刷されている
3.特定プリンタ指定又は、システムプリンタ指定で実はそちらに出力されている

Re: メッセージ管理S(Wsエミュレータの切断について)
江須扇 2011-5-29 15:35:12  [返信] [編集]

的外れかもしれませんが、A-VX01に移行時にWSエミュレータの切断が頻発したので、
サーバー側の設定を保守会社にデフォルトから90秒に変更してもらいました。
下記、メッセージ管理S 69ページをご参照ください。(A-VX01)

以下、マニュアル抜粋
A.1.2 A-VXⅡ/Ⅲや以前のA-VXⅣから移行時の注意点
(1)キープアライブの送信間隔
 キープアライブの送信間隔が、以下の通りA-VX OSやリビジョンによって異なりますので注意して下さい。
 また、必要に応じて設定及び設定変更を行って下さい。

キープアライブの送信間隔
A-VXⅡ 90秒間隔で送信されます(間隔は、変更不可)
A-VXⅢ、A-VXⅣ(R4.5迄)
      デフォルトで2時間、標準WS監視時間設定ツールで指定した場合は、指定した間隔で送信されます。
      (標準WS監視時間設定ツールはA-VX保守グループにあり設定した監視時間に合わせてキープアライブの送信間隔を変更します)
A-VXⅣ(R5.0以降)、A-VX01
      デフォルトの2時間間隔(再送は1秒間隔)で送信されます。送信間隔を変更する場合は、WindowsOS側のレジストリ設定を変更する必要があります。
      Hkey_Local_Machine\System\CurrentControlSet\Services\Tcpip\Parameters のKeepAliveTimeとeepAliveInterval

但し、保守会社も私がこのページを指摘するまで、担当者が知らず、導入時に放置されていました。
Re: Wsエミュレータの切断について
ルリルリ 2011-5-27 19:39:53  [返信] [編集]

私も以前そのような話を聞いたことがありました。
導入時、省電力モードは使用しないような設定をしてことがあります。接続がきれる現象は起きてません。


Re: プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定
ルリルリ 2011-5-27 19:36:37  [返信] [編集]

以前コンパイルした時の
OS、並びにCOBOLかCOBOL85のVER.等は判りますか?

文字ピッチは、7.2 9.6 10.8 14.4 18.0 21.6 25.2
が使用可能です。
この文字ピッチがどうか確認下さい。
Re: Wsエミュレータの切断について
ターラヤン 2011-5-26 2:26:21  [返信] [編集]

こんにちは。

ノートパソコンによくある省電力モードの設定がしてあって、
10分ぐらい経つと、スリープモードや休止状態になって、
接続が切れるということはないでしょうか。

あまり確証はないですが。
Re: Wsエミュレータの切断について
温泉好きのうさぎ 2011-5-26 0:28:42  [返信] [編集]

同一の環境下にある複数の端末で同一の現象が起こっているのか、それとも、特定の一台のみで問題が発生しているのでしょうか。どちらかがわかれば、原因解明し易くなると思います。また、再接続キットは使われているのでしょうか。

なお、Windows7対応のPC/WSエミュレータ(32)のバージョンは、最新のVer.21.0 (U75830-J108)とVer.20.0 (U75830-J107)のみであり、Ver.19.0以前のものは未対応となっています。
WSエミュレータのバージョンを確認して、対応したものになっているかどうかのチェックを、まず第一にしてください。
Windows7に未対応のWSエミュレータを使用しているのであれば、不安定な動作をするという可能性は充分に考えられます。

ちなみに、Windows2000に対応するWSエミュレータのバージョンは、Ver.6.0からVer.20.0までです。
Wsエミュレータの切断について
ねこきち 2011-5-25 12:17:08  [返信] [編集]

いつもお世話になっています。
(遅くなりましたが、温泉好きのうさぎさん、ホンダF1さんありがとうございます。)

今回は、Wsエミュレータが切断される事で困っています。
Win2000でWsエミュレータを使用していた時は何ら接続に関して問題なかったのですが、Win7でWsエミュレータを使用していて、10分位放置しておくと、A-VXの画面は残っているのですが、入力してEnterを押すと、『サーバーにデータを送信できないか接続を切断しました。もしくはサーバーから接続を切断されました(TCP/IP エラーコード10054)<0500469>』と表示され終了するしかない状態になります。
切断され直ぐに、Wsエミュレータを起動しても問題なく接続でき、使用はできます。

Win7では、WinXP迄は必要なかった設定が必要なのか、不要なのか
ということがあれば、教えていただけないでしょうか?
宜しくお願いします。
Re: プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定
温泉好きのうさぎ 2011-5-24 0:46:23  [返信] [編集]

なんとか解決の糸口を見つけてあげたいと思うのですが、あまりにも情報が少なすぎます。社内守秘義務にひっかかるような問題でもあるのでしょうか。せめて、以下の内容ぐらい教えていただけませんでしょうか。

(1) コンパイルやリンクに疑問があるのであれば、実際に指定したパラメータは何なのでしょうか。

(2) 文字ピッチ指定(CP)の制御コードは、具体的には何でしょうか。ソースリスト上では、どうコーディングされていますか。

(3) 「汎用用紙に160文字(ANK)を編集」とありますが、CPの制御コードをCEXシーケンスで定義しているのであれば、それは日本語プリンタのみ使用可能です。ANKプリンタは不可。
プログラムでプリンタの定義が日本語プリンタとなるよう指定していますか、さもなくば出力されたLMのプリンタ属性をJIPSに変更していますか。また、プリンタの機種名は。

(4) 「そのLMを実行すると何も出力されない」とありますが、具体的にどんな動作をするのでしょうか。たとえば、
 ・プリンタがまったく反応しない。
 ・空白を印字している。改行、改ページのみ。
 ・文字ピッチ制御をしたい部分のみ出力されない。他の部分は出力される。
 ・文字化けをして出力されている。全部、一部。

(5) LM実行中プリンタは間違いなくオープンされていますか。
Re: プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定
昔のITOS 2011-5-20 9:58:02  [返信] [編集]

ご指摘ありがとうございます。

コード変換等は行わず、プリントエリアの先頭に制御コードをセットして、writeしています。
Re: プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定
昔のITOS 2011-5-20 9:53:36  [返信] [編集]

ご指摘ありがとうございます。

残念ながら、同じプリンターで、かつ同じ入力ファイルを使って実行した結果です。
Re: KLP360CMのネットワークボード設定について
ターラヤン 2011-5-20 1:33:18  [返信] [編集]

解決されたようで良かったです。

おそらく、4,5枚組になっているCD-ROMのうちの1枚に入っていたのですよね。
Re: プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定
ターラヤン 2011-5-20 1:19:30  [返信] [編集]

こんにちは。

現在うまく動いているプログラムと何も出力されないプログラムで、同じプリンタに出力しているのでしょうか。
つまり、うまく動いているプログラムはちゃんと出力されて、新しくコンパイルし直した方だと、同じプリンタに出力しても駄目なのでしょうか。

うまくいっているものと駄目なものは、同じプリンタに出力しているのか、違うプリンタに出力しているのか、ちょっと気になりました。

プリンタの機種によって、使える制御コード、使えない制御コードがあります。
CPについても、機種によって、使えるピッチ、使えないピッチがあります。
それにプリンタメーカーによっては、制御コードの体系自体が異なることもあります。

その制御コードに対応していないプリンタだと、文字化けしたり、何も出なかったりします。
もし、違うプリンタに出力しているようであれば、試しにうまくいっているプリンタの方で試してみてはどうでしょうか。
Re: KLP360CMのネットワークボード設定について
ごじゃっぺ 2011-5-19 13:29:44  [返信] [編集]

自己解決しました、、、
Re: プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定
回転の達人 2011-5-19 12:58:21  [返信] [編集]

 プリンタ制御コードではないのですが、文字数を沢山印字できるようなサブルーチンをはるか昔に作った事があります。
 1バイト半角文字と2バイト半角文字の対応テーブルを作成し、2バイト半角文字に変換して、ピッチ詰めすれば、1バイト半角132文字が176文字印字可能になります。 ひょとして、こんなサブルーチンを使っていないですか。
KLP360CMのネットワークボード設定について
ごじゃっぺ 2011-5-18 23:11:40  [返信] [編集]

はじめまして、お世話になります。

KLP360CMを利用しているのですが、それに積んでいた
B4680プリンタ接続ボード(N1154-013)の設定が飛んでしまいました、、、

プリンタ支援ソフトウェアというFDを探したのですが見つからず
ネット上でも探したのですが見つからず
手動設定で何とかIPを突っ込めないものかと試行錯誤しています。

不躾で恐縮ですが、手動での設定方法もしくは
N1154-013用のプリンタ支援ソフト入手方法について
ご教授いただけませんでしょうか?

よろしくお願いいたします。
Express5800
でんぱち 2011-5-18 17:31:50  [返信] [編集]

Express5800/100 シリーズに AVX01 R1.0
インストール出来た方いませんか?

AVX01前の2000Server 時代のであれば インストール出来たのですが、AVX01から 対象機種ではないと インストールできたなくなりました。
Re: プリンタ制御コードを使用したCOBOLプラグラムのCOMPILE&LINK指定
昔のITOS 2011-5-18 15:31:54  [返信] [編集]

そうですよね。
自分でもそのように記憶していたので、オプション等もごくごく標準的なしていだけで、COMPとLINKをしたのですが。。。
COMP、LINKでエラーがでる訳ではなく、正常に終了します。

が、実際にそのLMを実行すると何も出力されないのです。

 新規投稿 | スレッド表示 | ツリー表示 | 投稿順表示 | i-mode | トップ 
« 1 ... 22 23 24 (25) 26 27 28 ... 108 »

BluesBB ©Sting_Band