AS400基本命令和操作

数据描述规范DDS 通过文件的记录字段仅一次的说明，可定义多种访问路径，多个程序使用。

结构化查询语言SQL/400 组成：（1）SQL 运行支持程序（2）SQL 预编译程序（3）SQL 交互式接口（4）DB2 QUERY MANAGER FOR AS/400 ，提供菜单、填空式提示的交互式接口，允许建立、增加、维护数据，和运行报表

PDM （PROGRAMMING DEVELOPMENT MANAGER ）处理源代码、对象和库

SEU（SOURCE ENTRY UTILITY ）建立和编辑源文件成员STRSEU

SDA （SCREEN DESIGN AID ）交互式设计、创建和维护应用屏幕

RLU （REPORT LAYOUT UTILITY ）交互式定义打印报表的格式分布

DFU（DATA FILE UTILITY ）快速定义、创建面向数据录入、查询或文件维护STRDFU

QUERY/400 获取外部描述数据库文件信息STRQRY

CL （CONTROL LANGUAGE ）调用AS/400 的所有系统功能。简化操作，控制工作流程，设置作业运行环境等

AS/400 三级存储结构

库（LIBRARY ）——数据库文件（FILE）——成员（MEMBER ）

一级目录——二级目录——三级目录

字段是用来描述某一属性的一组值；字段定义是对字段属性的说明记录是把一组字段放在一起命名，用来说明某一事物；记录格式是对记录中所有字段的简单说明以及对各字段排序的说明文件是已命名的一组记录，文件说明是对文件所有的记录格式和存取路径的说明，数据库文件分为数据文件和源文件，数据文件就是程序中使用的物理文件和逻辑文件。

物理文件（*FILE ，PF-DTA ）：在SQL 中称做表（TABLE ），含有系统实际存储的数据，每个物理文件只有一个固定长度的记录格式。CRTPF

逻辑文件（*FILE , LF）:在SQL中称做表（VIEW ）,它不含有实际数据，依附于物理文件，可以描述一个或多个物理文件的记录（JOIN逻辑文件）。CRTLF

源文件（*FILE，PF-SRC）:是系统用来建立源程序（RPGLE、CLLE、C）或源物理文件（PF）等目标的源说明CRTSRCPF

库名：存放该应用系统的源程序库就命名为SGMSRC,存放该应用系统目标的库可命名为SGMOBJ CRTLIB

源文件名：存放程序的源文件叫R+ PGM +SCF，存放物理文件和逻辑文件定义的源文件叫R+DTA+SCF

物理文件/逻辑文件名：学生成绩表命名为STGD+A 其中一个逻辑名为STGDL1

程序名：SGM + 0400 + R ‘R' RPGLE, 'C' C, C 或CL, ‘ R' 报表等DDS 行中对物

理文件有效的位置是：

6：A=DDS

17：R=RECORD NAME ，K=KEY FIELD NAME ，BLANK=FIELD NAME )

19-28 ：NAME

29：R 参照字段，BLANK 非参照字段

30-34：字段长度

35：数据类型

36-37 ：小数点位置定义（0-31 有效）

45-80：功能定义

REF:指定被参考文件

UNIQUE ：键值唯一

FIFO，FCFO，LIFO :相同键值记录的排列规则

FORMAT :共享其他文件的记录格式

TEXT :记录格式说明

COLHDG :为数据库文件中字段显示和打印用

REFFLD :可用+N或-N来改变字段长度

DESCEND :按降序排列，可用于字符或数值型键字字段

ABSVAL :按绝对值顺序排序

SFL: subformList

SFLCTL : 定义包含subform 子表的主表

SFLCLR :

SFLDSPCTL : 子表显示控制

SFLDSP: 子表显示

SFLPAG : 子表页数

SFLSIZ :子表大小

SFLEND（ *MORE ）:子表结尾简单逻辑文件

PFILE :定义包含逻辑文件处理数据的物理文件

RENAME :更改一个字段的名称（其他属性不变）

CONCAT :将物理文件的多个字段合并成逻辑文件的一个字段

ALL :选择或排除不满足以上任何S/O 条件的记录

COMP :字段与字段或某值比较

VALUE :字段是否存在于一值列表中

RANGE :字段是否在一个指定范围内

OPM（原始程序模型）RPG语言是一种定格式、面向过程、结构化开发语言

ILE （集成语言环境）RPG/400,集成化语言环境下的RPG具有更强功能、更简便

RPG 程序可以用工具SEU 来编辑，它的格式固定，大致可以分为

条件指示器操作数 1 操作码操作数2结果结果指示器GREATER LITTLER

RPG 里的三种程序结构（顺序操作、条件转移操作、重复执行某一操作/循环）条件转移操作IF ELSE ENDIF

SELECT WHEN OTHER ENDSL

其他还有CASXX 、GOTO 、EXSR （执行子程序）转移操作重复执行某一操作/循环

DO ENDDO

DOW ENDDO

其他还有DOUXX/DOU 重复执行操作

算术运算

ADD: RESULT = FACTOR1/RESULT + FACTOR2

SUB: RESULT = FACTOR1/RESULT + FACTOR2

Z-ADD: RESULT = 0 + FACTOR2

Z-SUB: RESULT = 0 - FACTOR2

MULT: RESULT = FACTOR1/RESULT * FACTOR2

DIV: RESULT = FACTOR1/RESULT / FACTOR2

MVR RESULT =上一个DIV操作的余数

SQRT RESULT = FACTOR的平方根

XFOOT RESULT = FACTOR数组的和

赋值操作

MOVE: RESULT= FACTOR（右靠齐，字符型变量和P形变量可以互相赋值）如果

FACTOR的长度小于RESUL的长度，RESUL的其余部分保持；如果FACTOR

的长度大于RESUL的长度，FACTOR种的多余被忽略；

MOVEL: RESULT= FACTOR（左靠齐，字符型变量和P形变量可以互相赋值）如果

FACTOR的长度小于RESUL的长度，RESUL的其余部分保持；如果FACTOR

的长度大于RESUL的长度，FACTOR种的多余被忽略；

MOVEA: RESULT= FACTOR2（RESULT必须是个使用DIM定义的数组，FACTOR2 可以

是数组，变量，常量，*BLANKS, *ZEROS, *ALL'XXX' 。）

比较操作

COMP: FACTOR与FACTOR比较的结果由指示器表示

CABXX: FACTOR与FACTOR比较，结果为真的话转移到RESUL指示的TAG

CASXX: FACTOR与FACTOR比较，结果为真的话执行RESUL指示的子程序程序操作

BEGSR: 子程序开始

ENDSR: 子程序结束

EXSR: 执行子程序