樱桃先生

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字段来...

事务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数据域（*DTAARA）是系统对象中的一种类型。当建立了这种对象后，可以用来存入数据，以便任何程序进行读取和修改。数据域的典型用途如下： 数据域（*DTAARA）是系统对象中的一种类型。当建立了这种对象后，可以用来存入数据，以便任何程序进行读取和修改。数据域的典型用途如下： 提供用于几个程序中的常数字段，易于共享和修改。如：标题、说明等。 在一个作业中提供一个传递信息的区域。 在一个作业中提供一个字段作为控制参数，以便容易地得到修改。 修改数据区域的时候需要指定 位置 否则会自动覆盖之前的内容 SAVFSAVF，全称 SAVE FILE，存储文件。可以将 SAVF 视为一个存储容器，它能够将指定的库，或指定的数据文件，或源代码保存在其中 SAVF 只用于备份与恢复。虽然通常这些事情是系统管理员做的，但是如果环境许可的情况下，开发人员能了解这些命令，自行做做备份，就可以更好地对程序进行测试、保护源码。当然，在使用 RESTORE 命令时，一定要谨慎谨慎再谨慎 建立SAVF要使用 SAVF，首先我们当然需要建立一个 SAVF。如已有自己的 SAVF...

控制语言(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操作码汇总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行说明首位填上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...

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 *****...

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的发展史可以看出 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（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）**结构 将系统所有的...