1:
bluelion 11/16 22:00
COBOL上で内部コード(S100?)からJIPS(JIS78)に変換したくてシステムサブルーチン SYSKOCNVだったかを使用して変換したいのですがいまいち うまくいきません

アギュメントの設定をわかる方おしえてください

01 DATA1 X(02) VALUE "漢"
01 DATA2 X(10)
01 DATA3.
03 DATA31 X(02)
03 DATA32 9(04) VALUE 1.
03 DATA33 9(04) VALUE 10.
03 DATA34 9(04).
03 FILLER X(12)??

CALL "SYSKOCNV" USING DATA1 DATA2 DATA3

でコールすると
ステータス DATA31は"00"で正常なのですが
DATA2には必ず同じ値がかえってくるのです
DATA1にはかならずきちんとした漢字がはいっているのですが
なぜかわかりません

会話型デバッガーでcall前 call後にチェックしてもわからず
ギブアップです

おたすけおーー!

また S100内部コードからJipsコードをサブルーチンを使わずに生成するこはできないのでしょうか?


6:もう少し教えていただけませんか?
BLUELION 11/18 21:33

7:Re:
LBM 11/19 10:13

8:Re:
bluelion 11/19 14:14

9:Re:
LBM 11/19 15:10

10:ありがとうございます
BLUELION 11/20 10:39

11:外字エリアうまくいかず
BLUELION 11/23 11:21

12:Re:外字エリアうまくいかず
tahrayan 11/24 01:26

13:Re:外字エリアうまくいかず
BLUELION 11/25 00:33

14:Re:外字エリアうまくいかず
MAKI 11/25 22:10

15:Re:外字エリアうまくいかず
bluelion 11/26 16:25

1-

BluesBB ©Sting_Band