BLOG-77家的会客厅

AS400将PF转成CSV或XLS

2012-05-10 04:35:11.796010

很多人提到过N种方法，什么变成SPLF再打印成什么，或是直接BIFF8格式下载之类的；

SPLF什么的很麻烦就不说了，BIFF8有个问题是像大量数据的时候很不好用，并且容易出现乱码。

那么只用一个方法，就可以将PF的数据导下来，AS400有一个命令叫“CPYTOIMPF”，可以将PF文件复制到一个单字段的PF里，原来PF的各个字段会变成CSV格式的，

然后再把这个CSV PF下载下来，直接用ASCII模式，扩展名用TXT或CSV都行，因为他就是纯文本，

相守一生，相知一世（转）

2012-05-09 02:20:58.413407

什么是夫妻？相爱一辈子，争吵一辈子，忍耐一辈子，这就是夫妻。

什么是家？家是夫妻共同经营的，编织着梦和苦辣酸甜的窝。

家不是房屋，不是彩电，不是冰箱，不是物质堆砌起来的空间。物质的丰富固然可以给我们一点感官的快感，但那是转眼即逝的。试想，在那个空间中，如果充满暴力和冷战，同床异梦，貌合神离，“家”将不成为其家。而成为一个争斗的战场。

2011.12.31

2011-12-31 10:38:22.413825

　　2011年的最后一天了，再过一会儿就去还了电脑等资产，就可以回去收拾寄送行李了。今年的年底虽然是几年来我最忙的年末，忙到头晕眼花满眼血丝，却也大有收获。

　　机遇来临时，当机立断的把握住，方能成就自己的梦想！

　　有很多话要说，但已经不习惯于把自己的年终总结及来年计划再写到网络之上；只希望，能做到自己心中有数即可；梦想，不是写出来的，而是做出来的。

　　感谢这一年来上海的同事们、朋友们对我的支持和帮助，你们来大连的话我会以加倍的热情欢迎你们的。

　　感谢大脆儿的付出，有你的辛苦我才能放心的工作，有你的支持我才能缓解思儿的痛苦。

　　感谢父母们对我家庭的支持，这一年来你们受苦受累了，儿当满怀感恩的报答你们的。

　　感谢所有我遇到的人，你对我以诚相待是我的荣幸，你对我冷漠以至恶向，是对我的磨练。

　　愿所有的人都能找到和达到自己心中的幸福，不管这个环境和体制如何，不管别人对你和看你如何，不管自己目前的状态如何，只要心存梦想，实现梦想就不远了。

　　Don't let dreams just be dreams!

「店」、「屋」、「みせ」的区别

2011-12-08 19:39:35.962164

众所周知，汉语的“店”，在日语中有三种表达方式，即「店」、「屋」、「みせ」三种。对于初学日语的外国人来说，有时很难区分。经中西一堆教授解释，茅塞顿开。先编译如下，仅供参考。「屋」这个词由来已久。在和语中大部分店用「屋」来表达。

「床屋（とこや）、本（ほん）屋（や）、靴（くつ）屋（や）、肉（にく）屋（や）、魚（さかな）屋（や）、宿（やど）屋（や）、呉（ご）服（ふく）屋（や）、果（くだ）物（もの）屋（や）、八（や）百（お）屋（や）、カメラ屋（や）、料（りょう）理（り）屋（や）、文（ぶん）房（ぼう）具（ぐ）屋（や）、電（でん）気（き）屋（や）」等。

「店」一词属于新式说法。系最近兴起来对西洋品的一般说法。

例如：

「商（しょう）店（てん）、書（しょ）店（てん）、洋（よう）品（ひん）店（てん）、喫（きっ）茶（さ）店（てん）」等。

「みせ」一词很少作复合词，只有「茶（ちゃ）店（みせ）」一词，除此以外一般只用于「このみせ」、「あのみせ」等。在日本「茶店」一词目前很少有人使用，而「喫茶店」一词应用广泛。

FTP传送码和CCSID的对应关系

2011-10-12 15:59:24.194546

TYPE (表示タイプの指定)

FTP サーバー・サブコマンド

ファイル転送を行うときのファイル転送のタイプまたは表示方法を指定するには、次の形式の TYPE FTP サーバー・サブコマンドを使用します。

 TYPE   [ A
        |  B [ 1 | 2 | 3 [A|R] | 4 [A|R  ] | 5 | 6 | 7]
        |  C ccsid#
        |  E
        |  F [ 1 ]
        |  I ]

广州112（3）

2011-09-05 15:46:59.821829

　　2010年9月17号飞广州，2011年1月7号飞回大连，这期间在广州的112天，除了去的那天，期间发生了很多事情都没有记录下来。作为一段还算是丰富多彩的生活，以“广州112”为标签，慢慢回忆记录下来吧。

　　（来到东京已经马上要2个月了，我发现，现在不管我我身在何处，一个地方对我而言，熟悉的时间只需要一个月，我就可以很快的适应这个地方的生活。可惜的是，世界这么大，目前的自己能去的地方还真是很少，不过能有机会在不同的地方生活，真的是一件很不错的生活体验。）

3、吃在广州

走遍天下，更要吃遍天下！

RPG中数组和DS使用方法总结

2011-08-30 09:45:15.141165

ARRAY
一 array与table的区别
      Array：可以使用下标，进行顺序访问或随即访问
      Table：不可以使用下标，只能顺序访问。只能以TABxxx开头。
      注：table虽然和array的功能相似，但是array要比table灵活很多。Table可以淘汰了，了解table的原因是维护老的代码时可能会用到。

二 array的类型和key word
      1有三种类型的array，分别是compile time array、run time array、pre-run time array。

      2与array相关的key word：
      DIM（number）       定义数组中元素的数量

RPGLE中REPLACE函数的用法

2011-08-26 15:05:59.416661

%REPLACE(replacement string: source string{:start position {:source
length to replace}})

%REPLACE returns the character string produced by inserting a replacement string into the source string, starting at the start position and replacing the specified number of characters.

The first and second parameter must be of type character, graphic, or UCS-2 and can be in either fixed- or variable-length format. The second parameter must be the same type as the first.

The third parameter represents the starting position, measured in characters, for the replacement string. If it is not specified, the starting position is at the beginning of the source string. The value may range from one to the current length of the source string plus one.

The fourth parameter represents the number of characters in the source string to be replaced. If zero is specified, then the replacement string is inserted before the specified starting position. If the parameter is not specified, the number of characters replaced is the same as the length of the replacement string. The value must be greater than or equal to zero, and less than or equal to the current length of the source string.

The starting position and length may be any numeric value or numeric expression with no decimal positions.

The returned value is varying length if the source string or replacement string are varying length, or if the start position or source length to replace are variables. Otherwise, the result is fixed length.

AS400安全相关命令

2011-08-10 11:04:47.322763

GRTOBJAUT

RVKOBJAUT

EDTOBJAUT

CRTAUTL

EDTAUTLE

WRKAUTL

CL命令实现一个SRC-PF内所有MBR的内容查找，并导出LIST

2011-08-01 13:37:41.096582

设计思路：

1、使用FNDSTRPDM进行查找，查找结果PRINT到SPOOL FILE里

2、将SPOOL FILE拷到PF-DTA内

3、使用SQL语句更新PF-DTA得到结果