Micropattern to transfer multiple Data Elements

The MCI micropattern generates the transfer of the elementary Data Elements that have an identical name in two group fields. It corresponds to a MOVE CORRESPONDING COBOL statement.

Input format

You must conform to the following input format:
      *!MCI "OPERAND1 OPERAND2"
where:
  • *! is the required start tag of the micropattern. The * must be entered in column 7, reserved for the comments in the COBOL code, and the ! must be entered in column 8.
    Note: If you press CTRL + space bar in the PDP COBOL editor, the content assist facility displays the list of the micropatterns that are adapted to the entity and to the position in the COBOL code (WORKING-STORAGE SECTION or PROCEDURE DIVISION). The micropatterns that are used only to retrieve the Pacbase data are not included in the list. Each micropattern in the list is documented. If you double-click one of them, the start tag and the identifier of the micropattern are inserted in the code. You must then complete its declaration.
  • MCI is the micropattern identifier.
  • " " must frame the operands.
  • OPERAND1 is the source group field of the transfer. OPERAND2 is the target group field.

All the elementary Data Elements with identical names in both group fields are transferred. These names correspond to the character strings after the first dash (-).


Feedback