数据描述规范DDS通过文件的记录字段仅一次的说明,可定义多种访问路径,多个程序使用。
结构化查询语言SQL/400组成:(1)SQL运行支持程序(2)SQL预编译程序(3)SQL交互式接口(4)DB2 QUERY MANAGER FOR AS/400,提供菜单、填空式提示的交互式接口,允许建立、增加、维护数据,和运行报表PDM(PROGRAMMING DEVELOPMENT MANAGER)处理源代码、对象和库SEU(SOURCE ENTRY UTILITY)建立和编辑源文件成员STRSEUSDA(SCREEN DESIGN AID)交互式设计、创建和维护应用屏幕RLU(REPORT LAYOUT UTILITY)交互式定义打印报表的格式分布DFU(DATA FILE UTILITY)快速定义、创建面向数据录入、查询或文件维护STRDFUQUERY/400获取外部描述数据库文件信息STRQRYCL(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库名:存放该应用系统的源程序库就命名为SGM SRC,存放该应用系统目标的库可命名为SGM OBJ CRTLIB源文件名:存放程序的源文件叫R+PGM+SCF,存放物理文件和逻辑文件定义的源文件叫R+DTA+SCF物理文件/逻辑文件名:学生成绩表命名为STGD+A其中一个逻辑名为STGD L1程序名:SGM+0400+R‘R’:RPGLE,‘C’:C,C或CL,‘R’:报表等DDS行中对物理文件有效的位置是:6:A=DDS17:R=RECORD NAME ,K=KEY FIELD NAME,BLANK=FIELD NAME)19-28:NAME29:R参照字段,BLANK非参照字段30-34:字段长度35:数据类型36-37:小数点位置定义(0-31有效)45-80:功能定义REF:指定被参考文件UNIQUE:键值唯一FIFO,FCFO,LIFO:相同键值记录的排列规则FORMAT:共享其他文件的记录格式TEXT:记录格式说明COLHDG:为数据库文件中字段显示和打印用REFFLD:可用+N或-N来改变字段长度DESCEND:按降序排列,可用于字符或数值型键字字段ABSV AL:按绝对值顺序排序SFL:subformListSFLCTL:定义包含subform子表的主表SFLCLR:SFLDSPCTL:子表显示控制SFLDSP:子表显示SFLPAG:子表页数SFLSIZ:子表大小SFLEND(*MORE):子表结尾简单逻辑文件PFILE:定义包含逻辑文件处理数据的物理文件RENAME:更改一个字段的名称(其他属性不变)CONCA T:将物理文件的多个字段合并成逻辑文件的一个字段ALL:选择或排除不满足以上任何S/O条件的记录COMP:字段与字段或某值比较V ALUE:字段是否存在于一值列表中RANGE:字段是否在一个指定范围内OPM(原始程序模型)RPG语言是一种定格式、面向过程、结构化开发语言ILE(集成语言环境) RPG/400,集成化语言环境下的RPG具有更强功能、更简便RPG程序可以用工具SEU来编辑,它的格式固定,大致可以分为条件指示器操作数1 操作码操作数2 结果结果指示器GREATER LITTLERRPG里的三种程序结构(顺序操作、条件转移操作、重复执行某一操作/循环)条件转移操作IF ELSE ENDIFSELECT WHEN OTHER ENDSL其他还有CASXX、GOTO、EXSR(执行子程序)转移操作重复执行某一操作/循环DO ENDDODOW ENDDO其他还有DOUXX/DOU重复执行操作算术运算ADD: RESULT = FACTOR1/RESULT + FACTOR2SUB: RESULT = FACTOR1/RESULT + FACTOR2Z-ADD: RESULT = 0 + FACTOR2Z-SUB: RESULT = 0 - FACTOR2MULT: RESULT = FACTOR1/RESULT * FACTOR2DIV: RESULT = FACTOR1/RESULT / FACTOR2MVR:RESULT = 上一个DIV操作的余数SQRT:RESULT = FACTOR2的平方根XFOOT: RESULT = FACTOR2数组的和赋值操作MOVE: RESULT = FACTOR2(右靠齐,字符型变量和P形变量可以互相赋值)如果FACTOR2的长度小于RESULT的长度,RESULT的其余部分保持;如果FACTOR2的长度大于RESULT的长度,FACTOR2种的多余被忽略;MOVEL: RESULT = FACTOR2(左靠齐,字符型变量和P形变量可以互相赋值)如果FACTOR2的长度小于RESULT的长度,RESULT的其余部分保持;如果FACTOR2的长度大于RESULT的长度,FACTOR2种的多余被忽略;MOVEA: RESULT = FACTOR2 (RESULT必须是个使用DIM定义的数组,FACTOR2可以是数组,变量,常量,*BLANKS, *ZEROS, *ALL'XXX'。
)比较操作COMP: FACTOR1与FACTOR2比较的结果由指示器表示CABXX: FACTOR1与FACTOR2比较,结果为真的话转移到RESULT指示的TAGCASXX: FACTOR1与FACTOR2比较,结果为真的话执行RESULT指示的子程序程序操作BEGSR: 子程序开始ENDSR: 子程序结束EXSR: 执行子程序注释:每一个程序中都可以有一个特殊的子程序*INZR,都会被首先执行调用和转移操作CALL: 调用一个外部程序,该程序可以是RPG、CL或C程序等RETRN/RETURN: 返回上一层程序文件操作CHAIN:用纪录号或键值从一个文件查找CLOSE: 关闭文件OPEN: 打开文件COMIT/COMMIT: 文件修改落实ROLBK/ROLBK : 文件修改回滚DELET/DELETE: 删除记录EXFMT: 显示输出一个显示记录,并从标准输入读取数据READ: 读一条记录READE: 从当前记录位置开始寻找一个等于键字的记录,并读取READP: 读取当前记录位置的上一条记录SETLL: 从文件第一条记录开始逐条查询,直到找到第一条符合条件的记录,此记录的键字大于或等于FACTOR1指定的键值。
但只是将文件指针指向此记录的上方,并不读出(可以使用READ读下一记录)。
SETGL: 从文件第一条记录开始逐条查询,直到找到第一条符合条件的记录,此记录的键字大于FACTOR1指定的键值。
但只是将文件指针指向此记录的下方,并不读出(可以使用READP将上一条记录读出)UNLCK: 解除记录锁UPDATE: 更新数据库记录WRITE: 写文件记录信息操作DEBUG: 用来在有问题的程序中显示所有状态为'1'的指示器DUMP: 调试程序,将变量和指示器的值打印在一个spool file 中TIME: 取系统时间DSPLY: 允许程序与系统控制台之间或和显示工作站之间进行通讯。
说明操作DEFN/DEFINE:数据区(data area)KLIST & KFLD: 定义复合键字,用于复合键字逻辑文件PLIST :表示一个参数列表数据区操作IN:检索一个数据区并可选择允许指定是否允许其它程序更新这个数据区OUT:更新一个数据区UNLCK/UNLOCK:解锁一个数据区其它操作LOKUP/LOOKUP在因数2中查找等于因数1的元素,找到时结果指示器为ONXFOOT: 求一个数组中所有元素的和SORTA: 给一个数组中的元素排序MOVEA: 数组传递CL基本命令系统操作WRKACTJOB(整个系统) WRKJOB(单一工作)WRK WTR打印机管理(Wrok with Writer)STRPRTWTR打印机激活(Start Printer Writer)ENDWTR打印机终止(End Writer)WRKSYS STS(Work with System Status)检示系统资源RAM 目前的使用状态.可动态调整资源的分配WRK SPL F (Work with Spooled File) 报表指定打印印表机, 储存, 删除.WRKJOB SCD E (Work with Job Schedule Entery)设定工作排程时间Go Power 设定开关机时间SAVLIB (Save Library)SAVOBJ(Save Object)储存程序馆--> RSTLIB : 回复程序馆储存对象--> RSTOBJ : 回复对象WRK CFG STS *LIN (线路) (Work with Configuration Status)WRKCFGSTS *CTL (控制器)WRKCFGSTS *DEV (工作站)检示及管理激活或终止通信线路使用情形, 且会自动带出远程控制器及工作站使用情形.Status 状态Vary on pending 等待联机Varied On 已联机系统处理中Active 正常作业中Varied Off 切断联机, 此时无法联机, 需要将线路(Line),控制器(Controller),工作站(Device)设定至Vary on pending 才可以联机.在将显示(Display)工作站Varied Off 前, 先从画面检视该工作站是否仍有残存Job 挂在该工作站, 若有则需将Job 强迫结束(ENDJOB) ,否则无法将工作站(Device) 及及控制器(Controller) Varied Off. 显示(Display)工作站在被Varied on 后, 状态会由Varied off --> Vary on pending , 此时若该显示(Display)工作站有开机, 状态会由Vary on pending --> Signondisplay, 若User 输入ID 及Password , 系统会以该显示(Display)工作站名称产生Job, 状态会由Signondisplay--> Active.在将印表机(Printer)工作站Varied Off 前, 先从画面检视该工作站是否仍有Writer 挂在该工作站, 若有则需将Writer 强迫结束(ENDWTR) ,否则无法将工作站(Device) 及控制器(Controller) Varied Off.印表机(Printer)工作站被Varied on 后, 状态会由Varied off --> Vary on pending ,此时若该印表机(Printer)工作站有开机, 状态会由Vary on pending --> Varied On , 待激活印表机(STRPRTWTR)后,系统会以该印表机(Printer)工作站名称于QSPL 子系统下产生印表机(Printer)工作站Job , 状态会由Varied on --> Active.9. STRPDM激活AS/400 程序开发工具WRKLIBPDM 针对整个链接库所有对象WRKOBJPDM 针对链接库之单一对象WRKMBRPDM 针对档案数据成员以上功能均可对对象(档案)作建立, 复制, 搬移, 删除CPY F(Copy File) 拷贝档案数据成员, 可新增或取代记录WRKMSGQ (*QSYS OPR)(Work with Message Queue)检示及回复系统讯息INZ TAP(Initialize Tape) 格式化磁带DSPTAP(Display Tape) 显示磁带内容WRK SBM JOB (Work with Submitted Job) 检示批次作业状态WRKOUTQ (Work With Out Queue) 检示报表暂存区WRKJOBQ (Work With Job Queue) 检示待执行之批次工作暂存区WRKOBJ LCK(Work with Object Lock) 检示对象有无被其它作业使用CALL 执行程序SND BRKMSG (Send Break Message) 送出立即讯息CHG JOB (Change Job) 更改工作属性DSPLOG (Display Log) 检示系统历史数据记录CRTSRCPF (Create Source Physical File) 建立存放Source 档案CRTPF (Create Physical File) 建立数据库STRDFU 激活维护数据库工具, 可新增,修改,查询,删除单笔数据STRSDA (Start Screen Design Aid) 激活编修画面格式工具STRSQL 激活数据浏览查询工具STRRLU (Start Report Layout Utility)激活报表格式产生工具STRSEU (Start Source Entry Utility) 激活Source 编辑工具CRTDSPF (Create Display File)建立画面供程序使用CRTPRTF (Create Printer File)建立报表档供程序使用CRTCLPGM (Create CL Program)建立CL应用程序CRTRPGPGM (Create RPG Program)建立RPG 应用程序CRT CBL PGM (Create Cobol Program)建立COBOL 应用程序GO LICPGM 安装或查询系统及系统应用程序DSPPTF 查询系统目前已上那些PTFDSPMSG QSYSOPR 检视系统是否有不正常讯息或响应讯息。