topic unicode error in Application Development and Automation Discussions

unicode error

Former Member — Sat, 22 May 2010 06:21:17 GMT

Hi,

In unicode error POPUP_TO_GET_VALUE' is obselete . Plz tell me with which function module I can replace it .

Re: unicode error

Former Member — Sat, 22 May 2010 06:46:47 GMT

Instead use FM POPUP_GET_VALUES

Cheerz

Ram

Re: unicode error

Rushikesh_Yeole — Sat, 22 May 2010 06:48:01 GMT

Usev 'POPUP_GET_VALUES'

GO through the link:

http://wiki.sdn.sap.com/wiki/display/ABAP/NEWFMinPlaceofObsoleteFM

Re: unicode error

Former Member — Sat, 22 May 2010 12:34:11 GMT

Hi,

call function 'POPUP_TO_GET_VALUE'

" EXPORTING

" fieldname = 'JOBNAME'

" tabname = 'BTCH1140'

" titel = 'Please input a previus job'

" valuein = lv_valueout

" IMPORTING

" answer = lv_answer

" valueout = lv_valueout

" EXCEPTIONS

" fieldname_not_found = 1

" others = 2.

How I will replace above function module with POPUP_GET_VALUES and how I will pass the parameters exactly as it is in 'POPUP_TO_GET_VALUE'.

Re: unicode error

Former Member — Sat, 22 May 2010 12:40:16 GMT

HI,

DATA : fields TYPE STANDARD TABLE OF sval WITH HEADER LINE.
refresh fields.
clear fields.
fields-tabname = 'MARA'. " Just Copy and Execute this
fields-fieldname = 'MATNR'.
fields-field_obl = 'X'. " To make this Field mandatory
APPEND fields.
CALL FUNCTION 'POPUP_GET_VALUES'
  EXPORTING
*   NO_VALUE_CHECK        = ' '
    popup_title           = 'Give your Title'
*   START_COLUMN          = '5'
*   START_ROW             = '5'
* IMPORTING
*   RETURNCODE            = RETURNCODE
  TABLES
    fields                = fields " For more info Take Where used List on this FM
* EXCEPTIONS
*   ERROR_IN_FIELDS       = 1
*   OTHERS                = 2
          .

Cheerz

Ram

Re: unicode error

Former Member — Sat, 22 May 2010 12:57:07 GMT

Hi,

Thanks. I want to replace the following code .

call function 'POPUP_TO_GET_VALUE'

EXPORTING

fieldname = 'JOBNAME'

tabname = 'BTCH1140'

titel = 'Please input a previus job'

valuein = lv_valueout

IMPORTING

answer = lv_answer

valueout = lv_valueout

EXCEPTIONS

fieldname_not_found = 1

others = 2.

if sy-subrc <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

else.

if lv_answer ne 'C'

and lv_valueout ne '.'.

gv_prevjob = lv_valueout.

endif.