How to handle error message during PAI?

Question

Hi Experts,
Need help here.
In my dialog screen, I have a field which is typed 'QUAN'.
In entering different format , e.g. with non numeric value or a negative value, an error message appear and it does not process the MODULES inside the chain or FIELD MODULE ON REQUEST.
Does anyone knows how to handle this kind of error. I need to display into a separate screen the errors I encountered coz I'm creating a new RF transaction.
Points will be rewarded.
Thanks in advance.

Answer 1

Hai
in your case(RF case) it is other way...
yes you can use
field x_currency module check_currency.
in module check_currency.
you have to display errors in another screen say 200.
in that there will be 4 fields, all are display only fields.
X_MESSAGE-MSGV1  of type sy-msgv1
X_MESSAGE-MSGV2  of type sy-msgv2
X_MESSAGE-MSGV3 of type sy-msgv3
X_MESSAGE-MSGV4 of type sy-msgv4
you populate the messages with these fields and then display it in the screen.
  method check_currency.
*--do all your checks here....
       if error
         clear x_message.
        x_message-msgv1 = 'Enter Valid Employee Number'(004).
        leave to screen 0200.
      endif.
    endif.
ENDMODULE.                 " VALIDATE_Currency
in screen 200 PBO you need to format the message
using the below logic.
       Method for formatting the message
  method message_format.
    data : lt_text type table of tline,         "text table
           lx_text type tline.                  "work area
    refresh lt_text.
    clear lx_text.
    concatenate x_message-msgv1 x_message-msgv2 into lx_text-tdline
      separated by space.
    append lx_text to lt_text.
    clear lx_text.
    concatenate x_message-msgv3 x_message-msgv4 into lx_text-tdline
      separated by space.
    append lx_text to lt_text.
*- formatting the message
    call function 'FORMAT_TEXTLINES'
      exporting
        formatwidth = 20
      tables
        lines       = lt_text
      exceptions
        bound_error = 1
        others      = 2.
    clear: x_message.
*- transfer the message data to screen fields
    loop at lt_text into lx_text.
      if sy-tabix = 1.
        x_message-msgv1 = lx_text-tdline.
      elseif sy-tabix = 2.
        x_message-msgv2 = lx_text-tdline.
      elseif sy-tabix = 3.
        x_message-msgv3 = lx_text-tdline.
      elseif sy-tabix = 4.
        x_message-msgv4 = lx_text-tdline.
      else.
        exit.
      endif.
    endloop.
  endmethod.                    "message_format
Regards
Vijay