论坛徽章:: 0

电梯直达

1楼 [收藏(0)] [报告]

发表于 2006-10-09 15:06 |只看该作者 |倒序浏览

D*          SYSTEM EXTERNAL DATA STRUCTURE
D  Parm1       E DS          256 Extname(Sys001ed)
D*
以上是我公司程序中的一句,不知是何意思.如果不用好象并没有问题,但公司程序都有这一句.所谓外部参数不知有合用,请指教.

文库|博客

xiaofish82

稍有积蓄

论坛徽章:: 0

2楼 [报告]

发表于 2006-10-09 17:34 |只看该作者

是不是类是CPY语句啊。

SYS001ED=PARM1

期待正解ING~~~~~~~~~~~~~~~~~~~~

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

pp263

白手起家

论坛徽章:: 0

3楼 [报告]

发表于 2006-10-10 08:39 |只看该作者

顶一下，我也不明白。。。。

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

xiaofish82

稍有积蓄

论坛徽章:: 0

4楼 [报告]

发表于 2006-10-10 08:44 |只看该作者

还没有人回答阿！！！！！！！！！

实战分享：从技术角度谈机器学习入门| 【大话IT】RadonDB低门槛向MySQL集群下战书 | ChinaUnix打赏功能已上线！ | 新一代分布式关系型数据库RadonDB知多少？

pantierui

小富即安

论坛徽章:: 0

5楼 [报告]

发表于 2006-10-10 09:13 |只看该作者

我们这里用它是怎么用的
D ##CXA01C01R E DS                EXTNAME(ICXA01C01:CXA01C01R) INZ
D ##ERR                DS          80  INZ
D  IND_NOTFOUND                1
D  IND_WARNING                1
D  TXT_MSGDTA                78
C    *ENTRY             PLIST
C    TOMBR             PARM                         RCV_CTLDTA    12
C    XAXXKB_ANY    PARM                         RCV_ANYDTA    256
C                               PARM    ##ERR       RTN_ERRDTA    80
大概的意思是引用一个DB文件并在INZ中初始化。
C    XAXXKB_ANY CHAIN    CXA01C01R                         91
C  N91             EVAL    RCV_ANYDTA=##CXA01C01R
这样用就可以取得你想要的数据了

不知道对你们有没有帮助。

[ 本帖最后由 pantierui 于 2006-10-11 09:25 编辑 ]