2024年RPGAS400程序员培训手册VIP免费

2.8.4.4O--RON-ERROR(On-Error)没用过OPEN{(E)}(OpenFileforProcessing)打开文献Factory1OperationFactory2ResultHILOEQOPEN文献名OPEN背面的目的，必须是在目前途序中已申明的文献名（不是文献的记录格式名），并且在OPEN操作之后，在程序结束之前之前，必须有对应的CLOSE操作。使用OPEN操作，文献在申明时，必须使用USROPN关键字（详见D行阐明）。ORxx(Or)逻辑判断—或Factory1OperationFactory2ResultHILOEQFLD01IFGTFLD03FLD01OREQFLD02等价于IFFLD01>FLD03ORFLD01=FLD02与IF、IFxx，AND、ANDxx类似，RPGLE的写法OR，比RPG的写法ORxx要灵活，并且可以用来体现某些复杂的逻辑关系。有鉴于此，因此一般IF语句中，我会以OR为主，基本不用ORxx。假如在编程序方面，企业/项目组无硬性规定，那我觉得还是少用ORxx吧，总觉得这种写法的逻辑关系看起来不直接，尤其是有很复杂的AND,OR时。OTHER(OtherwiseSelect)分支语句的判断与分支语句SELECT一起使用，表达不符合上述所有条件时的操作，如下：Factory1OperationFactory2ResultHILOEQSELECTWHEN条件判断1处理语句1WHEN条件判断2处理语句2OTHER处理语句3ENDSL在这个例子中，当满足条件判断1时，运行处理语句1，运行结束后跳至ENDSL处；假如不满足条件判断1，则程序继续向下执行，判断与否满足条件判断2。当满足条件判断2时，运行处理语句2，跳至ENDSL；当不满足当不满足条件判断2时，程序继续向下执下，当读到OTHER操作码时，无条件运行处理语句3（即当程序目前不满足以上因此条件判断时，则执行OTHER之后的语句。处理语句容许有诸多句；条件判断可以写得很复杂，也容许对不一样的字段进行判断；例如说C语言也有分支语句switch，不过这个语句只能对一种字段进行分支判断，ILE语言与它不一样，容许对不一样的字段进行判断就我目前掌握的测试状况，上述的SELECT—WHEN--OTHER—ENDSL，其实也可以写做：IF条件判断1处理语句1ELSEIF条件判断2处理语句2ELSE处理语句3ENDIF即WHEN与ELSEIF是类似的，这样说，应当可以明白了吧。总之，SELECT—ENDSL是一种很好用的语法，尤其是在表达诸多不一样的分支处理时。OUT{(E)}(WriteaDataArea)没用过，讲数据域的。PARM(IdentifyParameters)定义入口参数Factory1OperationFactory2ResultHILOEQR*ENTRYPLISTPARMFLD01有关详细内容讲解，详见前面所说入口参数一章。“”容许做为入口参数的有：一般变量、构造变量、数组变量有关PARM、PLIST，尚有一种在Factory1，Factory2也填写变量或指示器的用法，不过我不懂得它详细表达什么意思，也不懂得该怎么用。请用过的来补充。PLIST(IdentifyaParameterList)同上POST{(E)}(Post)没用过READ{(N|E)}(ReadaRecord)读取记录1.基本语法：Factory1OperationFactory2ResultHILOEQREAD文献记录格式名4546READ背面跟的，必须是申明的文献记录格式名；LO指示器表达锁表指示器，当在指定的时间（CHGPF，WAITRCD项可看到），需要读取的记录仍被锁，将会打开LO指示器，即*IN45=’1’；EQ指示器为与否读到指示器。当未读到任何记录时，打开EQ指示器，即*IN46=’1’2.当文献在程序中，是用只读的方式申明时，READ操作并不会导致锁表；假如文献在程序中是用修改的方式申明，READ操作成功后，该记录被锁；直到执行解锁操作（UNLOCK，或UPDATE），或READ该文献的其他记录，才会解锁假如文献是用修改的方式申明，但但愿READ操作不锁表时，那么就用READ（N），即Factory1OperationFactory2ResultHILOEQREAD(N)文献记录格式名4546这样读文献，就不会锁记录，不过同步也不能修改记录。假如需要修改记录，那么在修改之前（包括对文献字段赋值之前），还必须再对该记录进行一次定位操作（例如CHAIN、READ语句均可）。也就是说，假如要修改记录，必须先锁住目前记录（很合理吧）3.当执行READ操作时，程序是根据游标目前在文献中所指向的位置，次序读取下一条记录。有关游标是怎样指向，还不是一种很简朴的问题，因此将会在下一章数“据库有关知识中详细”讲解。4.执行READ操作时，容许申明的文献没有键值。（即PF文献）READC{(E)}(ReadNextChangedRecord)没用过，读下一次修改正的记录？...