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,

Why do u wnat to write a custom program when you have standard program, check out the program RPUAUD00 if you do not get any output it means that you need to make sure that these fields are maintained in the views - Infotypes to be Logged (V_T585A), Field Group Definition (V_T585B) and Field Group Characteristics (V_T585C).

Regards

Vick

I was looking into your code, you are missing append statement after the infty_tab and date_tab. The following is the sample code.

FORM read_documents

TABLES doc_key_tab STRUCTURE pldoc_key

error_tab STRUCTURE rpbenerr

USING pernr TYPE pernr_d

begda TYPE begda

endda TYPE endda

idoc_categ TYPE rpbenidoc_categ

reaction LIKE sy-msgty

CHANGING subrc LIKE sy-subrc.

*

DATA: pernr_tab TYPE persno_range_tab WITH HEADER LINE,

infty_tab TYPE infty_range_tab WITH HEADER LINE.

*

• 1. Fill range tables

CLEAR pernr_tab.

pernr_tab-sign = 'I'.

pernr_tab-option = 'EQ'.

pernr_tab-low = pernr.

APPEND pernr_tab.

*

CLEAR infty_tab.

infty_tab-sign = 'I'.

infty_tab-option = 'EQ'.

IF idoc_categ-healt = true.

IF parameter_cobra = false.

infty_tab-low = '0167'. APPEND infty_tab.

ELSE.

infty_tab-low = '0212'. APPEND infty_tab.

ENDIF.

ENDIF.

IF idoc_categ-insur = true.

infty_tab-low = '0168'. APPEND infty_tab.

ENDIF.

IF idoc_categ-savin = true.

infty_tab-low = '0169'. APPEND infty_tab.

ENDIF.

IF idoc_categ-spend = true.

IF parameter_cobra = false.

infty_tab-low = '0170'. APPEND infty_tab.

ELSE.

infty_tab-low = '0671'. APPEND infty_tab.

ENDIF.

ENDIF.

IF idoc_categ-misce = true.

infty_tab-low = '0377'. APPEND infty_tab.

ENDIF.

IF idoc_categ-stock = true.

infty_tab-low = '0379'. APPEND infty_tab.

ENDIF.

infty_tab-low = '0000'. APPEND infty_tab.

infty_tab-low = '0002'. APPEND infty_tab.

infty_tab-low = '0006'. APPEND infty_tab.

infty_tab-low = '0077'. APPEND infty_tab.

infty_tab-low = '0376'. APPEND infty_tab.

infty_tab-low = '0021'. APPEND infty_tab.

infty_tab-low = '0106'. APPEND infty_tab. " USA / Canada

infty_tab-low = '0148'. APPEND infty_tab. " Japan

infty_tab-low = '0397'. APPEND infty_tab. " Brasil

IF g_idoc_type = idoctype_participation2 OR

g_idoc_type = idoctype_participation3.

infty_tab-low = '0001'. APPEND infty_tab.

infty_tab-low = '0008'. APPEND infty_tab.

infty_tab-low = '0375'. APPEND infty_tab.

ENDIF.

*

• 2. Read documents

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.

Message was edited by: vick vennav