0014.00 C SETON LR
****************** End of data ****************************************
<注>:
(a) 第一行#DTA是字段名,与上面的Dsname左对齐,DS表示#DTA是个字段,与上面的Ds对齐,20表示字段#DTA的长度,与上面的Len+右对齐,注意,由于我们需要用它来定义数据区MYDTAARA的格式,所以长度要和MYDTAARA相同,整行的意思是定义一个长度20的字段#DTA;
(b) 第二第三行进一步详细定义字段#DTA的内部结构,第二行的CURDAT是字段名,与Field+左对齐,1与From右对齐,8与To++右对齐,整行的意思是把大字段#DTA的第1~8位定义位另一个字段,第三行同样的意思,在此不在赘述;
(c) 第四行的DEFN表示定义,一般用来定义字段和数据区,*NAMVAR是定义数据区格式时必用的参数,整行的意思就是把数据区MYDTAARA的格式按照字段#DTA定义,以后对字段#DTA进行操作就等于对数据区MYDTAARA进行操作;
(d) 第五行的IN用来读数据区,*LOCK表示操作时把数据区MYDTAARA锁住,一般只有对数据区进行更/新操作才需要设置才参数,如果只是读数据区,则不用该参数;
(e) 第六行的TIME是取系统当前日期和时间,整行的意思是把系统当前日期和时间赋给一个14位长0位小数的数值型变量DATTME中,由于系统当前的日期和时间是按照“hhmmssMMDDYYYY”存放,所以刚好也是14位;
(f) 第七行意思是把变量DATTME右移给字段CURDAT,所以CURDAT的值刚好是日期“MMDDYYYY”;
(g) 第八行意思是把变量DATTME左移给字段CURTME,所以CURTME的值刚好是日期“hhmmss”;
(h) 第九行的OUT表示对数据区进行写操作,记住Factor处是我们程序开始定义的大字段#DTA;
(i) 第十行的UNLCK表示解锁,因为我们在第五行使用了参数*LOCK;
(j) 第十一行表示程序结束。
按 F3 退出编辑器并保存,进行编译,生成的程序名假设为DTAARAR,那么在命令行 CALL DTAARAR,那么数据区已经成功更改了,使用命令 DSPDTAARA MYDTAARA 就可以查看数据区内容了。
================================================================================
到此为止,你已经基本懂得如何对数据区进行操作了!
qingzhou 回复于:2007-04-04 13:07:38
OK,验收通过!
合并为一个主题吧。
:mrgreen:
sh-vagrant 回复于:2007-04-04 16:03:17
呵呵,比我学的快,我用了1年as400后才开始涉及到dtaara,惭愧哈
三个石头 回复于:2007-04-05 13:14:14
这些好像在新儒论坛里面有呀。
紫菜蛋汤 回复于:2007-04-06 22:22:48
又是非自由格式的:shock::shock::shock:看的很晕。。。
| 论坛热门帖子: | [lch203] 写得蛮好的linux学习笔记(10-21) [黑马制造] 学习java的30个目标(10-19) [笑傲股林] 做测试半年了,有点迷茫,应该再学些什么提高自己的测试水平和测试能力呢?(10-19) [udp8589] 大家用google的来吱一声? 用百度的~~也来报道下?(10-18) [沂偌掳兆] 本人总结的一些认为C++比较经典的书籍,希望对大家有用(10-18) |
| TAG标签: | 编写 程序 如何 朋友 接触 写给 表示 数据 文件 变量 |
注册
个人空间
