VA41 销售合同创建BAPI
一、事务代码VA41
合同创建的过程和销售订单几乎一致
二、调用BAPI
调用BAPI为BAPI_CONTRACT_CREATEFROMDATA
传参和销售订单BAPI:BAPI_SALESORDER_CREATEFROMDAT2一致
"-----------------------------@斌将军-----------------------------
DATA: ls_header_in TYPE bapisdhd1,ls_header_inx TYPE bapisdhd1x,lv_vbeln LIKE vbak-vbeln,ls_logic_switch TYPE bapisdls,lt_return TYPE TABLE OF bapiret2 WITH HEADER LINE,lt_items_in TYPE TABLE OF bapisditm WITH HEADER LINE,lt_items_inx TYPE TABLE OF bapisditmx WITH HEADER LINE,lt_partners TYPE TABLE OF bapiparnr WITH HEADER LINE,lt_partnerchanges TYPE TABLE OF bapiparnrc WITH HEADER LINE,lt_schedules_in TYPE TABLE OF bapischdl WITH HEADER LINE,lt_schedules_inx TYPE TABLE OF bapischdlx WITH HEADER LINE,lt_conditions_in TYPE TABLE OF bapicond WITH HEADER LINE,lt_conditions_inx TYPE TABLE OF bapicondx WITH HEADER LINE,lt_partneraddresses TYPE TABLE OF bapiaddr1 WITH HEADER LINE,order_cfgs_ref TYPE TABLE OF bapicucfg WITH HEADER LINE,order_cfgs_inst TYPE TABLE OF bapicuins WITH HEADER LINE,order_cfgs_value TYPE TABLE OF bapicuval WITH HEADER LINE.DATA:lv_check TYPE char1,lv_message TYPE char200,lv_update TYPE char1 VALUE 'I'.CLEAR:ls_header_in.
ls_header_in-doc_type = 'Z100'."i_head-auart."销售凭证类型
ls_header_in-sales_org = '1010'."i_head-vkorg ."销售组织ls_header_in-distr_chan = '00'."i_head-vtweg."分销渠道
ls_header_in-division = '00'."i_head-spart."产品组
ls_header_in-purch_no_c = '20220905'."i_head-bstkd."客户参考日期
ls_header_in-cust_grp3 = 'Z00'."i_head-kvgr3."订单变更原因
ls_header_in-created_by = 'LCC'."i_head-ernam."制单工号
* ls_header_in-sales_grp = i_head-vkgrp."销售组
* ls_header_in-sales_off = i_head-vkbur."销售办事处
*
* ls_header_in-sd_doc_cat = i_head-."SD 凭证类别
* ls_header_in-doc_date = sy-datum."凭证日期 (接收/发送日期)
* ls_header_in-price_date = i_head-."定价日期和汇率
* ls_header_in-exchg_rate = i_head-."定价和统计直接引用的汇率
* ls_header_in-dlvschduse = 'QQQ'."l_abrvw. "使用标识
* ls_header_in-ship_type = i_head-vsart. "装运类型
* ls_header_in-s_proc_ind = 'QQQ'."lt_reslut-sdabw. "特殊标识
* ls_header_in-pymt_meth = i_head-zlsch. "付款方式
* ls_header_in-pmnttrms = i_head-zterm. "付款条件
* ls_header_in-ref_1 = i_head-ihrez."你的参考 CRM 订单号
* ls_header_in-incoterms1 = i_head-inco1."贸易条款CLEAR:ls_header_inx.
ls_header_inx-updateflag = lv_update."更新标识
ls_header_inx-sales_org = abap_true ."销售组织
ls_header_inx-distr_chan = abap_true."分销渠道
ls_header_inx-division = abap_true."产品组
ls_header_inx-purch_no_c = abap_true."客户参考
ls_header_inx-cust_grp3 = abap_true."订单变更原因
* ls_header_inx-created_by = abap_true."制单工号
* ls_header_inx-sales_grp = abap_true."销售组
* ls_header_inx-sales_off = abap_true."销售办事处
*
* ls_header_inx-sd_doc_cat = abap_true."SD 凭证类别
* ls_header_inx-doc_date = abap_true."凭证日期 (接收/发送日期)
* ls_header_inx-price_date = abap_true."定价日期和汇率
* ls_header_inx-exchg_rate = abap_true."定价和统计直接引用的汇率
* ls_header_inx-dlvschduse = abap_true. "使用标识
* ls_header_inx-ship_type = abap_true. "装运类型
* ls_header_inx-s_proc_ind = abap_true. "特殊标识
* ls_header_inx-pymt_meth = abap_true. "付款方式
* ls_header_in-pmnttrms = abap_true. "付款条件
* ls_header_inx-ref_1 = abap_true."你的参考 CRM 订单号
* ls_header_inx-incoterms1 = abap_true."贸易条款* IF i_head-kunag IS NOT INITIAL.
lt_partners-partn_role = 'AG'."合作伙伴功能
lt_partners-partn_numb = '0001000000'.
APPEND lt_partners.
lt_partners-partn_role = 'WE'."合作伙伴功能
lt_partners-partn_numb = '0004000000'.
APPEND lt_partners.
* ENDIF.* LOOP AT t_item.CLEAR lt_items_in.
lt_items_in-itm_number = '10'."t_item-posnr."行项目
lt_items_in-material = '000000160000000006'."t_item-matnr."物料
lt_items_in-plant = '1011'."t_item-werks."工厂
lt_items_in-sales_unit = 'EA'."t_item-vrkme."单位
lt_items_in-tax_class1 = '1'."t_item-taxm1."物料税分类
* lt_items_in-store_loc = '1011'."t_item-lgort."库存地点
APPEND lt_items_in.CLEAR lt_items_inx.
lt_items_inx-updateflag = lv_update."更新标识
lt_items_inx-itm_number = '10'.
lt_items_inx-material = abap_true.
lt_items_inx-plant = abap_true.
lt_items_inx-sales_unit = abap_true.
lt_items_inx-tax_class1 = abap_true.
* lt_items_inx-store_loc = abap_true.
APPEND lt_items_inx.* schedules
CLEAR lt_schedules_in.
lt_schedules_in-itm_number = '10'."."行项目
lt_schedules_in-req_qty = '1'."t_item-kwmeng."以销售单位计的订单数量
lt_schedules_in-req_date = '20220908'."t_item-etdat."交货日期
APPEND lt_schedules_in.CLEAR lt_schedules_inx.
lt_schedules_inx-updateflag = lv_update."更新标识
lt_schedules_inx-itm_number = '10'."t_item-posnr."行项目
lt_schedules_inx-req_qty = abap_true."以销售单位计的订单数量
lt_schedules_inx-req_date = abap_true."交货日期
APPEND lt_schedules_inx.CLEAR:lt_conditions_in.
lt_conditions_in-itm_number = '10'."t_item-posnr. "行项目
lt_conditions_in-cond_type = 'ZP00'. "定价条件
lt_conditions_in-cond_value = '10'."t_item-kzwi1."条件金额
lt_conditions_in-currency = 'CNY'. "货币码
lt_conditions_in-cond_p_unt = '1'. "条件单位
APPEND lt_conditions_in.CLEAR:lt_conditions_inx.
lt_conditions_inx-updateflag = lv_update."更新标识
lt_conditions_inx-itm_number = '10'."t_item-posnr."行项目
lt_conditions_inx-cond_type = 'ZP00'. "定价条件
lt_conditions_inx-cond_value = abap_true.
lt_conditions_inx-currency = abap_true.
lt_conditions_inx-cond_p_unt = abap_true.
APPEND lt_conditions_inx.
* ENDLOOP.ls_logic_switch = 'G'.CALL FUNCTION 'BAPI_CONTRACT_CREATEFROMDATA'EXPORTING
* SALESDOCUMENTIN =contract_header_in = ls_header_incontract_header_inx = ls_header_inx
* SENDER =
* BINARY_RELATIONSHIPTYPE = ' '
* INT_NUMBER_ASSIGNMENT = ' '
* BEHAVE_WHEN_ERROR = ' 'logic_switch = ls_logic_switchIMPORTINGsalesdocument = lv_vbelnTABLESreturn = lt_returncontract_items_in = lt_items_incontract_items_inx = lt_items_inxcontract_partners = lt_partnerscontract_conditions_in = lt_conditions_incontract_conditions_inx = lt_conditions_inxcontract_cfgs_ref = order_cfgs_refcontract_cfgs_inst = order_cfgs_instcontract_cfgs_value = order_cfgs_valuepartneraddresses = lt_partneraddresses.CLEAR:lv_check,lv_message.
LOOP AT lt_return WHERE type CA 'EAX'.lv_message = lv_message && lt_return-message.lv_check = 'E'.
ENDLOOP.IF lv_check = 'E'.CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.
ELSE.CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'EXPORTINGwait = abap_true.
ENDIF.
"-----------------------------@斌将军-----------------------------
VA41 销售合同创建BAPI相关推荐
- 【ABAP】固定资产创建BAPI无法自动写入增强字段处理
固定资产创建BAPI无法自动写入增强字段处理 通过实现增强点"AIST0002"给SAP固定资产主数据屏幕添加自定义字段(增强实现这里省略). (下图的增强字段仅供参考) 目前需要 ...
- 创建BAPI程序的步骤
1.定义BAPI Structure (Structure不能在BAPI中重复使用,因为一旦BAPI被释放,其Structure被冻结)(T-CODE:SE11) 2.创建FUNCTION MODUL ...
- ABAP 销售订单创建BAPI:BAPI_SALESORDER_CREATEFROMDAT2总结
1.运用过程的问题与原因 1.1报错:请输入买方或运达方 原因:其实就是订单抬头没有买方,主要是因为销售订单合作伙伴表ORDER_PARTNERS中字段ITM_NUMBER销售和分销凭证的项目号给赋值 ...
- SAP-ABAP会计凭证创建BAPI
BAPI调用的代码如下,下面分别介绍几个主要参数 CALL FUNCTION 'BAPI_ACC_DOCUMENT_POST'EXPORTINGdocumentheader = lw_document ...
- BAPI_PO_CREATE1 采购订单创建BAPI
导语:没有导语,直接看代码吧. BAPI名称:BAPI_PO_CREATE1 BAPI描述:采购订单创建
- SAP 批量BOM创建BAPI : BAPI_MATERIAL_BOM_GROUP_CREATE
导语:BOM创建在SAP中是最常见的操作,通常用户会要求用客制化程序批量创建,示例中只创建一层组件,另外[SAP 批量修改或添加BOM组件]中介绍如何批量修改BOM组件,或为BOM添加组件.
- 销售订单创建BAPI
READ TABLE IT_OUTPUT INTO WA_OUTPUT WITH KEY SEL = 'X'. IF SY-SUBRC NE 0. MESSAGE E000(CL) WITH '请选择 ...
- ABAP销售合同删除Bapi
FUNCTION ZSD_SALESORDER_DELETE. *"------------------------------------------------------------- ...
- ABAP销售合同冻结Bapi
FUNCTION ZSD_SALESORDER_BLOCK. *"-------------------------------------------------------------- ...
最新文章
- Python 多版本安装模块
- 线上集群服务器性能参数查看命令
- HiveSQL运行优化参数配置
- 怎么用mysql存储系统数据库_mysql数据库之基本操作和存储引擎
- rust营火为什么放不下去_为什么大蒜头在超市里不发芽,买回家放几天后就发芽了?...
- oracle 不等函数,Oracle 不常用函数
- python的while分支
- 关于在mysql和oracle中编码对varchar等类型的影响
- linux 中文 bterm fbterm 内核,Fbterm (简体中文)
- wps生成正态分布的随机数_生成服从标准正态分布的随机数
- SAP Fiori 的学习路线指南
- Icarus iverilog中PLI使用范例
- 推荐几个我收藏且星标的嵌入式技术公众号
- 热乎乎的宇宙头条校招前端面经
- python翻译-python实现在线翻译
- python get方法列表参数_python中requests库get方法带参数请求
- EChart中使用地图方式总结
- matlab因子载荷矩阵正交旋转,因素分析中的矩阵旋转
- 参加创新创业大赛有什么要求吗?
- 步进电机驱动器使用方法
热门文章
- 【算法设计与分析】屈婉玲教授—课程笔记
- 关于qt5.x没有webenginewidgets的问题
- Velocity.js介绍 --js 动画实现
- 义务教育学校计算机师机比,表1山东34个义务教育学校办学基本标准达标情况表...
- Linux操作系统-标准IO库(3)
- python实现自动化运维项目_Python自动化运维项目开发最佳实战
- 使用solidworks导出曲线的点
- MySQL case when then 的使用方法
- DateTime.now()用法
- jquery实现导航下拉菜单