ZLK0: from XLK0

--------------------------------------------------------------------------------
ZLK0 001 COM *과거급여 마이그레이션********************
ZLK0 002 COM Payroll Account Transfer T558B,D
ZLK0 003 COM Initialization INTERNATIONAL
ZLK0 004 PGM TRN Program type for payroll
ZLK0 005 UPD YES Update database (YES/NO)
ZLK0 006 OPT INFT Read used infotypes only
ZLK0 007 OPT TIME Import all time infotypes
ZLK0 008 COPY XBD0 Edit basic data
ZLK0 009 RFRSH IT Delete IT after editing basic data
ZLK0 010 IMPRT L Import last payroll result
ZLK0 011 TRANS 558D Transfer payroll account T558A INTERNA.
ZLK0 012 BENTR CHK Transfer benefit wage types to BENTAB
ZLK0 013 PRINT NP IT Sort table IT
ZLK0 014 _MIG1 *IT보정 - BT생성하기위함
ZLK0 015 P0009 Z050 GEN NOAB *은행정보
--------------------------------------------------------------------------------
Z050***** DELIMI * AMT= /562AMT?0
Z050******
Z050*****> DVAKEYBNKSA
Z050*****> * DAMT= BETRGAMT?0
Z050*****> * * DNUM= ANZHLNUM?0
Z050*****> * * *
Z050*****> * * > AMT= /560MULTI NAA AMT/100.00AMT< /562ZERO= N NEXTR A Z050*****> * * > AZGCY Z0509
Z050*****> * > ZAMTS /564AMT< /562GCY Z0509 Z050*****> 0 ZGCY Z0509 "ZPAYTP 9
--------------------------------------------------------------------------------
Z0509**** DZERO=&P9 ADDWT&P9 VAKEYZLSCH
Z0509***** DAMT= /564AMT?0
Z0509***** * AMT=& P9 NEXTR A COMPARE LIMIT FOR BANK TRANSF
Z0509***** * ADAMT?IGRUEB
Z0509***** * * BTREC /559ADDWT /559ELIMI * SUBWT /562
Z0509***** * < adnum="&"> ZERO= N NEXTR A TRANSF
Z0509***** * < > A BTREC /559ADDWT /559ELIMI * SUBWT /562
Z0509***** > AMT=& P9 NEXTR A COMPARE LIMIT FOR BANK TRANSF
Z0509***** > ADAMT?IGRUEB
Z0509***** > * BTREC /558ADDWT /558ELIMI * SUBWT /562
Z0509***** > <> < adnum="&"> < * Z0509***** > < > ZERO= N NEXTR A TRANSF
Z0509***** > < > A BTREC /558ADDWT /558ELIMI * SUBWT /562
Z0509****2 AMT=& P9 ADDWT /557ELIMI * SUBWT /562
--------------------------------------------------------------------------------
X05D***** DPPPAR A LEAVING IN THE PERIODE
X05D****** DPPPAR F LEAVING AT END OF PERIODE
X05D****** * DPPPAR R NOT ACT.=LEAVING AT 1. OF PER.
X05D****** * *
X05D****** * R NUM=1 ADDWT&MY10ZERO= N FORCE BANK TRANSFER
X05D****** F NUM=1 ADDWT&MY10ZERO= N FORCE BANK TRANSFER
X05D*****A NUM=1 ADDWT&MY10ZERO= N FORCE BANK TRANSFER
--------------------------------------------------------------------------------
ZLK0 016 PIT XCOP GEN NOAB Copy wage types to RT
--------------------------------------------------------------------------------
XCOP***** ELIMI * ADDWTE*
--------------------------------------------------------------------------------
ZLK0 017 SORT RT Sort results table
ZLK0 018 PRINT NP RT Display table RT
ZLK0 019 SETCU Prepare CRT (old results)
ZLK0 020 ADDCU P30 Update cumulated values
ZLK0 021 PRINT NP CRT Table of cumulated values (CRT)
ZLK0 022 EXPRT KR *xport result (DB: PCL2 / CL: RX)->KR로


*&---------------------------------------------------------------------*
*& Form fu_zmig1
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
FORM fu_mig1.
LOOP AT it.
IF ( it-lgart BETWEEN '1000' AND '9999' ) OR it-lgart = '/001' OR it-lgart = '/003' OR it-lgart = '/BR1'.
it-abart = '3'.
ELSE.
it-abart = '*'.
ENDIF.
MODIFY it.
ENDLOOP.
ENDFORM. "fu_zmig1

10/2009 in Germany

10/2009 in Germany

개인의 인건비를 프로젝트별로 정산하려한다.

[요구사항]
개인의 인건비를 프로젝트별로 정산하려한다.

[HR]
월중에 조직이 변경된 직원의 경우 인건비가 각 코스트센터별로 일할계산되어 정리되어있다.

급여전표에서 해당 정보를 추출할 수 있다.


PPOIX 급여결과라인 인덱스 -> 전기라인 - 직원별, 임금유형별 금액
PPDHD 회계로 전송: 전표헤더 -> 전표전기일, 회계전표의 연결고리
PPDIT 회계로 전송: HR IDOC의 라인 -> 코스트센터

기호계정과 연결된 회계계정은 다른 테이블을 참고한다.
T030 표준계정테이블 -> 거래키 (HRC, HRF, HRA)

user-exit - Google 검색

user-exit - Google 검색

An ABAPer: HR-ABAP function modules

An ABAPer: HR-ABAP function modules

abaphr.com

abaphr.com

SAPFunctional.com - HCM (HR) Tutorials

SAPFunctional.com - HCM (HR) Tutorials

An ABAPer: HR-ABAP function modules

An ABAPer: HR-ABAP function modules

An ABAPer: HR-ABAP function modules

An ABAPer: HR-ABAP function modules

Knowing the User-exit by giving function exit

REPORT ztest_notepad.
DATA: BEGIN OF it_modsap OCCURS 0,
name TYPE modsap-name,
typ TYPE modsap-typ,
member TYPE modsap-member,
END OF it_modsap.
TYPE-POOLS:slis.
DATA:wa_layout TYPE slis_layout_alv.
DATA:it_sort TYPE slis_t_sortinfo_alv.
DATA:wa_sort LIKE LINE OF it_sort.
PARAMETERS:p_exit TYPE modsap-member.
SELECT * FROM modsap INTO TABLE it_modsap WHERE member = p_exit.
READ TABLE it_modsap INDEX 1.
SELECT * FROM modsap INTO TABLE it_modsap WHERE name = it_modsap-name.
wa_layout-colwidth_optimize = 'X'.
wa_sort-fieldname = 'NAME'.
wa_sort-tabname = 'IT_MODSAP'.
wa_sort-up = 'X'.
APPEND wa_sort TO it_sort.
CLEAR wa_sort.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = sy-repid
i_structure_name = 'MODSAP'
is_layout = wa_layout
it_sort = it_sort
TABLES t_outtab = it_modsap.