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

NECオフコン関連
オフコン一般
情報
[掲示板に戻る全部  1-  最新50
1 この命令は使えるでしょうか?
たぬき丸 2009-6-27 0:20  [返信] [編集]

旧来よりWS-EMLから簡易的にExcelやAccessを起動するのにこのような命令を利用してきました。今回約10年ぶりにオフコンを新機種に入れ替えますが、この命令が有効か気になります。販売店に聞いたら良いのでしょうが、最近の人はこんな事知らないようです。どなたか利用されている方、コメント頂けますか?よろしくお願いします。


----------------------------
000450*----*  起動APパスの指定
000460 01  WK-AP-PASS.
000470     03  WK-AP-0      PIC  X(04)   VALUE  ""27"Q00".
000480     03  WK-AP-1.
000490         05  WK-AP-11 PIC  X(250)  VALUE  SPACE.
000500 01  SC-PRG           PIC  X(150)  VALUE
000510         "D:\\ACCESS97\棚卸業務\業務START.mdb".
 ・
 ・
 ・
001200     DISPLAY WK-AP-PASS.
------------------------------------

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さん、何度も御丁寧な投稿をありがとうございます。
[掲示板に戻る全部 前100 次100 最新50
BluesBB ©Sting_Band