简便实现将AS/400系统中SPLF转成XLS、TXT、CSV、PDF格式处理

My FAQ,最新最全的IT技术FAQ

最新100篇 | 推荐100篇 | 专题100篇 | 排行榜 | 搜索 | 在线API文档

当前位置： > 操作系统 > IBM Server

简便实现将AS/400系统中SPLF转成XLS、TXT、CSV、PDF格式处理

作者:未知时间:2005-09-13 15:50 出处:ChinaUnix.net 责编:My FAQ

摘要：简便实现将AS/400系统中SPLF转成XLS、TXT、CSV、PDF格式处理

这段时间在测试、改进“以email方式发送splf到指定邮箱”的程序，弄得头晕晕的。脑筋一转，被我折腾出以下变通的解决办法。

大家都知道，实现splf转成到PC端为EXCEL、TXT格式可以通过先创建一个PF，然后通过CPYSPLF将SPLF内容拷贝到PF中，然后再通过CA/400、PCOM的Transfer功能下载数据到PC端为EXCEL、TXT格式。或者通过CA/400的Navigator到OUTQ中将SPLF拉至PC端成txt文本格式。

但是，第一种办法对操作人员要求比较高，而且必须懂得OS/400操作命令，如果要让一些非IT部门人员执行是不安全和不够现实的。第二种办法需要安装CA/400导航器，让他们操作导航器也是不安全的。

经过测试，采用以下方法较为简便和安全。现在贴出来，大家可以用在改善公司业务上。

以上是从我制作在Notes文书转载下来的，采用中文、日文2种语言解说实施过程。

===========================================================

【改善建议】如何简便实现让AS/400系统中的SPLF转成PC端EXCEL、TXT、CSV、PDF文件处理？
[color=blue:47bd7174c4]【改善提案】どのように簡便実現AS/400システムのSPLFにPCを回転するEXCEL、TXT、CSV、PDFのファイル処理？[/color:47bd7174c4]

[改善背景]
[color=blue:47bd7174c4][改善環境][/color:47bd7174c4]

   资材部门最近提出：在RINKS211系统中使用FC:HK01产生的MHK12TJ报表文件，实际业务时常需要取其报表中某些数据作为EXCEL处理，按照目前做法进行全部打印，不仅无法拷贝报表数据，而且造成过于浪费纸张和墨水。
    [color=blue:47bd7174c4]資材部門最近提出：RINKS211システムの中で使ってFC:HK01発生のMHK12TJ報表ファイル、実際的な業務の時需要取報表中のデータとするEXCEL処理、現在の方法によって行ってすべて印刷、できないだけではないコピー報表のデータ、その上もたらしてあまりにも浪費して紙とインク。[/color:47bd7174c4]

    经过测试，成功简便实现将MHK12TJ报表输出到PC端，并保存为TXT或XLS格式。
    [color=blue:47bd7174c4]テストを経る、成功簡便実現をMHK12TJ報表PC端まで出力する、そして保存して次のようになってTXTあるいはXLSフォーマット。[/color:47bd7174c4]

qingzhou 回复于：2004-12-23 16:02:50

[实施步骤]
[color=blue:55140d427a][実施手順][/color:55140d427a]

一、配置打印驱动：
[color=blue:55140d427a]一、配置印刷駆動：[/color:55140d427a]

测试的环境：PC端OS：Windows XP Professional。
[color=blue:55140d427a]テストの環境：PCのOS：Windows XP Professional。[/color:55140d427a]

1、添加打印机驱动：
[color=blue:55140d427a]1、添加プリンターの駆動[/color:55140d427a]

2、选择“连接到此计算机的本地打印机”，取消选择“自动检测并安装即插即用[color=blue:55140d427a]打印机”。
2、選択“このコンピュータの当地のプリンターまでつながる”、取消選択“自動検測がそしてプラグアンドプレイのプリンターをインストールする”。[/color:55140d427a]

qingzhou 回复于：2004-12-23 16:07:51

3、端口选择：FILE:(打印到文件)：
[color=blue:30cc538373]3、ポートの選択：FILE:(印刷までファイル)：[/color:30cc538373]

4、打印驱动选择：Generic/Text Only，下一步：
[color=blue:30cc538373]4、印刷駆動選択：Generic/Text Only，次：[/color:30cc538373]

5、直到安装完成。
[color=blue:30cc538373]5、インストール完成する。[/color:30cc538373]

qingzhou 回复于：2004-12-23 16:11:37

二、创建打印SESSION：
[color=blue:ac771bf753]二、創建印刷SESSION:[/color:ac771bf753]

测试的环境：PCOM V5.7中文版本。
[color=blue:ac771bf753]テストの環境：PCOM V5.7中国語バージョン。[/color:ac771bf753]

1、启动PCOM新建会话管理器：
[color=blue:ac771bf753]1、スタートPCOM新規会話の管理器：[/color:ac771bf753]

2、主机类型：iSeries，接口：LAN
[color=blue:ac771bf753]2、AS/400のタイプ:iSeries，インターフェイス:LAN[/color:ac771bf753]

qingzhou 回复于：2004-12-23 16:13:21

3、点击“链路参数”，配置AS/400 IP地址。
[color=blue:9d30a6b23d]3、をクリックして“链路のパラメーター”、AS/400を配置する IPアドレス。[/color:9d30a6b23d]

4、点击“会话参数”，指定会话类型为打印机，并敲入工作站标识。
[color=blue:9d30a6b23d]4、をクリックして“会話のパラメーター”、指定会話のタイプはプリンターで、そしてワークステーションの標識を入力する。[/color:9d30a6b23d]

qingzhou 回复于：2004-12-23 16:16:30

5、配置“高级”选项，选择“主机打印转换”为“是”，确定：
[color=blue:4f04010d45]5、配置“高級”のオプション、選択“ホストコンピュータが転換をタイプ印刷する”:“だ”、確定：[/color:4f04010d45]

6、打印SESSION启动起来了，先暂停。
[color=blue:4f04010d45]6、印刷SESSIONスタートした、先に一時停止する。[/color:4f04010d45]

7、在打印SESSION中，选择：文件→打印机设置，将驱动指向Generic/Text Only。
[color=blue:4f04010d45]7、印刷SESSION中、選択：ファイル→プリンターは設けて、駆動してGeneric/Text Onlyを指す。[/color:4f04010d45]

8、保存打印SESSION并拖拉至PC桌面，建立快捷方式。
[color=blue:4f04010d45]8、保存印刷SESSIONそしてずるずる引きPCデスクトップまで、作り上げてすばやい方式。[/color:4f04010d45]

9、正式启动打印SESSION：
[color=blue:4f04010d45]9、正式にスタートして印刷SESSION：[/color:4f04010d45]

qingzhou 回复于：2004-12-23 16:19:25

三、测试打印SPLF：
[color=blue:bb53040d4c]三、テスト印刷SPLF：[/color:bb53040d4c]

1、在OS/400命令行执行：WRKOUTQ LIU
[color=blue:bb53040d4c]1、OS/400コマンドラインで実行：WRKOUTQ LIU [/color:bb53040d4c]

2、用5=Display查看MHK12TJ这个SPLF内容，以便与等下输出到PC端后的文件进行比较：
[color=blue:bb53040d4c]2、5=DisplayでMHK12TJこのSPLF内容を調べて、それによってなど下でとPC端まで出力した後のファイルは比較：[/color:bb53040d4c]

qingzhou 回复于：2004-12-23 16:21:33

3、然后用6=Release释放MHK12TJ这个SPLF，用7=Messages选项回答系统信息CPA3303为G：
[color=blue:2bc7ee3e17]3、それから6=Releaseを使ってMHK12TJこのSPLFを釈放して、7=Messagesオプションを使うのは系統的な情報CPA3303に答えるG：[/color:2bc7ee3e17]

4、回答完毕，系统自动弹出如下窗口，敲入输出路径，如：c:\temp\mhk12tj.xls
备注：
如果要转化为TXT格式，敲入:c:\temp\mhk12tj.txt
如果要转化为CSV格式，敲入:c:\temp\mhk12tj.csv
[color=blue:2bc7ee3e17]4、回答は終わって、システム弾く次のウィンドウを、入力出力の方向、例えば：c:\temp\mhk12tj.xls
付注：
転化もしTXTフォーマ、入力:c:\temp\mhk12tj.txt
転化もしCSVフォーマ、入力:c:\temp\mhk12tj.csv[/color:2bc7ee3e17]

qingzhou 回复于：2004-12-23 16:24:00

5、转到PC端可见mhk12tj.xls已经生成：
[color=blue:03345ded78]5、PC端に転送してmhk12tj.xlsはすでに形成：[/color:03345ded78]

6、打开查看内容，与AS/400端内容一致，至此转化完成。
[color=blue:03345ded78]6、開けて内容を調べて、AS/400内容一致、完成転化。[/color:03345ded78]

tom9030 回复于：2004-12-23 17:34:33

老兄，你的日语不错啊，555～～～～

ewmiscc 回复于：2004-12-23 18:57:29

我们这边有同事用java做了个小程序可以很方便download spool file，最后的结果是除了几个有特定要求format的报表是直接从as/400打印出来，其他的全部是用java download.

mamei 回复于：2004-12-23 19:35:08

支持一下，
轻舟兄的钻研精神，
让人敬佩！

stephenxie2003 回复于：2004-12-24 09:47:22

[quote:d61a5d5642="ewmiscc"]我们这边有同事用java做了个小程序可以很方便download spool file，最后的结果是除了几个有特定要求format的报表是直接从as/400打印出来，其他的全部是用java download.[/quote:d61a5d5642]

请ewmiscc是否能把这个Java小程序共享出来啊，这样大家从400下载splf就更加方便了！
:)这样这个帖子就更完美了！

hollis 回复于：2004-12-24 15:05:46

最新版Win_wrksplf(1.3.028) 支持另存为CSV格式的文件.
(一次性定义好字段长度后，可以方便的保存成Excel文件)

欢迎大家下载测试, 视情况, 可以赠送注册码.
下载地址: hollis.fangwen.cn

qingzhou 回复于：2004-12-24 17:22:40

[quote:7ffd1f271b="hollis"]最新版Win_wrksplf(1.3.028) 支持另存为CSV格式的文件.
(一次性定义好字段长度后，可以方便的保存成Excel文件)

欢迎大家下载测试, 视情况, 可以赠送注册码.
下载地址: hollis.fangwen.cn[/quote:7ffd1f271b]
本来我开始时也想借助你这个用delphi开发的工具，可后来测试后发觉无法满足实际业务需求，所以只好放弃，自行想到这个使用办法解决。

一个好的工具能否推广，很关键的是这个工具是否实用，功能是否能够满足实际的业务需求。

建议改进：

1。增加切换OUTQ的功能，假如在OS/400端登陆的用户通过WRKSPLF没有查看到有SPLF，而实际业务往往都是将SPLF放在指定的别的OUTQ里面，这个工具能够切换到其他OUTQ来处理SPLF么？

2。希望不用通过定义，只需选择转化格式就能够直接转化为EXCEL、TXT、CSV等格式。

qingzhou 回复于：2004-12-24 17:27:23

另外补充说明：
1、配置成虚拟的打印session后，打印机电源可以不用打开，也就是说可以不用挂接实际的打印机。

2、建议系统值QAUTOCFG=1，以便创建打印SESSION时自动创建对应的OUTQ。

3、配置打印SESSION的软件同样可以采用CA/400，配置方法相同。

hollis 回复于：2004-12-24 18:40:31

[quote:b8f832a84a="qingzhou"]
建议改进：

1。增加切换OUTQ的功能，假如在OS/400端登陆的用户通过WRKSPLF没有查看到有SPLF，而实际业务往往都是将SPLF放在指定的别的OUTQ里面，这个工具能够切换到其他OUTQ来处理SPLF么？

2。希望不用通过定义，只需选择转化格式就能够直接转化为EXCEL、TXT、CSV等格式。[/quote:b8f832a84a]

1: 下一个版本一定支持

2: 我本来就一直在找一个算法, 实现自动转化。
可以至今还是想不到一个很好的办法，能够分析出各字段的长度。如果你有好的办法，希望能交流一下。

qingzhou 回复于：2004-12-26 18:27:17

今天还测试了转化为pdf格式，结果也是可行的。

通过安装pdfFactory这个软件，然后将打印驱动指向pdfFactory，配置虚拟打印SESSION（注意：主机打印变换选择“否”），可以将SPLF转化为PDF格式输出。
pdfFactory这个软件许多网站都有免费下载，例如天空软件站下载链接：
[url]http://www.skycn.com/soft/7191.html[/url]

将打印驱动指向pdfFactory

注意：主机打印变换选择“否”

qingzhou 回复于：2004-12-26 18:32:21

打印SPLF时会出现如下输出窗口，选“保存”到本地硬盘中。

转化为pdf格式的样本

选“保存”到本地硬盘中

qingzhou 回复于：2004-12-26 22:30:41

另外，支持转化后的pdf文件作为附件并以email方式发送到指定地址。

点击“发送”支持email发送功能

转化后的pdf自动作为附件发送到指定地址

bobofish29 回复于：2005-06-20 11:16:10

谢谢楼主喽!真是好文章,帮了我大忙了!最近正在搞这方面的事呢!

bobofish29 回复于：2005-06-20 11:24:48

楼主,我还有一事请教.有没有办法让这一系列动作都是后台进行操作的,只要RELEASE了,我就可以在PC端得到一个TXT或PDF文件,文件内容就是SPLF或PF中的内容

linyueagle 回复于：2005-06-20 14:17:26

已经实验过，不错。
还有个问题：怎么直接打印QGPL库中的QPRINT的数据！
用以上方法只能打印库是QUSRSYS里的数据。

                    Work with Output Queue

Queue:   QPRINT         Library:   QGPL           Status:   RLS

  QPRINT         QGPL             1163                      RLS

xuguopeng 回复于：2005-06-20 14:31:21

[quote:eb9c50faa6="linyueagle"]已经实验过，不错。
还有个问题：怎么直接打印QGPL库中的QPRINT的数据！
用以上方法只能打印库是QUSRSYS里的数据。

Work with Output Queue
..........[/quote:eb9c50faa6]

QPRINT只是一个OUTQ，如果你要打印QPRINT中的SPLF可以使用CHGSPLFA来更改打印机名称

系统在自动配置打印机的时候默认是创建一个DEVD和一个OUTQ，这个OUTQ会和DEVD同名，并且放在QUSRSYS下

xuguopeng 回复于：2005-06-20 14:41:26

[quote:589497614b="bobofish29"]楼主,我还有一事请教.有没有办法让这一系列动作都是后台进行操作的,只要RELEASE了,我就可以在PC端得到一个TXT或PDF文件,文件内容就是SPLF或PF中的内容[/quote:589497614b]

目前看来主要问题就是打印到PC的时候文件的命名（包括后缀名），PC上编程我不太懂，我想应该可以处理吧 PC端做个程序每1分钟执行一次用以接受打印到PC的SPLF

pure 回复于：2005-06-20 15:21:08

谢！

tomroom 回复于：2005-06-20 16:15:12

谢谢楼主，不过我试了试，西文字符都ok，中文字符就有问题，我这里as400 os 4r4 ,client access 是繁体 v5r1

riancy1106 回复于：2005-06-23 20:46:49

ding

ibmas400 回复于：2005-07-19 09:09:40

最近公司提出需求，想到了qingzhou老大发表的这个帖子，然后按照步骤配置，成功的解决了本地需求，并且把打印机都节省下来了。

今天心情很愉快，领导也夸奖了我水平提高了，其实我心里暗暗地想：要不是参考了这个帖子，我还真不知道如何应付呢。
:em06:

好贴应该顶出来再次阅读。 :em02:

zuozhenglin 回复于：2005-07-19 23:18:33

顶！好贴子

jlwrp 回复于：2005-07-20 11:18:32

真的是好帖啊，楼主的这种创新精神值得我们学习啊，谢谢了！！！！

LangSoul 回复于：2005-07-20 15:40:11

高手,佩服!

Ginger 回复于：2005-08-01 15:30:27

上次看了哪位老兄的贴，将消息设为自动忽略了，因此，这里无支输入G，因系统自动用I回复了，请问，应如何恢复？

Eagle_wolf 回复于：2005-08-01 15:44:33

chgmsgq DLVRY ()
或者
wrkrpyle