代码之家 › 专栏 › 技术社区 › Radinator

如何创建多记录格式DDS

rpgle db2

Radinator · 技术社区 · 7 年前

有人能告诉我如何创建一个有多个记录的PF吗?

我尝试了以下方法:

 A**************************************************************************
 A*  Physical File
 A*-------------------------------------------------------------------------
 A
 A*            -------------------------------------------------------------
 A*            Record 01 - <Some description>
 A*            -------------------------------------------------------------
 A          R RAMPPF1
 A            D1SNAM        50A         ALIAS(SHIPNAME         )
 A            D1SADD        50A         ALIAS(SHIPADDRESS      )
 A            D1SCITY       50A         ALIAS(SHIPCITY         )
 A            D1SREGN        2A         ALIAS(SHIPREGION       )
 A            D1SPOST       10A         ALIAS(SHIPPOSTALCODE   )
 A            D1SCNTR       40A         ALIAS(SHIPCOUNTRY      )
 A            D1CSTID       80A         ALIAS(CUSTOMERID       )
 A            D1CNAM        50A         ALIAS(CUSTOMERNAME     )
 A            D1CADD        50A         ALIAS(ADDRESS          )
 A            D1CCITY       50A         ALIAS(CITY             )
 A* KEYS GO HERE
 A
 A*            -------------------------------------------------------------
 A*            Record 02 - <Some description>
 A*            -------------------------------------------------------------
 A          R RAMPPF2
 A            D2SNAM        70A         ALIAS(SHIPNAME         )
 A            D2SADD        60A         ALIAS(SHIPADDRESS      )
 A            D2SCITY       40A         ALIAS(SHIPCITY         )
 A            D2SREGN        2A         ALIAS(SHIPREGION       )
 A            D2SPOST       10A         ALIAS(SHIPPOSTALCODE   )
 A            D2SCNTR       40A         ALIAS(SHIPCOUNTRY      )
 A            D2CSTID       80A         ALIAS(CUSTOMERID       )
 A            D2CNAM        50A         ALIAS(CUSTOMERNAME     )
 A            D2CADD        50A         ALIAS(ADDRESS          )
 A            D2CCITY       50A         ALIAS(CITY             )
 A* KEYS GO HERE
 A
 A**************************************************************************

如图所示 here

但在使用14或CRTPF命令编译时( CRTPF FILE(QTEMP/TST001P) SRCFILE(TSTLIB/QDDSSRC) SRCMBR(*FILE) 我得到一个 CPD7914

那么怎么了?DDS定义还是编译命令?由于互联网上几乎没有关于多重记录格式的教程,我还没有找到一个令人满意的解决方案

提前感谢!

2 回复 | 直到 7 年前

Charles 7 年前

外部描述的PF只能有一种格式。

一个逻辑文件可以有多种格式,每种格式都来自不同的PF。

您必须返回到内部描述的PF,才能在PF中具有多种格式。不要这样做!

Radinator 7 年前

DDS文件的参考说明 Specify only one R because a physical file can contain only one record format.