联芯科技ERP项目-技术文档-HR-022-人工成 本年度比例分摊查询-V1.2-20090924

DATE\@"yyyy-MM-dd"2009-09-252009-09-04Version1.0PAGE1联芯科技ERP项目 DATE\@"M/d/yyyy"9/25/20099/4/2009Version1.0 联芯科技ERP项目开发规格书第I部分:需求模块MACROBUTTONCheckIt_CheckBox£MM MACROBUTTONCheckIt_CheckBox£PP MACROBUTTONCheckIt_CheckBox£SD MACROBUTTONCheckIt_CheckBox£FI MACROBUTTONCheckIt_CheckBox£CO ■HRMACROBUTTONCheckIt_CheckBox£其它Spec编号ZLC_SPEC_HR_022短描述人工成本年度比例分摊导入类型MACROBUTTONUnCheckIt_Radiobutton报表●ABAPProgramMACROBUTTONCheckIt_RadiobuttonInformationSystemMACROBUTTONCheckIt_RadiobuttonReportPrinter MACROBUTTONCheckIt_RadiobuttonReportWriterMACROBUTTONCheckIt_RadiobuttonSAPQueryMACROBUTTONCheckIt_RadiobuttonBWreportMACROBUTTONCheckIt_RadiobuttonCrystalReportsMACROBUTTONCheckIt_RadiobuttonOthersMACROBUTTONCheckIt_Radiobutton表单MACROBUTTONCheckIt_Radiobutton流程增强MACROBUTTONCheckIt_RadiobuttonUserExitMACROBUTTONCheckIt_RadiobuttonBADIMACROBUTTONCheckIt_RadiobuttonDialogProgram MACROBUTTONCheckIt_RadiobuttonOtherseMACROBUTTONCheckIt_Radiobutton接口MACROBUTTONCheckIt_RadiobuttonBAPIMACROBUTTONCheckIt_RadiobuttonIDOCMACROBUTTONCheckIt_RadiobuttonALEMACROBUTTONCheckIt_RadiobuttonOthersendMACROBUTTONCheckIt_Radiobutton数据转移需求优先级MACROBUTTONUnCheckIt_RadiobuttonHigh/关键 MACROBUTTONCheckIt_RadiobuttonMid/推荐 MACROBUTTONCheckIt_RadiobuttonLow/可选用户MACROBUTTONNextCell陈志硕要求日期2009-9-15预计开发天数（由功能顾问与开发顾问评估）必填_____天是否有标准功能MACROBUTTONCheckIt_RadiobuttonYes MACROBUTTONUnCheckIt_RadiobuttonNo标准功能未采用的原因:MACROBUTTONCheckIt_RadiobuttonPerformanceMACROBUTTONCheckIt_RadiobuttonComplexityMACROBUTTONCheckIt_RadiobuttonOtherse参考的标准功能文档变更历史版本号文档维护时间姓名简要的描述1．02009-陈志硕创建1.12009-9-2陈志硕修改20090924徐世兵增加技术文档

第II部分:详细功能描述目的：通过此功能计算个人半年度、年度奖金包比例计算功能描述:通过读取系统中人工成本每月分摊比例计算得出半年度、年度分摊比例运行频率MACROBUTTONCheckIt_Radiobutton任何时间MACROBUTTONCheckIt_Radiobutton每天MACROBUTTONCheckIt_Radiobutton每周MACROBUTTONCheckIt_Radiobutton两周MACROBUTTONUnCheckIt_Radiobutton每月MACROBUTTONCheckIt_Radiobutton每年MACROBUTTONCheckIt_Radiobutton其它：运行方式MACROBUTTONUnCheckIt_Radiobutton手工MACROBUTTONCheckIt_Radiobutton自动MACROBUTTONCheckIt_Radiobutton批处理MACROBUTTONCheckIt_Radiobutton在线处理输出方式MACROBUTTONCheckIt_Radiobutton屏幕输出MACROBUTTONCheckIt_Radiobutton打印MACROBUTTONUnCheckIt_Radiobutton文件输出MACROBUTTONCheckIt_Radiobutton其它：打印机类型纸张大小语言选择屏幕：报表/表单的字段顺序字段名称字段技术名称字段描述特殊需求1工资核算范围人事范围当前工资核算范围D300/D3102导出人工成本年度分摊比例选择月份的范围导出模版中的比例3导出年度奖金包分摊明细选择周期核算范围、非周期核算日期程序用到的表表描述字段名称字段描述PA0027KBU01公司代码KST01成本中心KPR01百分比AUF01内部订单逻辑关系：工资核算范围为多选项，可以选择L1、L2、L3D300、D310或者他们的任意组合。导出所选工资核算范围下当前日期的人员人工成本分摊比例。导出人工成本年度分摊比例时仅针对当前日期下PA0001-ABKRS下非“ZO”的情况。导出年度奖金包分摊明细时针对在所有在“开始时间”与“结束时间”范围内以及非周期发放时间上有薪资发放记录的人。即通过tcode：pc_payresult查询记录，“历经期”与“所在期间”在“开始时间”和“结束时间”范围内，或“历经期”与“所在期间”为空，“历经期开始”与“历经期结束”等于非周期核算时间。运行报表时需考虑其权限对象，根据操作人员分配的权限对象P_PCR进行人员的检索。以下规则仅针对导出人工成本年度分摊比例项：其他期间—以月为对象选择计算范围。例：200901至200906，或200901至200901。。分摊导入月份—将其他期间输入的日期范围导入。只需显示一行，无需每行记录都显示此信息。工号—列出所选工资核算人事范围内的人员且PA0001-ABKRS下非“ZO”的工号。姓名—根据工号，将字段PA0002-NACHN与字段PA0002-NACHN合并显示。开始时间—根据员工编号，取字段PA0041-DAR01为“01”时，字段PA0041-DAT01的值。若此值大于“其他期间”中首月的第一天，则“开始时间”填入PA0041-DAT01。若此值小于“其他期间”中首月第一天，则“开始时间”填入“其他期间”中首月的第一天结束时间—根据员工编号，取字段PA0041-DAR01为“10”时，字段PA0041-DAT01的值。若此值所在月份最后一天大于“其他期间”中末月的最后一天，则“结束时间”填入“其他期间”中末月的最后一天。若此值所在月份最后一天小于“其他期间”中末月最后一天，则“结束时间”填入PA0041-DAT01所在月份的最后一天。“其他期间”中末月的最后一天。公司代码—当所选工资核算范围为“L1”或“L3”时人事范围为D300时，填入D300；工资核算范围为“L2”当所选人事范围为D310时，填入D310。成本中心、内部订单、比例—通过Tcode：pc_payresult找出历经期间、所在期间（月份）在“开始时间”与“结束时间”对应员工工号，范围内的CO表。将找到的CO表中的比例除以找到的CO表数，得出结果保留2位小数（四舍五入）。重复每个月的CO表中的记录，直至最后一个比例=100-实际数，使最终所有的比例之和为100。将成本中心和内部订单完全相同的比例，得出的数据放入至导出表中。在表PA0027“其他期间”范围内，查询字段成本中心KST01至KST25、内部订单AUF01至AUF25、比例KPR01至KPR25。每个月的所有对应比例KPR01均除以“其他期间”的月份数，得出结果保留2位小数（四舍五入）。重复每个月的表PA0027中的记录，直至最后一个比例=100-实际数，使最终所有的比例之和为100。将成本中心KPR01和内部订单AUF01完全相同的比例KPR01相加，得出的数据放入至导出表中。以下规则仅针对导出年度奖金包分摊明细：工号—所有针对第三条逻辑的人员工号。姓名--姓名—根据工号，将字段PA0002-NACHN与字段PA0002-NACHN合并显示。开始时间--根据员工编号，取字段PA0041-DAR01为“01”时，字段PA0041-DAT01的值。若此值大于“周期核算”中首月的第一天，则“开始时间”填入PA0041-DAT01。若此值小于“周期核算”中首月第一天，则“开始时间”填入“周期核算”中首月的第一天结束时间—根据员工编号，取字段PA0041-DAR01为“10”时，字段PA0041-DAT01的值。若此值所在月份最后一天大于“周期核算”中末月的最后一天，则“结束时间”填入“周期核算”中末月的最后一天。若此值所在月份最后一天小于“周期核算”中末月最后一天，则“结束时间”填入PA0041-DAT01所在月份的最后一天。公司代码—当所选人事范围为D300时，填入D300；当所选人事范围为D310时，填入D310。成本中心、内部订单、比例、全年奖金—以非周期核算或周期核算的最后一天为查询日期，PA0001-ABKRS下为“ZO”的人员，比例为空。通过Tcode：pc_payresult找出历经期间、所在期间（月份）在“开始时间”与“结束时间”范围内的CO表，以及历经期、所在期间为空的且历经期开始与历经期结束与非周期核算相等时间的CO表。周期核算表中的（2003月度奖金+3001月度奖金(扣减)）*CO表中对应比例（结果四舍五入，保留2位小数），放入成本中心、内部订单、年度奖金。非周期核算的4001年度奖金、4002年终双薪、4003上半年度绩效考核奖金*CO表中对应比例，放入成本中心、内部订单、年度奖金。将成本中心、内部订单项完全一致的数据合并，在年度奖金列中放入上述之和。以非周期核算或周期核算的最后一天为查询日期，PA0001-ABKRS下为“L1”、“L2”、“L3”的人员，使用第11条逻辑得出成本中心、内部订单、比例。使用a）逻辑得出所有RT表，将所有RT表中的（2003月度奖金+3001月度奖金(扣减)+4001年度奖金+4002年终双薪+4003上半年度绩效考核奖金）*比例（结果四舍五入是否在职—以非周期核算或周期核算的最后一天为查询日期，PA0001-ABKRS为“L1”、“L2”、“L3”时为在职，为“Z0”时为非在职。样张：

第III部分:技术说明ProgramnameZ_HR_EXEC_APPORTIONMENTTransactioncodeZHR022AuthorizationObjectZP_ORGINFormFormnameN/AOutputtypeN/AFormroutineN/A程序逻辑：程序逻辑说明及程序逻辑图1．FORMAUTHORITY_CHECK."人事范围检查检查权限对象ZP_ORGIN看当前操作者是否有输入的人事范围的数据的读取权限AUTHORITY-CHECKOBJECT'ZP_ORGIN'ID'PERSA'FIELDS_WERKS-LOW.IFSY-SUBRC=0.ELSE.MESSAGEE002(Z_1)WITH'没有权限进行查看'.ENDIF.2."日期处理根据输入的期间得到其期间的第一天和期间的最后一天.其中函数BKK_GET_MONTH_LASTDAY是用来读取输入日期月份最后一天的。CONCATENATEP_PABRJP_PABRP'01'INTOGS_DATE.CONCATENATEP_PABRJ2P_PABRP1'01'INTOGE_DATE.CALLFUNCTION'BKK_GET_MONTH_LASTDAY'EXPORTINGI_DATE=GE_DATEIMPORTINGE_DATE=GE_DATE.3.PERFORMSELECTION_CHECK."选择屏幕数据验证对选择屏幕，进行数据验证，当报表类型不同（人工成本年度分摊、年度奖金分摊明细），确定对应的输入条件不同，并对其输入有效性检查。IFP_CRB='X'.IFP_PABRPISINITIALORP_PABRJISINITIALORP_PABRP1ISINITIALORP_PABRJ2ISINITIAL.MESSAGEI002(Z_1)WITH'人工成本分摊，期间从期间至需输入值'.LEAVELIST-PROCESSING.ENDIF.ELSE.IF(P_PABRP3ISINITIALORP_PABRJ3ISINITIALORP_PABRP4ISINITIALORP_PABRJ4ISINITIAL)ANDS_BUDATISINITIAL.MESSAGEI002(Z_1)WITH'人工成本分摊，期间从期间至需输入值'.LEAVELIST-PROCESSING.ENDIF.ENDIF.4.数据读取PERFORMFRM_GET_DETAIL.4.1取PA0001下所有员工信息，保证员工的唯一性。"取员工SELECTDISTINCTPERNRBEGDAENDDAFROMPA0001INTOTABLEGT_PERNRWHEREBUKRSINS_WERKS.SORTGT_PERNRBYPERNR.DELETEADJACENTDUPLICATESFROMGT_PERNRCOMPARINGPERNR.4.2循环员工表GT_PERNR，取员工的工资簇信息（分周期核算和非周期核算其中非周期核算只针对年度奖金分摊明细）LOOPATLT_RGDIRINTOLS_RGDIRWHEREFPBEG>=GS_DATEANDFPEND<=GE_DATEANDFPPER<>'000000'.APPENDLS_RGDIRTOGT_RGDIR.ENDLOOP.IFP_CRB<>'X'.LOOPATS_BUDAT.LOOPATLT_RGDIRINTOLS_RGDIRWHEREFPPER='000000'ANDINPER='000000'ANDFPBEG=S_BUDAT-LOW.APPENDLS_RGDIRTOGT_RGDIR.ENDLOOP.ENDLOOP.ENDIF.4.3根据渠道的工资簇，取CO/RT表信息（其中对于有CO表RT表无对应工资项2003、3001，4001、4002、4003的CO表不输出，对于无CO表RT表满足上述工资项也不进行计算）LOOPATGT_PAYROLL-INTER-C0INTOGS_C01WHEREAPZNR='01'.ZTYPE='X'.IFSY-TABIX=1ANDGS_RGDIR-FPPER<>'000000'.ZCOUNT=ZCOUNT+1.ENDIF.MOVE-CORRESPONDINGGS_C01TOGS_CO.GS_CO-PERNR=GS_PERNR-PERNR.GS_CO-FPBEG=GS_RGDIR-FPBEG.SELECTSINGLE*FROMPA0001WHEREPERNR=GS_CO-PERNRANDBEGDA<=P_DATEANDENDDA>=P_DATEANDABKRS='Z0'.IFSY-SUBRC=0."离职周期输出IFGS_RGDIR-FPPER='000000'."非周期输出APPENDGS_COTOGT_CO.APPENDGS_COTOGT_CO2.ENDIF.ENDIF.IFGS_RGDIR-FPPER<>'000000'."周期输出APPENDGS_COTOGT_CO.APPENDGS_COTOGT_CO2.ENDIF.CLEAR:GS_C01,GS_CO.ENDLOOP.IFZTYPE<>'X'."同一个工资族中没有CO表RT不考虑CONTINUE.ENDIF."应付奖金LOOPATGT_PAYROLL-INTER-RTINTOGS_RTWHERELGART='2003'ORLGART='3001'ORLGARTBETWEEN'4001'AND'4003'.YTYPE='X'.LV_SUM2=LV_SUM2+GS_RT-BETRG.ENDLOOP.IFYTYPE<>'X'.LOOPATGT_COINTOGS_CO."删除有CO表无对应工资项的CO表记录READTABLEGT_CO2INTOGS_CO2WITHKEYPERNR=GS_CO-PERNR"员工号KBUNN=GS_CO-KBUNNKSTNN=GS_CO-KSTNNAUFNN=GS_CO-AUFNNKPRNN=GS_CO-KPRNN.IFSY-SUBRC=0.DELETEGT_CO.ENDIF.ENDLOOP.ENDIF.CLEAR:ZTYPE,YTYPE.REFRESH:GT_CO2.ENDLOOP.GS_PERNR-LV_SUM2=LV_SUM2.GS_PERNR-ZCOUNT=ZCOUNT.MODIFYGT_PERNRFROMGS_PERNR.CLEAR:LV_SUM2,GS_PERNR,ZCOUNT.4.3循环得到的CO信息的表，读取其对应的RT信息得到对应的金额，并选取姓名信息，处理开始结束时间。4.4处理最后的分摊比例的最后一项为100减去之上所有的合计保证分摊比例总和为100.SORTGT_COBYPERNR."处理最后一笔为100-累加DATA:KPRNNTYPEKPRNN."分摊比例累加LOOPATGT_COINTOGS_CO.READTABLEGT_COINTOGS_COINDEXSY-TABIX.KPRNN=KPRNN+GS_CO-KPRNN1.ATENDOFPERNR.READTABLEGT_COINTOGS_COINDEXSY-TABIX.GS_CO-KPRNN1=100-KPRNN.CLEAR:KPRNN.APPENDGS_COTOGT_CO1.ENDAT.ENDLOOP.LOOPATGT_COINTOGS_CO.ATENDOFPERNR.READTABLEGT_COINTOGS_COINDEXSY-