Replacement function modules/method for obsolete Funtion Modules in ECC 6.0

Advertisement
We are working on Upgrade Project and need your help in finding the replacement Function module/ Methods for following obsolete Function Modules:
   1.   GET_FIELDTAB
   2.   WS_EXCEL
   3.  HR_DISPLAY_BASIC_LIST
   4.  LOG_SYSTEM_GET_RFC_DESTINATION
   5.  HELPSCREEN_NA_CREATE
   6. TR_RELEASE_COMM
Thank in Advance.
Sarita.
Edited by: Sarita Yalamati on Mar 28, 2008 1:23 PM
Advertisement

Replay

Hi sarita,
for GET_FIELDTAB use 'DDIF_NAMETAB_GET'..here is sample code
  CALL FUNCTION 'GET_FIELDTAB'
       EXPORTING
            LANGU               = SY-LANGU
            TABNAME             = C_STRUCTURE_NAME
            WITHTEXT            = ' '
       TABLES
            FIELDTAB            = IDFIES
       EXCEPTIONS
           INTERNAL_ERROR      = 01
            NO_TEXTS_FOUND      = 02
            TABLE_HAS_NO_FIELDS = 03
            TABLE_NOT_ACTIV     = 04.
Replacement :
CALL FUNCTION 'DDIF_NAMETAB_GET'
  EXPORTING
    TABNAME           =  C_STRUCTURE_NAME
  ALL_TYPES         = ' '
  LFIELDNAME        = ' '
  GROUP_NAMES       = ' '
  UCLEN             =
IMPORTING
  X030L_WA          =
  DTELINFO_WA       =
  TTYPINFO_WA       =
  DDOBJTYPE         =
  DFIES_WA          =
  LINES_DESCR       =
TABLES
  X031L_TAB         =
   DFIES_TAB         = IDFIES
EXCEPTIONS
   NOT_FOUND         = 1
   OTHERS            = 2
For WS_EXCEL  use GUI_DOWNLOAD.. here is sample code
CALL FUNCTION 'WS_EXCEL'
EXPORTING
   FILENAME            = 'D:\FILE1.xls'
  SYNCHRON            = ' '
  TABLES
    DATA                = itab
EXCEPTIONS
   UNKNOWN_ERROR       = 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.
ENDIF.
Repalcement :
data : l_filename type string.
l_filename  = 'D:\FILE1.xls'.
CALL FUNCTION 'GUI_DOWNLOAD'
  EXPORTING
  BIN_FILESIZE                    =
    FILENAME                        = l_filename
  FILETYPE                        = 'ASC'
IMPORTING
  FILELENGTH                      =
  TABLES
    DATA_TAB                        = itab
  FIELDNAMES                      =
EXCEPTIONS
   FILE_WRITE_ERROR                = 1
   NO_BATCH                        = 2
   GUI_REFUSE_FILETRANSFER         = 3
   INVALID_TYPE                    = 4
   NO_AUTHORITY                    = 5
   UNKNOWN_ERROR                   = 6
   HEADER_NOT_ALLOWED              = 7
   SEPARATOR_NOT_ALLOWED           = 8
   FILESIZE_NOT_ALLOWED            = 9
   HEADER_TOO_LONG                 = 10
   DP_ERROR_CREATE                 = 11
   DP_ERROR_SEND                   = 12
   DP_ERROR_WRITE                  = 13
   UNKNOWN_DP_ERROR                = 14
   ACCESS_DENIED                   = 15
   DP_OUT_OF_MEMORY                = 16
   DISK_FULL                       = 17
   DP_TIMEOUT                      = 18
   FILE_NOT_FOUND                  = 19
   DATAPROVIDER_EXCEPTION          = 20
   CONTROL_FLUSH_ERROR             = 21
   OTHERS                          = 22
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL METHOD CL_GUI_FRONTEND_SERVICES=>EXECUTE
  EXPORTING
    DOCUMENT               = 'D:\FILE1.xls'
   APPLICATION            =
   PARAMETER              =
   DEFAULT_DIRECTORY      =
   MAXIMIZED              =
   MINIMIZED              =
   SYNCHRONOUS            =
    OPERATION              = 'OPEN'
  EXCEPTIONS
    CNTL_ERROR             = 1
    ERROR_NO_GUI           = 2
    BAD_PARAMETER          = 3
    FILE_NOT_FOUND         = 4
    PATH_NOT_FOUND         = 5
    FILE_EXTENSION_UNKNOWN = 6
    ERROR_EXECUTE_FAILED   = 7
    SYNCHRONOUS_FAILED     = 8
    NOT_SUPPORTED_BY_GUI   = 9
    others                 = 10
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.