深渊野鱼

在参数Amount to roll位置输入要修改的值，下面列出了所有Amount to roll的参数解释：
H=Half -> 按PgUp或PgDn键后，屏幕滚动半页。

F=Full -> 按PgUp或PgDn键后，屏幕滚动整页。

C=Cursor -> 按PgUp、PgDn键或F19、F20后，屏幕按照光标位置进行滚动。

D=Data -> 按PgUp、PgDn键或F19、F20后，屏幕按照数据位置进行滚动。

1-999 -> 按PgUp、PgDn键或F19、F20后，屏幕按照选定的具体值进行滚动，例如，若此值为10，则进行翻页时，一次翻10行。

2.修改字体大小写输入方式。
在缺省情况，PDM只可按大写方式输入，但有时要输入小写字符，可以按F13进入“Change Session Defaults”

画面。修改“Uppercase input only”参数为N，即大小写都准许。

3.修改行序号的步长
在“Increment of insert record”位置添入行序号的步长。
例如：
Increment of insert record . . . . . --2.00 --0.01-999.99
如下图所示：修改前的步长为1，修改后的补偿为2。

4.全屏显示
在“Full screen mode” 位置输入“Y”，PDM的编辑画面变成全屏显示。

library list分为system libraries; product libraries; current library; user library四个部分。其中，system libraries可以用QSYSLIBL系统值决定，也可以用CHGSBSD进行修改；user library可以用QUSRLIBL决定，也可以用CHGJOBD进行修改。current Library一般由user profile决定，也可以在sign on时进行指定。而product libraries是在执行CL程序的时候由系统自动引入的，例如在编译RGP程序的时候会自动引入QRPG库等。

系统作业是在系统IPL时初始化的，但是，只要OS/400系统处于活动状态，作业
QWCBTCLNUP和QDCPOBJx也将与之同样保持活动。系统作业不能被用户启动，停止或改变(除了少数系统作业可以用命令CHGSYSJOB来改变，并且唯一可以由该命令改变的属性就是这些系统作业的运行优先级。)

以下就是介绍所有系统作业的详细信息：

-- QALERT - Alert Manager 报警管理
该系统作业使作业能够处理报警，包括处理从其他系统上接收到的报警，本机产生 的报警，并且维护系统的控制。QALERT的作业运行优先级可以用命令CHGSYSJOB改变。该作业在OS/400 R220时就被加入到操作系统中，用于支持报警信息的处理。

-- QCMNARBxx - Communications Arbiters
通讯仲裁器处理的仲裁不仅仅对通讯设备，还包括所有类型的其他设备。处理的工作包含通讯连接，断开，设备锁定，和错误恢复。所有设备相关的工作分散在系统作QCMNARBxx和QSYSARB中。

系 统值QCMNARB决定有多少通讯仲裁作业启动。如果QCMNARB设置成*CALC，系统将为每一个处理器启动两个通讯仲裁作业，如果QCMNARB设 置成0，该作业将在QSYSARB中运行。QCMNARBxx的作业运行优先级可以用命令CHGSYSJOB改变。在作业QCMNARBxx被加入 OS/400 R420以前，这些工作是在QSYSARB中运行的。

-- QDBSRVXR - Database Cross-Reference 数据库交叉参照
该 作业是用于维护QSYS中的文件级的系统交叉参照文件，这些文件中存放着数据库文件的交叉参照信息，并且这些文件是库QSYS中以QADB开头的。首要被 维护的文件是文件交叉参照文件QADBXREF，它包含了数据库中每一个物理文件，逻辑文件，DDM文件，ALIAS文件的记录。当一个文件被创建，改 变，删除，恢复，更名，或者改变所有权时，作业QDBSRVXR就会被激活。该作业在OS/400 R310被加入操作系统。

-- QDBSRVXR2 - Database Cross-Reference 数据库交叉参照
该 作业是用于维护两个字段级的系统交叉参照文件，库QSYS中的QADBIFLD是字段交叉参照文件，库QSYS中的QADBKFLD是键字交叉参照文件。 当一个文件被创建，改变，或删除，运行键字相关的工作时，作业QDBSRVXR2就会被激活。QDBSRVXR2由PTF在OS/400 R310时被加入操作系统中。QDBSRVXR2的作业运行优先级可以用命令CHGSYSJOB改变。

-- QDBSRV01 - Database Server 数据库服务器
该作业可以被视为数据库维护任务的分配器。通常地，当恢复一个包含数据库文件的库时，QDBSRV01将立刻被激活。它的功能包括：
* 发信号给SMAPP(系统管理的访问路径保护机制)，告知新的访问路径被恢复，并且由AMAPP来决定是否需要被保护。
* 由于访问路径没有被恢复时，该作业准备需要被重新创建的访问路径的列表。该列表可以用命令EDTRBDAP浏览。

数 据库服务器作业的数量是(1+2*CPU数)与(1+2*ASP数)两者中较大的那一个。最少启动的数量是5。QDBSRV01是主要的系统作业，用于分 配其他作业工作，剩下的作业，一半是用来处理高优先级的请求，另一半是用来处理低优先级的请求。例如：在一个有4路CPU的系统上，应该有9个 QDBSRVxx作业，由QDBSRV01来分配工作，QDBSRV02-05用来处理高优先级的作业，QDBSRV06-09用来处理低优先级的作业。 该作业是在OS/400 R210被加入操作系统的。

-- QDBSRVxx - Database Server (high priority)
这些作业维护系统的日志和提交控制。

-- QDBSRVxx - Database Server (low priority)
这些作业用于维护用户的数据库文件的访问路径。这些作业通常不活动，但是，在特定的条件下，它们被激活用于访问路径的重建。这些被重建的访问路径可以用命令EDTRBDAP浏览。这些作业被激活的原因包括：
* 恢复那些没有保存访问路径的数据库文件；
* 恢复那些没有物理文件的逻辑文件；
* 取消正在运行的命令RGZPFM；
* 由于被破坏而成为无效的索引；
* 加速OS/400安装来完成交叉参照，或者其他DB2升级的动作；
* 验证约束。用命令EDTCPCST可以显示那些正在等待验证的约束。

-- QDCPOBJx - Decompress System Object 系统对象解压缩
这些作业是用于对新安装的操作系统对象进行解压缩的，它们的运行是需要一定的空间的。当剩余您的系统空间低到一定程度，这些作业就会结束。系统对象解压缩作业的数量=CPU数+1。该作业是在OS/400 R210被加入操作系统的。

-- QFILESYS1 - File System 文件系统
该作业用于支持文件系统作业的后台运行，它保证对文件的改动都写入存储介质中，并执行常规的文件系统清除活动。该作业是在OS/400 R210被加入操作系统的。

-- QJOBSCD - Job Schedule 作业调度
该作业控制作业调度功能，并由系统监控作业调度项的计时器和调度的作业。
该作业是在OS/400 R220被加入操作系统的。

-- QLUR - LU 6.2 Resynchronization(LU 6.2 重新同步)
该作业处理两段式提交的重新同步。该作业是在OS/400 R310被加入操作系统的，并作为LU 6.2通讯协议的一部分。

-- QLUS - Logical Unit Services 逻辑单元服务
该作业处理为逻辑单元设备(通讯设备)处理的事件，它还负责将设备定位到正确的通讯子系统中去。QLUS是AS/400上原始的系统作业之一。

-- QPFRADJ - Performance Adjustment 性能调整
性 能调整系统作业管理存储池大小和活动级别的变化。所有要求改变存储池大小的请求都有该作业处理。此外，如果系统值QPFRADJ设为2或3，该作业将动态 地改变存储池大小和活动级别，由此提高系统的性能。在OS/400 R430，IPL性能调整(系统值QPFRADJ设为1或2)是由QPFRADJ来处理的，在OS/400 R430前，IPL性能调整由SCPF处理。QPFRADJ是在OS/400 R210被加入操作系统的。

-- QQQTEMP1 and QQQTEMP2 - Database Parallelism 数据库并行
该作业用于实现多个DB2系统的数据库同步功能。如果用户对分布式文件进行查询，该作业可以通过执行并行处理从而达到加快处理速度的目的。是在OS/400 R370作为DB2多系统支持功能被加入操作系统的。

-- QSPLMAINT - System Spool Maintenance 假脱机管理
该作业实现维护系统假脱机的功能。

-- QSYSARB - System Arbiter 系统仲裁
系 统仲裁提供运行高优先权功能的环境，它处理系统资源并保持对系统状态的追踪。QSYSARB是操作系统核心作业。系统仲裁负责系统一级的，需要立即处理和 能更有效地被一个作业处理的任务，系统仲裁还负责处理通讯请求，设备锁定，线/控制器/设备的配置。系统仲裁是OS/400最原始的作业之一。

-- QSYSCOMM1 - System Communications 系统通讯
该作业处理系统通讯和I/O。QSYSCOMM1的作业优先权可以用命令CHGSYSJOB改变，它是在OS/400 R320中被加入操作系统的。

-- QWCBTCLNUP - Job Table Cleanup 作业表清空
QWCBTCLNUP 是用于在IPL过程中确保作业结构可以被使用。通常在IPL结束时，该作业也结束处理了，但是，如果有许多作业结构需要清除，它可以在IPL结束后继续运 行。该系统作业在处理完成后就结束了。QWCBTCLNUP是在OS/400 R210中当作业表的清除从SCPF中被移走后加入系统的。

-- Q400FILSVR - Remote File System Communications 远程文件系统通讯
该作业处理远程文件系统APPN/APPC的通用编程接口通讯。Q400FILSVR是在OS/400
R360中作为远程文件支持被加入操作系统的。

-- SCPF - Start Control Program Function 启动控制程序功能
该作业是操作系统IPL是的中心处理任务，提供启动OS/400的环境和所直接需要的功能。SCPF启动所有其他系统作业(除了QLUS)，并将系统带入可用状态。SCPF是OS/400最原始的作业之一。

2、使用命令WRKOBJLCK OBJ(QDOC/sysobjname) OBJTYPE(*DOC),其中，sysobjname为上一条命令输出 结果中的System object name值。

-----------------------------------------------------------------------
----------------------Work with Active Jobs ------------------S102xxxx
-----------------------------------------------------11/30/03 13:24:38
CPU %: .3 ---Elapsed time: 00:13:10 ---Active jobs: 116

Type options, press Enter.
2=Change 3=Hold 4=End 5=Work with 6=Release 7=Display message
8=Work with spooled files 13=Disconnect ...

Opt Subsystem/Job -User ---Type --CPU % -Function ------Status
QBATCH ------------QSYS ---SBS --- .0 ----------------- DEQW
QCMN --------------QSYS ---SBS --- .0 ------------------DEQW
QCTL --------------QSYS ---SBS --- .0 ------------------DEQW
QSYSSCD -----------QPGMR --BCH --- .0 ---PGM-QEZSCNEP --EVTW
QINTER ------------QSYS ---SBS --- .0 ------------------DEQW
QPADEV000F --------test ---INT --- .1 ---CMD-WRKACTJOB -RUN
QSERVER -----------QSYS ---SBS --- .0 ------------------DEQW
QPWFSERVSD ------- QUSER --BCH --- .0 ------------------SELW
QSERVER -----------QPGMR --ASJ --- .0 ------------------EVTW
More...
Parameters or command
===>
F3=Exit F5=Refresh F7=Find F10=Restart statistics
F11=Display elapsed data F12=Cancel F23=More options F24=More keys
---------------------------------------------------------------------

在WRKACTJOB命令输出界面：
1、自动排序：
缺省情况，输出结果按子系统来排序，用户可以将光标移到其它列上，然后按PF16，则输出就根据该列来排序。
例，将光标移到CPU%下，按PF16，则输出作业的信息将按CPU的使用情况来排序。
同时,在WRKACTJOB命令行参数SEQ(Sequence),可以指定输出的排序标准:
例如:
*SBS -- 按子系统
*AUXIO -- 硬盘I/O量
*CPU -- CPU使用时间
*CPUPCT -- CPU使用率百分比
*USER -- 用户名
等...

2、强大的PF功能键
使用PF24，用户可以发现，WRKACTJOB提供一些有用的PF功能：

例，PF7 用于发现含某些字符的作业
---------------------------------------------------------------------
Find a string

String . . . . . . . . SHANJD
Column . . . . . . . . *USER ---*SBS, *JOB, *USER, *NUMBER,
--------------------------------*TYPE, *STS, *FUNCTION, *PTY
--------------------------------*POOL

F8=Repeat find F12=Cancel F17=Top F18=Bottom
----------------------------------------------------------------------

PF20 用于只列出符合条件的作业:
----------------------------------------------------------------------- ------------------------Subset Active Jobs

Type choices, press Enter.
Sequence . . . . . . . . *SBS --------F4 for list
Job name . . . . . . . . *ALL --------Name, *ALL, *SYS, *SBS
CPU percent limit . . . . *NONE ------.1-99.9, *NONE
Response time limit . . . *NONE ------.1-999.9, *NONE
Subsystems
*ALL

------------------------------------------------------------------------

1. FTP AS400-IP 地址
2. 输入用户名, 回车, 再输入口令.
3. CD /qsys.lib/***.lib, *** 为AS/400 存放SAVF库名.
4. LCD PC 机本地存放SAVF的目录
5. BIN
6. QUOTE SITE NA 1
7. PUT pcSAVF.savf asSAVF.savf , 其中: pcSAVF 为 PC 中SAVF 文件名;asSAVF 为AS/400中文件名.
8. QUIT

// Loop through all records of file
read file;

dow not %eof(file); // Process until end of file
if %error;
dsply 'Read error: process aborting.';
leave;
else;
pos = %scan (',': name);
if pos > 0;
firstname = %trimr(%subst(name:1:pos-1));
update file;
endif;
read file;
enddo;

/end-free
C*=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-

1）parm1(7S 0) = 276，parm2(7S 2) = 15.73

传递方式：CALL PGMA PARM('0000276' '0001573')

2）parm1(7S 0) = -276，parm2(6S 2) = -15.73

传递方式：CALL PGMA PARM('-000276' '-01573')

3）parm1(7P 0) = 276, parm2(7P 2) = 15.73

传递方式：CALL PGMA PARM( X'0000276F' X'0001573F')

4）parm1(6P 0) = 276 , parm2(6P 2）=15.73

传递方式：CALL PGMA PARM( X'F000276F' X'F001573F')

5）parm1(7P 0) = -276 , parm2(6P 2）=-15.73

传递方式：CALL PGMA PARM( X'0000276B' X'F001573B')

总结：

对于S类型的参数，只要按照字符串的形式，在没有数字的位置补0，不用输入小数点，就可以得到正确的结果，如果是负数，在第一位输入负号 - 即可，但是会占用一个数字位，7位的负数就只能输入6位数字了。

对 于P类型的参数，数字部分按照S类型的一样输入，还需要在字符串前加 X，并且如果长度为奇数，需要给字符串加 F 后缀，如果长度为偶数，需要在字符串的前后都加 F。如果是负数的，需要把字符串后面的F变为B。（X表示按16进制取值，由于P类型的数据存储方式是半个字节存储一个数字，所以需要在前后加其它的字母 补齐空位。）

我应邀在全球范围内宣传 SQL 技巧。我相信您将至少学到表表达式的一种用法，而您所学到的东西将对您的应用产生一定的影响，所以还请继续读下去。

预过滤全外连接

最近几年来，随着工作文件的移除和并行性的加入，全外连接在性能方面已得到了增强。然而，其语法并没有得到像左连接和右连接所得到的那样的魔力，
例如自动谓语下推和谓语传递闭包。图 1 中所显示的全外连接没有产生预期的结果，例如，给出在指定日期范围内的所有订单，
不管这些订单是否具有少于 40 个字符的描述，以及给出所有少于 40 个字符的描述，而不管是否有与之对应的订单：

图 1. 该语句不会产生预期的结果

SELECT    COALESCE(O.ORDER_NO, 'Order Number not Available')
      , COALESCE(D.DESC, 'Description not Available')
FROM    ORDER O
FULL JOIN
   DESCRIPTIONS D
ON   O.ORDER_NO = D.ORDER_NO
WHERE    O.ORDER_DATE BETWEEN '1999-01-01' AND CURRENT DATE
AND   LENGTH(D.DESC < 40)

相反，以上 SQL 的结果看上去像是一个内连接（inner join），因为 图 1 中所使用的语法迫使局部过滤在第二阶段才应用 —— 换句话说，是在连接 之后 才应用。
这意味着很多将要参与连接操作的行其实在后面的阶段就要被删除。为了强制性地在连接（第一阶段）之前 应用局部过滤，可以使用表表达式，如 图 2 中所示。

图 2. 在连接之前强制执行过滤，以获得正确结果

SELECT