10-16-2008 10:36 AM
Hi,
can any body help me out in triving the data from cluster tables for the following wage type .
regards,
Phani D
10-16-2008 10:42 AM
HI kumar,
we some Fms they are cd_read_rgdir,cd_read_last,pyxx_read_payroll_result.
or by uisng get payroll event or using macros.
thk u
santhosh
10-16-2008 10:44 AM
HI KUMAR,
FOLLOW THE BELLOW MENTION STEPS
STEP 1:
DATA DECLERATION:
DATA:W_PERNR TYPE PERNR_D,
W_MOLGA TYPE MOLGA,
SEQNR TYPE CDSEQ,
W_RELID TYPE RELID_PCL2,
IT_RGDIR TYPE STANDARD TABLE OF PC261,
IT_RESULT TYPE PAY99_RESULTS.
STEP 2:-
READ EMPLOYEE PAYROLL RUN FROM RESULT DIRECTORY,
BY USING THE FOLLOWING FUNCTION MODULE.
CALL FUNCTION 'CD_READ_RGDIR'
EXPORTING
persnr = W_PERNR
TABLES
in_rgdir = IT_RGDIR
EXCEPTIONS
NO_RECORD_FOUND = 1
.
STEP 3:-
FETCH REQUIRED SEQUENCE NO FROM THE RESULT DIRECTORY
USING THE FUNCTION MODULEu2026u2026u2026BY PASSING BEGIN DATE, ENDDATE, RESULT DIRECTORYu2026
CALL FUNCTION 'CD_READ_LAST'
EXPORTING
begin_date = begin_date
end_date = end_date
IMPORTING
OUT_SEQNR = SEQNR
TABLES
rgdir = IT_rgdir
EXCEPTIONS
NO_RECORD_FOUND = 1
.
STEP 4:-
NOW FETCH EMPLOYEE COUNTRY CLUSTER TABLE FROM u2018T500Lu2019 BY PASSING MOLGA (COUNTRY KEY).
SELECT SINGLE RELID FROM T500L INTO TABLE W_RELID WHERE MOLGA EQ W_MOLGA.
STEP 5:
NOW READ PAYROLL RESULT FROM CLUSTER TABLE BY PASSING SEQUENCE NO , RELID OR CLUSTER ID u2026PERNR USING THE FUNCTION MODULE u2026
CALL FUNCTION 'PYXX_READ_PAYROLL_RESULT'
EXPORTING
CLUSTERID = W_RELID
employeenumber = W_PERNR
sequencenumber = W_SEQNR
READ_ONLY_BUFFER = ' '
READ_ONLY_INTERNATIONAL = ' '
ARC_GROUP = ' '
CHECK_READ_AUTHORITY = 'X'
FILTER_CUMULATIONS = 'X'
CLIENT = CLIENT
IMPORTING
VERSION_NUMBER_PAYVN = VERSION_NUMBER_PAYVN
VERSION_NUMBER_PCL2 = VERSION_NUMBER_PCL2
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
.
STEP 6:-
READ WAGE AMOUNT FOR THE CORRESPONDING WAGE TYPE FROM THE DEEEP STRUCTURE INTERNA TABLE USINGu2026..
LOOP AT IT_RESULT-INTER-RT INTO WA_RT.
WRITE: /u201DAMOUNTu201D.
ENDLOOP.
10-16-2008 10:59 AM