obsolete function modules

Former Member — Fri, 26 Sep 2008 05:15:48 GMT

Hi experts,

Below maintioned function modules are obsolete functions.

What is the alternate for these function modules in 6.0ecc.

CONVERT_DATE_INPUT

G_OBJECT_SELECT

G_SET_AVAILABLE

HELPSCREEN_NA_CREATE

HELP_VALUES_GET_NO_DD_NAME

HELP_VALUES_GET_WITH_TABLE_EXT

LOG_SYSTEM_GET_RFC_DESTINATION

POPUP_TO_DECIDE

REGISTRY_GET

RK_PROFITCENTER_UPDATE

TRANSFER_NAMES_TO_FIELDS

WS_EXECUTE

Please help me out.

Re: obsolete function modules

Former Member — Wed, 01 Oct 2008 09:38:49 GMT

Hi,

How do u know these are obsolete functions???

If you check with function module documentation, you will find

FU WS_UPLOAD

____________________________________________________

Short Text

OBSOLETE: Transfer Presentation Server File to Internal Table

Uploads a file from the presentation server into an internal table.

*Obsolete. Use class CL_GUI_FRONTEND_SERVICES.*

Regards,

Shardul Shah

Re: obsolete function modules

bindu_ramachandran — Thu, 02 Oct 2008 05:53:20 GMT

Hi Mahendar

Replacements are

1. CALL FUNCTION 'CONVERT_DATE_INPUT'

EXPORTING

input = dtnasc_200

PLAUSIBILITY_CHECK = 'X'

IMPORTING

OUTPUT = WK_DATA.

CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL'

EXPORTING

DATE_EXTERNAL = dtnasc_200

ACCEPT_INITIAL_DATE = 'X'

IMPORTING

DATE_INTERNAL = WK_DATA

EXCEPTIONS

DATE_EXTERNAL_IS_INVALID = 1

OTHERS = 2

2. HELPSCREEN_NA_CREATE----

HELP_OBJECT_SHOW

3. HELP_VALUES_GET_NO_DD_NAME----

call function 'HELP_VALUES_GET_NO_DD_NAME'
exporting
selectfield = 'KUNNR'
titel = text-999
no_display_of_pers_values = 'X'
importing
ind = sy-tabix
tables
fields = tab_fields
full_table = tab_kunnr

FULL_TABLE = TAB_LAUF1

exceptions
others = 4.
if sy-subrc <> 0.

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

data: it_fields type table of DFIES.

data: wa_fields_tab type dfies.

data: wa_fields type help_value.

loop at tab_fields into wa_fields.

wa_fields_tab-tabname = wa_fields-tabname.

wa_fields_tab-fieldname = wa_fields-fieldname.

wa_fields_tab-KEYFLAG = wa_fields-SELECTFLAG.

append wa_fields_tab to it_fields.

endloop.

CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'

EXPORTING

DDIC_STRUCTURE = ' '

RETFIELD = 'KUNNR'

PVALKEY = ' '
DYNPPROG = ' '
DYNPNR = ' '
DYNPROFIELD = ' '
STEPL = 0

WINDOW_TITLE = text-999

VALUE = ' '
VALUE_ORG = 'C'
MULTIPLE_CHOICE = ' '
DISPLAY = ' '
CALLBACK_PROGRAM = ' '
CALLBACK_FORM = ' '
MARK_TAB =
IMPORTING
USER_RESET =

TABLES

VALUE_TAB = tab_kunnr

FIELD_TAB = it_fields

RETURN_TAB =
DYNPFLD_MAPPING =

EXCEPTIONS

PARAMETER_ERROR = 1

NO_VALUES_FOUND = 2

OTHERS = 3

IF SY-SUBRC <> 0.

MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

Endif .

4. HELP_VALUES_GET_WITH_TABLE_EXT

calling popup for F4-Help
CALL FUNCTION 'HELP_VALUES_GET_WITH_TABLE_EXT'
EXPORTING
DISPLAY = I_DISPLAY
FIELDNAME = 'VKONT'
TABNAME = 'FKKVKP'
TITLE_IN_VALUES_LIST = LOC_TITLE
TABLES
FIELDS = LOC_HELP_FIELDS
SELECT_VALUES = LOC_SELECT_VALUES
VALUETAB = LOC_VALUETAB
EXCEPTIONS
FIELD_NOT_IN_DDIC = 1
MORE_THEN_ONE_SELECTFIELD = 2
NO_SELECTFIELD = 3
OTHERS = 4.

CALL FUNCTION 'F4TOOL_F4FUNCTION_BRIDGE'

EXPORTING

FIELDNAME = 'VKONT'

TABNAME = 'FKKVKP'

DISPLAY_ONLY = I_DISPLAY

WINDOW_TITLE = LOC_TITLE

IMPORTING
SELECTED_VALUE = SELECT_VALUE
SELECTED_INDEX = INDEX

TABLES

SHVALUE_TAB =
SHSTRUC_TAB =

VALUE_TAB = LOC_VALUETAB

FIELDS_TAB = LOC_HELP_FIELDS

VALUES_OUT = LOC_SELECT_VALUES

COLTITLE_TAB = HEADING_TABLE
SEL_OPT = SEL_OPT.

EXCEPTIONS

OTHERS = 1.

5. POPUP_TO_DECIDE----

POPUP_TO_CONFIRM

6. 'WS_EXECUTE'

CALL FUNCTION 'WS_EXECUTE'

EXPORTING

commandline = p_file

program = 'Excel'

EXCEPTIONS

frontend_error = 1

no_batch = 2

prog_not_found = 3

illegal_option = 4

gui_refuse_execute = 5

OTHERS = 6.

IF sy-subrc <> 0.

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

Replacement method.

CALL FUNCTION 'DSVAS_DOC_WS_EXECUTE_50'

EXPORTING

DOCUMENT = ' '
CD = ' '

COMMANDLINE = p_file

PROGRAM = 'Excel'

EXEC_RC = ' '

EXCEPTIONS

FRONTEND_ERROR = 1

NO_BATCH = 2

PROG_NOT_FOUND = 3

ILLEGAL_OPTION = 4

GUI_REFUSE_EXECUTE = 5

OTHERS = 6

IF SY-SUBRC <> 0.

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

ENDIF.

Regards

Bindu Ramachandran

Re: obsolete function modules

Former Member — Tue, 14 Oct 2008 07:10:25 GMT

Thanks Bindu.

topic Re: obsolete function modules in Application Development and Automation Discussions

obsolete function modules

Re: obsolete function modules

Re: obsolete function modules

Re: obsolete function modules