Release Date cannot be before system date using mesages type

DATA it_eban TYPE TABLE OF eban WITH HEADER LINE,
       messages TYPE bapiret2.
it_eban[] im_t_eban[].
READ TABLE it_eban INDEX 1.

IF it_eban-frgdt < sy-datum.
  CLEAR messages.

  CALL FUNCTION 'BALW_BAPIRETURN_GET2'
    EXPORTING
      type   'E'
      cl     'ZCS_MSG'
      number '042'
      par1   ' '
      par2   ' '
      par3   ' '
      par4   ' '
    IMPORTING
      return messages.
  APPEND messages TO ex_messages.
  RAISE error_messages.
  EXIT.

  MESSAGE 'Release Date cannot be before system date.' TYPE 'E'.

ENDIF.

Comments

Popular posts from this blog

all user exit mv45afzz (implicit user exit )

MB_MIGO_BADI THIS BADI USED TO POSTING DATA IN MIGO

Long Text in input and output field in module pool