摘要: 在OS/400 V5R2版本中DB2/UDB新增加了IDENTITY列属性,下面做简单介绍 IDENTITY的主要用途是实现用户的定义的某个字段自动按某个步长自动增加。 语法如下:IDENTITY_VAL_LOCAL-(-)----------------------------------IDENTITY_VAL_LOCAL是一个非确定函数,它按照定义为新插入的行生成标示。它支持的数据类型有:INTEGER,SMALLINT,BIGINT,DECIMAL和NUMERIC。举例说明:===> CREATE TABLE LIBRARYNAME/EMPLOYEE (EMPNO INTEGER 阅读全文
posted @ 2012-01-09 12:38 静海平心 阅读(618) 评论(0) 推荐(0) 编辑
摘要: 1.ShareODP: 在PF或者LF编译的时候,有个SHARE(Share Open Data Path)的参数,控制该文件是否共享其打开路径。 如果指定SHARE为*NO的话,程序在每次打开一个文件的时候,都会为该文件建立一次访问路径;如果指定SHARE为*YES的话,程序在第一次打开该文件的时候,系统建立该文件的访问路径,在同一个ActiveGroup中再打开该文件时,就不再重新建立该文件的访问路径,而是共享使用之前建立的路径,从而提高了程序运行的速度。 一般在编译的时候该参数设置为*NO,即不是共享打开。在需要共享打开的时候,使用OVRDBF对该参数进行更改。使用ShareODP需要注 阅读全文
posted @ 2012-01-09 11:21 静海平心 阅读(254) 评论(0) 推荐(0) 编辑
摘要: 所谓动态SQL,是相对静态SQL而言的,静态SQL在编译的时候就已经知道它的全部内容了。而动态SQL脚本是在编译的时候还不完整,直到执行过程中才能确定的SQL语句。在DB2/400中实现动态SQL的方式很多,但一般都采用PREPARE的方式来实现,下面是在SQLC中实现动态SQL的实例:EXEC SQL BEGIN DECLARE SECTION;DCL EMP CHAR(6);DCL PRJ CHAR(6);DCL SEARCH_PRJ CHAR(6); //真正的查询条件DCL ACT BINARY FIXED(15);DCL TIM DEC FIXED(5,2);DCL SELECT_S 阅读全文
posted @ 2012-01-09 11:17 静海平心 阅读(307) 评论(0) 推荐(0) 编辑
摘要: AS/400中的ILE RPG提供DEBUGER工具来调试RPG程序,本文主要描述DEBUGER工具的使用。ILE RPG的DEBUGER工具可以用来发现程序运行时的错误,它主要能实现:1.通过光标位置设置断点。2.单步执行。3.显示/修改程序中的变量。4.显示或修改字段、数据结构和数组的值给出字段、表达式。与DEBUGER相关的调试命令如下:命令描述ATTR显示一个变量的属性。这些属性是记录在调试符号表中的变量的大小和类型。BREAK在被测试程序的某个位置上输入一个条件断点或非条件断点。使用“BREAK 行号WHEN 表达式 ”来输入一个条件断点。CLEAR清除条件断点和非条件断点。DISP 阅读全文
posted @ 2012-01-09 10:45 静海平心 阅读(725) 评论(0) 推荐(0) 编辑
摘要: 1. %XLATE的语法%XLATE根据from、to和startpos参数将string转换为所需要的显示格式。参数简介:from : 转换字符串;to : 置换字符;将字符串按照from转换为to的格式。string : 将被转换的字符串;startpos: 数值性数据或一个常量,表示从第几个字符开始转换;2.举例说明:SEU==> FMT D DName+++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++*************** Beginning of data ***************************0001. 阅读全文
posted @ 2012-01-09 10:40 静海平心 阅读(679) 评论(0) 推荐(0) 编辑
摘要: 1)从表t1中取符合条件的第一条记录:SELECT * FROM t1 ORDER BY age FETCH FISRT ROW ONLY2)在SQL语句中输入包含单引号的字符串INSERT INTO Lib/File VALUES('It''s').3)在交互SQL(STRSQL)中执行CL命令CALL QCMDCALL QUSCMDLN 阅读全文
posted @ 2012-01-09 10:39 静海平心 阅读(274) 评论(0) 推荐(0) 编辑
摘要: 从OS/400 V4R1开始,即使您的i系列400服务器上没有安装邮件服务器软件(如Domino),也可以通过设置 SMTP Gateway, 指向一个外部邮件服务器(Lotus Domino, Miscrosoft Exchange 等), 帮助转发Internet邮件, 即i系列400将邮件自动发到您指定的MailServer,再由这个MailServer把邮件发向Internet. 实现步骤如下:(1)设定TCP/IP环境,用命令CFGTCP:选择10(Work with TCP/IP host table entries),把外部MailServer名称和对应IP地址登记注册进Host 阅读全文
posted @ 2012-01-09 10:32 静海平心 阅读(553) 评论(0) 推荐(0) 编辑
摘要: PGMA: FFILEA UF K E DISK COMMIT(Switch)*LOVAL SETLL RECFILEA KEY READE RECFILEA 50 eval Switch='2'CALL PGMB eval Switch='1'EVAL FIELD1='S' UPDATE RECFILEA 20 阅读全文
posted @ 2012-01-09 10:29 静海平心 阅读(305) 评论(1) 推荐(0) 编辑
摘要: 1)对于S类型的参数只要按照字符串的形式,在没有数字的位置补0,不用输入小数点,就可以得到正确的结果,如果是负数,在第一位输入负号 - 即可,但是会占用一个数字位,7位的负数就只能输入6位数字了。 2)对于P类型的参数数字部分按照S类型的一样输入,还需要在字符串前加 X,并且如果长度为奇数,需要给字符串加 F 后缀,如果长度为偶数,需要在字符串的前后都加 F。如果是负数的,需要把字符串后面的F变为B。(X表示按16进制取值,由于P类型的数据存储方式是半个字节存储一个数字,所以需要在前后加其它的字母补齐空位。)PARM(X'20060F') 5 桁 奇数位 20060 PARM( 阅读全文
posted @ 2012-01-09 10:26 静海平心 阅读(458) 评论(0) 推荐(0) 编辑
摘要: 1)RUNRMTCMDRUNRMTCMD + CMD('C:\PROGRAM FILES\MICROSOFT OFFICE\OFFICE\EXCEL.EXE') + RMTLOCNAME('192.168.1.168' *IP) + RMTUSER(user) RMTPWD(userpassword)2)STRPCCMDSTRPCO PCTA(*NO) STRPCCMD PCCMD(CALC) 阅读全文
posted @ 2012-01-09 10:18 静海平心 阅读(375) 评论(0) 推荐(0) 编辑