Les tables internes

1. Définition

Une table interne est un objet dans un programme permettant de stocker des données le temps de l’exécution dudit programme.

Elle se déclare de la façon suivante :

TYPES: BEGIN OF ty_tab, 
         obj1 TYPE dtel1, 
         obj2 TYPE dtel2, 
         obj3 TYPE dtel3, 
         . . . 
       END OF ty_tab. 
 
DATA: it_tab_types TYPE TABLE OF ty_tab, 
      wa_tab_types TYPE ty_tab.
 

Un type de structure est tout d’abord créé, c’est une sorte de squelette qui sera utilisé comme une référence par la table interne IT_TAB_TYPES avec l’instruction TYPE TABLE OF, et la structure WA_TAB_TYPES avec TYPE. L’instruction commence par la commande TYPES puis BEGIN OF indiquant qu’un type de structure va être créé. Les champs qui la composent sont ensuite listés et référencés. Cette référence à une spécificité technique, peut se faire de plusieurs manières (pas vraiment de grandes différences aussi bien techniques que pour l’optimisation du programme).

. . .  
  obj1(5) TYPE c,  
  obj2(4) TYPE n,  
. . .
 

. . .  
  obj1 TYPE char5,  
  Obj2 TYPE numc4,  
. . . 
 

. . .  
  obj1 TYPE zdriver_car-driver_id,  
  Obj2 TYPE zdriver_car-car_year,  
. . .
 

. . . obj1 LIKE char5,  
      Obj2 LIKE numc4,  
. . .  
 

. . . obj1 LIKE zdriver_car-driver_id,  
      Obj2 LIKE zdriver_car-car_year,  
. . . 
 

Pour faire une petite parenthèse, une variable et une constante peuvent se déclarer exactement de la même façon. Cette notion n’a pas été évoquée dans le chapitre adéquat...

1. Ajout d’enregistrements

INSERT   wa  
      | {INITIAL LINE}  
      | {LINES OF jtab [FROM idx1] [TO idx2]} ...  
  INTO  {TABLE itab}  
      | {itab INDEX idx } ... 
 

TYPES: BEGIN OF ty_citizen, 
         country TYPE char3, 
         name    TYPE char20, 
         age     TYPE numc2, 
       END OF ty_citizen. 
 
DATA: t_citizen1 TYPE TABLE OF ty_citizen, 
      t_citizen2 TYPE TABLE OF ty_citizen, 
      s_citizen  TYPE ty_citizen. 
 
 
s_citizen-country = 'FR'. 
s_citizen-name    = 'Thierry'. 
s_citizen-age     = '24'. 
INSERT s_citizen INTO TABLE t_citizen1. 
* 
s_citizen-country = 'ES'. 
s_citizen-name    = 'Luis'. 
s_citizen-age     = '32'. 
INSERT s_citizen INTO TABLE t_citizen2. 
 
s_citizen-country = 'BR'. 
s_citizen-name    = 'Renata'. 
s_citizen-age     = '27'. 
INSERT s_citizen INTO TABLE t_citizen2. ...

1. SORT

SORT itab [ASCENDING|DESCENDING] [AS text] [STABLE] 
             BY c1 [ASCENDING|DESCENDING] [AS text] 
              ... 
                cn [ASCENDING|DESCENDING] [AS text].
 

L’instruction SORT permet d’organiser une table interne de type STANDARD ou HASHED itab selon sa clé primaire ou une liste de composants (c1 à cn). Les options ASCENDING et DESCENDING définissent un tri par ordre croissant ou décroissant, AS TEXT donne la possibilité pour les champs de type chaîne de caractères d’être triés par une langue définie en local par l’instruction SET LOCALE LANGUAGE (par défaut, la langue utilisée est celle définie par l’utilisateur).

Exemple

Deux SORT sont effectués sur une table de type STANDARD.

TYPES: BEGIN OF ty_citizen, 
         country TYPE char3, 
         name    TYPE char20, 
         age     TYPE numc2, 
       END OF ty_citizen. 
 
DATA: t_citizen TYPE STANDARD TABLE OF ty_citizen, 
      s_citizen  TYPE ty_citizen. 
 
s_citizen-country = 'FR'. 
s_citizen-name    = 'Thierry'. 
s_citizen-age     = '24'. 
APPEND s_citizen TO t_citizen. 
 
s_citizen-country = 'ES'. 
s_citizen-name    = 'Luis'. 
s_citizen-age     = '32'. 
APPEND s_citizen TO t_citizen. 
 
s_citizen-country = 'BR'. 
s_citizen-name    = 'Renata'. 
s_citizen-age     = '27'. 
APPEND s_citizen TO t_citizen. 
 
s_citizen-country = 'FR'. ...

1. FIND IN TABLE

FIND [{FIRST OCCURRENCE}|{ALL OCCURRENCES} OF] pattern  
     IN TABLE itab [table_range]  
     [IN {CHARACTER|BYTE} MODE]  
... [{RESPECTING|IGNORING} CASE]  
    [MATCH COUNT  mcnt]  
    { {[MATCH LINE   mlin]  
       [MATCH OFFSET moff]  
       [MATCH LENGTH mlen]}  
    | [RESULTS result_tab|result_wa] }.
 

L’instruction FIND IN TABLE possède les mêmes paramètres et se comporte exactement de la même façon que l’instruction FIND dans une variable (cf. chapitre Instructions basiques ABAP - Opérations sur variable texte).

Exemple

Chercher toutes les occurrences ’FR’ dans la table T_CITIZEN et afficher les lignes concernées.

TYPES: BEGIN OF ty_citizen, 
         country TYPE char3, 
         name    TYPE char20, 
         age     TYPE numc2, 
       END OF ty_citizen. 
 
DATA: t_citizen TYPE STANDARD TABLE OF ty_citizen, 
      t_results TYPE TABLE OF match_result, 
      s_citizen TYPE ty_citizen, 
      s_results TYPE match_result. 
 
FIELD-SYMBOLS: <fs_citizen> TYPE ty_citizen. 
 
s_citizen-country = 'FR'. 
s_citizen-name    = 'Thierry'. 
s_citizen-age     = '24'. 
APPEND s_citizen TO t_citizen. 
 
s_citizen-country = 'ES'. 
s_citizen-name    = 'Francisco'. 
s_citizen-age     = '32'. 
APPEND s_citizen TO t_citizen. 
 
s_citizen-country = 'BR'. 
s_citizen-name    = 'Renata'. ...