Skip to Content
0
Former Member
Jan 04, 2006 at 11:08 AM

TH_DISPLAY_UPDATE_DATA

65 Views

I'd like to have updated data of updated modules into an z-abap program to show a report ...

any help ?

-


test prog -


REPORT test.

PARAMETERS :

fun type TFDIR-FUNCNAME,

pkey TYPE vbmod-vbkey .

START-OF-SELECTION.

DATA :

TEXTREFERENCES type thead occurs 0,

fxlips TYPE lipsvb OCCURS 0,

fxlikp TYPE likpvb OCCURS 0.

DATA : pcnt TYPE vbmod-vbmodcnt .

DATA : id(43).

SELECT SINGLE vbmodcnt INTO pcnt

FROM vbmod WHERE vbkey = pkey AND

vbfunc = fun.

DATA: BEGIN OF %_VB_KEY,

KEY LIKE VBMOD-VBKEY,

ID(11),

END OF %_VB_KEY.

%_VB_KEY-KEY = pkey.

%_VB_KEY-ID = pcnt.

CALL FUNCTION 'TH_DISPLAY_UPDATE_DATA'

EXPORTING

vb_cnt = pcnt

vb_key = pkey

vb_name = fun

  • VB_TABLE = 'VBDATA '

EXCEPTIONS

delete_report_error = 1

insert_report_error = 2

nothing_found = 3

read_report_error = 4

wrong_fb = 5

wrong_program = 6

OTHERS = 7

.

break sidskai.

PERFORM get_info

TABLES

fxlips

fxlikp

USING

%_VB_KEY.

&----


*& Form get_info

&----


  • text

----


  • -->P_FXLIPS text

  • -->P_FXLIKP text

  • -->P_VB_KEY text

----


FORM get_info TABLES

fxlips STRUCTURE lipsvb

fxlikp STRUCTURE likpvb

USING %_VB_KEY.

IMPORT

fxlips

fxlikp

FROM memory ID %_VB_KEY .

EXPORT

fxlips

fxlikp

TO MEMORY ID 'ZRES'.

ENDFORM. " get_info