图描述 :PERFORM VARYING with TEST BEFORE

此图显示具有 TEST BEFORE 短语和不同短语中的一个标识的 PERFORM 语句的处理步骤。 以下示例显示了这样的 PERFORM 语句:


PERFORM c1 THRU c2 TEST BEFORE VARYING identifier-2 FROM 1 BY 1 UNTIL condition-1

请参阅以下处理步骤:

  1. 将可变字段 identifier-2 设置为等于 FROM 值 1。
  2. 测试 condition-1。
  3. 如果 condition-1 为 false:
    1. 执行过程 c1 到 c2。
    2. 将 BY 值 1 添加到 identifier-2。
    3. 循环至步骤 2 以再次测试 condition-1 。
  4. 如果 condition-1 为 true ,那么退出 PERFORM 语句。

图描述结束。