Previous Topic: Calling a Procedure ModuleNext Topic: Helpful Hints


Branching to a Procedure Module

  1. Move values individually to the reserved field names (ARG1 through ARG9).
  2. Follow the MOVE statements by a branch (B) to the procedure module.

    The following example moves values to arguments (ARG) 1 through 4 before branching to US33:

    Col
    2
    ▼
              .
              .
              .
    017010 MOVE PACKED-NUMBER TO ARG1
    017020 MOVE 8 TO ARG2
    017030 MOVE BINARY-RESULT TO ARG3
    017040 MOVE 4 TO ARG4
    017050 B US33