REPORT YVBAK1.
CONSTANTS PGRP type c VALUE '1000,1001,1002'.
PARAMETERS : p_b type bukrs.
if p_b NE PGRP.
MESSAGE E001(ERR) WITH 'ERROR'.
ENDIF.
The VALUE specification is longer than the corresponding field. The VALUE specification will only be passed to the field length!