SAP HCM 如何计算缺勤实数

news2024/11/16 6:53:29

导读

INTRODUCTION

缺勤实数：这几天好几个朋友问题有什么办法可以计算出缺勤的时长，因为计算时长需要和排班去匹配，所以逻辑复杂度还是比较高的，希望有标准的函数能完成。其实SAP有个标准的函数可以完成，复杂的时候填充的参数特别多，所以今天介绍一个函数PA30保存2001的时候会调用，这样可以知道标准参数需要填充什么值。

作者：vivi，来源：osinnovation。

一、具体函数名称：

函数名：HR_ABS_ATT_TIMES_AT_ENTRY，这个函数关键是填充0000、0001、0002、0007、2001、2002、2003这几个内表，注意，这里内表我们最好是填充全量值，特别是2003内表，Why？因为底层函数判断经常会找前天与后天的班次（真要针对的跨夜班），所以如果数据不全，查询的数据不全。如果是用逻辑数据库，那么get pernr即可。

二、函数OR报表的具体解决方案：

方案一：报表中调用此函数，那么就方便，我们启用逻辑数据库，在报表中tables:0000,0001,0002,0007,2001,2002,2003就可以，系统会自动抓取内表数据。方案二：在函数中调用report的数据，例如下图参考就是函数中调用标准的报表，然后从标准报表中抓内表数据到函数中。

DATA: selectable LIKE TABLE OF rsparams. "选择参数内表DATA: selectline LIKE LINE OF selectable.

CLEAR selectline.

selectline-selname = 'PNPPERNR'.

selectline-kind = 'S'.

    selectline-sign = 'I'.
    selectline-option = 'EQ'.
    selectline-low = wa_data-pernr.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'PNPTIMR6'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'PNPBEGDA'.
    selectline-kind = 'P'.
    selectline-low = lv_begda.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'PNPENDDA'.
    selectline-kind = 'P'.
    selectline-low = lv_endda.
    APPEND selectline TO selectable.

*按工资核算的历经期
    CLEAR selectline.
    selectline-selname = 'FOR_VIEW'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

*收入类别
    CLEAR selectline.
    selectline-selname = 'SALA'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'BONU'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'STOC'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'SEVE'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'CPER'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'ICI'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'IDB'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

*员工类型
    CLEAR selectline.
    selectline-selname = 'CHRD'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'CHOB'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'CHCW'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'RDPR'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

*输出格式
    CLEAR selectline.
    selectline-selname = 'RB_ALV'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.

    CLEAR selectline.
    selectline-selname = 'TOTAL'.
    selectline-kind = 'P'.
    selectline-low = 'X'.
    APPEND selectline TO selectable.
    EXPORT lv_flag = 'X' TO MEMORY ID 'HCNCTXM0'.
    SUBMIT hcnctxm0 WITH SELECTION-TABLE selectable AND RETURN.
    IMPORT it_data_tax FROM MEMORY ID 'MH253'.
    IF sy-subrc = 0.
      FREE MEMORY ID 'MH253'.
    ENDIF.