ABAP/4 ОКМ ДМ экономическая информатика 4GL Теория и практика обработки информации

Компьютерный язык ABAP/4 - ключевые слова

MOVE-CORRESPONDING

Basic form

MOVE-CORRESPONDING rec1 TO rec2.

Effect

Interprets rec1 and rec2 as field strings. If, for example, rec1 and rec2 are tables, executes the statement for their header lines.
Searches for the sub-fields which occur both in rec1 and rec2 and then generates, for all relevant field pairs which correspond to the sub-fields ni , statements of the form

MOVE rec1-ni TO rec2-ni.

The other fields remain unchanged.

With complex structures, the full names of the corresponding field pairs must be identical.

Example


DATA: BEGIN OF INT_TABLE OCCURS 10,
        WORD(10),
        NUMBER TYPE I,
        INDEX  LIKE SY-INDEX,
      END   OF INT_TABLE,
      BEGIN OF RECORD,
        NAME(10) VALUE 'not WORD',
        NUMBER TYPE I,
        INDEX(20),
      END   OF RECORD.
...
MOVE-CORRESPONDING INT_TABLE TO RECORD.

This MOVE-CORRESPONDING statement is equivalent to both the following statements:


MOVE INT_TABLE-NUMBER TO RECORD-NUMBER.
MOVE INT_TABLE-INDEX  TO RECORD-INDEX.

Example


TYPES: BEGIN OF ROW1_3,
         CO1 TYPE I,
         CO2 TYPE I,
         CO3 TYPE I,
       END   OF ROW1_3.
TYPES: BEGIN OF ROW2_4,
         CO2 TYPE I,
         CO3 TYPE I,
         CO4 TYPE I,
       END   OF ROW2_4.
TYPES: BEGIN OF MATRIX1,
         R1 TYPE ROW1_3,
         R2 TYPE ROW1_3,
         R3 TYPE ROW1_3,
       END OF   MATRIX1.
TYPES: BEGIN OF MATRIX2,
         R2 TYPE ROW2_4,
         R3 TYPE ROW2_4,
         R4 TYPE ROW2_4,
       END OF   MATRIX2.
DATA: ROW TYPE ROW1_3,
      M1  TYPE MATRIX1,
      M2  TYPE MATRIX2.

ROW-CO1 = 1. ROW-CO2 = 2. ROW-CO3 = 3.
MOVE: ROW TO M1-R1, ROW TO M1-R2, ROW TO M1-R3.
MOVE-CORRESPONDING  M1 TO M2.

The last MOVE-CORRESPONDING statement is equivalent to the statements:


MOVE: M1-R2-CO2 TO M2-R2-CO2,
      M1-R2-CO3 TO M2-R2-CO3,
      M1-R3-CO2 TO M2-R3-CO2,
      M1-R3-CO3 TO M2-R3-CO3.

Related MOVE , ADD-CORRESPONDING , SUBTRACT-CORRESPONDING , MULTIPLY-CORRESPONDING , DIVIDE-CORRESPONDING

Index
© SAP AG 1996

ABAP/4 ОКМ ДМ экономическая информатика 4GL Теория и практика обработки информации

НОВОСТИ ФОРУМА

Рыцари теории эфира