2009年5月12日
something about WAITRCD (Maximum record wait time)
摘要： I am working on an insurance management system these days. Multiple users can log on the system at the same time by using different accounts. But,if a usertrys to log on witha account which is already... 阅读全文
posted @ 2009-05-12 16:57 Anson@here 阅读(325) 评论(0) 推荐(0)
2009年4月24日
How to create a PF without DDS
摘要： As title mentioned, we can use following command: *CRTPF BTW, do not forget to specify record length. 阅读全文
posted @ 2009-04-24 09:21 Anson@here 阅读(135) 评论(0) 推荐(0)
2009年4月22日
CAT {(P)} (Concatenate Two Character Strings)
摘要： CL0N01Factor1+++++++Opcode&ExtFactor2+++++++Result++++++++Len++D+HiLoEq C IN_Bank CAT Crtsucs:1 Crtsucs1 这句话的意思，是将IN_Bank 拼在Crtsucs 后面，中间有1个空格，然后将拼出... 阅读全文
posted @ 2009-04-22 08:49 Anson@here 阅读(197) 评论(0) 推荐(0)
2009年4月16日
File.encoding 值与 AS/400 CCSID
摘要： file.encoding CCSID 说明 Big5 950 8 位 ASCII 繁体中文 BIG-5 CNS11643 964 中国国家字符集（繁体中文） Cp037 037 IBM EBCDIC 美国、加拿大、荷兰... Cp273 273 IBM EBCDIC 德国、奥地利 Cp277 277 IBM EBCDIC 丹麦、挪威 Cp278 278 IBM EBCDIC 芬兰... 阅读全文
posted @ 2009-04-16 09:59 Anson@here 阅读(1973) 评论(0) 推荐(0)
2009年4月15日
Download RPG source code from AS/400
摘要： Steps: S1. copy source file to your /temp folder. Using following command: CPYTOSTMF FROMMBR('QSYS.LIB/YOURLIB.LIB/YOURFILE.FILE/PGM1.MBR') TOSTMF('/TMP/PGM1') STMFCODPAG(your CCSID) It me... 阅读全文
posted @ 2009-04-15 20:36 Anson@here 阅读(299) 评论(0) 推荐(0)