Google
オフコン練習帳内を検索
インターネット全体を検索

NECオフコン関連
オフコン一般
情報

[掲示板に戻る]


Re:この命令は使えるでしょうか? EXCHANGE 2009-6-27 8:42
Re:この命令は使えるでしょうか?(補足... EXCHANGE 2009-6-27 9:01
Re:この命令は使えるでしょうか?(補足... EXCHANGE 2009-6-27 9:06
Re:この命令は使えるでしょうか?(補足... たぬき丸 2009-6-27 12:12

2 Re:この命令は使えるでしょうか?
EXCHANGE 2009-6-27 8:42  [返信] [編集]

☆全く問題なしに使用できます。



☆出来れば



 01  WK-AP-PASS.                               
_____03 WK-AP-0.
________05 FILLER    PIC  X(04)  VALUE ””27”Q00”.  
________05 FILLER    PIC  X(01)  VALUE '”'.
_____03 WK-AP-1.        
________05 WK-AP-11  PIC  X(248) VALUE SPACE.
_____03 WK-AP-9      
________05 FILLER    PIC  X(01)  VALUE '”'.


とやって、


MOVE SC-PRG  TO WK-AP-1.
DISPLAY WK-AP-PASS.


のほうがうまくいくと思います。


☆ というのは、SC−PRGで指定されているPASSが
”C:\PROGRAM(ここに空白)FILES\^^^^^^”
などと空白を含んでいる場合でもうまく動作するためです。
まさかVALUEのところでダブルクウォーテーションという訳にはいかないでしょうから。。

☆ ここでの指定のやりかたは、WINDOWSの「ファイル名を指定して実行」の場合と同じになるようです。

3 Re:この命令は使えるでしょうか?(補足です)
EXCHANGE 2009-6-27 9:01  [返信] [編集]

☆ 先程の投稿には表記の分かりにくい所があったので、補足します。



01 WK-AP-PASS.
_____03 WK-AP-0.
________05 FILLER PIC X(04) VALUE ""27"Q00".
________05 FILLER PIC X(01) VALUE '"'. <−−(A)
_____03 WK-AP-1.
________05 WK-AP-11 PIC X(248) VALUE SPACE.
_____03 WK-AP-9
_______05 FILLER PIC X(01) VALUE '"'. <−−(B)


☆ (A)(B)の部分は、VALUEの値の指定に通常使われるダブルクウォーテーションではなく、シングルクウォーテーションで囲む方法を使っています。

☆ COBOLの場合、VALUEの値の指定に「”」「’」のどちらでもセットで使えたと思います。

☆ 要するに、DISPLAYの対象になるPASSが途中に空白を含むときは両側にシングルクウォーテーション「’」が必要と言うことです。

4 Re:この命令は使えるでしょうか?(補足です)訂正版
EXCHANGE 2009-6-27 9:06  [返信] [編集]

直前の(補足です)の説明は最後の部分が間違っていました。お詫びして訂正致します。直前の投稿は削除して下さい。)



☆ 先程の投稿には表記の分かりにくい所があったので、補足します。



01 WK-AP-PASS.
_____03 WK-AP-0.
________05 FILLER PIC X(04) VALUE ""27"Q00".
________05 FILLER PIC X(01) VALUE '"'. <−−(A)
_____03 WK-AP-1.
________05 WK-AP-11 PIC X(248) VALUE SPACE.
_____03 WK-AP-9
_______05 FILLER PIC X(01) VALUE '"'. <−−(B)



☆ (A)(B)の部分は、VALUEの値の指定に通常使われるダブルクウォーテーションではなく、シングルクウォーテーションで囲む方法を使っています。


☆ COBOLの場合、VALUEの値の指定に「”」「’」のどちらでもセットで使えたと思います。


☆ 要するに、DISPLAYの対象になるPASSが途中に空白を含むときは両側にダブルクウォーテーションが必要と言うことです。

5 Re:この命令は使えるでしょうか?(補足です)訂正版
たぬき丸 2009-6-27 12:12  [返信] [編集]

この命令は旧来のコーディングより何となく慣習的に使用していたもので、理由がわかり納得です。

EXCHANGEさん、何度も御丁寧な投稿をありがとうございます。

BluesBB ©Sting_Band