查询工资核算结果
事务代码:PC_PAYRESULT
BAPI
DATA:lv_relid TYPE relid_pcl,
lv_molga TYPE molga,
lt_rgdir TYPE TABLE OF pc260,
lt_pc261 TYPE TABLE OF pc261.
"获取序列号
CALL FUNCTION 'CD_READ_RGDIR'
EXPORTING
persnr = pernr
TABLES
in_rgdir = lt_rgdir
EXCEPTIONS
no_record_found = 1
OTHERS = 2.
CALL FUNCTION 'PYXX_GET_RELID_FROM_PERNR'
EXPORTING
employee = pernr
IMPORTING
relid = lv_relid
molga = lv_molga
EXCEPTIONS
error_reading_infotype_0001 = 1
error_reading_molga = 2
error_reading_relid = 3
OTHERS = 4.
MOVE-CORRESPONDING lt_rgdir TO lt_pc261.
"获取工资记录
CALL FUNCTION 'PYXX_READ_RGDIR_PAYRESULTS'
EXPORTING
clusterid = lv_relid
employeenumber = pernr
TABLES
rgdir = lt_pc261
imported_periods = result
EXCEPTIONS
import_error = 1
not_authorized_for_all = 2
OTHERS = 3.