Voila un truc simple est efficace évitant certains OR ou CASE.... Faire un IF sur un range.

Pour cela on fait deux étapes :

1 - On remplit son range.

DATA : r_plage TYPE RANGE OF dbtab-field, 
       s_range LIKE LINE OF r_range.     

DATA : ls_range LIKE LINE OF r_range.

CLEAR ls_range.
ls_range-sign    = 'I'.
ls_range-option = 'EQ'.
ls_range-low      = 'S1'.

APPEND ls_range TO r_range.      

On peut faire un nouvel append pour ajouter un range

On peut faire un nouvel append pour ajouter un range...

Puis enfin ... On fait son IF
, par exemple

F i_tq80-qmart IN r_range.

Et voilou .... Merci celdron.