Question

COBOL 问题

因为没有COBOL开发工具，所以问的问题可能有点简单
1. MOVE用于复制的时候，比如MOVE '123' TO '45678' 结果是45123，还是00123
2. PERFORM 段落名 UNTIL 条件 先判断条件再执行段落调用吗？
3. PERFORM UNTIL 条件 先判断条件再执行循环主体吗？
循环主体
4. READ 文件名
AT END 操作 这个是读到文件的最后一条记录就执行操作，还是当读到
最后一条记录的下一条，才执行操作。

Answer 1

1　如果你的意思是 MOVE 123 TO A，变量A的类型是 PIC 9(5)，且 A= 45678的话，那么赋值后的A=00123，如果A的类型是 PIC X(5) 的话，赋值后的A=’123 ‘
2 应该是先执行段落然后再判断条件的
3 这个是先判断 在执行循环体
4 当读到最后一条记录时执行操作

希望满意

Answer 2

HEHE 回答你的问题
1， move语句 TO 后面必须跟的是个变量 没有move 常量 到 常量的这种情况。
2，Perform until 这种循环判断 是先判断后执行 而且 这个语句的意思 当条件成立时 跳出循环体。
3，不管是循环段还是循环语句 都是先判断在执行。
4，AT ENd 是读到最后一条记录就执行的操作。

Answer 3

1.你的这两个变量要是字符型的话就是左对齐，要是数值型就是右对齐。假如你这个是字符型，那结果就是‘123 ’，123和两个空格。如果是数值型就是00123.
2.PERFORM......UNTIL.......先判断UNTIL条件。在调用。当条件满足是停止调用。
3.PERFORM循环里有控制判断先后的关键字，BEFORE（默认）：先判断后执行。
AFTER：先执行后判断。
4.AT END 是读到最后一条后，在读取一次，然后执行AT END后的操作。也就是你说的最后一条记录的下一条。