引言：
首先，祝福所有CU中AS400的朋友元宵节快乐！
[quote:3fb980c39a]╭╯╭╯╭╯╭╭╯╭╯╭
◥█□█□█□█□█□█◤
█○●○●○●○●○█
█○●○●○●○●○█Andrewleading_he送湯圓來哦！
◥█□█□█□█□█◤ 团团园园，和和气气，一起成...
摘要：
rpgle提供了许多有关日期数据格式的用法，下面对这些日期的用法进行了一下汇总。
[b:2ffd804c3d]1.built in functions used with date processing[/b:2ffd804c3d]
%mseconds retrieve milliseconds from formatted date
%seconds retrieve seconds from formatted date
%minutes re......
摘要：
用数组
定义2个一元数组a ，b ,计数器c
a.len=字符串的长度
b.len的长度根据具体情况而定，如已知空格数，则len＝a.len-空格数
如未知，则b.len设成a.len 的值
将char move 进 数组a
进行一个循环，
read 数组的每个元素
计数器 c＋1
dowhile c <>a.len
判断
ifne *blank
move 数组值 到b中
endif
read
enddo
最后 b的值就是没有空格后......
400中显示在线用户操作记录的方法（用User Space API 实现）
首先，祝福所有cu中as400的朋友 元宵节快乐！
【相关文章:
Windows2000怪异“故障”两例】 【扩展阅读:
windows 2000文件拒绝访问的解】
【扩展信息:
Windows2000怪异”故障”两例（】 [quote:3fb980c39a]╭ ╯╭╯╭╯╭╭ ╯╭╯╭
◥█□█□█□█□█□█◤
█○●○●○●○●○█
█○●○●○●○●○█ andrewleading_he 送湯圓來哦 ！
◥█□█□█□█□█◤ 团团园园，与与气气，一起成长！
▆█████████▆
[/quote:3fb980c39a]
其次，感谢cu提供机会让我认识这么多的朋友，大家都那么热心，那么坦诚！
最后，跟大家交流一个讨论了好久的问题，就是400中api的使用。有人可能不是很习惯用400中的api,也许因为我之前玩过一段时间的java吧,感觉使用java的api真的很方便，思想中一直有这种想法吧，这不就有了下面的这个议题（真的很感谢那些提供消息的cu中的朋友）。
[code:1:3fb980c39a]
a* 位置 : test_lib qddssrc_file useractfm_member
a* 功能 : 显示在线用户的操作记录
a* 使用 : <- useractrpg dspf
a* 適用 :
a* 開發 : andrew he
a* 時間 : 2004 02 05
a* 備注 :
a*
a*************************************************************
a print
a ca03 ca05 ca06 ca09 ca10
a r screen03 sfl
a s3sel 1 b 4 2 dspatr(cs)
a 35 dspatr(pr)
a s3station 10 o 4 4
a 30 dspatr(hi)
a 35 dspatr(bl)
a
a s3id 10 o 4 15
a 30 dspatr(hi)
a s3activity 10 o 4 26
a s3program 10 o 4 37
a s3number 6 o 4 48
a s3name 24 o 4 55
a 31 dspatr(hi)
a r screen02 sflctl(screen03)
a* ca03 ca05 ca06 ca09
a overlay
a sflsiz(19)
a sflpag(18)
a 70 sfldsp
a 71 sfldspctl
a 72 sflclr
a 70 sflend(*more)
a sflpos 4s 0h sflrcdnbr
a curpag 5s 0h sflscroll
a 1 3userlog
a color(wht)
a 1 25 users signed on:
a dspatr(ul)
a color(wht)
a signedon 5 0o 1 43 edtwrd( , 0 )
a 1 72date
a edtcde(y)
a timex 6 0o 2 72edtwrd( : : )
a 03 04 dsply stn
a dspatr(ul)
a color(wht)
a 03 15 user id
a dspatr(ul)
a color(wht)
a 03 26 activity
a dspatr(ul)
a color(wht)
a 03 37 program
a dspatr(ul)
a color(wht)
a 03 48 job no
a dspatr(ul)
a color(wht)
a 03 55 user name
a dspatr(ul)
...
下一页 摘要：
1．shareodp:
在pf或者lf编译的时候，有个share（share open data path）的参数，控制该文件是否共享其打开路径。
如果指定share为*no的话，程序在每次打开一个文件的时候，都会为该文件建立一次访问路径；如果指定share为*yes的话，程序在第一次打开该文件的时候，系统建立该文件的访问路径，在同一个activegroup中再打开该文件时，就不再重新建立该文件的访问路径，而是共享使用之前建立的路径，从而提高了程......
