AS400 自学笔记集锦 - 图文(5)

AS400学习笔记 2006/04，Daniel，Easycon

2 经验记录

2.1 DB2 IMPORT命令

在6000上，通过db2 connect链接到400上取，在做db2 import的操作时，系统要求对应的表必须要有日志，否则系统将不允许Import的操作处理

2.2 创建DB2 CONNECT的链接方法（RS6000－

AS400）

（1） 在AS400上，从OS/400 main 菜单中输入： WRKRDBDIRE

按 enter键后，将打开 Work with relational database directory entries面板

（2） 从 Work with relational database directory entries面板：

? 选择选项 1 来 添加数据库 ? 输入数据库名： SAMPLE

注释：SAMPLE是 machine 2 上的数据库，您要从 iSeries 客户机机连接到该数据库上。如果您不记得数据库的名字，可以从 CLP 发出下面的命令：

list db directory

然后按照 Directory 条目类型为‘indirect'来查找条目。这些条目将与您的服务器上的本地数据库相对应

Remote location设置为*LOCAL，Type： *IP 默认端口号是 *DRDA，指 446 端口。

- 11 -

AS400学习笔记 2006/04，Daniel，Easycon

默认的认证方法是 *ENCRYPTED，它只能在 iSeries 机器间使用 （3） 在客户端设置DB2 CLI的属性参数信息

? db2 catalog tcpip node mynode remote 192.168.51.2 server 446 （NOTE：PORT 446 is

used only in DB2/400 CONNECTION）

? db2 catalog db backup as testdb at node mynode ? db2 terminate

（4） 在DB2 客户端绑定CLI的应用程序和DB2实用程序

绑定DB2 PACKAGE（注意绑定顺序，以下命令的执行目录在~boc/sqllib/bnd下）： bind @db2ubind.lst blocking all sqlerror continue grant public bind @db2cli.lst blocking all sqlerror continue grant public bind @ddcs400.lst blocking all sqlerror continue grant public （5） 创建完成后，若需要链接进入的用户能够在6000上远程db2 …做create等类似

的操作，需给定权限

Special authority . . . . . . . SPCAUT *ALLOBJ

2.3 AS400上调用PGM命令做大量数据处理操作

建议使用sbmjob将命令提交成BCH（批处理作业），这样系统处理的效率将大大提高

2.4 AS400日常运行维护

1) 日常观测机器的运行情况：

a) dsplog 每日上班，看机器日志，主要看机器的运行情况

b) wrkactjob 看看系统中的活动作业，可以看有哪些用户登入，那些作业使用

系统资源情况。

c) wrkdsksts 看硬盘的使用情况

d) DSPHDWRSC TYPE(*PRC) 看硬件情况，在TYPE中，不同参数将显示不同

硬件的情况

e) WRKSYSSTS 看系统的状态（硬盘空间，登入机器的用户数，作业数） 2) AS400现在的用户有安全管理官员级别：QSECOFR

3) AS/400 正常关机：PWRDWNSYS OPTION(*IMMED)

a) 如果不能正常关机，在面板调到（02 BM ）状态，按电源健，隔三秒再按

一次电源健就可以手动关机。

4) AS/400 正常开机，在面板调到（01 BN）按电源健（白色键）系统自动开机，不

需要人去选择IPL程序。

5) AS/400 如果不能正常自动调用IPL程序，把面板调到（01 BM），此时是手动开

机，需要人工干预调用IPL程序。在选择中，选择调用IPL程序，输入用户和密码（QSECOFR，QSECOFR）其他的都是按CTRL键确认或F12键。

2.5 一个关于备份报错的处理操作

Q1：用AS400的SAVELIB命令备份数据库时（数据库有6G左右），刚开始还在备份，

- 12 -

AS400学习笔记 2006/04，Daniel，Easycon

后来显示一条消息

Waiting for reply to message on message QSYSOPR.

意思是让我回应消息，但我按任何按键都不起作用，请问如何处理？ A11：用DSPMSG QSYSOPR看有何信息，一般是需要回答的信息。 A12：System request =>; Enter =>; option 4

Q2：但是我按任何按键都不起作用呀，我怎么输入命令呀？

A21：你有可能在online操作，可以另外开一个5250终端或按系统请求键，然后在命令行上输入楼上的命令

A22：你首先应该做的就是先查看具体的消息内容： shift+esc ==>; 选择display sysopr message 然后根据具体的消息才能决定下一步做什么

Q3：Device TAP01 cannot process loaded volume.(C R INZ)

好像是磁带的格式不对，但我是用INZTAP格式化的磁带呀，怎么会不对呢？ A31：回复INZ就可以了。

原因是400认为磁带的格式不对（很可能是所做的格式化跟磁带机的类型不符）。初始化就可以了。

A32：对，先回复INZ，然后一路F3退到原来的界面

2.6 400上C/C++程序调用PGM

调用处理的方法解释一：

1、先用预处理命令将rpg程序映射成C/C++API。 2、直接调用映射后的api即可

大家提到的system或者*exec()的函数，不但性能低，而且根本没办法让c程序处理rpg程序返回参数。

映射成c api方式，才是万能的方法。在c程序预处理段如下声明即可： #pragma linkage(pgmrpg, os, nowiden) ..... main() { .... pgmrpg(parm1, parm2,rtncod); .... } 建议所有的传入参数最好采用字符指针，约定长度。另外，c程序取rpg程序参数时，用memcpy函数拷贝。 调用处理的方法解释二：

在OS/400中，ILE C如何调用ILE RPG程序？

http://www-1.ibm.com/support/docview.wss?uid=csc10a51294c5b22e6f648256f3900080d9fDocument - : 2822324J26000 Body:

[标题] 在OS/400中，ILE C如何调用ILE RPG程序？

- 13 -

AS400学习笔记 2006/04，Daniel，Easycon

内容提要:

在AS/400的开发中通常会遇到两种不同的语言之间的调用问题,例如，ILE C的程序如何调用ILE RPG程序，本文将通过一个简单的例子来说明调用过程。 说明:

本文主要用两个程序来说明ILE C如何调用ILE RPG程序， 一个程序是ILE C程序，程序名式PMGC；一个程序是ILE RPG程序，程序名式ILE RPG。 这两个程序的内容如下：

ILE C 程序：PGMC

*************** Beginning of data ********** 0001.00 #include 0001.01 #pragma linkage(PGMRPG, OS, nowiden) 0001.02 int main( int argc, char *argv 2 ) { 0001.03 char *parm1; 0001.04 char *parm2; 0001.05 printf( \ 0001.06 parm1 = argv 1 ; 0001.07 parm2 = argv 2 ; 0001.08 printf( \ 0001.09 printf( \ 0001.10 PGMRPG(parm1,parm2); 0001.11 return; 0001.12 } ** …… 此处隐藏：3202字，全部文档内容请下载后查看。喜欢就下载吧 ……