AS400开发初阶

合集下载

AS400服务器初始程序加载IPL

AS400服务器初始程序加载IPL

初始程序加载(IPL)初始程序加载(IPL)有三个很明显的时期。

每个时期又被细分为执行特定功能的各个阶段。

这些时期如下:一、服务处理器:这一时期负责通过与控制面板通讯来初始化IPL。

随后服务处理器硬件被测试,代码被加载到服务处理器访问内存,并且处理器代码被加载。

在IPL期间服务处理器执行的功能是:1.进行硬件诊断或基本的保证测试(BA Ts)。

2.加载源的输入/输出处理器(IOP或MFIOP)被初始化。

3.服务处理器从加载源部件获取IPL所需的许可内码。

加载来源可以是硬盘、磁带或者光驱。

4.服务处理器对处理器进行诊断。

5.服务处理器加载许可内码,然后开启CPU。

二、许可内码(LIC):许可内码负责以下IPL步骤:1.初始化主存储器2.分派任务3.总线初始化4.确认附加的输出/输入装置5.资源管理任务6.事件7.专用服务工具(DST)三、操作系统(OS/400):操作系统OS/400是IPL的第三个时期。

OS/400开始执行系统功能. 这个第三个时期产生登录屏幕。

然后用户可以访问相应的应用以及许可的程序产品。

这个时期进行的步骤类似:1./文件系统被装入2./QOpenSys文件系统被装入3./QDLS文件系统被装入4./QSYS.LIB文件系统被装入5./QOPT文件系统被装入6./QFileSvr.400文件系统被装入7./QNTC文件系统被装入8.dev/QASP01文件系统被装入9.日志接收器被分离10.开始进行警报处理11.性能参数被调整12.准备好控制器13.开启控制子系统(QCTL)14.开启子系统QSYSWRK15.开启子系统QSERVER16.开启子系统QUSRWRK17.开启子系统QINTER18.开启子系统QBA TCH19.开启子系统QCMN20.开启子系统QSPL21.开启用户子系统22.准备好线路描述23.开启TCP24.启用IP25.开启打印机26.准备好终端27.显示登录屏幕要改变IPL的属性时,可以用Change IPL Attributes (CHGIPLA) 命令进行修改,下次IPL时生效。

AS400_初级培训

AS400_初级培训

一.AS/400简介 (3)二.开发环境和开发工具介绍 (4)1.AS/400环境简介 (4)1.1三级存储结构 (4)1.2 如何建立库、文件和成员 (7)2、ILE简介 (8)3、AS/400开发工具介绍 (9)三.DDS介绍和实例说明 (10)1、AS/400的DDS常用类型介绍 (11)2、AS/400物理文件和逻辑文件介绍 (11)3、AS/400如何使用DDS来创建物理文件和逻辑文件 (11)4、AS/400如何使用DDS来创建显示文件 (16)四.RPG介绍和实例说明 (20)1、RPG的基本结构介绍 (20)2、F段介绍 (21)3、D段介绍 (23)3.1 单独变量的定义 (23)3.2 结构变量的定义 (24)3.3 常量的定义 (24)3.3 数组的定义 (24)4、C段介绍 (25)4.1 概念 (25)4.2 程序入口的定义 (27)4.3 程序的结束 (27)4.4 变量的赋值 (27)4.5 子过程的定义 (28)a)概述 (28)b)子过程的建立 (28)c)子过程的调用 (29)4.6 程序过程控制(判断、循环) (30)a) 判断 (30)b) 多重判断 (30)c) 循环 (30)4.7 数据文件的操作 (31)a) 文件相关操作 (31)b) 记录定位相关操作(游标) (31)c) 记录更新相关操作 (33)5、一个程序的实例及分析 (34)6、在RPG中嵌入SQL (48)五.CL程序的开发介绍 (48)1、CL 命令的介绍 (48)2、CL 程序 (49)3、CL 程序实例 (50)六.程序间的互相调用 (53)1、RPGIV之间的调用 (53)2、CLP与RPG之间的调用 (55)AS/400 初级培训讲义目的:希望通过短期培训,让有编程基础的技术人员,了解AS/400的一些基本概念和操作方式。

了解AS/400的代码编辑方式和基本概念一. AS/400简介AS/400是IBM于1988年推出的一种商用小型机,它是在 IBM System/32,System/34,System/36,System/38这个系列的基础上发展而来的。

AS400-RPG入门

AS400-RPG入门

AS400-RPG入门一:RPG介绍RPG程序的特点:1.程序的编写对于每一个位置都有明确的定义,所以程序的编写必须在指定的位置开始。

通过使用ILE工具可以进行一些方便的输入。

2. RPG程序的设计针对每一部分都有严格的要求,有相应的规格说明,他们包括a) 配置规格说明(Control Specifications):主要规定了程序的命名,日期格式等信息。

b) 文件描述说明(File Description Specifications):对程序使用到的文件的说明c) 定义说明(Definition Specifications):主要对程序使用的数据进行说明。

d) 输入说明(Input Specifications):主要对文件输入数据进行说明。

e) 计算说明(Calculation Specifications):主要对数据计算和计算顺序的说明。

f) 输出说明(Output Specifications):主要针对数据的输出记录和字段的说明。

g) 子程序说明:包括有三种,对子程序的各种进行进行了定义说明。

3.指示器(Indicators)通常是一个字节,被设置为‘0’或者‘1’,他主要作为程序操作的结果或者进行操作的条件。

好像程序的逻辑开关,决定着程序的流程。

指示器必须在定义规范中进行定义。

RPG VI也有一些系统的指示器,他们一般是两个字符的变量,如LR等。

指示器可以在程序的任何地方使用,也可以在程序中修改他的值。

4.操作代码相当与汇编语言的命令一样,有RPG程序提供一套完整的操作代码,比如读一条数据使用READ ,RPG程序对操作代码进行了分类,比如字符串操作符,数组操作符等。

5.定义描述文件a) 文件服务是程序和IO设备的连接。

系统里的每一个文件都有相应的描述文件,对文件的特性和数据的组织形式进行描述。

如果在程序中要使用IO操作,必须要指定一个描述文件,对IO的设备进行描述。

对于文件的类型,系统支持以下几种:1. 数据库文件(database files):对数据进行持久存储。

AS400培训课程2(DDS,MENU,MSGF介绍)

AS400培训课程2(DDS,MENU,MSGF介绍)

AS400培训课程2(DDS,MENU,MSGF介绍)AS400培训课程2 (DDS,MENU,MSGF介绍)(海外事业部)拟稿: 杨群涛日期: 2008/7/22目录四、DDS (4)1、概况 (4)用途 (4)分类 (4)辅助工具 (4)2、数据文件和索引文件定义 (4)文本格式 (4)示例: (6)3、显示文件及实例讲解 (8)使用工具SDA快速建立显示文件 (8)文本格式说明 (12)显示文件的使用: (12)显示文件的Subfile子文件介绍 (13)4、打印文件实例讲解 (15)概况 (15)source文本格式: (15)使用RLU工具处理打印文件 (17)使用 (23)5、ICFF介绍 (24)五、MENU (25)组成 (25)Source (25)示例 (25)工具及使用 (26)菜单属性 (29)命令行 (29)DSPKEY (29)六、MSGF (29)系统msgf (29)所有用户msgf (30)列表系统当前可用的msgf (30)Msgf的建立 (30)Msgf的维护 (30)使用 (35)其他messgae相关 (38)Reply List设置自动应答列表 (38)七、数据文件属性和关系以及程序依赖信息 (42)文件描述 (42)字段描述 (45)数据文件关系 (46)程序依赖信息 (47)系统文件的格式的使用 (56)四、DDS1、概况用途数据结构定义分类PF,LF, DSPF PRTF, ICFF(Intersystem Communications Function File)文件类型命令物理文件CRTPF逻辑文件CRTLE显示文件CRTDSPF打印机文件CRTPRTFICF文件CRTICFF辅助工具STRSDA (Screen Design Aid)STRRLU (Report Layout Utility)2、数据文件和索引文件定义文本格式0001.00:顺序号和格式类型在DDS中是可选的。

AS400培训资料(下)

AS400培训资料(下)

AS400培训资料(下)AS400应用开发培训高级应用与交易实现前言本阶段的培训,在上一级培训的基础上,讲解业务系统的处理以及交易的实现。

目的是使大家掌握如何在AS400上实现具体的交易,完成本次开发任务。

在讲解业务系统的例子程序和会计记帐核心的过程中我们将穿插讲解AS400中一些编程方式和一些简单工具的使用。

由于篇幅和时间的关系在本教材中对一些简单工具不作具体的介绍,请大家作好记录。

同时为了配合本次培训,我们将下发两本教材,一本是操作码手册,另外一本是本公司原来出的IBM AS400 培训教材第二分册,对这两本教材的内容我们可能不作具体的讲解,主要是给大家在学有余力的情况下进行自学,以及今后进行实际编码时的参考手册。

对于一些非常少见的应用,我们不作讲解,请大家参考下发的教材或使用联机的帮助。

使用F6或其他方式建立的成员在Opt选14编译物理文件参与编译其他类型的目标(Object) SLRRPG(可执行程序 *PGM) 物理文件,逻辑文件,打印文件等参与编译,若RPG程序的F表进行了相应的定义其他需要参与编译的目标第一章 RPG程序使用RLU的方法在上一期的培训中我们简要的介绍了RLU的一些用法,现在我们来学习RLU的一些应用,以及如何在RPG程序中使用RLU生成的打印文件在今后的设计过程中,应业务人员的要求,在报表中对于一些域的属性可能要进行修改。

以下是将光标移到域后出现的域属性内容Work with Field KeywordsField . . . . . . . . : ' 客户 ... Record format . . . . : HEADType options, press Enter.2=Specify 4=RemoveOpt Keyword Opt Keyword Opt KeywordALIAS EDTCDE MSGCONBARCODE EDTWRD PAGNBRBLKFOLD FLTFIXDEC PRTQLTYCDEFNT FLTPCN REFFLDCHRID FNTCHRSET SKIPACHRSIZ FONT SKIPBCOLOR HIGHLIGHT SPACEACPI IGCALTTYP > SPACEBCVTDTA IGCANKCNV TEXTDATE IGCCDEFNT TIME> DFT IGCCHRRTT TRNSPYDLTEDT INDTXT UNDERLINEBottomF3=Exit F5=Refresh F9=Input keyword parameters F10=Specify informationF12=Cancel F16=Remove all keywords选择(opt)2 进行该项的内容说明 4 是取消该项说明在这些选项中经常用到的是:DFT 若前面有”>”则说明该项是常量域,否则是变量域。

AS400中文教程

AS400中文教程

AS400中文教程AS400是一种使用广泛的主机操作系统,也是一种经典的企业级计算机系统。

它具有稳定性、可靠性、安全性和易用性等特点,广泛应用于企业、金融、物流、制造等领域。

本篇教程将介绍AS400的概念、原理、操作和应用等内容,帮助初学者了解和掌握AS400系统。

一、AS400是什么AS400(即IBMi)是IBM公司推出的一种企业级计算机系统。

它以稳定性、可靠性和安全性著称,广泛应用于企业的核心业务系统和数据处理中心。

AS400采用了先进的虚拟化技术,可以同时运行多个操作系统和应用程序,提供强大的计算和存储能力。

二、AS400的原理AS400的核心原理是通过操作系统管理和控制计算机硬件资源,提供一种可靠、高效的计算环境。

AS400操作系统采用了独特的对象概念,将计算机资源(例如打印机、磁盘、网络连接等)抽象为对象,通过开放的API接口提供给应用程序使用。

这种面向对象的设计可以方便地进行系统管理、应用开发和资源分配。

三、AS400的基本操作1.登录系统:AS400通常通过终端或PC客户端进行远程登录。

输入正确的用户名和密码后,即可登录到系统。

2.发布任务:AS400支持多任务处理,可以同时运行多个任务。

通过发布任务可以在系统中创建新的任务,并指定其优先级和执行时间。

3.管理文件:AS400系统使用基于对象的文件系统,管理文件非常方便。

可以通过命令行或图形界面操作,创建、删除、复制和移动文件等。

4.资源监控:AS400提供了强大的系统监控工具,可以实时查看系统的运行状态、资源使用情况和性能指标等。

通过监控可以及时发现和解决系统问题,保证系统的稳定运行。

四、AS400的应用1.金融系统:AS400可以作为金融机构的核心业务系统,处理各种金融交易、资金结算和风险管理等业务。

2.物流系统:AS400可以用于物流企业的仓库管理、货物跟踪和配送管理等业务。

3.制造系统:AS400可以用于制造企业的生产计划、工艺控制和品质管理等业务。

AS400基础知识

AS400基础知识
返回
文件(File)
文件是包含了一组记录集合的目标。用户可以通过人机交互界面、实用 软件或程序对文件内的记录进行操作。 文件主要包括物理文件、逻辑文件、假脱机文件等,物理文件又分成 源物理文件和数据物理文件两种,源物理文件内的记录被称作“成员” (Member),通常包含着可编辑的程序源码或一般文本;数据物理文件就 是数据库文件,每个数据物理文件由一个或多个成员构成,每个成员都有 相同的数据库结构,成员内包含有实际数据。对数据物理文件的操作实际 上就是对其某个成员的操作,如不做特别指定,就是指对第一个或唯一一 个成员的操作。 逻辑文件就是视图文件,它可通过指定关键字、选择条件键字等定义 某一数据物理文件的存取方法(或称“存取路径”)。逻辑文件是一种定 义,本身不含任何数据,用到时可动态联接数据物理文件。另外,结合文 件是逻辑文件的一种,它依赖于不止一个的数据物理文件,可将多个有关 的数据物理文件在逻辑上结合成一个大文件,并定义其存取路径。 假脱机文件(Spool File)是存储在输出队列中等待打印输出的文件, 通常一个操作的结果可选择输出到屏幕上或假脱机文件中,后者的好处是 可保留较长时间。 返回
返回
系统操作

处理方式 开发工具
返回
处理方式



作业控制 。 AS/400的作业可分为交互式作业与批作业,交互式作业是从一 个用户Sign on进入系统,到Sign Off退出系统为止, 可以用 wrkactjob命令进入作业界面并选择选项,来挂起、结束等控制 交互式作业。 可以用sbmjob命令来提交批作业(批作业是在系 统的后台运行),然后用wrkactjob命令进入作业界面来控制批 作业(可根据类型来判断交互式作业与批作业)。 打印控制。 对作业进行处理后会形成输出,输出在被打印之前是以假脱机 文件形式存储在输出队列中的。 可以用wrksplf命令进入假脱 机文件界面,来更改、挂起、显示、删除等假脱机文件控制。 报文处理。 可以用sndmsg命令将报文从你的工作站上发送到报文队列中, 接受方可以用dspmsg命令来查看报文。

IBM AS400教程(完整版)

IBM AS400教程(完整版)

AS/400教程完整版第一章AS/400系统概况1.1 AS/400发展历史1.1.1 AS/400发展历史Figure 1-1. AS/400的发展历史为了深入了解一个系统,必须熟悉它发展的历史和背景。

多数的计算机系统是从原有的系统基础上发展起来的。

AS/400的发展历史:◇ 1969年6月发布System/3(Batch machine)◇ 1975年1月发布System/32 (用于小型商务办公环境)◇ 1977年4月发布System/34◇ 1978年10月发布System/38(第一代AS/400,商业上失败,技术上成功)◇ 1983年5月发布System/36(商业上非常成功)◇ 1988年6月发布AS/400 B型号(Application System/400,第二代AS/400)◇ 1994年5月发布AS/400先进系列/服务器(Advanced System/400,第三代AS/400)◇ 1995年6月发布AS/400 Power PC 先进系列/服务器◇ 1997年8月发布AS/400e系列◇ 1999年2月发布AS/400 e 服务器170、7XX◇ 1999年7月发布AS/400e Domino 专用服务器(莲花宝箱)◇ 2000年10月发布iSeries 400,包括270、820、830、840及IBM莲花宝箱(DSD)1.2 iSeries 400的特点1.2.1 iSeries 400的特点Figure 1-2. iSeries400iSeries 400通过紧密集成硬件、软件、中间件和操作系统提供能够满足不同业务需求的高性能、可靠和易于使用特性。

从e系列开始,在电子商务大舞台上开始扮演更为重要的角色。

它可以提供扩展业务确保电子商务优势所需的技术和工具。

它的突出特点有:● 卓越的性能,不断获得各种荣誉和认可,全面实现64位处理,先进的体系结构,最领先的SOI芯片技术;● 卓越的可靠性和可用性,系统可提供99.97%的可用性,使iSeries成为商业关键事务处理的首选服务器平台;● 高度集成的系统环境,使用户不需要太多的系统管理员就能保证其应用平稳地运行;● 严密的安全防范系统,荣获美国联邦政府定义的商业计算机最高安全性级别C2级认证,堪称世界上"最安全"的计算机系统。

AS400开发初阶

AS400开发初阶

AS/400开发初阶1OS/400 (3)1.1基本系统概念 (3)1.2作业 (3)1.3程序开发 (4)1.3.1PDM介绍 (4)1.3.2AS/400的源码编辑器 (5)1.3.3AS/400的程序 (6)2DB2/400简介 (8)2.1DDS简介 (8)2.2创建一个物理文件PF (8)2.3创建一个逻辑文件LF (9)2.4DB2的常工具 (9)3RPG语言 (9)3.1H定义 (10)3.2F数据库引用 (10)3.3D数据定义 (10)3.3.1定义格式 (11)3.3.2例子 (11)3.4C计算逻辑 (12)3.4.1常用C源码结构 (12)3.4.2程序参数 (13)3.4.3子例程 (13)3.4.4调用其他程序 (13)3.4.5程序分支 (13)3.4.6程序退出 (15)3.4.7数据库操作 (15)3.4.8常用RPG操作码 (17)4后台业务系统开发 (19)4.1联机交易 (19)4.1.1交易调试 (19)1OS/4001.1 基本系统概念●对象AS/400的操作对象称为:Object。

Object包括的信息:1.包含该对象的库2.对象名3.对象类型(*PGM,*FILE,…)4.对象的属性(对于*FILE,有LF,PF-DTA,PRTF,DSPF)5.拥有该对象的用户权限AS/400的对象由(库/对象名/对象类型)唯一确定。

查看某对象:WRKOBJ●库库也是一种对象,相当于AS/400的目录。

DOS目录有多级,即目录下有目录。

但库只有一级,库下不能有库。

AS/400的文件系统只有3级:库->文件->成员;例如在APPLIB库下有APPPF的文件,表示为APPLIB/APPPF。

创建库:CRTLIB●库列表相当于作业的工作目录,类似于DOS的PA TH当前作业库列表的常用命令:dsplibledtlibladdlible●汉字支持使用汉字支持:CHGSYSLIBL QSYS2989不使用汉字支持:CHGSYSLIBL LIB(QSYS2989) OPTION(*REMOVE)●命令菜单OS/400中,进入一个菜单,用go menuName查看某一相关的命令go CMDxxx xxx代表命令含义的缩写,例如想看与库有关的命令,go cmdlib1.2 作业⏹概念作业:AS/400所有程序运行以JOB方式命令:wrkactjob子系统(subsystem):在OS/400中的一个作业运行环境,该运行环境定义一定的资源,如CPU,内存,IO等。

AS400教程

AS400教程

AS400教程【新客网AS400教程】AS/400 CL (Control Language) 控制语言是用户与操作系统之间的主要接口。

AS/400 CL控制语言基础◇课程大纲:l 第一章概述l 第二章 CL 编程l 第三章程序间的通讯l 第四章测试功能◆第一章概述提要:* CL 命令的作用* CL 命令的分类* 系统菜单1.1 CL 命令的作用CL (Control Language) 控制语言是用户与操作系统之间的主要接口。

可以说用户治理和操作 AS/400 系统,均可以通过 CL实现。

用户在不同的工作站或客户端可以同时使用 CL ,其输入方式有五种: * 在命令行输入* 在菜单画面选择* 在 work with 菜单中,option 选项* 在 CL 程序中执行* 远程调用前三种输入方式给用户提供一种交互式的操作方法,只执行一条命令;第四种方式给用户提供一种操作,并包含逻辑控制,可以完整地实现一项功能;第五种方式给用户提供在客户端直接执行主机操作的接口。

由于 CL 使用了统一的命名方法,提供 prompt 式的提示功能和具体到域值的在线帮助,以及自动生成命令参数的缺省值, 再加上有效性检查,从而使得 CL 的使用变得非常简单、方便和灵活。

1.2 CL 命令的参数CL 使用了一种很科学,较为成功的命名方法。

每条命令由命令名和一系列参数组成。

命令名通常由动词加上接受动词的名词(定义为目标Object)组成,单词通常缩写为三个字母。

例如:CL 命令命令名Send Message SNDMSGCopy File CPYFWork with Device Desripyions WRKDEVDCL 的参数由要害字和参数值组成,要害字通常和命令一样缩写,它用于说明参数的作用,在命令输入屏,按F11 键,即可看到要害字。

在命令行输入命令时,假如参数是按照固定的顺序输入,则可以省略要害字。

例如:SNDMSG MSG (HOLLEO) TOUSR (LENG)命令名要害字参数值大多数 CL 都是针对目标而言,目标是一个占据了一定存储空间的实体,它包括自身属性及其数据特征的描述,系统可以对它进行操作。

AS400 IBM i平台Pase基础

AS400 IBM i平台Pase基础

OS/400 PASE 入门跨平台应用程序开发和部署是任何有效的商务计算环境的关键组成部分。

同样重要的是使用的简易性和系统提供功能的集成— iSeries 和 AS/400e(TM)服务器的标志。

由于业务转移到日益开放的计算环境之中,您很有可能会发现,归档这些离散的目标很困难、费时和昂贵。

例如,您可能想要熟悉在 AIX 操作系统上运行的应用程序,并充分利用 AIX 操作系统的功能,但您却不想增加管理 AIX 和 OS/400 操作系统的负担。

此时 OS/400 可移植应用程序解决方案环境(OS/400 PASE)可帮助您解决问题。

OS/400 PASE 允许您在 OS/400 上稍加更改或不作任何更改的情况下运行许多 AIX 应用程序二进制,并有效扩展您的平台解决方案任务夹。

OS/400 PASE 是什么?“OS/400 可移植应用程序解决方案环境”(OS/400 PASE)是用于运行在 OS/400 上的 AIX 应用程序的集成运行时环境。

它支持 AIX 的“应用程序二进制接口”(ABI),并支持 AIX 共享库、外壳程序和实用程序所支持功能中的大部分。

OS/400 PASE 支持 PowerPC(TM)机器指令的直接执行,因此它没有只模仿机器指令的环境的缺点。

OS/400 PASE 应用程序有以下特点:∙可以用C、C++、Fortran 或PowerPC 汇编程序来编写∙使用与AIX PowerPC 应用程序相同的二进制可执行文件格式∙在OS/400 作业中运行∙使用OS/400 系统功能,如文件系统、安全性和套接字请记住,OS/400 PASE 不是在 OS/400 上的 UNIX 操作系统。

OS/400 PASE 的设计目的是为了作很少更改或不作更改便能在 OS/400 上运行 AIX。

来自任何其它基于 UNIX 环境中的程序要先被改写才能在 AIX 上进行编译,这是在 OS/400 PASE 中运行这些程序的第一步。

AS400开发入门-By adan

AS400开发入门-By adan

AS/400开发介绍1.1 AS/400应用开发概述 ........................................................... 错误!未定义书签。

1.1.1数据描述规范(DDS data description specification) ......... 错误!未定义书签。

1.1.2DB2 QUERY MANAGER AND SQL DEVELOPMENT KIT支持的结构化查询语言SQL/400 .................................................................................. 错误!未定义书签。

1.1.3APPLICATION DEVELOPMENT TOOLSET/400(ADTS/400)开发工具包中有PDM、SEU、SDA、RLU、DFU等 .............................................. 错误!未定义书签。

1.PDM(ROGRAMMING DEVELOPMENT MANAGER) ..... 错误!未定义书签。

2.SEU(SOURCE ENTRY UTILITY).................................... 错误!未定义书签。

3.SDA(SCREEN DESIGN AID).......................................... 错误!未定义书签。

4.RLU(REPORT LAYOUT UTILITY) ................................. 错误!未定义书签。

5.DFU(DA TA FILE UTILITY) ............................................ 错误!未定义书签。

1.1.4QUERY/400 ................................................................... 错误!未定义书签。

AS400开发经验点滴

AS400开发经验点滴

AS/400开发经验点滴(一)AS/400开发经验点滴(一)AS/400系统开发工具及开发语言很多,有许多技术性的东西并不是我们能经常碰到的,但这些东西在一些实际应用中很有用处。

本人在几年AS/400系统上的开发中,也有一些经验。

有些东西如果不把其形成文字,过一段时间后,本人都会很快忘掉,比如我现在要写两年前的经验就很费劲。

现把其中一些经验总结出来,与大家共享也行,自娱自乐也行。

本文不是学术论文,仅仅是一些开发经验总结,有不严谨的地方必定在所难免。

一如何在CL程序自动回复询问类消息(Inquiry Message)在AS/400系统开发中,经常要与各种各样的消息打交道。

有一类叫“Escape Message”的消息,是当程序出现错误后,会强迫程序异常结束,并告诉错误类型和原因。

但经常时候我们不希望因为这些错误而使程序异常停止,在CL程序中,通常做法是用MONMSG命令来监视这些消息,而后采取相应的正确动作,或者引导程序结束。

MONMSG一样还可以监视“Status Message”和“Notify Message”。

但是有一类“Inquiry Message”,MONMSG还是无法监视,这类消息通常有多个回复选择项,要求用户必须给一个选择答复,因而通常会暂停程序运行,而显示一个要求用户给消息进行回复的画面。

那么如何在程序中让程序自动选择一个正确的回复项回复呢?如能自动答复,就不需要手工再回复了。

在作业JOBD里,有INQMSGRPY选择项,有三个选择:*RQD,*DFT,*SYSRPYL,这个INQMSGRPY 就是表示指定Inquiry Message的答复方式,通常创建JOBD的时候INQMSGRPY项缺省是*RQD,这就表示需要操作员手工答复方式。

而*DFT和*SYSRPYL就表示了两种程序可以自动答复的方式。

1.消息答复缺省值法如果在作业JOBD里INQMSGRPY选项指定为*DFT方式,则程序会自动使用消息的缺省答复项,询问消息就不会再在屏幕上显示。

AS400教程范文

AS400教程范文

AS400教程范文AS400(iSeries)是IBM公司推出的一台中型计算机。

AS400系统采用了类Unix的操作系统OS/400,具有良好的稳定性和可靠性,并且适用于多种应用场景。

下面将为你介绍AS400系统的基本概念和操作方法,希望对你理解和使用AS400系统有所帮助。

一、概述AS400系统是基于硬件与操作系统的一套完整的商业系统。

它具有强大的处理能力、丰富的存储设备、高效的网络能力,并且可以同时支持多个应用程序的并发处理。

AS400系统采用了面向对象的开发模式,具有良好的跨平台性和易维护性。

它提供了多种编程语言和开发工具,如RPG、COBOL、Java等,可以满足不同开发需求。

二、AS400的基本操作1.登录系统在启动AS400系统后,需要输入用户名和密码登录系统。

通常情况下,用户名和密码会由系统管理员提供。

登录成功后,可以开始使用AS400系统的各种功能。

2.命令行界面3.图形界面4.数据库管理5.文件管理6.批处理作业三、AS400的开发工具1.RPGRPG是一种专门用于AS400系统开发的编程语言,具有良好的可读性和可维护性。

可以通过RPG语言来开发各种应用程序,如报表生成、数据处理等。

2.COBOLCOBOL是一种广泛应用于商业系统开发的编程语言,也可以用于AS400系统的开发。

COBOL语言具有良好的可移植性和可靠性,适合用于开发大型的商业应用。

3. JavaJava是一种跨平台的编程语言,在AS400系统中同样可以使用Java 进行开发。

通过Java语言,可以开发跨平台的Web应用程序和企业级应用程序。

4.开发工具AS400系统提供了多种开发工具,如WebSphere Development Studio Client(WDSC)、Rational Developer for i(RDi)等。

这些开发工具提供了丰富的功能和组件,可以大大提高开发效率。

四、AS400的系统管理1.用户管理2.系统监控3.系统备份和恢复总结:AS400系统是一款功能强大的中型计算机系统,具有良好的稳定性和可靠性。

AS400入门

AS400入门
通信机能
可与其他终端或系统传递数据
控制语言(CL-Control Language)
指令的形式
指示操作的命 令
指令名 + 参数
指示操作的内容
例:CALL PGM(SEIKYU)
指令名命名规则
动词 + 目的语
例:生成指令---CRTXXX(CReaTe XXX) 开始指令---STRXXX(STaRt XXX) 结束指令---ENDXXX(END XXX)
记录的读取方法
➢ 指定读取顺序 ➢ 限定读取字段 ➢ 选择条件
DB文件例
a.
[物理文件] 得意先マスター
得意先 得意 住所 電話 売掛金
番 号 先名
番号 残 高
b. 直接邮寄用 得意先番号
记录样式
c.
读取顺序
债权管理用 売掛金降序 売掛金10万元以上
记录样式
[逻辑文件]
得意先 得意 住所 番号 先名
源程序文件成员:生成/修改 数据库文件成员:表示/删除
Query(动态信息检索)
Query的使用流程
➢ 定义:哪个文件的哪个记录按何种次序输出
➢ 执行:结果可输出到显示器,打印机,文件
Query的机能
➢ 选择特定的记录
QUERY
DB文件
➢ 按一定顺序分类
➢ 集计
➢ 四则运算

➢ 编辑打印

打印报告
DDS登录 (STRSEU)
生成打印文件 (CRTPRTF)
辅助存储器 源文件 打印文件
程序的生成
程序类型
➢ 对话型:利用画面与操作员边对话边处理 ➢ BATCH型:无需操作员参加统一处理
文件类型
➢ DB文件 ➢ 画面文件 ➢ 打印文件

AS400初级入门

AS400初级入门

AS400初级入门As/400基本概念与术语1.4对象和对象管理在1.3节中我们知道TIMI由两部分组成:指令和对象。

准确地说AS/400是一个基于对象(object-based)的系统,而不是一个面向对象(object-orientd)的系统。

在AS/400中,对象不具备继承性(inheritance),也没有类(class)和子类(subclass)概念。

AS/400中的对象就像一种容器(containerz),所有用户和系统的数据结构都被封装在这些容器中,此外,对象的封装性(encapsulation)还表现在对象对外界的透明性,即从外界不能看到对象的内部细节。

围绕对象模型建立的系统支持应用程序独立于对象。

对象内部数据结构等细节的改变不影响应用程序和操作系统对“对象”的操作。

1.5.1OS/400对象与MI系统对象有些对象类型在OS/400和MI(注:如果没有特殊申明,本篇中的IM均指TIMI)中都是有效的。

表1.5.1给出了OS/400对象的类型。

作为比较,表1.5.2列出了MI系统对象的类型。

部分OS/400对象与MI系统对象是一一对应的,但它们的名称不一定相同。

名称表 1.5.1 OS/400对象Authorization list jourmalChart fotmatjournal receiverClass libraryClass of service description line descriptionCommand menu definitionConfiguration list message fileController description message queueData dictionary mode descripfionDevice descripltion module DocumemtDocument listnetwork interface description Data areaoutpt queueData queuepanel group definitionEdit descriptionproduct definitonFileprogramFolderquery definitionForms control tablerefernce code translate table Graphics symbol set s/36 machine description Ldeographic character table service programLdeographic dictionarysession description Ldeographic sort table spesion descriptionLniormation search index subsystem descriptionJob descriptiontableJob queue user indexUser profile相同的例子有program,名称不同的如library(context)。

AS400基础培训

AS400基础培训

AS400基础培训AS/400基础培训⽬录1AS/400体系结构介绍 (2)1.1AS/400性能概述 (2)1.2对象和对象管理 (2)1.3⼯作管理 (3)2AS/400的基本操作 (4)2.1菜单、⼊⼝、列表和信息 (4)2.2常⽤命令 (5)3ILE RPG/400编程⼊门 (6)3.1⽂件的创建和操作 (6)3.1.1物理⽂件 (6)3.1.2逻辑⽂件 (7)3.2ILE RPG程序编写 (7)3.2.1常⽤规范表 (7)3.2.2内部函数 (9)3.2.3表达式 (9)3.2.4操作码 (10)3.3模板学习 (11)3.4编程练习 (12)4SQL/400介绍 (12)1AS/400体系结构介绍1.1 AS/400性能概述集成性AS/400把数据库、通讯、安全性等功能集中在操作系统中,最⼤限度地实现了各功能之间的兼容性。

开放性⽀持SNA、TCP/IP协议,DB2/400可与⼤多数数据库系统实现互联。

可移植对SPEC1170的⽀持可达到95%,相当于⼀般UNIX操作系统。

兼容性所有应⽤可上下兼容。

可连接性哑终端(5250)、仿真终端(PC Communication、Client Access、GUI)可⽀付性可扩充性1.2 对象和对象管理基于对象AS/400中,MI由指令和对象组成。

也就是说,AS/400是基于对象(object-based)的系统,⽽不是⼀个⾯向对象(object-oriented)的系统。

在AS/400中,对象不具备集成性,也没有类和⼦类的概念。

在AS/400的定义中,系统上所有可存储和检索的东西,都叫做对象。

对象由描述这个对象的描述和它的值组成。

对象的描述包括:名称、类型、⼤⼩、建⽴⽇期、建⽴对象者提供的简单描述、以及存储对象的库的名称。

对象的要素⽬录名、对象名和对象类型唯⼀确定⼀个对象。

对象⽬录AS/400中的⽬录结构是单层的,因此对象的表达形式为“Library/Object”。

AS400教程

AS400教程

AS400教程本教程将介绍AS400操作系统的一些基本功能和常用命令,以帮助用户更好地理解和使用AS400系统。

一、作业管理作业管理是AS400系统最重要的功能之一,它可以帮助用户有效地管理和控制系统中的作业流程。

以下是一些常用的作业管理命令:1.WRKJOB:用于查看和管理正在运行的作业,可以查看作业的状态、作业队列、作业日志等信息。

2.STRSRVJOB:启动一个后台作业,可以在后台运行用户指定的任务。

3.ADDJOBSCDE:添加一个作业计划,可以在指定的时间和日期自动启动一个作业。

4.DEPJOB:设置作业的依赖关系,当一个作业完成时,可以自动启动下一个作业。

二、用户管理1.CRTUSRPRF:创建一个新用户账户,可以指定用户的登录名、密码、菜单等信息。

2.CHGUSRPRF:修改用户账户的属性,如密码、权限等。

3.DLTUSRPRF:删除一个用户账户。

4.WRKUSRJOB:查看用户账户相关的作业信息。

三、文件管理1.CRTLIB:创建一个新的库,库是AS400系统用来存储文件和数据的基本单位。

2.CRTF:创建一个新的文件,可以指定文件的格式和属性。

3.OPNQRYF:打开一个查询文件,可以按照指定的条件查询文件中的记录。

4.CPYF:复制文件,可以复制一个文件到另一个文件或库。

5.DLTF:删除一个文件。

6.DSPFD:显示文件的描述信息,包括文件的大小、保存日期等。

7.WRKLIB:查看和管理库,可以查看库中的文件列表和属性。

四、打印管理1.WRKSPLF:查看和管理打印输出队列,可以查看打印任务的状态、优先级等信息。

2.WRKOUTQ:查看和管理输出队列,可以查看输出队列中的作业,如打印任务、文件等。

3.PRTUSRPRF:设置用户的打印输出设备。

4.CHGOUTQ:更改打印输出队列的属性,如优先级、限制等。

五、系统管理1.WRKSYSSTS:查看系统的状态和性能指标,如CPU利用率、内存占用等。

AS400基本操作

AS400基本操作

• 参数的位置
DSPLIB YZGLIB *PRINT
• 参数的提示
DSPLIB (F4)
命令的查找
命令的查找方法: 命令的查找方法: 1.命令行直接按 命令行直接按F4 命令行直接按 2.Go CMDXXX 例如: 例如:Go CMDLIB Go CMDDSP
主要内容 • 1、AS400简介 • 2、CL命令 • 3、AS400基本概念 • 4、开发用户界面
System Libraries (15 maximum)
Current Library
User Libraries (25 maximum)
基本概念---队列 基本概念 队列
• 三种基本队列(QUEUE) • 消息队列(Message Queue)等待显示的 信息 • 作业队列(Job Queue)等待处理的后台 批作业 • 输出队列(Output Queue)等待打印的 Spooled File
AS400基本概念 主要内容 基本概念---主要内容 基本概念
作业( 作业(JOB) 库(LIB) 队列(QUEUE) 队列 子系统(SBS) 子系统 消息(MSG) 消息 系统值(SYSVAL) 系统值 描述(Description) 描述 ) 安全
基本概念-作业(JOB) 基本概念 作业( ) 作业 • 指的是用户提交的工作单元,而进程(PROCESS)则 是提交给底层机器的工作单元,一个进程可以在一系统 的进程中运行。(system(subsystem(job(routing step)))) • 作业有5种: 1.打印作业 • 2.交互式作业 • 3.批作业 • 4.自启动作业 • 5.通信作业 • 作业名称:Number/User/Name(序列号/用户名/作业名)
  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
6.退出PDM
(1)按F12,退回上一级
(2)按F3,退到PDM菜单
1.2.3
*启动编辑器:STRSEU命令/PDM
*编辑界面分三部分
行序号——系统产生
数据内容——用户编辑
最后修改日期——系统产生
*左移屏幕F19;右移屏幕F20;
*编辑命令(在行序号上敲入命令)
1.位置
A-在当前行后
B-在当前行前
2.插入行
go CMDxxx xxx代表命令含义的缩写,例如想看与库有关的命令,go cmdlib
1.2
概念
作业:AS/400所有程序运行以JOB方式
命令:wrkactjob
子系统(subsystem):在OS/400中的一个作业运行环境,该运行环境定义一定的资源,如CPU,内存,IO等。在OS/400中可以定义多个子系统
查看一般流程:
1.进入SPOOL FILE
2.在Control栏敲入”b”,(bottom),翻到SPOOL FILE的最后
3.在Message Totals:项中,如果没有(警告/错误/严重错误)的信息,则表示编译通过
Warning (10) . . . . . . . : 0
Error (20) . . . . . . . : 0
*程序调试
使用源码调试的程序,使用编译命令编译时参数DBGVIEW不能为*STMT
(1)启动调试
STRDBG PGM(PGMLIB/PGMOBJ)UPDPROD(*YES)
(2)设置调试断点
将光标停在断点源码行,按F6。如要取消断点,再按F6
可以设置多个断点
(3)完成设置断点后,退出
(4)调用程序,进入程序并停在断点
数据类型
空/A字符
D日期
P/S压缩/区位数字
T时间
*指针
小数位长度
关键字
3.3.2
定义常量
NameTypeTo/LengthDataTypeDecPosKeywords
C_VAR C'HELLO'
定义字符变量
NameTypeTo/LengthDataTypeDecPosKeywords
V_STRS10A
查看作业打开blog+13
当查看JOB的LOG的信息
1.显示作业的LOG列表
2.将光标移到某行信息,按F1看详细信息
3.看该信息由那一程序产生。再按F9
4.AS/400的信息文件(MSGF,由应用EC/系统定义)
WRKMSGF命令
后台业务系统的MSGF:EC
CALL PGM(BANKOBJ/MYRPGLE)
(5)调试命令
*单步执行F10
*多步执行F12
*可以重新设置/取消断点F6
*显示变量值VAR1
方法1.将光标移到该变量VAR1,按F11
方法2.在debug命令行,键入EVAL VAR1
*改变变量值VAR1
EVAL VAR1=xxxxxx
(6)退出程序
编写源码行,就相当于往数据库添加记录
(2)程序源码是源码文件中的一个源码成员,源码文件可以包括多个源码成员
*程序编译
RPGLE程序,使用CRTBNDRPG命令
CRTBNDRPG PGM(PGMLIB/MYPGM) SRCFILE(MYSRCPF/MYSRCMBR)
SQLRPGLEC程序,使用CRTSQLRPGI命令
Severe Error (30+) . . . . . . : 0
4.如果编译不通过,往前翻一页,按PgUp键,查看错误报告
Msg id Sv Number Message text
*RNF7031 00 108 xxxxxxxx
*RNF7066 00 1 xxxxxxxx
*RNF7030 30 1 xxxxxxxx
长度
如果执行结果字段不是在D数据定义部分定义的,这需要在该行源码定义
小数位长度
如果执行结果字段不是在D数据定义部分定义的,这需要在该行源码定义
CL,CLLE程序,使用CRTBNDCL命令
PDM中,编译快捷命令
14编译
CP RPGLE的编译
CQ SQLRPGLE的编译
*程序编译出错
查编译信息:
使用编译产生的SPOOL FILE,它是一个文本文件,报告编译过程中的相关信息。
用WRKSPLF命令,列出本交互作业的所有SPOOL FILE,找出名字与程序名字相同的最后一个SPOOL FILE,就是最后一次编译所产生的SPOOL FILE。
(1)按F6,创建新源码库
(2)在指定的库,键入12,进入该源码库
4.显示该指定源码库的所有源码文件
(1)按F6,创建新源码文件
(2)键入12,进入指定的源码文件
5.显示该源码文件下的所有源码成员
(1)按F6,创建新的源码成员
(2)键入2,编辑源码
(3)键入3,拷贝源码
(4)键入4,删除源码
(5)键入5,显示源码
当前作业库列表的常用命令:
dsplibl
edtlibl
addlible
汉字支持
使用汉字支持:CHGSYSLIBL QSYS2989
不使用汉字支持:CHGSYSLIBL LIB(QSYS2989) OPTION(*REMOVE)
命令菜单
OS/400中,进入一个菜单,用go menuName
查看某一相关的命令
定义数值变量
NameTypeTo/LengthDataTypeDecPosKeywords
V_NUMS14S2
小数点定义要右对齐、
定义日期变量
NameTypeTo/LengthDataTypeDecPosKeywords
V_DATESD
系统默认使用*ISO日期格式,即2002-09-21格式
定义时间变量
回车
*存盘
在SEU命令行,键入SAVE
*退出SEU
F3
1.2.4
*程序类型
C
CL
CLLE
RPGLE
*创建程序源码
2.创建一个源码库
CRTLIB LIB(MYLIB)
3.创建一个源码文件
CRTSRCPF FILE(MYLIB/MYSRCPF) RCDLEN(112) IGCDTA(*YES)
4.创建一个源码成员
查看某对象:WRKOBJ

库也是一种对象,相当于AS/400的目录。
DOS目录有多级,即目录下有目录。但库只有一级,库下不能有库。
AS/400的文件系统只有3级:库->文件->成员;
例如在APPLIB库下有APPPF的文件,表示为APPLIB/APPPF。
创建库:CRTLIB
库列表
相当于作业的工作目录,类似于DOS的PATH
常用系统MSGF:QCPFMSG
1.2.1
1.2.2
PDM是AS/400的集成开发环境
AS/400的程序文件结构
库(libraries)/源码文件(objects)/源码成员(members)(程序源码)
使用PDM
1.进入PDM命令
STRPDM
2.显示PDM的菜单,选1,并键入指定源码库
3.显示该指定源码库
5.注意”Sv”中,不为00的项目,即为编译不通过错误语句
6.查看源码中错误语句,在Find栏中,敲入”Sv”不为00的Msg id,例如RNF7030,然后按F16搜索源码,定位在出错的源码语句
7.退出SPOOL FILE,重新进入源码编辑,修改源码
8.重新编译
*程序执行
CALLPGM(MYLIB/MYPGM) PARM(“PARM1” “PARM2” “PARM3”)
NameTypeTo/LengthDataTypeDecPosKeywords
ACCTDS
CUNO 10 A
ACSF 5 A
3.4
3.4.1
每一行C源码结构:
Lvl N01Factor 1OpCodeFactor 2ResultLenDecHiLoEqComment
指令因子1
指令操作码
指令因子2
执行结果
NameTypeTo/LengthDataTypeDecPosKeywords
V_TIMEST
定义数组
定义有10个元素的字符数组
NameTypeTo/LengthDataTypeDecPosKeywords
V_DIMS10 ADIM(10)
数组元素使用,建议使用RPG IV的格式。
V_DIM(N)
定义数据结构
地址类型
空不使用索引语句,不能用CHAIN,SETxx语句
K使用索引语句
设备
DISK数据库文件
关键字
PREFIX(xxx)引用数据库字段前加前缀xxx
COMMIT使用数据更新的确认/回滚机制
程序中使用COMMIT,该作业必须事先启动COMMIT控制
启动COMMIT:STRCMTCTLLCKLVL(*CHG)
(4)索引键字
如果有索引键字定义,则该数据库文件包含索引
名称类型为K
可以有多个键字
编译DDS,创建PF
CRTPF命令
或14
2.3
逻辑文件是索引文件
(1)文件级关键字
UNIQUE控制索引键字唯一
(2)记录级关键字
PFILE(PFNAME)逻辑文件对应的物理文件
(3)索引键字
名字类型K
可以有多个索引键字
2.4
RUNQRY
浏览数据库文件
RUNQRY QRYFILE((AM1))
RUNQRY QRYFILE((AM1)) RCDSLT(*YES)
UPDDTA
UPDDTA FILE(BANKDTA/MYPF)
相关文档
最新文档