生成预付款会计凭证

学习笔记 学习笔记     2022-08-13     300

关键词:

FUNCTION zrfc_mm014.
*"----------------------------------------------------------------------
*"*"Local interface:
*"  IMPORTING
*"     VALUE(CALLNO) TYPE  ZCALLNO
*"  TABLES
*"      ZMMS002 STRUCTURE  ZMMS002
*"----------------------------------------------------------------------
TYPES:BEGIN OF ty_regup,
  bukrs      TYPE regup-bukrs,
  belnr      TYPE regup-belnr,
  gjahr      TYPE regup-gjahr,
  retn_date  TYPE regup-retn_date,
  zzbelnr    TYPE regup-zzbelnr,
  zzgjahr    TYPE regup-zzgjahr,
  END OF ty_regup.

DATA: lt_zmmt002  TYPE TABLE OF zmmt002,
      lt_zmmt002s TYPE TABLE OF zmmt002,
      ls_zmmt002  LIKE LINE  OF lt_zmmt002,
      lt_regup    TYPE TABLE OF ty_regup,
      ls_regup    TYPE ty_regup,
      lv_datano   TYPE i.

*---查询未发给费控的会计凭证
SELECT * INTO TABLE lt_zmmt002 FROM zmmt002
  WHERE flag =  .

lt_zmmt002s = lt_zmmt002.
SORT lt_zmmt002 BY bukrs gjahr belnr.
DELETE ADJACENT DUPLICATES FROM lt_zmmt002 COMPARING bukrs gjahr belnr.

IF lt_zmmt002 IS NOT INITIAL.
  SELECT bukrs belnr gjahr retn_date zzbelnr zzgjahr INTO TABLE lt_regup
    FROM regup
    FOR ALL ENTRIES IN lt_zmmt002
    WHERE bukrs = lt_zmmt002-bukrs
     AND  belnr = lt_zmmt002-belnr
     AND  gjahr = lt_zmmt002-gjahr.
ENDIF.

*---删除未产生清帐凭证的数据
DELETE lt_regup WHERE zzbelnr IS INITIAL.


*---数据编辑
LOOP AT  lt_regup INTO  ls_regup.
zmms002-bukrs       = ls_regup-bukrs.
zmms002-gjahr       = ls_regup-gjahr.
zmms002-belnr       = ls_regup-belnr.
zmms002-retn_date   = ls_regup-retn_date.
zmms002-flag        = S.
APPEND zmms002.
ENDLOOP.

*---记录已发给费控系统的凭证
CLEAR:gt_log,gs_log.
LOOP AT zmms002.
  lv_datano     = lv_datano + 1.
  gs_log-name   = ZRFC_MM014.
  gs_log-cdate  = sy-datum.
  GET TIME.
  gs_log-ctime  = sy-uzeit.
  gs_log-callno = callno.
  gs_log-datano = lv_datano.
  gs_log-flag   = S.
  gs_log-log    = Success.
  CONCATENATE zmms002-bukrs  zmms002-gjahr zmms002-belnr zmms002-retn_date
              zmms002-flag
  INTO gs_log-content SEPARATED BY |.
  CONDENSE gs_log-content NO-GAPS.
  gs_log-length = STRLEN( gs_log-content ).
  APPEND gs_log TO gt_log.
ENDLOOP.
IF gt_log IS NOT INITIAL.
  INSERT zrfc_mm01out_log FROM TABLE gt_log.
  IF sy-subrc = 0.
    COMMIT WORK.
  ENDIF.
ENDIF.


*---更新客制会计凭证表
CLEAR ls_zmmt002.
ls_zmmt002-flag = X.
MODIFY lt_zmmt002s FROM ls_zmmt002 TRANSPORTING flag WHERE flag IS INITIAL.

MODIFY zmmt002 FROM TABLE lt_zmmt002s.
IF sy-subrc = 0 .
COMMIT WORK.
ELSE.
ROLLBACK WORK.
ENDIF.

ENDFUNCTION.

 

excel会计凭证表科目编号怎么根据名称饮用

参考技术A你可以通过CONCATENATE将年月日生成凭证编号。你可以用CONCATENATE函数,进行变化将年月日合成并生成凭证编号,你可以在你所选定的单元格中输入CONCATENATE,之后点击回车即可,然后鼠标放在e2单元格右下角,双击进行填... 查看详情

sap会计科目之自动记账

...强的软件,财务和业务高度集成。业务发生的同时会自动生成会计凭证,这样就省去了大量会计录入的工作。是不是感觉很先进?也许你会问是如何做到的呢?这个以后在介绍吧,今天就说说自动记账的作用!当一个科目被设置... 查看详情

转载sap集成会计凭证生成的原理

SAP集成会计凭证生成的原理SAP是一个集成的系统,存放在FI-GL模块中的会计凭证绝大多数都是通过其他模块集成而来的,这些集成需要在后台配置相应的记账规则,结合前台的数据输入,自动找到对应的科目,... 查看详情

sap会计凭证

凭证类型代表不同的交易类型,每个凭证类型有不同的编号范围事务代码:OB7A凭证类型的后台配置点:会计凭证编号范围的维护:FBN1维护会计凭证的会计年度:OBH2检查会计凭证编号是否有跳号:S_ALR_87012342  查看详情

在金蝶操作过程中,以做会计凭证,但发现会计科目设置错误,将如何改正?

在金蝶操作过程中,以做会计凭证,但发现会计科目设置错误,将如何改正你好,首先看一下是否在做凭证时会计科目选错,其次看一下在基础设置中会计科目选项里科目是否有误!参考技术A看看只是这一张凭证的会计科目出问题... 查看详情

记账凭证要打钩吗?

...证的时候不打勾,登记账簿的时候才打勾。记账凭证,是会计专业术语,是财务会计部门根据原始凭证填制的会计凭证,记录经济业务的简要内容,确定会计分录,作为记账的依据。记账凭证又称入账凭证或记账凭证。是根据登... 查看详情

创建会计凭证

FUNCTIONzrfc_mm018.*"----------------------------------------------------------------------*"*"Localinterface:*"IMPORTING*"VALUE(CALLNO)TYPEZCALLNO*"VALUE(ZFIS005)LIKEZFIS005STRUCTUREZFIS005*"EXPORTIN 查看详情

普通发票怎样记帐?税款应计入哪个会计科目?

参考技术A普通发票怎样记帐?税款应计入哪个会计科目?普通发票记账及入款记入什么会计科目,分两种情况第一种情况,购买时收到普通发票,记账方法:借:原材料、库存商品(价款+增值税)贷:银行存款或应付账款由于... 查看详情

会计凭证修改函数的使用

 修改会计凭证的参考代码2的值。-------------------------------------------------------------------*TYPE-POOLStpit.DATA:ls_bsegTYPEbseg,lt_bsegTYPETABLEOFbseg,lt_buztabTYPEtpit_t_buztab,ls_buztabLIKELINEOFlt_buz 查看详情

sap付款凭证,凭证日期怎么更改?就是本来应该是11.3,记成了11.2,要怎么改?

参考技术A凭证过账之后抬头中的凭证日期,过账日期,都不能改了,FB02可以看出,可以冲销该凭证后再重做凭证 参考技术B记账凭证一旦生成没法改,你可以冲销后重做一张。 参考技术C记账日期。 查看详情

sap简单采购会计凭证记录

ME21NMIROMIGO清帐 查看会凭证         查看详情

fisap付款及清账

...及清账在SAP中,处理付款要达到两个效果:实现会计凭证的处理;实现清账(将付款与应付账款对应核销);可以边付边清,也可以先付后清。一、付款并清账企业的付款一般有现金付款、银行存款付... 查看详情

会计凭证bapi_acc_document_post

*&---------------------------------------------------------------------**&ReportZFIFB107*&Description薪酬计提批导开发*&---------------------------------------------------------------------**&a 查看详情

金蝶云星空关于暂估应付与财务应付应用模式

...月采购入库物资后暂估金额,跨月实际到票,系统会自动生成红字暂估应付单冲回,并生成差异的成本调整单;场景:启用暂估冲回,财务应付单确认应付(推荐使用)采购订单(1月)→采购入库单(1月)→暂估应付单(1月)... 查看详情

re合同记账会计凭证(代码片段)

*&---------------------------------------------------------------------**&Title:不动产转租合同自动出成本**&Module:RE**&Author:linxin**&CreateDate:11/11/2008**&ProgramType:Report**&SAPR 查看详情

sapfi系列002:业务范围派生

...的会计凭证,一般手工录入业务范围;系统通过集成方式生成的会计凭证,当然不能每一个单据都手工录入。SAP定义了业务范围的派生规则,包括物料、固定资产、CO对象等。MM中确定业务范围主要有两种方式:配置:如果plant和... 查看详情

金蝶如何做凭证

...记;凭证号:自动编号。摘要:如实填写(简明扼要);会计科目:可以输入科目代码,也可以点“查看代码”按钮(科目选择一定是子目)。凭证保存条件是借方等于贷方。可以是多借多贷。输入完成后点“保存”按钮后再继... 查看详情

凭证和单据

1、凭证分为原始凭证和会计凭证,它是会计记录核算的基础。具有真实性、合法性和完整性的特点。原始凭证的基本内容:(1)名称(2)日期(3)接受单位的名称(4)​​​经济业务​​​的内容(5)填制单位签章(6)有... 查看详情