|
|||||||||||||||||||||
| 5.外部記述ファイルのレコードの中身を1つのフィールドに収めるには？ | |||||||||||||||||||||
|
RPG内部ではCHAINやREADの直前/直後でレコードの内容ほ保管/復元したいときがある。
このような場合にすべてのフィールドを 1つ1つSAVEしたり、RESTOREするのでは大変である。まとめてSAVE/RESTOREができないものだろうか？ このようなときに、外部ファイルの DS記述が効果を発揮する。 しかもファイルのレイアウトが変わった場合でも、再コンパイルするだけで良い。 |
|||||||||||||||||||||
|
|||||||||||||||||||||
0001.00 E DSPDTA 1024 1 入力 DATA 0002.00 E SAVDTA 1024 1 SAVE-DATA 0003.00 ISAVEDS E DSTOKMAS 0004.00 I 11024 DSPDTA 0005.00 C MOVE DSPDTA SAVDTA 0006.00 C SETOF 90 0007.00 C KEY CHAINTOKMAS 90 0008.00 C MOVE SAVDTA DSPDTA |
|||||||||||||||||||||
|
|||||||||||||||||||||
