聯(lián)芯科技ERP項目-技術(shù)文檔-HR-023-人工成 本年度獎金包調(diào)賬匯總表-V1.0-20090924

DATE\@"yyyy-MM-dd"2009-09-25Version1.0PAGE1聯(lián)芯科技ERP項目 DATE\@"M/d/yyyy"9/25/2009Version1.0 聯(lián)芯科技ERP項目開發(fā)規(guī)格書第I部分:需求模塊MACROBUTTONCheckIt_CheckBox￡MM MACROBUTTONCheckIt_CheckBox￡P(guān)P MACROBUTTONCheckIt_CheckBox￡SD MACROBUTTONCheckIt_CheckBox￡FI MACROBUTTONCheckIt_CheckBox￡CO ■HRMACROBUTTONCheckIt_CheckBox￡其它Spec編號ZLC_SPEC_HR_023短描述人工成本年度獎金包調(diào)賬匯總表類型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數(shù)據(jù)轉(zhuǎn)移需求優(yōu)先級MACROBUTTONUnCheckIt_RadiobuttonHigh/關(guān)鍵 MACROBUTTONCheckIt_RadiobuttonMid/推薦 MACROBUTTONCheckIt_RadiobuttonLow/可選用戶MACROBUTTONNextCell陳志碩要求日期2009-9-15預(yù)計開發(fā)天數(shù)（由功能顧問與開發(fā)顧問評估）必填_____天是否有標準功能MACROBUTTONCheckIt_RadiobuttonYes MACROBUTTONUnCheckIt_RadiobuttonNo標準功能未采用的原因:MACROBUTTONCheckIt_RadiobuttonPerformanceMACROBUTTONCheckIt_RadiobuttonComplexityMACROBUTTONCheckIt_RadiobuttonOtherse參考的標準功能文檔變更歷史版本號文檔維護時間姓名簡要的描述1．02009-陳志碩創(chuàng)建2009-09-24徐世兵增加技術(shù)說明文檔

第II部分:詳細功能描述目的：將調(diào)賬匯總表發(fā)給財務(wù)，由財務(wù)進行針對獎金包的調(diào)賬功能描述:通過讀取系統(tǒng)中人工成本每月分攤比例計算得出半年度、年度分攤比例運行頻率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其它：打印機類型紙張大小語言選擇屏幕：報表/表單的字段順序字段名稱字段技術(shù)名稱字段描述特殊需求1工資核算范圍2周期核算選擇月份的范圍非周期核算（除年終獎外）選擇除年終獎外的非周期核算工資日期多選3年終獎年終獎發(fā)放日期程序用到的表表描述字段名稱字段描述PA0027KBU01公司代碼KST01成本中心KPR01百分比AUF01內(nèi)部訂單邏輯關(guān)系：工資核算范圍為多選項，可以進行多選。對應(yīng)人員數(shù)據(jù)僅針對tcode:pc_payresult中“歷經(jīng)期”、“所在期間”為空的RT表，且RT表中的工資項4001年度獎金為非零或非空的人員。工號—所有針對第2條邏輯的人員工號。姓名--姓名—根據(jù)工號，將字段PA0002-NACHN與字段PA0002-NACHN合并顯示。成本中心、內(nèi)部訂單、已過賬獎金總額—以非周期核算或周期核算的最后一天為查詢?nèi)掌?，PA0001-ABKRS下為“L1”、“L2”、“L3”的人員。通過Tcode：pc_payresult找出歷經(jīng)期間、所在期間（月份）在“開始時間”與“結(jié)束時間”范圍內(nèi)的CO表，以及歷經(jīng)期、所在期間為空的且歷經(jīng)期開始與歷經(jīng)期結(jié)束與非周期核算相等時間的CO表。周期核算表中的（2003月度獎金+3001月度獎金(扣減)）*CO表中對應(yīng)比例（結(jié)果四舍五入，保留2位小數(shù)），放入成本中心、內(nèi)部訂單、實際年度獎金總額—對應(yīng)每個工號，將其“已過賬獎金包總額”加和*年終獎的CO表中對應(yīng)的成本中心、內(nèi)部訂單的比例。（四舍五入，保留2位小數(shù)）年度獎金調(diào)賬金額—實際年度獎金總額-已過賬獎金總額。（正負號保留）工會經(jīng)費調(diào)賬金額—年度獎金調(diào)賬金額*2%。（正負號保留）備注：增加工號與姓名是為了便于前期測試，在最后需要將工號與姓名刪除，所有成本中心與內(nèi)部訂單相同的項進行累加。樣張：

第III部分:技術(shù)說明ProgramnameZ_HR_EXEC_APPORTIONMENT_ADJUSTTransactioncodeZHR023AuthorizationObjectFormFormnameN/AOutputtypeN/AFormroutineN/A程序邏輯：選擇屏幕：1．FORMAUTHORITY_CHECK."人事范圍檢查檢查權(quán)限對象ZP_ORGIN看當前操作者是否有輸入的人事范圍的數(shù)據(jù)的讀取權(quán)限AUTHORITY-CHECKOBJECT'ZP_ORGIN'ID'PERSA'FIELDS_WERKS-LOW.IFSY-SUBRC=0.ELSE.MESSAGEE002(Z_1)WITH'沒有權(quán)限進行查看'.ENDIF.2."日期處理取得周期查詢的期間最后一天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."選擇屏幕數(shù)據(jù)驗證屏幕輸入是否有效，查詢條件是否滿足IFP_PABRPISINITIALORP_PABRJISINITIALORP_PABRP1ISINITIALORP_PABRJ2ISINITIAL.MESSAGEI002(Z_1)WITH'人工成本分攤，期間從期間至需輸入值'.LEAVELIST-PROCESSING.ENDIF.4.PERFORMFRM_GET_DETAIL."數(shù)據(jù)選取處理4.1選取日期范圍內(nèi)，非Z0的員工信息，并保證員工號唯一SELECTDISTINCTPERNRBEGDAENDDAFROMPA0001INTOTABLEGT_PERNRWHEREABKRSINS_ABKRSANDABKRS<>'Z0'ANDBEGDA<=P_DATEANDENDDA>=P_DATE.SORTGT_PERNRBYPERNR.DELETEADJACENTDUPLICATESFROMGT_PERNRCOMPARINGPERNR.4.2循環(huán)員工表GT_PERNR，取員工的工資簇信息，對周期核算添加對應(yīng)的數(shù)據(jù)到gt_co,對非周期、周期的工資項進行計算添加GT_PERNR0，并使gt_co表和GT_PERNR0能對應(yīng)。并處理有CO無工資項，有工資項無CO記錄不輸出。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.IFGS_RGDIR-FPPER<>'000000'."添加周期性核算內(nèi)表GS_CO-INT=INT.APPENDGS_COTOGT_CO.APPENDGS_COTOGT_CO2.ENDIF.CLEAR:GS_C01,GS_CO.ENDLOOP.IFZTYPE<>'X'."同一個工資族中沒有CO表RT不考慮CONTINUE.ENDIF."應(yīng)付獎金（周期）LOOPATGT_PAYROLL-INTER-RTINTOGS_RTWHERELGART='2003'ORLGART='3001'.YTYPE='X'.LV_SUM2=LV_SUM2+GS_RT-BETRG.ENDLOOP."應(yīng)付獎金（非周期）LOOPATGT_PAYROLL-INTER-RTINTOGS_RTWHERELGARTBETWEEN'4001'AND'4003'.YTYPE='X'.LV_SUM3=LV_SUM3+GS_RT-BETRG.ENDLOOP."應(yīng)付獎金（周期+非周期）LOOPATGT_PAYROLL-INTER-RTINTOGS_RTWHERELGARTBETWEEN'4001'AND'4003'ORLGART='2003'ORLGART='3001'.YTYPE='X'.LV_SUM4=LV_SUM4+GS_RT-BETRG.ENDLOOP."數(shù)據(jù)處理（有CO表沒有rt表不考慮）IFYTYPE<>'X'.LOOPATGT_COINTOGS_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.GS_PERNR0-PERNR=GS_PERNR-PERNR.GS_PERNR0-LV_SUM2=LV_SUM2.GS_PERNR0-LV_SUM3=LV_SUM3.GS_PERNR0-ZCOUNT=ZCOUNT.GS_PERNR0-LV_SUM4=LV_SUM4.GS_PERNR0-INT=INT.APPENDGS_PERNR0TOGT_PERNR0.CLEAR:LV_SUM2,LV_SUM3.ENDLOOP.GS_PERNR-ZCOUNT=ZCOUNT.MODIFYGT_PERNRFROMGS_PERNR.CLEAR:GS_PERNR,ZCOUNT,LV_SUM4.4.3對每個人的獎金總額進行匯總。并取得總金額存入GT_PERNR1SORTGT_PERNR0BYPERNRLV_SUM4.LOOPATGT_PERNR0INTOGS_PERNR0.ATENDOFPERNR.READTABLEGT_PERNR0INTOGS_PERNR0INDEXSY-TABIX.APPENDGS_PERNR0TOGT_PERNR1.ENDAT.ENDLOOP.4.4對數(shù)據(jù)進行合并處理從GT_PERNR1和GT_PERNR取得對應(yīng)核算期間和總獎金金額。并計算按周期核算次數(shù)得到分攤比例LOOPATGT_COINTOGS_CO."合并年度獎金READTABLEGT_PERNR0INTOGS_PERNR0WITHKEYPERNR=GS_CO-PERNRINT=GS_CO-INT.IFSY-SUBRC=0.GS_CO-BETRG2=GS_PERNR0-LV_SUM2.GS_CO-BETRG3=GS_PERNR0-LV_SUM3.ENDIF.READTABLEGT_PERNR1INTOGS_PERNR1WITHKEYPERNR=GS_CO-PERNR.IFSY-SUBRC=0.GS_CO-BETRG7=GS_PERNR1-LV_SUM4.ENDIF.READTABLEGT_PERNRINTOGS_PERNRWITHKEYPERNR=GS_CO-PERNR.IFSY-SUBRC=0.GS_CO-ZCOUNT=GS_PERNR-ZCOUNT.ENDIF.IFGS_CO-ZCOUNT<>0.GS_CO-KPRNN1=GS_CO-KPRNN/GS_CO-ZCOUNT.ENDIF.MODIFYGT_COFROMGS_CO.ENDLOOP.4.5處理分攤比例的最后一筆為100減去上面之后保證分攤比例之和為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-TABIX.READTABLEGT_CO1INTOGS_CO1WITHKEYPERNR=GS_CO-PERNR.GS_CO-KPRNN1=GS_CO-KPRNN1+GS_CO1-KPRNN1.MODIFYGT_COFROMGS_CO.ENDAT.CLEAR:GS_CO,GS_CO1.ENDLOOP.4.6對非周期進行處理PERFORMFRM_ADD_FZHOUQI.取得每個對應(yīng)CO表中RT表的BETWEEN'4001'AND'4003'之和。4.7進行輸出前，相關(guān)計算。LOOPATGT_COINTOGS_CO.GS_CO-BETRG=GS_CO-BETRG2*GS_CO-KPRNN/100."獎金包=周期金額*CO表比例GS_CO-BETRG4=GS_CO-BETRG7*GS_CO-KPRNN1/100."計算獎金=總獎金金額*分攤比例GS_CO-BETRG5=GS_CO-BETRG4-GS_CO-BETRG."調(diào)賬金額GS_CO-BETRG6=GS_CO-BETRG5*2/100."18. 是否在職—以非周期核算或周期核算的最后一天為查詢?nèi)掌?，PA0001-ABKRS為"“L1”、“L2”、“L3”時為在職，為“Z0”時為非在職"內(nèi)部訂單描述SELECTSINGLEKTEXTINTOGS_CO-KTEXT1FROMCOASWHEREAUFNR=GS_CO-AUFNN."成本中心描述SELECTSINGLEKTEXTINTOGS_CO-KTEXTFROMCSKTWHERESPRAS=SY-LANGUANDKOSTL=GS_CO-KSTNN.SELECTSINGLEPA0002~NACHN"姓PA0002~VORNA"名INTO(GS_CO-NACHN,GS_CO-VORNA)FROMPA0002WHEREPERNR=GS_CO-PERNRANDPA0002~BEGDA<SY-DATUMANDPA0002~ENDDA>SY-DATUM.CONCATENATEGS_CO-NACHNGS_CO-VORNAINTOGS_CO-NAME.SELECTSINGLEDAT01INTOGS_CO-DAT01FROMPA0041WHEREPERNR=GS_CO-PERNRANDPA0041~BEGDA<SY-DATUMANDPA0041~ENDDA>SY-DATUMANDPA0041~DAR01='01'.MODIFYGT_COFROMGS_CO.CLEAR:GS_CO.ENDLOOP.4.8處理調(diào)賬金額最后累加值等于0DATA:BETRG5(12)TYPEPDECIMALS3,"調(diào)賬金額BETRG6(12)TYPEPDECIMALS3."工會調(diào)賬金額LOOPATGT_COINTOGS_CO.BETRG5=BETRG5+GS_CO-BETRG5.BETRG6=BETRG6+GS_CO-BETRG6.ENDLOOP.SORTGT_COBYPERNR.LOOPATGT_COINTOGS_CO.ATLAST.READTABLEGT_COINTOGS_COINDEXSY-TABIX.GS_CO-BETRG5=GS_C