topic HR Query in Application Development and Automation Discussions

HR Query

Former Member — Wed, 06 Feb 2008 12:51:52 GMT

Hi Gurus

Please tell me how to get the data from transacion pc00_m08_clstr (Display payroll results)

when i give one pernr then it shows the whole data when i double click on that it gives RT table i need data from that RT (result table)table

Can anybody help me how to take the data from that

Answers will be rewarded

Regards

Hitesh

Re: HR Query

Former Member — Wed, 06 Feb 2008 13:01:53 GMT

Double Click on the RT(results table) .. and look for the

wagetype and the amount associated to it ...

If U want to write it in the form of a program ...

data: it_rgdir like pc261 occurs 0 with header line.

CALL FUNCTION 'CU_READ_RGDIR'

EXPORTING

persnr = pernr

TABLES

in_rgdir = it_rgdir.

IF sy-subrc = 0.

SORT it_rgdir BY seqnr.

ENDIF.

LOOP AT it_rgdir WHERE srtza = 'A'

AND void IS INITIAL

AND reversal IS INITIAL

AND fpper = v_fpper. <--- pass the period

v_seqnr = it_rgdir-seqnr.

rx-key-pernr = it_loans-pernr.

rx-key-seqno = v_seqnr.

rp-imp-c2-ru.

Loop at rt where lgart = '' <-- pass wage types U want

get the amount rt-betrg

endloop.

Re: HR Query

Former Member — Wed, 06 Feb 2008 13:02:33 GMT

first include the following includes

INCLUDE rpc2ruu0.

INCLUDE rpc2rx09.

INCLUDE rpc2cd09.

INCLUDE rpc2ca00.

INCLUDE rpppxd00.

INCLUDE rpppxd10.

INCLUDE rpppxm00.

call the following FM per each pernr,

CALL FUNCTION 'CU_READ_RGDIR'

EXPORTING

persnr = v_pernr

BUFFER =
NO_AUTHORITY_CHECK = ' '
IMPORTING
MOLGA =

TABLES

in_rgdir = rgdir

EXCEPTIONS

no_record_found = 1

OTHERS = 2

loop at rgdir.

rx-key-pernr = it_pernr-pernr.

rx-key-seqno = rgdir-seqnr.

rp-imp-c2-ru.

LOOP AT rt

endloop.

*U can use the all the pernr payroll data like RT etc.

what data u see on that transaction

endloop.

Re: HR Query

Former Member — Wed, 06 Feb 2008 13:06:53 GMT

Hi,

Use the following sequence of FMs for retrieving RT cluster


*&---------------------------------------------------------------------*
* getting the Area identifier for cluster in tables PCLx with pernr
*----------------------------------------------------------------------*
  CALL FUNCTION 'PYXX_GET_RELID_FROM_PERNR'
    EXPORTING
      employee                    = pernr-pernr
    IMPORTING
      relid                       = g_relid
      molga                       = g_molga
    EXCEPTIONS
      error_reading_infotype_0001 = 1
      error_reading_molga         = 2
      error_reading_relid         = 3
      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.
  ENDIF.
*&---------------------------------------------------------------------*
* Reading the RGDIR directory with molga and pernr
*----------------------------------------------------------------------*
  CALL FUNCTION 'CU_READ_RGDIR'
    EXPORTING
      persnr          = pernr-pernr
    IMPORTING
      molga           = g_molga
    TABLES
      in_rgdir        = it_rgdir
    EXCEPTIONS
      no_record_found = 1
      OTHERS          = 2.

*&---------------------------------------------------------------------*
* Reading the RGDIR directory with latest valid record
*----------------------------------------------------------------------*
  CALL FUNCTION 'CD_READ_LAST'
    EXPORTING
      begin_date      = pnpbegda
      end_date        = pnpendda
    IMPORTING
      out_seqnr       = g_seqnr
    TABLES
      rgdir           = it_rgdir
    EXCEPTIONS
      no_record_found = 1
      OTHERS          = 2.
  IF sy-subrc = 0.
    LOOP AT it_rgdir INTO wa_rgdir.
      wa_data-begda = wa_rgdir-fpbeg.
      wa_data-endda = wa_rgdir-fpend.
    ENDLOOP.
  ENDIF.
*&---------------------------------------------------------------------*
* Reading the Payroll results and getting records into it_result
*----------------------------------------------------------------------*
  IF g_seqnr <> 0.
    CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT'
      EXPORTING
        clusterid                    = g_relid       "'RM'
        employeenumber               = pernr-pernr
        sequencenumber               = g_seqnr
      CHANGING
        payroll_result               = it_result
      EXCEPTIONS
        illegal_isocode_or_clusterid = 1
        error_generating_import      = 2
        import_mismatch_error        = 3
        subpool_dir_full             = 4
        no_read_authority            = 5
        no_record_found              = 6
        versions_do_not_match        = 7
        error_reading_archive        = 8
        error_reading_relid          = 9
        OTHERS                       = 10.

and finally the it_result table has a nested structure which contains RT table


 LOOP AT it_result-inter-rt INTO wa_rt.
ENDLOOP.

Hope this helps.

Cheers,

Aditya

Re: HR Query

Former Member — Wed, 06 Feb 2008 13:08:18 GMT

Hii

Just want to know how we can fill this RT table is this is a R/3 table or internal table

what will be the structure of this

please help me

regards

hitesh

Re: HR Query

Former Member — Wed, 06 Feb 2008 13:10:55 GMT

It is a structure .. PC207

It is filled when U call the macro rp-imp-c2-ru ...

after U declare an internal table like PC207 .. pass rt to that ..

Re: HR Query

Former Member — Wed, 06 Feb 2008 13:16:23 GMT

hi srinivas

Can u please provide the full program so that i can try it out and figure the values

Regards

hitesh

Re: HR Query

Former Member — Wed, 06 Feb 2008 13:24:15 GMT

For US specific

Include the following includes ...

INCLUDE RPC2CD09. "Cluster CD Data-Definition

INCLUDE RPC2CA00. "Cluster CA Data-Definition "XUJP30K079863

INCLUDE RPC2RUU0. "Cluster RU Data-Definition

INCLUDE RPC2RX09. "Cluster RU Data-Definition internat. part

INCLUDE RPPPXD00. "Data befinition buffer PCL1/PCL2

INCLUDE RPPPXD10. "Common part buffer PCL1/PCL2

INCLUDE RPPPXM00. "Buffer handling routine

parameters : p_pernr like pa0000-pernr.

data : it_rgdir like pc261 occurs 0 with header line.

data : it_rt like pc207 occurs 0 with header line.

data : v_seqnr like pc261-seqnr.

start-of-selection.

CALL FUNCTION 'CU_READ_RGDIR'

EXPORTING

persnr = p_pernr

TABLES

in_rgdir = it_rgdir.

IF sy-subrc = 0.

SORT it_rgdir BY seqnr.

ENDIF.

LOOP AT it_rgdir WHERE srtza = 'A'

AND void IS INITIAL

AND reversal IS INITIAL

AND fpper = v_fpper. <--- pass the period

v_seqnr = it_rgdir-seqnr.

rx-key-pernr = p_pernr.

rx-key-seqno = v_seqnr.

rp-imp-c2-ru.

it_rt[] = rt[].

Loop at it_rt . "where lgart = '/101' .

write 😕 it_rt-betrg .

endloop.