RPG/400 自己写的一个小实例分享!(1)

最新推荐文章于 2017-01-25 17:06:31 发布

feigme

最新推荐文章于 2017-01-25 17:06:31 发布

阅读量994

点赞数

分类专栏： as/400

本文链接：https://blog.youkuaiyun.com/feigme/article/details/1567153

版权

as/400 专栏收录该内容

18 篇文章

订阅专栏

本文探讨了物理文件和逻辑文件的概念及其实现方式。通过具体的示例代码展示了两种文件类型的定义及其相互之间的关联，有助于理解文件系统中数据组织的基本原理。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

物理文件和逻辑文件

SEU==> TSDAP
FMT PF .....A..........T.Name++++++RLen++TDpB......Functions++++++++++++++++++
*************** Beginning of data *************************************

*************** Feigme H.Guo*************************************

0001.00      A          R TSDAR
0002.00      A            PNAME          8          TEXT('NAME')
0003.00      A                                      COLHDG('NAME')
0004.00      A            PAGE           2S 0       TEXT('AGE')
0005.00      A                                      COLHDG('AGE')
0006.00      A            PADDR         18          TEXT('ADDRES')
0007.00      A                                      COLHDG('ADDRES')
        ****************** End of data ****************************************

SEU==>                                                                   TSDAL
FMT LF .....A..........T.Name++++++.Len++TDpB......Functions++++++++++++++++++
        *************** Beginning of data *************************************
0001.00      A          R TSDAR                     PFILE(TSDAP)
0002.00      A          K PNAME
        ****************** End of data ****************************************