达芙妮基恩最新消息:AS400中怎么把RPG程序编译到指定的LIB里面去。

创建自己的命令

用户在日常管理中，经常会重复使用同一命令，但命令又很长，用户可以创建用CRTDUPOBJ; CHGCMDDFT创建自己的命令简化操作。

例如：命令WRKUSRJOB USER(*ALL) STATUS(*ACTIVE) JOBTYPE(*INTERACT) ASTLVL(*BASIC)

可以按以下步骤进行操作：

A. 输入命令CRTDUPOBJ(Create Duplicate Object)并按F4键。

Create Duplicate Object (CRTDUPOBJ)

Type choices, press Enter.

From object . . . . . . . . . . > WRKUSRJOB Name, generic*, *ALL

From library . . . . . . . . . . > *LIBL Name, *LIBL, *CURLIB

Object type . . . . . . . . . . > *CMD *ALL, *ALRTBL, *AUTL...

+ for more values

To library . . . . . . . . . . . > YOURLIB Name, *FROMLIB, *SAME...

New object . . . . . . . . . . . > USERJOB Name, *OBJ, *SAME

From ASP device . . . . . . . . * Name, *, *CURASPGRP, *SYSBAS

To ASP device . . . . . . . . . *ASPDEV Name, *ASPDEV, *...

Bottom

F3=Exit F4=Prompt F5=Refresh F12=Cancel F13=How to use this display

F24=More keys

在用户所在的库（yourlib）中创建WRKUSRJOB命令的副本userjob

B. .在AS/400命令行输入CHGCMDDFT(Change Command Default)命令，

Change Command Default (CHGCMDDFT)

Type choices, press Enter.

Command . . . . . . . . . . . . > USERJOB Name

Library . . . . . . . . . . . > yourlib Name, *LIBL, *CURLIB

New default parameter string . . > 'status(*active) jobtype(*interact)'

Bottom

F3=Exit F4=Prompt F5=Refresh F12=Cancel F13=How to use this display

F24=More keys

这样一条新的命令被定义成功。

可以在AS/400命令行输入yourlib/userjob 来执行你需要的功能。