HR Function Collection

HRFunctionCollection:PMRH_PM_GET_MOLGA得到国家分组RH_PM_GET_EMPLOYEE_GROUP得到员工组RH_PM_GET_PERSONNEL_AREA得到公司代码,员工组,员工子组RH_PM_READ_INFTY得到人员相应InfoType的记录RH_GET_PERSONS_FROM_POSITIONOMRH_DIR_ORG_STRUC_GET得到某组织单位下所有下级单位以及人员信息RH_GET_COSTCENTER_OF_OBJECT得到Object的CostCenterRH_GET_PERNR_WITHOUT_POSITIONReadallemployeesoforganizationunitwithoutposition(Notuseful)BAPI_PDOTYPES_GETDETAILEDLISTObjectListWithDetailedInformationRH_STRUC_GET通过评估路径读取任意对象关系RHPH_SHOW_ORG_STRUCTURE组织单元选择对话框RHPH_STRUCTURE_READ通过评估路径读取任意对象关系RH_READ_OBJECTReadObjectRH_SHOW_STRUCTURERH_ORG_STRUCTURE_SHOWRH_TASK_CATALOG_SHOW显示完整组织结构,无返回值.树形显示完整Joblist无返回值.树形RH_SHOW_STRUCTURE_INLOOP显示完整组织结构树形RH_GET_PERSONAL_TIMESHEETPDHRHAP_POPUP_F4_TEMPLATESearchhelpforETemplateRH_READ_QUALSCALE得到Q的等级信息RHPE_Q_SCALE_READ_DIRECT_INFTY得到QK的等级信息RHPE_POPUP_CLASSIFICATION显示资格组QK对话框RHPD_SEARCH_PEOPLE_WITH_QUAL查找拥有某资格的人员编号信息(tables参数QUALI_TAB必须)RHPP_POPUP_F4_FOR_Q_PROFCY显示资格等级对话框BAPI_QUALIDIRECTORY_LIST读取某QK下属所有QK和QBAPI_QUALIDIRECTORY_LIST_UP向上读取某QK或者Q上级所有QKBAPI_PDOTYPE_Q_GETDETAIL得到Q的详细信息BAPI_PDOTYPE_Q_GETLIST得到所有的Q列表RH_CATALOGUE_DISPLAYRHCT_OBJECT_DISPLAY显示目录T77OC-CATTPRHF4_TEXT_WEGID读取评估路径描述RHF4_TEXT_PLVAR读取计划版本描述RHF4_TEXT_OTYPE读取对象类型描述RH_GET_SCHEDULERH_SHOW_SCHEDULE查看/显示课程E的时间表Unknown/OthersHR_READ_FOREIGN_OBJECT_TEXTGetDepartmentInformation--等长文本描述时,需调用HR_HCP_ADD_MONTH_TO_DATE在日期增加或者减少几个月计算日期直接间隔月数mthp=((sy-datum-p_datum)/(365/12)).month=trunc(mthp).HR_99S_MONTHS_BETWEEN_DATESMONTHS_BETWEEN_TWO_DATES_NEWMONTHS_BETWEEN_TWO_DATESHR_MONTHS_BETWEEN_TWO_DATESHR_AUPBS_MONTH_DAYPYXX_READ_PAYROLL_RESULTGenericImportofPayrollResultsHR_APPEND_ERROR_LISTNUMBER_OF_DAYS_PER_MONTH_GET某年某月的天数PYXX_GET_RELID_FROM_PERNRPYXX_WRITE_PAYROLL_RESULTWAGE_TYPE_CHECK工资类型核查RH_GET_DATE_DAYNAME得到日期的星期(RH_GET_MAIL_USER)RH_APPROVAL_PERCENTAGE_GETRH_GET_APP_PERCENTAGERH_GET_OCC_PERCENTAGE人员计划与发展:工作时数计算等等RH_GET_OTYPE_TEXT对象类型的文本描述函数组RHV1RHV2RHV3RHV4研讨会&会议管理功能组得到某路径下所有文件名(TMP_GUI*:文件操作函数)TB_LIMIT_WS_FILE_DELETE删除某路径的文件(函数组TBLF:文件操作函数)HELP_VALUES_GET_WITH_TABLESearchHelpFunction实现RHPE_SHOW_QUALI_CATALOGUE资格列表信息-选择（树状列表）FIELDPT9981-ZZ_ZGDMMODULEcreate_HELP_ZZ_ZGDM.Datalocal_sobidLIKEhrsobidOCCURS1WITHHEADERLINE.CLEARlocal_sobid[].CALLFUNCTION'RHPE_SHOW_QUALI_CATALOGUE'EXPORTINGplvar=‘01’begda=P9981-BEGDAendda=P9981-ENDDApopup='X'TABLESselected_objects=local_sobidEXCEPTIONSno_authority=1OTHERS=2.Deletelocal_sobidwhereOTYPE‘Q’.DESCRIBETABLElocal_sobidLINESLIN.IFLIN1.MESSAGE‘请选择唯一的资格代码’TYPEW.ENDIF.READTABLElocal_sobidWITHKEYOTYPE=‘Q’.IFSY-SUBRC=0.PT9981-ZZ_ZGDM=local_sobid-SOBID.ENDIF.DYNP_VALUES_READLWBABAPI00:CLEAR:DYNPFIELDS,DYNPFIELDS[].DYNPFIELDS-FIELDNAME='PT9785-ZZ_ZPDL'.APPENDDYNPFIELDS.REPID=SY-REPID.CALLFUNCTION'DYNP_VALUES_READ'EXPORTINGDYNAME=REPIDDYNUMB=SY-DYNNRTABLESDYNPFIELDS=DYNPFIELDSEXCEPTIONSOTHERS.READTABLEDYNPFIELDSINDEX1.ENQUEUE_READ读取各种对象锁定CONVERSION_EXIT_ALPHA_OUTPUT取消N型前导0SAP_CONVERT_TO_XLS_FORMAT把数据保存成XLSRZL_WRITE_FILE_LOCAL向服务器写文件（绕过权限检查）SAPGUI_PROGRESS_INDICATOR显示进度条SO_SPLIT_FILE_AND_PATH分割文件路径和文件名HELP_VALUES_GET_WITH_TABLE建立搜索帮助HR_DISPLAY_BASIC_LIST类似于ALV，但是实现起来更加简单。（参考范例：RPT55400）T778U定义信息类型子类型T582A/T588R/T588Q/T588B自定义信息类型屏幕设置(某些需要在View中修改)RHPK_POPUP_BEGDA_ENDA开始结束日期对话框HR_ENQUEUE_OBJECTLockHRObjects:函数组HRBAS00ENQDEQHR_DEQUEUE_OBJECTUnlockHRObjectsREUSE_HR_OBJID_F4HRReuse:ValueHelp(F4)forOBJIDRH_OBJID_REQUESTInputHelp(F4)forOBJIDRH_SELECT_OBJECTS_FOR_OTYPESelectObjectsofSpecifiedObjectTypeRH_FORM_EXIST检查FM是否存在RH_FUNCTION_EXIST检查表单例程是否存在使用function修改InfotypeFORMupd_0041.data:l_fieldname(20)typec.DATA:TMP_0041LIKEP0041OCCURS0WITHHEADERLINE.FIELD-SYMBOLSFS.**********************************************cleartmp_return.CALLFUNCTION'BAPI_EMPLOYEE_ENQUEUE'EXPORTINGnumber=ALV_TABLE-PERNRIMPORTINGreturn=tmp_return.CLEAR:WA_0041,L_FIELDNAME.CLEAR:TMP_0041[].CALLFUNCTION'HR_READ_INFOTYPE'EXPORTINGPERNR=ALV_TABLE-PERNRINFTY='0041'TABLESINFTY_TAB=TMP_0041EXCEPTIONSINFTY_NOT_FOUND=1OTHERS=2.IFSY-SUBRC0.ENDIF.LOOPATTMP_0041.ENDLOOP.moveTMP_0041towa_0041.CONCATENATE'WA_0041-DAT'ALV_TABLE-COUNTINTOL_FIELDNAME.CONDENSEL_FIELDNAME.ASSIGN(L_FIELDNAME)TOFS.CONCATENATEALV_TABLE-JDRQ(4)ALV_TABLE-JDRQ+5(2)ALV_TABLE-JDRQ+8(2)INTOFS.CALLFUNCTION'HR_INFOTYPE_OPERATION'EXPORTINGINFTY='0041'NUMBER=ALV_TABLE-PERNRVALIDITYEND=wa_0041-enddaVALIDITYBEGIN=wa_0041-begdaRECORD=wa_0041OPERATION='MOD'*TCLAS='A'DIALOG_MODE='1'IMPORTINGRETURN=tmp_return*KEY=.IFsy-subrcNE0.ROLLBACKWORK.MESSAGE'error'TYPE'E'.ELSE.COMMITWORKANDWAIT.ENDIF.CALLFUNCTION'BAPI_EMPLOYEE_DEQUEUE'EXPORTINGnumber=wa_0041-pernrIMPORTINGreturn=tmp_return.ENDFORM.upd_0041FITRV_CALCULATORcallfunction’FITRV_CALCULATOR’*EXPORTING*INPUT_VALUE=*CURRENCY=*START_COLUMN=’10’*START_ROW=’10’IMPORTINGOUTPUT_VALUE=X_VALUEEXCEPTIONSINVALID_INPUT=1CALCULATION_CANCELED=2OTHERS=3.