fmbb預(yù)算下達(dá)增強(qiáng)-wenkub
2023-07-08 16:35:43 本頁面
【正文】 dcashonraiselessIfl_s_linesceffyear39。WHENENDIF.l_s_linesceffyear008..l_s_msgmsgid39。l_perc_time_hor.IFallowedcashonraiselessIfl_s_linesceffyear39。WHENENDIF.l_s_linesceffyear008..l_s_msgmsgid39。l_perc_time_hor.IFallowedcashonraiselessIfl_s_linesceffyear39。WHENENDIF.l_s_linesceffyear008..l_s_msgmsgid39。l_perc_time_hor.IFallowedcashonraisepercentagel_diff_yearl_ndl_diff_years.l_active_process_entryENTR39。l_s_msg.EXPORTINGi_ref_msgcumulate_messagecon_msg_others.l_s_msgmsgv1l_s_msgmsgno39。.l_s_msgmsgtyaremultiannualISCLEARsysubrcmaster_data_not_found==*IMPORTING39。*=l_s_linesaddresscmmtitem*39。CALLl_s_fmci.IFgreateronlyINITIAL.***WHEREi_t_linesoflinesin39。.l_active_process_trans39。.l_active_process_return39。.l_budget_option39。.=39。l_active_process_suppl=O39。IFoptiondependingActiveIFhoronlyENDIF.*l_perc_time_hor.IF=EXCEPTIONSl_budget_optionl_perc_time_horIMPORTINGl_s_linesbudcat=FUNCTIONmultiannuall_nd1.l_s_linesLOOPandgjahr.***DATA:l_budget_optionfmmaactperc_time_hor,l_s_fmbdtfmbd_t_t,l_t_addressfmku_s_dimpart,l_active_process_carryoverxflag,l_active_process_supplxflag,l_active_process_entryfmci,l_s_linesfmmaactperc_time_hor,DATA:TYPETYPETYPETYPETYPETYPETYPEl_s_msgDATA:ReadfmATFROM=customizing39。i_fm_areai_s_headerfm_area1=sysubrc=Doifgtl_perc_time_hortheonl_budget_option.39。l_active_process_return39。=.39。EQX39。=X39。=X39。considerationcontainingcashINTOceffyearDoifthanl_s_linesceffyearFUNCTION00039。39。EXCEPTIONS=input_error=OTHERSl_s_fmciNOTaddress:not=FMMA39。==CASE.EQ=.***istime***thethiseffectivityNOTE39。=.*l_f_msgCONTEXTAREACALLi_s_msgCLEAR39。IFX39。thethanthethiseffectivityNOTE39。=.*l_f_msgCONTEXTAREACALLi_s_msgCLEAR39。IFX39。thethanthethiseffectivityNOTE39。=.*l_f_msgCONTEXTAREACALLi_s_msgCLEAR39。IFX39。thethanthethiseffectivityNOTE39。=.*l_f_msgCONTEXTAREACALLi_s_msgCLEAR39。IFX39。thethanthethiseffectivityNOTE39。=.*l_f_msgCONTEXTAREACALLi_s_msgCLEAR39。IFX39。thethanthefromcashallowedIFl_perc_time_hor.39。l_s_msgmsgid.010.l_s_linesceffyearENDIF.WHEN39。l_s_linesceffyearIflessraiseoverofnotGT=FMMA39。==con_msg_others.i_ref_msgcumulate_messageEXPORTINGl_s_msg.NOTTYPEFROMWHEREF339。=ls_znr+0(1).ls_znrlv_date.ENDIF.CLEAR:ls_znr.DATA:BEGINzyszbbukrs,gjahrzyszbfipex,zbbzyszbfictr,zjezyszbfipex,zbezeiOFOFOFOFOFOFOFOFOFOFOFOFtvalxx9.DATA:lv_mes2data:BEGINTYPEFMBLFUNDSCTR,*lt_FMBL.DATA:lt_fmblfmbl.DATA:lt_fmbl_tempfmbl.DATA:ls_fmbllt_fmbl.DATA:ls_fmbl_templt_fmbl.DATA:lv_bukrsc.CLEAR:l_s_lines,lv_char5,lv_bukrs.LOOPl_s_lines.IF=lv_char5CLEAR:lv_mes1,lv_mes2,l_s_msg.39。l_s_msgmsgty.39。l_s_msgmsgv1.*39。CALLi_s_msgENDIF.ENDLOOP.CONCATENATElv_char5+3(2)lv_char5+1(4).**********************************************************************addCLEAR:lt_yszb,lt_yszb[].LOOPl_s_lines.==12FROM=ls_yszbCLEAR:l_s_lines,ls_yszb.ENDLOOP.CLEAR:lt_fmbl[].SELECTFROMTABLEALLi_s_headerfm_areaANDfundsctr=39。=ATlt_fmbl_temp.ISlt_fmbl_tempINTOfictr0.DOls_wlpls_fmbltval02.ls_yszbzjeCLEAR:ls_wlp.ENDDO.IF=E39。=lv_mes1.lv_mes1.39。CALLi_s_msgMODIFYls_yszbENDIF.ENDLOOP.ELSE.lt_yszb00039。=OK39。39。39。CONCATENATEls_yszb2fictrls_yszb2fipex不允許下達(dá)負(fù)預(yù)算!39。METHOD=byznrls_znr39。bukrsSINGLEINTO=39。INTOls_yszbfictrls_yszbfipexDOls_wlpl_s_linestval02.ls_yszbzjels_wlp.CLEAR:ls_wlp.COLLECTzbezeiINTOTABLEALLWHERE=DUPLICATESzfipexzyscjbFIELDSlt_zfipex1ENTRIESgjahrlt_zfipexzfipex.SORTFROMINTO00110501lt_zfipexKEYsysubrclt_zfipex1zfipexls_yszbFIPEXls_yszb1fipexls_yszb1fictrIFandls_yszb1CLEAR:ls_yszb1,ls_zfipex1.*ENDIF.ENDLOOP.CLEAR:ls_zfipex.CLEAR:ls_yszb.ENDLOOP.SORTFROMINTOFORlt_yszb=l_nd+0(4)ANDcmmtitemIS00110502/00110503。fmbllt_fmblENTRIESWHEREdocyear=lt_yszb1fipex
職業(yè)教育相關(guān)推薦
鄂ICP備17016276號-1