首页 > 其他分享 >几个函数的使用例子:更新VBRK-XBLNR,IB01设备BOM创建,LI11N输入库存盘点

几个函数的使用例子:更新VBRK-XBLNR,IB01设备BOM创建,LI11N输入库存盘点

时间:2022-12-29 14:58:37浏览次数:63  
标签:sy IB01 linv LI11N BOM vbrk TYPE ls

最近用到一些函数,网上的相关资料不多,这里记录一下。

本文链接:https://www.cnblogs.com/hhelibeb/p/17012303.html

 

1,使用 RV_INVOICE_HEAD_MAINTAIN 更新VBRK-ZUNOR和VBRK-XBLNR等字段。

场景:金税发票接口需要更新发票相关字段,如VBRK-ZUNOR,VBRK-XBLNR和其它增强字段。

代码示例:

  DATA:
    xkomfk TYPE STANDARD TABLE OF komfk,
    xkomv  TYPE STANDARD TABLE OF komv,
    xthead TYPE STANDARD TABLE OF theadvb,
    xvbfs  TYPE STANDARD TABLE OF vbfs,
    xvbpa  TYPE STANDARD TABLE OF vbpavb,
    xvbrk  TYPE STANDARD TABLE OF vbrkvb,
    xvbrp  TYPE STANDARD TABLE OF vbrpvb,
    xvbss  TYPE STANDARD TABLE OF vbss.

  SELECT SINGLE * FROM vbrk
    WHERE vbeln = @is_nvbrk-vbeln
    INTO @ls_vbrk.

  CALL FUNCTION 'RV_INVOICE_DOCUMENT_READ'
    EXPORTING
      konv_read    = 'X'
      vbrk_i       = ls_vbrk
    TABLES
      xkomv        = xkomv
      xvbpa        = xvbpa
      xvbrk        = xvbrk
      xvbrp        = xvbrp
      xkomfk       = xkomfk
      xvbfs        = xvbfs
      xthead       = xthead
      xvbss        = xvbss
    EXCEPTIONS
      no_authority = 1
      OTHERS       = 2.
  IF sy-subrc <> 0.
* Implement suitable error handling here
  ENDIF.

  ls_vbrk-xblnr       = '123'.
  ls_vbrk-zuonr       = '321'.

  CALL FUNCTION 'RV_INVOICE_HEAD_MAINTAIN'
    EXPORTING
      vbrk_i = ls_vbrk
    TABLES
      xkomfk = xkomfk
      xkomv  = xkomv
      xthead = xthead
      xvbfs  = xvbfs
      xvbpa  = xvbpa
      xvbrk  = xvbrk
      xvbrp  = xvbrp
      xvbss  = xvbss.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno WITH
    sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4 INTO DATA(lv_dummy).
  ENDIF.

  DATA: ls_vbsk TYPE vbsk.
  ls_vbsk-mandt = sy-mandt.
  ls_vbsk-ernam = ls_vbrk-ernam.
  ls_vbsk-erdat = ls_vbrk-erdat.
  ls_vbsk-uzeit = ls_vbrk-erzet.

  CALL FUNCTION 'RV_INVOICE_DOCUMENT_ADD'
    EXPORTING
      vbsk_i = ls_vbsk
    TABLES
      xkomfk = xkomfk
      xkomv  = xkomv
      xthead = xthead
      xvbfs  = xvbfs
      xvbpa  = xvbpa
      xvbrk  = xvbrk
      xvbrp  = xvbrp
      xvbss  = xvbss.

2,用 CSAI_BOM_MAINTAIN 实现IB01设备BOM创建、IB02设备BOM修改

场景:批量上传维护设备BOM

下面的代码可以用于创建和新增设备BOM,但不能删除已有设备BOM。如要删除已有设备BOM,需设置t_stpob中的删除标记。

  DATA: ecsin         LIKE  csin,
        estkob        LIKE  stkob,
        estzub        LIKE  stzub,
        emastb        LIKE  mastb,
        items         TYPE sgt_t_bom_comp,
        t_stpob       TYPE tt_stpo.
  DATA: fl_warning LIKE  capiflag-flwarning.

    ecsin-stlty = 'E' . "设备
    ecsin-stlan = lr_data->stlan .
    ecsin-datuv = sy-datum.

    ecsin-werks = lr_data->werks.
    ecsin-equnr = lr_data->equnr1.

    CALL FUNCTION 'CSAI_BOM_READ'
      EXPORTING
        ecsin      = ecsin         
      IMPORTING
        fl_warning = fl_warning
      TABLES
        t_stpob    = t_stpob       
      EXCEPTIONS
        error      = 1
        OTHERS     = 2.
     
    t_stpob = VALUE #( BASE t_stpob
        ( posnr = lv_posnr postp = lr_data->postp idnrk = lr_data->idnrk menge = lr_data->menge ) 
      ).

    CALL FUNCTION 'CSAI_BOM_MAINTAIN'
      EXPORTING
        fl_bom_create      = 'X'
        ecsin              = ecsin         
        estkob             = estkob
        estzub             = estzub
        fl_commit_and_wait = 'X'
      IMPORTING
        fl_warning         = fl_warning
      TABLES
        t_stpob            = t_stpob 
      EXCEPTIONS
        error              = 1
        OTHERS             = 2.

3,使用 L_INV_COUNT_EXT 实现LI11N输入库存盘点。

上传盘点数据,程序实现LI01N, LI11N, LI20, LI21盘点过账功能。

其中LI01N, LI20, LI21可以用BDC实现,LI11N通过函数实现。

数据来自表LQUA,需要注意如果数量为0,则要设置零库存标识。

DATA: lt_linv TYPE STANDARD TABLE OF e1linvx.
DATA: ls_linv TYPE e1linvx.

ls_linv-lgnum = '120'.
ls_linv-lqnum = '752'.
ls_linv-lgort = 'B021'.
ls_linv-ivnum = '0000000030'.  "LI01N生成的盘点记录
ls_linv-idatu = sy-datum.
ls_linv-wdatu = sy-datum.
ls_linv-lgpla = 'B05-123'.
ls_linv-plpos = '1'.
ls_linv-lgtyp = 'B05'.
ls_linv-matnr = '000000000020000214'.
ls_linv-werks = '1000'.
ls_linv-charg = '212922123'.
ls_linv-lsonr = '12345'.
ls_linv-letyp = 'IP'.
ls_linv-menga = 2.
ls_linv-lenum = '12345'.

ls_linv-altme = 'BOT'.
IF ls_linv-menga = 0.
  ls_linv-kznul = 'X'.
ENDIF.
INSERT ls_linv INTO TABLE lt_linv.

CALL FUNCTION 'L_INV_COUNT_EXT'
  EXPORTING
    i_check_only                 = i_check_only
    i_commit                     = 'X'
  TABLES
    s_linv                       = lt_linv
  EXCEPTIONS
    either_quantity_or_empty_bin = 1
    ivnum_not_found              = 2
    check_problem                = 3
    no_count_allowed             = 4
    l_inv_read                   = 5
    bin_not_in_ivnum             = 6
    counts_not_updated           = 7
    lock_error                   = 8.

 

需要注意这三个功能涉及的函数都是未发布状态,如果有其它已发布函数可以实现相同功能,请优先考虑已发布函数。

 

标签:sy,IB01,linv,LI11N,BOM,vbrk,TYPE,ls
From: https://www.cnblogs.com/hhelibeb/p/17012303.html

相关文章

  • JS——BOM&事件
    即做特定动作时,更改其原有的属性和方法。特点:在事件定义的function的this是指的绑定事件的对象。全部行为内添加,优先级最高事件相同时,后面会覆盖前面的事件。onclic......
  • 前端知识学习案例-Bom和dom得区别
        ......
  • BOM
    BOMBrowserObjectModel浏览器对象模型JavaScript将浏览器的各个组成部分封装为对象组成:window:浏览器窗口对象Navigator:浏览器对象Screen:屏幕对象History:历史记......
  • SOLIDWORKS二次开发插件SolidKits助力企业实现BOM自动化
    对于制造业企业来说,产品设计、结构设计很重要,同样重要的还有物料清单。只有内容全面且准确的BOM表,才能够让采购人员了解到,这批产品中我需要购买哪些零部件,购买的数量是多少......
  • 前端开发系列031-基础篇之BOM
    title:'前端开发系列031-基础篇之BOM'tags:-javaScript系列categories:[]date:2017-08-1408:20:13本文介绍BOM相关的知识点,介绍的重点在于BOM核心Window对象......
  • 前端开发JS之BOM、DOM操作、事件、jQuery类库
    BOM操作DOM操作查找标签操作节点class与css操作事件事件实战案例jQuery类库标签对象与jQuery对象BOM操作全称:BrowserObjectModel指浏览......
  • 前端之BOM与DOM
    目录BOM操作window对象window的子对象弹出框计时相关setTimeout()clearTimeout()setinterval()clearInterval()DOM操作查找标签直接查找间接查找节点操作操作节点获取值操......
  • 前端 BOM,DOM, jQuery
    BOM操作 //1.BOM(BrowserObjectModel)指的是浏览器对象模型,它会让JavaScript具备与浏览器交互的能力//2.一些BOM操作-1.window.open()//......
  • 前端基础之BOM和DOM,jQuery类库
    BOM操作BOM(BrowserObjectModel)是指浏览器对象模型,它使JavaScript有能力与浏览器进行“对话”。window对象Window对象是客户端JavaScript最高层对象之一,由于window对......
  • BOM与DOM、jQuery类库
    BOM与DOM、jQuery类库目录BOM与DOM、jQuery类库Window对象BOM操作DOM操作操作节点获取值操作class与css操作事件jQuery类库标签对象与jQuery对象Window对象window对象表......