小技巧财务凭证的退代（substitution）

1、小技巧 财务凭凭证的退代（Substtitutiion）和Validaation不不同的是,VValidaation只只做检测,一一般不做相应应数据的修改改,Subsstituttion弥补补了这反面的的缺陷,它和user exit结合合将方便用户户编写更复杂杂的逻辑。注注意的是，如如果Subsstituttion使用用User exit在在程序中只做做检查而不替替代内容，此此时，Subbstituution可可以完全取代代Validdationn。简单地讲，替代代就是在会计计凭证生产时时（包括手工工和自动过帐帐）允许用户户根据需求对对凭证抬头和和凭证行项目目进行一定的的内容修改，这这种灵活的

2、功功能可以满足足一些非常变变态的需求，要要不怎么说SSAP什么东东西都能轻易易配置出来呢呢？比如国内很多企企业都要求会会计凭证有个个文本摘要可可对某些自动动凭证根据规规则写入一些些文本摘要，或或修改凭证的的利润中心，功功能范围等，同同样，理论上上讲，SAPP系统几乎允允许你修改会会计凭证的任任何内容，甚甚至包括会计计科目，SAAP一直强调调科目没有级级别，对自动动科目设置非非常严谨，所所以修改会计计科目通常发发生在自动过过帐时人工无无法干预科目目的情况，典典型的是MIIRO时科目目只能对应供供应商主数据据科目，如果果一个供应商商发票校验需需要对应应付付或其他应付付，系统就无无法自动实行行，就可

3、采用用科目替代。替代Tcodee：OBBH:APP/AR/GGL Docc.OACS:AMM Createe AsseetsOA02:Maass chhange AssettsGCVY:Gllobal Substtitutiion(Inn SPL,Compaany Leevel)GCVX:Loocal SSubstiitutioon(In SPL,CCompanny codde Levvel).GGB1：各模模块全部替代代按照国内很多企企业的内部制制度，所有的的会计凭证都都需要文本摘摘要并且多数数凭证要打印印出来存档，对对于很多自动动凭证却并不不能产生文本本摘要，此时时可以使用替替代塞一个文文

4、本进去，有有的企业连EERP系统产产生的特有的的中间凭证也也打印，真是是不掀嫌浪费费纸张。图1是一个文本本摘要的例子子，和Vallidatiion不同的的是，Subbstituution只只有两步骤，图图1表示的是是如果凭证类类型是折旧AAF，并且科科目是累计折折旧类科目或或折旧费用科科目，则文本本摘要为“计提本月折折旧”。图1中建立SSubstiitutioon和建立VValidaation步步骤一样。到目前为止，我我们发现Vaalidattion和SSubstiitutioon建立都非非常简单，只只要有简单逻逻辑思维的用用户不需要任任何编程经验验拖拖拽拽就就可以实现功功能，国内的的ERP设

5、计计者应该好好好借鉴借鉴，EERP项目实实施不容易，不不要让可怜的的业务顾问天天天浪费时间间去玩技术玩玩Codinng 。系统允许更复杂杂的替代逻辑辑，下面举一一个结合用户出口口的替代简单单应用实例。业务背景：假设在公司代码码5100中,如果发生业业务招待费,则在其行项目文文本摘要字段段(BSEGG-SGTXXT)写入信信息“业务招待费费”以做统计。同时，在公司代代码51000的期初,会将一些调整凭凭证或月结凭凭证过帐到上期间间,如果有这这样的业务，无无论用户输入入上期间的任任何一天，替替代将自动将将上期间的凭凭证的过帐日日期换成上期期间最后一天天。参考步骤如下：(1).自定义义的退代程序序(

6、Tcodee:GCX22)最好Copy系系统默认的程程序出来修改改，起码不要要申请Acccess KKey! App. Area 选择GBLSS,输入Coopy出来的的自定义程序序ZRGGBBS00,自自定义的程序序名称最好不不超过8位,系统只只能显示程序序名的前8位。(2）。建立退退代步骤(TTcode:OBBH)建立一个替代的的Step包括括先决条件和和退代内容,如图3,你可选选择一个替代代字段,表示示替代这个字字段的内容,在此选择”Only exit”,表示使用用用户出口编编写程序来替替代。(3).剖析替替代用户出口口程序ZRGGGBS000(Tcodde:SE338).用户出口程序ZZ

7、RGGBSS00分析.究竟自定义的FForm例程程是fielld exiit,heaader eexit,lline eexit 或或compllete eexit有系系统参数c_exxit_paaram_nnone, c_exiit_parram_fiield和c_exiit_parram_cllass决定定。通常用户户可以看到替替代出口程序序如下（粗体体部分）：exits-nname = U1100. exitss-paraam = cc_exitt_paraam_nonne. “能用在Fieeld exxit,onnly exxit等任何何地方 exitss-titlle = ttext

8、-1100. APPENND exiits. exitss-namee = U101. exitss-paraam = cc_exitt_paraam_fieeld.”此Form只用用于字段出口口Fieldd exitt exitss-titlle = ttext-1101. APPENND exiits.exits-nname = U9900. exitss-paraam = c_eexit_pparam_classs.”U8011只能在commpletee doc才才可使用. exitss-titlle = ttext-9900. APPENND exiits. *.可以对对着Copyy增

9、加自定义义的例程 REFRESHH ETABB. LOOP AT EXXITS. ETAAB = EEXITS. APPPEND EETAB. ENDLOOOP.增加一个例程就就5个简单步步骤：1Exitss-namee = *表示出口例例程名称。2exitss-paraam =*只有c_exxit_paaram_nnone/ffield/classs3种,表示示例程的用法法.3exitss-titlle=* 例程的抬头头显示4APPENND exiits.表示示增加该出口口例程。5.接下来定义义一个例程FForm * /endfform .在例程中编编写替代逻辑辑。接下来根据业务务背景编写逻

10、逻辑,假设使使用Formm 100,其类型c_exit_paramm_nonee，可用于“Only Exit”，参考代码码如下表：FORM U1100. DATA:Z_PSTDAATE TYYPE SYY-DATUUM, Z_CURPEER LIIKE T0009B-PPOPER, Z_CURYEEAR LIIKE T0009B-BBDATJ, Z_PSTPEER LIIKE T0009B-PPOPER, Z_PSTYEEAR LIIKE T0009B-BBDATJ, Z_PERLSSTDAY LIKE SY-DAATUM.If bsegg-hkonnt = 这填写您的的业务招待费费科目.BS

11、EG-SGGTXT = 业务招招待费. For业业务招待费用用文本摘要.Endif.*如果期初发生生上期的财务务凭证过帐,则自动将过过帐日期一律律调整为上期期期末最后一一天.*check postiing daates periood andd fisccal yeearCALL FUUNCTIOON DEETERMIINE_PEERIOD EXPORRTING DATTE = BKPF-BUDATT VERRSION = Z1 你的会计计年度变式,国内多是KK4 IMPORTTING PERIIOD = ZZ_PSTPPER YEARR = ZZ_PSTYYEAR .*check sysda

12、ates periood andd fisccal yeearCALL FUUNCTIOON DEETERMIINE_PEERIOD EXPORRTING DATTE = SY-DAATUM VERRSION = Z1 Fisccal Yeear Vaar. IMPORTTING PERIIOD = ZZ_CURPPER YEARR = ZZ_CURYYEAR.*能否在输入的的postiing daate记帐让让系统去判断断.CHECK ZZ_CURYYEAR Z_PPSTYEAAR OR Z_PSTTPER Z_CCURPERR.*如postiing daate不在本本期间得到其其期间最后一

13、一天Z_PSTPEER = ZZ_PSTPPER + 1 .CALL FUUNCTIOON FIIRST_DDAY_INN_PERIIOD_GEET EXPORRTING I_GGJAHR = Z_PSTTYEAR I_PPERIV = Z1 I_PPOPER = Z_PSTTPER IMPORTTING E_DAATE = Z_PERRLSTDAAY .*无论用户选择择过帐到上期期哪一天,都都将过帐日期期设置为最后后一天BKPF-BUUDAT = Z_PEERLSTDDAY - 1 .BKPF-MOONAT = Z_PSSTPER .通过上面的业务务我们可以看看到,替代+用户出口能能实现更复

14、杂杂的业务,而而这些业务通通常是简单的拖拽实现不了了的,再举一一个典型的有有用的替代实实例。业务背景：在SAP中，供供应商主数据据的科目只有有一个比如通通常设置的是是应付帐款，在在SAP中，科科目和中国传统会计不一一样，其科目目是不强调层层级的，比如如应付帐款，国国内ERP可可能会带供应应商项目等几个核算项目目，SAP采采用另一种方方式，它将供供应商直接看看成明细科目目，从其主数数据自动带出应付帐款，如如果还需要区区分是什么项项目的应付，则则可采用统计计内部订单或或特殊总帐标标志，但是，在后勤发发票校验（TTcode：MIRO）时时却不能使用用特殊总帐标标志。这样，比比如企业从同同一供应商购买

15、生生产用材料（对对应普通应付付帐款）和项项目材料（对对应应付项目目款）且需要要从会计科目上就直接接区分时两种种应付时就有有点小麻烦。一般的思路有这这么些：I.因为同一供供应商主数据据中只能有一一个科目又不不能特殊总帐帐标志，建议议拆分成多个个虚拟供应商商来对应不同同科目,此法法严重违反编编码唯一性原原则,贼笨。II.会计科目目还是使用同同一个应付帐帐款科目,附附加一个字段段比如文本/参考字段来来区分同一供供应商的不同同应付,假设设供应商还承承包了你的在在建项目有涉涉及应付劳务务,如果仅用用一个文本区区分不严谨,也没有从科科目上直接区区分那样直观观。III使用科科目替代方式式解决，直接接从科目上

16、区区分不同应付付款。参考步骤如下：a.SE16:V_T0553定义行文文本标志，其其中ZNORR:MIROO 普通应付付和ZPSC:MIRO 项目应付。b.建立特殊总总帐标志9表表示应付项目目款，并设置置好应付项目目款会计科目目。c.使用Onlly exiit出口替代,这样使用替替代就直接从从科目上就区区分出了应付付帐款类型，参考代码如下表表（参考使用用，责任自负负）:FORM U1100 . DATA: IWA_TT074 LLIKE TT074 , I_AANS(1) Typpe C . Checkk ( SYY-Tcodde = MIRO OR SY-Tccode = MR88M ) a

17、ndd BSEGG-KOARRT = K . “检查是否为为发票校验事事务 condeense bbseg-ssgtxt .*判断用户必须须输入文本摘摘要而且MIIRO/MRR8M时只能是是ZNOR和和ZPSC if bsseg-sggtxt MIIRO 普通通应付 and bseg-sgtxtt MMIRO 项项目应付. messsage E001(00) wwith Choosse ZNOOR or ZPSC . endiff.*如果文本输入入应付项目款款则从特殊总总帐配置中读读取应付项目目款项目替代代应付帐款 if bbseg-ssgtxt = MIIRO 项目目应付 . I_AANS

18、= 9 . 特特殊总帐标志志9表示应付付项目款 SELLECT SSINGLEE * INNTO IWWA_T0774 FROOM T0774 WHHERE KKTOPL = INNT AND KKOART = K AND UUMSKZ = I_AANS AND HHKONT = BSEEG-HKOONT . IF IWA_TT074-HHKONT NE SPPACE. BBSEG-HHKONT = IWAA_T0744-HKONNT. 特殊殊总帐科目 BBSEG-UUMSKZ = I_AANS . 特别总帐帐标示 BBSEG-UUMSKS = A . 特特别总帐事务务类型，A，WW，O*SA

19、P高度集集成替代必须须考虑其它模模块影响，替替代同时也替替代特殊总帐帐的计划层次次。 BBSEG-FFDLEV = IWAA_T0744-EBENNE . 特殊总帐计计划层次,如如果启动CBBM BBSEG-BBSCHL+1(1) = 9 . 记账码的的第一码 ENDDIF. endiff . endfoorm. 为什么你的替代代不起作用？替代不起作用通通常有两个原原因：一系统默认不不允许你替代代该字段内容容。SAP将所有的的允许字段退退代关系维护在GB01表中中，如果该表表中没有出现现你的替代字字段，你是不不能替代的，比比如会计科目目BSEG-HKONTT通常是不允允许替代的，你你就需要在此此表增加。二替代程序需