10.21笔记
PF LF补充知识点 Nick哥说 下面这三种pdm的指令 加上strpdm 优先使用 wrkmbrpdm 在自己账号作业的时候 可以最快打开上次工作的lib WRKLIBPDM WRKMBRPDM WRKLIBPDM PF文件中 下列位置输入F 可以快速显示 格式行 Nick哥说 在PF或者LF在引用文件的时候 尽量不要出现指定库名 因为工作的时候环境很多 不应写死在文件中 DSPFD: 查询主键和member record format**详细信息 DSPFFD: 查询PF文件字段详细信息 CRTPF 参数相关 这行如果选*none 生成空file 选*file则在file里生成同名member Nick哥说这两行 优先填 *nomax 即不设上限 代码规范 Nick哥说 PF文件字段间用一行注释隔开代码会比较清晰 CHGPF 这个指令可以实现 更改原有的数据结构源码 而保留数据 RRN pf文件有类似sql里的自增主键字段 但是默认是不显示的 如果在没有unique的时候插入两条相同的数据 使用的时候就要根据这个RRN字段来...
AS/400事务和日志
事务COMMIT 提交当前事务.所有事务的更改都将为其他事务可见,而且保证当崩溃发生时的可持续性。在程序中经常使用 COMMMIT 来控制事物处理的完整性,保证在发生异常的情况下数据的完整性和正确性。访问数据库文件时使用 COMMIT/ROLBK,可以确保对数据库文件操作的一致性:全部数据库文件操作都是成功的 COMMIT 提交;全部数据库文件操作都是无效的 ROLBK 回滚. 用这种方法,从而保证了数据库文件的完整性;另外,可以把一组操作当作一个单元来处理。举个实际的例子,如果程序中,以修改的方式声明了四个文件 A、B、C、D,其中 A、B、C 都使用了 COMMIT 关键字,而 D 未使用 COMMIT 关键字;在程序执行过程中,首先更改了 A、B、D 的值在接下的处理中,如果业务流程判断,逻辑有误,不再执行,此时可以进行回滚操作,此时 A、B 的数据恢复成为修改之前的数值;D 的数据,因为在声明文件时未使用 COMMIT 关键字,所以回滚操作对它无效,即 D 的数据仍然保持修改之后的值;而如果业务流程判断正常,程序顺利执行完毕,此时需要进行一次确认操作(COMMI...
DTAARA和SAVF
数据域DTAARA数据域(*DTAARA)是系统对象中的一种类型。当建立了这种对象后,可以用来存入数据,以便任何程序进行读取和修改。数据域的典型用途如下: 数据域(*DTAARA)是系统对象中的一种类型。当建立了这种对象后,可以用来存入数据,以便任何程序进行读取和修改。数据域的典型用途如下: 提供用于几个程序中的常数字段,易于共享和修改。如:标题、说明等。 在一个作业中提供一个传递信息的区域。 在一个作业中提供一个字段作为控制参数,以便容易地得到修改。 修改数据区域的时候需要指定 位置 否则会自动覆盖之前的内容 SAVFSAVF,全称 SAVE FILE,存储文件。可以将 SAVF 视为一个存储容器,它能够将指定的库,或指定的数据文件,或源代码保存在其中 SAVF 只用于备份与恢复。虽然通常这些事情是系统管理员做的,但是如果环境许可的情况下,开发人员能了解这些命令,自行做做备份,就可以更好地对程序进行测试、保护源码。当然,在使用 RESTORE 命令时,一定要谨慎谨慎再谨慎 建立SAVF要使用 SAVF,首先我们当然需要建立一个 SAVF。如已有自己的 SAVF...
cl控制语言
控制语言(CL)概念CL 程序就是和RPG 相对应的,是控制语言(Control Language)。类型为CLP、CLLE 的源代码编译出来的程序,都属于CL 程序。CL 程序不像RPGLE 程序,在编写时,可以使用自由格式书写;一行的内容如果太长要,在最末尾处用“+”表示换行 编译此程序(一是,使用 CL 命令 CRTCLPGM,二是,使用PDM 菜单选项 14),然后CALL 之,系统就会执行命令WRKACTJOB,查看当前的活动作业,效果与在交互式命令行下输入WRKACTJOB 是一样的。当我们输入F12,退出WRKACTJOB 时,系统就会继续向下执行,发现是ENDPGM,表示程序结束了,于是判定执行完毕,退出至交互式画面。 CL编程程序的开始与结束 CL 程序,和RPGLE 程序一样,也可以有程序的入口参数,而且程序的入口参数都是可传递的(也就是输入的参数如果在程序中被修改过,那么原调用的程序中的相应参数也会进行变化。不过CL 的入口参数只能为字符型,或数字型的单个字段,不能象RPGLE 程序中那么多样化(字段、结构、数组、指针)。 如果CL 程序没有入...
RPG操作码汇总
RPG操作码汇总ACQ {(E)} (Acquire)取地址位。其实400 的程序中也有指针型变量,那么也就会有地址位,这个命令是取地址位的。ADD {(H)} (Add) 加法操作 基本语法: 12Factory1 Operation Factory 2 ResultFHS01 ADD FHS02 FHS03 // RPG 的语法 等价于 1EVAL FHS03=FHS01+FHS02 //RPGLE 的语法 FHS01、FHS02、FHS03 必须都为数字型变量(P 型,或S 型),或者就是数字意思是将Factory1 项的数据,加上Factory 2 项的数据,赋值到Result 项上 语法二:如果这样写的话: 12Factory1 Operation Factory2 Result ADD FHS02 FHS03 就等价于:EVAL FHS03=FHS03+FHS02即Factory 1 项未填时,就表示将Result 项的数据,加上Factory 2 项的数据,然后赋值到Result 项上 四舍五入:(H)...
RPG-F行说明
RPG(二)F行说明首位填上F,然后按F4,会出现如下内容: Filename:需要声明的文件名,必须顶格,文件名必须唯一,也就是程序中对同样的文件名不能声明两次。 File Type:声明文件的处理类型。必须填写。允许的选项有:I: 输入型,即只读文件,对声明的文件只取其记录的值,不对记录进行修改U: 修改型,即对声明的文件进行修改操作(删除记录属于修改操作的一种)O: 输出型,即只写,对声明的文件只进行写操作。C: 混合型,用于对屏幕文件的定义。(混合型,即输入/输出型,以屏幕文件为例,也就是读取屏幕文件的一些输入字段信息,同时也可以输出一些字段的值到屏幕文件中,但不能对屏幕文件自身进行修改,所以与上面的U 是有区别的) File Designation:文件的指定方式,允许的选项有:当“File Type”为I,U,C 时,这里填“F”(百分之90都是f)当“File Type ”为O 时,这里不填写 End of File:程序结束前,对记录的处理方式。可以不填,或填“E”。似乎不填,表示在程序结束前,要处理所有文件的所有记录(含LF);填E...
RPG入门
RPGPG 的全称:Report Program GeneratorIBM 的 AS/400 小型机上的高级语言.REPORT PROGRAM GENERATOR,程序运行效率很高.RPG 起始是一个非常简单的面向事务处理的编程语言, 用被储存在系统 IBM709 和 360 型号的 20 针打孔卡中的数据而生成报表.系统 3 由于它的硬式磁盘而带来了 RPG 2, 使它变成中型的 IBM 机器的标准应用程序语言 HelloWorld使用132位 类型选择RPGLE 首行输入C 按F4 12345*************** Beginning of data *******************C 'HELLO' DSPLY C 'WORLD!' DSPLY C RETURN *****...
AS/400(二)
AS400(二)DDS规则 A列在提示行 FMT PF 标记的,‘A’列,在一下任何一行记录,都要写 A,标记着这一行为有效记录。在‘A’后加*,表明此行为注释代码 T列类型项,此列有两种类型,R 说明定义了一个记录格式,如第 2 行的 T 列代码,紧跟其后边的是记录名,在描述字段时,此列不入力。如 3-11 行的代码。K 说明定义了一个键值。如 13 行代码标记。此表内将按照此字段排序。默认为升序。 NAME列名前项:此列分三种情况,一种为记录格式名。如第 2 行代码,说明的是此表的记录格式名为SYMASTR。第二种为字段名。如 3-11 行的代码,此处的含义为字段的定义名。字段名不可以重复。最大长度为 10 位 R项参照项:参照定义(R 表示只有当 T 列为空,NEME 列非空时有效,表示当前字段是一个参照字段,BLANK=当前字段非参照字段) LEN 项:长度项:字段长度 数据类型T型 常用的有效的数据类型有 A (字符)型,P(压缩十进制)型,S(区位十进制)型和 O(全角半角混用)型。下表给出数据文件有效的数据类型 字符 ...
IBM_i的体系结构
IBM i的体系结构从IBM i的发展史可以看出 IBMi经历了很多次的技术演进和变化,IBM i这个名字也是经过多次修改得到的 而一直没有改变的就是IBM i的五大设计原则 技术独立性 基于对象的设计 单级存储 软件集成 硬件集成 技术独立性第一个原则,可能也是最重要的一个原则,是技术独立性.与其它计算机系统不同,IBM i系列服务器并不是由硬件定义的,而是软件定义的.这就意味着程序并不直接与硬件”对话”,与之”对话”的是一个超越于各种硬件技术的机器界面,即Technology Independent Machine Interface(TIMI),我们称它MI.正是这个特性,保证了IBM i系列服务器能在不影响用户使用的情况下改变底层 硬件构架,使IBM i系列服务器永远不会过时.当新的硬件功能和设计加入时,系统本身及用户开发的应用能够马上运行于新的硬件上,并且充分享受新硬件和新设计带来的好处. 在MI与实际硬件之间是由几百万行代码组成的操作系统软件,我们称之系统特许内码(System Licensed Internal Code,SLIC).这个软件层将应用程序与底层...
AS400(一)
AS400(一)AS400简介/特点/存储结构AS400简介AS400(iSeries)是当今世界上最流行的中小型、多用户商业计算机系统(服务器系统),在多用户服务器领域里,始终保持着最畅销的地位。目前 AS400 在全球的装机量已超过 75 万套,覆盖 150 多个国家,支持 40 多种语言,有近 1 万个商业伙伴和独立软件商, 3 万多个商业应用。广泛应用于流通、金融证券、制造、运输等各个行业。 AS400系统支持的编程语言有DDS,RPG,CL,Cobol, C等,支持DB2等数据库 对数据的高效处理和极高的安全性是AS400的核心优势之一 AS400特点升级性 系统和硬件升级时,应用程序无需升级 安全性 无病毒,未被入侵过 集成性 高度集成的系统环境,除含有操作系统功能外还有网络通信功能,数据库管理功能,安全管理功能等 AS400存储结构 ASP(Auxiliary Storage Pools) 辅助存储池,是系统的可用空间 存储的均为Object 单级存储结构(自动存储) **单级存储(Single-level store)**结构 将系统所有的...



