SEPC_ERP試點階段_技術(shù)書_PS_ZPS00001_采購申請類型增強功能_V1

《SEPC_ERP試點階段_技術(shù)書_PS_ZPS00001_采購申請類型增強功能_V1》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在工程資料-天天文庫。

1、四川省電力公司企業(yè)資源管理(ERP)系統(tǒng)實施項目技術(shù)設(shè)計說明書第一部分：基本信息(生成新的版本后,以下內(nèi)容要相應(yīng)改動)開發(fā)類型兇增強□接口□單據(jù)□報表技術(shù)工具EnhancementDialogABAP00RFCBDCServerfileSAPScript—UserExit□BAdTInteractivelistFunctiongroupBAPTfunction□ExecutiveProgramTableContentsModificationLocalfileSmartforms□Output-o

2、nlyList模塊PS開發(fā)機(jī)及集團(tuán)DEV(llO)事務(wù)代碼CMOD程序IDZPSOOOO1程序名稱采購申請類型增強功能功能設(shè)計者康陽技術(shù)設(shè)計者王剛強ABAP程序員王剛強第二部分：設(shè)計書維護(hù)記錄更新日期更新人員簡要說明第三部分：技術(shù)方案描述3.1業(yè)務(wù)需求描述業(yè)務(wù)人員項目網(wǎng)絡(luò)作業(yè)中按照物資/服務(wù)需求計劃創(chuàng)建物資/服務(wù)需求。當(dāng)需求下達(dá)吋，根據(jù)不同的需求區(qū)分釆購類型。3.2技術(shù)解決方案根據(jù)自定義表中的作業(yè)控制碼和訂單類型的對應(yīng)關(guān)系，判斷出該訂單的類別根據(jù)岀口COZFOOOl(EXIT_SAPLCOZF_O

3、Ol)或COZFOOOl(EXIT_SAPLCOZF_OOl)傳入的訂單類型(AUART),生成對應(yīng)類型(BSART)禹采購申請，同時將項目作業(yè)所屬WBS耳的“項目類型”(PRPS-PRART)字段取出，判斷是否是16或者19,如是填入到作業(yè)的“需求跟蹤號”字段中，否則不填入。訂單類型和采購申請類型的關(guān)系在自定義的中間表中維護(hù)3?3系統(tǒng)簡單架構(gòu)圖第四部分：程序邏輯描述一將主要代碼功能描述清楚,第五部分：源程序…■復(fù)雜性功能實現(xiàn)可貼主要功能代碼部分*&*包括ZXCOZU01*&**&**&Progr

4、amName:ZXCOZUOJ**&Author:王剛強**&CreateDate:11/06/2009**&LogicalDB:None**&ProgramType:UserExitInelude**&SAPRelease:6.0**&Description:采購申請類型增強功能**&**&**&包括ZXCOZU01**IFAFVGD」MP-STEUSISINITIAL.*EBAN_ORD_CUST_CHG?BSART=SPACE.水ENDIF.DATAWA.ZPSPRTYPEZPSPR.TAB

5、LESPRPS?DATAW.PRARTLIKEPRPS-PRART.IFCAUFVD_IMP-AUTYP=20*?”網(wǎng)絡(luò)訂單類另0SELECTSINGLE*FROMZPSPRINTOCORRESPONDINGFIELDSOFWAZPSPRWHEREZPSPR?STEUS=AFVGD_IMP-STEUS.IFSY-SUBRC<>0.MESSAGE根據(jù)網(wǎng)絡(luò)控制碼未找到對應(yīng)的訂單類型!，TYPEE.ENDIF.IFWA_ZPSPR-BSARTISINITIAL.MESSAGE，查找的訂單類型為空，請檢查

6、配置表!TYPEE.ENDIF.EBAN_ORD_CUST_CHG-BSART=WA_ZPSPR-BSART.“需求跟蹤號HtMtfftfHtMtffffHtMtfftntHffHtMtfftfHtMtfffHftMtffffHtMtfffrHtMtfffrHtMtfffrHtMtfffrHtMtfffrHfrSELECTSINGLEPRARTINTOW_PRARTFROMPRPSWHEREPRPS?PSPNR=CAUFVD_IMP-PSPEL.IFSY-SUBRC=0.IFW.PRART=,I6

7、,ORW_PRART=,19,.EBAN_ORD_CUST_CHG-BEDNR=W_PRART.ENDIF.ENDIF.ELSEIFCAUFVD_IMP-AUTYP='30*.HPM訂單ENDIF.**&包括ZXCOZU02*&*DATA:W_PROJTYPEPROJ,W.MARATYPEMARA,W_ZMMPTYPEZMMPURCATEGORY.IFCAUFVDJMP-AUTYP=*20*.SELECTSINGLEPSPNRPROFLINTOCORRESPONDINGFIELDSOFW_PROJ

8、FROMPROJWHEREPSPNR=CAUFVDJMP-PRONR.SELECTSINGLEMATNRMATKLINTOCORRESPONDINGFIELDSOFW.MARAFROMMARAWHEREMATNR=EBANJMP-MATNR.SELECTSINGLEMATKLCLASSACLASSBCLASSCCLASSDINTOCORRESPONDINGFIELDSOFWZMMPFROMZMMPURCATEGORYWHEREMATKL=W_MARA-MATKL.IFW_ZMMPI