Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

unicode error

Former Member
0 Kudos
262

Hi,

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

1 ACCEPTED SOLUTION

former_member1245113
Active Contributor
0 Kudos
89

Hi

Instead use FM POPUP_GET_VALUES

Cheerz

Ram

5 REPLIES 5

former_member1245113
Active Contributor
0 Kudos
90

Hi

Instead use FM POPUP_GET_VALUES

Cheerz

Ram

0 Kudos
89

Usev 'POPUP_GET_VALUES'

GO through the link:

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

0 Kudos
89

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'.

0 Kudos
89

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

0 Kudos
89

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.

endif.