Posting Date Should Not Be Less Than Document Date

break rohinik.
TYPES : BEGIN OF ty_final,
  ebeln TYPE ebeln,
  bedat TYPE ebdat,
END OF ty_final.
DATA : lt_final TYPE STANDARD TABLE OF ty_final,
       ls_final TYPE ty_final.
DATA : lt_mseg TYPE STANDARD TABLE OF mseg WITH HEADER LINE.
SELECT SINGLE ebeln bedat
FROM ekko
INTO ls_final
WHERE ebeln = i_mseg-ebeln.
IF i_mkpf-bldat < ls_final-bedat.
  PERFORM folge_gleichsetzen(saplv00f).
  sy-ucomm = 'ENT1'.
  MESSAGE 'MIGO Document Date Should Not Be Less Than PO Create Date'   TYPE 'E' .
  SET SCREEN syst-dynnr.
  LEAVE SCREEN.
ENDIF.
IF i_mkpf-budat < ls_final-bedat.
  PERFORM folge_gleichsetzen(saplv00f).
  sy-ucomm = 'ENT1'.
  MESSAGE 'Posting Date Should Not Be Less Than Document Date'  TYPE 'E' .
  SET SCREEN syst-dynnr.
  LEAVE SCREEN.
ENDIF.