免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 7203 | 回复: 4

关于EXTFILE的用法 [复制链接]

论坛徽章:
0
发表于 2014-01-26 20:07 |显示全部楼层
本帖最后由 xjromance 于 2014-02-11 18:12 编辑

第一种情况
FTSTFILE   IF    E         DISK      EXTFILE(FILENAME)  USROPN
其中FILENAME为变量。TSTFILE 只是一个名字是一个不存在的文件。

另外一种情况
FTSTFILE   IF    E    K   DISK      EXTFILE(FILENAME)  USROPN
其中FILENAME为变量。TSTFILE 是一个存在的文件。这样到时可以用KEY 但是 程序一开始就会报错levelcheck,难道需要把TSTFILE的levelcheck定义为*NO?

EXTFILE  在F行定义关键字后 怎么能用KEY来定位和读取文件呢?   

论坛徽章:
5
2015亚冠之阿尔艾因
日期:2015-08-10 02:23:34操作系统版块每日发帖之星
日期:2015-08-13 06:20:002015七夕节徽章
日期:2015-08-21 11:06:1715-16赛季CBA联赛之山西
日期:2016-04-13 02:36:59操作系统版块每日发帖之星
日期:2016-04-14 06:20:00
发表于 2014-01-28 16:50 |显示全部楼层
如果只是借用PF一个名字的话,加上TEMPLATE关键字试试?

论坛徽章:
0
发表于 2014-01-29 10:47 |显示全部楼层
你编译的时候 TSTFILE 和 FILENAME 必须完全一致(就像拷贝过来的一样)

这个和 OVRDBF 命令一样,不是说你可以随时重定向到一个记录,字段名完全不同的文件上去。

论坛徽章:
0
发表于 2014-02-10 23:42 |显示全部楼层
本帖最后由 passthru 于 2014-02-11 00:23 编辑

EXTNAME(FILENAME)表示EXTNAME(文件名:{记录名}:{*key}/{*input}/{*output}/{*both})
F表中引用K与extneme中的*key要一致。否则,就会报levelcheck。

楼主在F表特地定义不同名的内部表名和外部表名,TSTFILE其实是不存在的。但是,我看不出来,这样做有什么用途?

我一般都是把extname放在D表中定义,代码如下。这样做把内部的数据处理与外部的表结合来了了。

fFILENAME   IF  A  E         DISK        USROPN
.....
dTSTFILE         e  Ds                   EXTNAME(FILENAME)
dRec_TSTFILE      Ds                   LikeRec(FILENAME_Rec:*output)

/free
    ......
    //从外部输入数据,比如,Plist的输入参数项,或pi输入的参数项,输入到数据结构TSTFILE
    //再接着做:
    Rec_TSTFILE = TSTFILE ;
    Write  TSTFILE  Rec_TSTFILE ;
    //这里是OS400 V6R1以上版本的写法;V5R4版本以下的写法相反:
    // Write  Rec_TSTFILE  FILENAME ;
   .....
/end-free
注意,这里F表的A与nextname中的参数值*output要一致

key,或*key的表现形式和用法有多种,这里不再一一述说。

论坛徽章:
0
发表于 2014-02-11 18:08 |显示全部楼层
不好意思,我写错了,应该是EXTFILE的用法,怎么使用key回复 4# passthru


   
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

SACC2019中国系统架构师大会

【数字转型 架构演进】SACC2019中国系统架构师大会,8.5折限时优惠重磅来袭!
2019年10月31日~11月2日第11届中国系统架构师大会(SACC2019)将在北京隆重召开。四大主线并行的演讲模式,1个主会场、20个技术专场、超千人参与的会议规模,100+来自互联网、金融、制造业、电商等领域的嘉宾阵容,将为广大参会者提供一场最具价值的技术交流盛会。

限时8.5折扣期:2019年9月30日前


----------------------------------------

大会官网>>
  

北京盛拓优讯信息技术有限公司. 版权所有 16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122
中国互联网协会会员  联系我们:huangweiwei@it168.com
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP