report ztests.
parameters:p_objid type orgeh .
data:MANAGER_INFO_TABLE type OBJEC occurs 0 with header line .
CALL FUNCTION 'HRCM_ORGUNIT_MANAGER_GET'
EXPORTING
plvar = '01'
otype = 'O'
objid = p_objid
begda = '18000101'
endda = '99991231'
PATH_ID = 'O-O'
TABLES
MANAGER_INFO_TABLE = MANAGER_INFO_TABLE
EXCEPTIONS
PATH_ERROR = 1
ROOT_ERROR = 2
NOTHING_FOUND = 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.
loop at MANAGER_INFO_TABLE.
write:/ MANAGER_INFO_TABLE-OBJID,
MANAGER_INFO_TABLE-begda,
MANAGER_INFO_TABLE-endda.
endloop.
ALSO READ:
- Get Employees List Working Under An Organization Unit.
- Retrieve Manager For An Employee.
- Generate Compensation Statement Report.
- Fetch HR Data Or Records From HR Database Tables.
- Using Macros In HR ABAP Report Program.
.....Back To Sub-Index On HR ABAP.
.....Back To MAIN INDEX.
parameters:p_objid type orgeh .
data:MANAGER_INFO_TABLE type OBJEC occurs 0 with header line .
CALL FUNCTION 'HRCM_ORGUNIT_MANAGER_GET'
EXPORTING
plvar = '01'
otype = 'O'
objid = p_objid
begda = '18000101'
endda = '99991231'
PATH_ID = 'O-O'
TABLES
MANAGER_INFO_TABLE = MANAGER_INFO_TABLE
EXCEPTIONS
PATH_ERROR = 1
ROOT_ERROR = 2
NOTHING_FOUND = 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.
loop at MANAGER_INFO_TABLE.
write:/ MANAGER_INFO_TABLE-OBJID,
MANAGER_INFO_TABLE-begda,
MANAGER_INFO_TABLE-endda.
endloop.
ALSO READ:
- Get Employees List Working Under An Organization Unit.
- Retrieve Manager For An Employee.
- Generate Compensation Statement Report.
- Fetch HR Data Or Records From HR Database Tables.
- Using Macros In HR ABAP Report Program.
.....Back To Sub-Index On HR ABAP.
.....Back To MAIN INDEX.
No comments:
Post a Comment