1cobol循环问题?PERFORM 1-SECTION UNTIL I > 50 OR FLG-ERR = CNS-ONPERFORM VARYING J FROM 1 BY 1 UNTIL J >50 OR FLG-ERR = CNS-ON.END-PERFORM这2个循环有什么不同, 2 cobol循环问题? PERFORM 1-SECTION UNTIL I > 50 OR FLG-ERR = CNS-ON PERFORM VARYING J FROM 1 BY 1 UNTIL J ...
A:PERFORM…… END-PERFORM 所谓内嵌也就是PERFORM被嵌在某些比如循环语句中担当执行主体,同时通过UNTIL来指定结束判定 Q24) When would you use in-line perform? A24) When the body of the perform will not be used in other paragraphs。If the body of the perform is a generic type of code (used ...
6、在一个READ UPDATE之后,而且KSDS的KEY是不能改变的,对Queue的操作:此处一定要将cics中的length定义为s9(4) comp,即16位的二进制数,否则在进行READQ和WRITEQ的操作时,在第一次时会出现lengerr的cics错误,就不能用PERFORM UNTIL ERR-CODE NOT = DFHRESP(NORMAL)进行循环判定了。读取Queue此处也可以用next来...
开发小型银行账户管理信息系统(精通COBOL后面的程序问题解析)*.copy(bampsmm)如果要在主程序中引用map中的变量selectm、dispm，需要在working-storage section中加入代码“copy dfhaid。”(输入到变量中的标识键)和“copy bampsmm(map group name)。”如果想要设置一个map上字段的属性可以用下面将它引入 所有cics命令...
END—PERFORM 所谓内嵌也就是PERFORM被嵌在某些比如循环语句中担当执行主体,同时通过UNTIL来指定结束判定 Q24)When would you use in—line perform? Q:什么时候使用内嵌式PERFORM A:当该段PERFORM的内容不被其他段用到,只在某些局部代码中(当然PERFORM的主体所用到的参数也都是局部的,例如循环)使用,如果PERFORM主体...
10、RFORMA23:PERFORM END-PERFORM所谓内嵌也就是PERFORM被嵌在某些比如循环语句中担当执行主体,同时通过UNTIL来指定结束判定Q24:什么时候使用内嵌式PERFORMA24:当该段PERFORM的内容不被其他段用到,只在某些局部代码中(当然PERFORM的主体所用到的参数也都是局部的,例如循环)使用,如果PERFORM主体的代码是一般的(用到了...
PERFORM 过程名 1 UNTIL 条件 例如: PERFORM READ-FILE UNTIL END—OF— FILE = “Y” 说明:执行 READ— FILE 过程直到 END—OF— FILE 等于 Y。 17 Cobol 基础 (3) 。FERFORM 过程名 1 VARYING变量名 FROM 整数 TO 整数 UNTIL 条件 例如: PERFORM PROGRAM VARYING TEMP FROM 1 BY 1 UNTIL TEMP 10...
END-PERFORM 所谓内嵌也就是PERFORM 被嵌在某些比如循环语句中担当执行主体,同时通过UNTIL 来指 定结束判定 Q24:什么时候使用内嵌式PERFORM A24 :当该段PERFORM 的内容不被其他段用到,只在某些局部代码中(当然PERFORM 的主 体所用到的参数也都是局部的,例如循环)使用,如果PERFORM 主体的代码是一般的(用 到了别...
END-PERFORM 所谓内嵌也就是 PERFORM 被嵌在某些比如循环语句中担当执行主体,同时通过 UNTIL 来指 定结束判定 Q24:什么时候使用内嵌式 PERFORM A24:当该段 PERFORM 的内容不被其他段用到,只在某些局部代码中(当然 PERFORM 的主 体所用到的参数也都是局部的,例如循环)使用,如果 PERFORM 主体的代码是一般的(用 ...
cobol的编程实例[精华]一个COBOL的编程实例 通常一个程序分为几个处理过程，然后有序地组合起来使用，以实现我们所希望的处理结果。这里，给出一个销售公司对销售数据处理的范例，通过实际的编程，掌握COBOL编程的技巧和步骤。销售数据处理系统简介 用户需求 （1）某销售公司有若干个销售商店，公司想获得每个商品的销售...