SAP Check E-mail Valid or Invalid

      DATA lv_email_addr TYPE sx_address.
      IF gt_out-mail IS NOT INITIAL.
        MOVE 'INT' TO lv_email_addr-type.
        MOVE gt_out-mail TO lv_email_addr-address.

        CALL FUNCTION 'SX_INTERNET_ADDRESS_TO_NORMAL'
          EXPORTING
            address_unstruct    = lv_email_addr
          EXCEPTIONS
            error_address_type  = 1
            error_address       = 2
            error_group_address = 3
            OTHERS              = 4.

        IF sy-subrc <> 0.
          gt_out-msj = 'Mail Hatalı...'.
          gt_out-h   = 'X'.
        ENDIF.
      ENDIF.