Function Parameters

[Former Member]

Hi,

I want to retrieve data from PCL4 table for all Person Numbers and Infotypes and Users for a specific date range. I am looking for code example on how to do that using Function HR_INFOTYPE_LOG_GET_LIST. My code is as given below. I am not sure what I am missing since I don't get any result.

I would really appreciate if someone can help me out.

Thanks.

Regards,

bw_newbie

REPORT ZTEST11 .

DATA: BEGDA TYPE BEGDA.

DATA: ENDDA TYPE ENDDA.

DATA: doc_key_tab TYPE PLDOC_KEY_TAB.

DATA: SUBRC like SY-SUBRC.

*

data: pernr_tab type persno_range_tab with header line,

infty_tab type infty_range_tab with header line.

data: date_tab type DATUM_RANGE_TAB with header line.

*

• Select ranges

RANGES: L_R_PERNR FOR PA0000-PERNR,

L_R_OBJID FOR PLOGI-OBJID.

• fetch data to be transfered in 2nd call

• 1. Fill range tables

clear pernr_tab.

pernr_tab-sign = 'I'.

pernr_tab-option = 'BT'.

pernr_tab-low = 00000000.

pernr_tab-high = 99999999.

append pernr_tab.

*

clear infty_tab.

infty_tab-sign = 'I'.

infty_tab-option = 'BT'.

infty_tab-low = '0000'.

infty_tab-high = '3000'.

BEGDA = '20060101'.

ENDDA = '20060110'.

clear date_tab.

date_tab-sign = 'I'.

date_tab-option = 'BT'.

date_tab-low = begda.

date_tab-high = endda.

call function 'HR_INFOTYPE_LOG_GET_LIST'

exporting

begda = begda

endda = endda

importing

subrc = subrc

tables

pernr_tab = pernr_tab

infty_tab = infty_tab

infty_logg_key_tab = doc_key_tab

DATUM_RANGE_TAB = date_tab.

WRITE 'DONE'.

[Former Member]

Hi Vick,

Per your suggestion. I have changed my approach. Here's the code I have using program RPUAUD00. However, I see the output on display. I need to get the result in a table or structure. The Functions 'LIST_FROM_MEMORY' and 'DISPLAY_LIST' do not return anything. What am I missing. Please help.

REPORT ZTEST12 .

DATA: BEGIN OF L_T_LISTOBJECT1 OCCURS 0.

INCLUDE STRUCTURE ABAPLIST.

DATA: END OF L_T_LISTOBJECT1.

SUBMIT RPUAUD00

USING SELECTION-SET 'ZVAR1'

AND RETURN

EXPORTING LIST TO MEMORY.

CALL FUNCTION 'LIST_FROM_MEMORY'

TABLES

LISTOBJECT = L_T_LISTOBJECT1

EXCEPTIONS

NOT_FOUND = 1.

CALL FUNCTION 'DISPLAY_LIST'

exporting fullscreen = 'X'

tables listobject = L_T_LISTOBJECT1.

WRITE 'DONE'.