创建po的bapi BAPI_PO_CREATE1 刚刚sophie提起搜索相关
来源:互联网 发布:cms 系统技术架构文档 编辑:程序博客网 时间:2024/05/10 00:37
*/--------- 採購單 表頭資訊
LOOP AT ITAB_PO_HEADER .
POHEAD-COMP_CODE = ITAB_PO_HEADER-BUKRS . " 公司
POHEAD-DOC_TYPE = ITAB_PO_HEADER-BSART . " 單據類別
POHEAD-CREAT_DATE = SY-DATUM . " 建立日期
POHEAD-VENDOR = ITAB_PO_HEADER-LIFNR. " 供應商
POHEAD-PURCH_ORG = ITAB_PO_HEADER-EKORG . " 採購組織
POHEAD-PUR_GROUP = ITAB_PO_HEADER-EKGRP. " 採購群組
POHEAD-LANGU = SY-LANGU .
POHEAD-DOC_DATE = SY-DATUM.
POHEADX-COMP_CODE = C_X.
POHEADX-DOC_TYPE = C_X.
POHEADX-CREAT_DATE = C_X.
POHEADX-VENDOR = C_X.
POHEADX-PURCH_ORG = C_X.
POHEADX-PUR_GROUP = C_X.
POHEADX-LANGU = C_X.
POHEADX-DOC_DATE = C_X.
*/------------ 物料數量 資訊
ITAB_POITEM-PO_ITEM = W_EBELP . " 項次編號
ITAB_POITEM-MATERIAL = ITAB_PO-MATNR . " 料號
ITAB_POITEM-PLANT = ITAB_PO-WERKS . " 工廠
ITAB_POITEM-STGE_LOC = ITAB_PO-LGORT . " 倉別
ITAB_POITEM-QUANTITY = ITAB_PO-LABST . " 數量
ITAB_POITEM-PO_UNIT = ITAB_PO-MEINS . " 單位
ITAB_POITEM-NET_PRICE = ITAB_PO-CURR_PR . " 單價
ITAB_POITEM-PRICE_UNIT = ITAB_PO-PEINH. " 單價基數 ITAB_PO-PEINH ,
ITAB_POITEM-PREQ_NAME = 'BAPI' . " 申請人
ITAB_POITEM-RET_ITEM = 'X' . " 退貨註記
ITAB_POITEM-TRACKINGNO = ITAB_PO-EBELN . " 上一筆採購單
ITAB_POITEM-SHORT_TEXT = ITAB_PO-TXZ01 . " 發票號碼資訊
APPEND ITAB_POITEM.
CLEAR ITAB_POITEM.
ITAB_POITEMX-PO_ITEM = W_EBELP .
ITAB_POITEMX-PO_ITEMX = C_X .
ITAB_POITEMX-MATERIAL = C_X .
ITAB_POITEMX-PLANT = C_X .
ITAB_POITEMX-STGE_LOC = C_X .
ITAB_POITEMX-QUANTITY = C_X .
ITAB_POITEMX-PO_UNIT = C_X .
ITAB_POITEMX-NET_PRICE = C_X .
ITAB_POITEMX-PRICE_UNIT = C_X .
ITAB_POITEMX-PREQ_NAME = C_X .
ITAB_POITEMX-RET_ITEM = C_X .
ITAB_POITEMX-TRACKINGNO = C_X .
ITAB_POITEMX-SHORT_TEXT = C_X .
ITAB_POITEMX-TAX_CODE = C_X .
ITAB_POITEMX-ITEM_CAT = C_X .
ITAB_POITEMX-ACCTASSCAT = C_X .
APPEND ITAB_POITEMX.
CLEAR ITAB_POITEMX.
*/---------------- 排程資訊
ITAB_POSCHED-PO_ITEM = W_EBELP .
ITAB_POSCHED-SCHED_LINE = W_EBELP .
ITAB_POSCHED-DEL_DATCAT_EXT = 'D'.
DEL_DATE = SY-DATUM + 1.
WRITE DEL_DATE TO ITAB_POSCHED-DELIVERY_DATE.
ITAB_POSCHED-DELIV_TIME = '000001'.
ITAB_POSCHED-QUANTITY = ITAB_PO-LABST.
APPEND ITAB_POSCHED.
CLEAR ITAB_POSCHED.
ITAB_POSCHEDX-PO_ITEM = W_EBELP.
ITAB_POSCHEDX-SCHED_LINE = W_EBELP.
ITAB_POSCHEDX-PO_ITEMX = C_X.
ITAB_POSCHEDX-SCHED_LINEX = C_X.
ITAB_POSCHEDX-DEL_DATCAT_EXT = C_X.
ITAB_POSCHEDX-DELIVERY_DATE = C_X.
ITAB_POSCHEDX-QUANTITY = C_X.
APPEND ITAB_POSCHEDX.
CLEAR ITAB_POSCHEDX.
*/----CALL BAPI FUNCTION ----------------------------
CALL FUNCTION 'BAPI_PO_CREATE1'
EXPORTING
POHEADER = POHEAD
POHEADERX = POHEADX
TESTRUN = ' '
NO_PRICE_FROM_PO = 'X'
IMPORTING
EXPPURCHASEORDER = EX_PO_NUMBER
EXPHEADER = EXP_HEAD
TABLES
RETURN = RETURN
POITEM = ITAB_POITEM
POITEMX = ITAB_POITEMX
POSCHEDULE = ITAB_POSCHED
POSCHEDULEX = ITAB_POSCHEDX .
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = 'X' .
LOOP AT ITAB_PO_HEADER .
POHEAD-COMP_CODE = ITAB_PO_HEADER-BUKRS . " 公司
POHEAD-DOC_TYPE = ITAB_PO_HEADER-BSART . " 單據類別
POHEAD-CREAT_DATE = SY-DATUM . " 建立日期
POHEAD-VENDOR = ITAB_PO_HEADER-LIFNR. " 供應商
POHEAD-PURCH_ORG = ITAB_PO_HEADER-EKORG . " 採購組織
POHEAD-PUR_GROUP = ITAB_PO_HEADER-EKGRP. " 採購群組
POHEAD-LANGU = SY-LANGU .
POHEAD-DOC_DATE = SY-DATUM.
POHEADX-COMP_CODE = C_X.
POHEADX-DOC_TYPE = C_X.
POHEADX-CREAT_DATE = C_X.
POHEADX-VENDOR = C_X.
POHEADX-PURCH_ORG = C_X.
POHEADX-PUR_GROUP = C_X.
POHEADX-LANGU = C_X.
POHEADX-DOC_DATE = C_X.
*/------------ 物料數量 資訊
ITAB_POITEM-PO_ITEM = W_EBELP . " 項次編號
ITAB_POITEM-MATERIAL = ITAB_PO-MATNR . " 料號
ITAB_POITEM-PLANT = ITAB_PO-WERKS . " 工廠
ITAB_POITEM-STGE_LOC = ITAB_PO-LGORT . " 倉別
ITAB_POITEM-QUANTITY = ITAB_PO-LABST . " 數量
ITAB_POITEM-PO_UNIT = ITAB_PO-MEINS . " 單位
ITAB_POITEM-NET_PRICE = ITAB_PO-CURR_PR . " 單價
ITAB_POITEM-PRICE_UNIT = ITAB_PO-PEINH. " 單價基數 ITAB_PO-PEINH ,
ITAB_POITEM-PREQ_NAME = 'BAPI' . " 申請人
ITAB_POITEM-RET_ITEM = 'X' . " 退貨註記
ITAB_POITEM-TRACKINGNO = ITAB_PO-EBELN . " 上一筆採購單
ITAB_POITEM-SHORT_TEXT = ITAB_PO-TXZ01 . " 發票號碼資訊
APPEND ITAB_POITEM.
CLEAR ITAB_POITEM.
ITAB_POITEMX-PO_ITEM = W_EBELP .
ITAB_POITEMX-PO_ITEMX = C_X .
ITAB_POITEMX-MATERIAL = C_X .
ITAB_POITEMX-PLANT = C_X .
ITAB_POITEMX-STGE_LOC = C_X .
ITAB_POITEMX-QUANTITY = C_X .
ITAB_POITEMX-PO_UNIT = C_X .
ITAB_POITEMX-NET_PRICE = C_X .
ITAB_POITEMX-PRICE_UNIT = C_X .
ITAB_POITEMX-PREQ_NAME = C_X .
ITAB_POITEMX-RET_ITEM = C_X .
ITAB_POITEMX-TRACKINGNO = C_X .
ITAB_POITEMX-SHORT_TEXT = C_X .
ITAB_POITEMX-TAX_CODE = C_X .
ITAB_POITEMX-ITEM_CAT = C_X .
ITAB_POITEMX-ACCTASSCAT = C_X .
APPEND ITAB_POITEMX.
CLEAR ITAB_POITEMX.
*/---------------- 排程資訊
ITAB_POSCHED-PO_ITEM = W_EBELP .
ITAB_POSCHED-SCHED_LINE = W_EBELP .
ITAB_POSCHED-DEL_DATCAT_EXT = 'D'.
DEL_DATE = SY-DATUM + 1.
WRITE DEL_DATE TO ITAB_POSCHED-DELIVERY_DATE.
ITAB_POSCHED-DELIV_TIME = '000001'.
ITAB_POSCHED-QUANTITY = ITAB_PO-LABST.
APPEND ITAB_POSCHED.
CLEAR ITAB_POSCHED.
ITAB_POSCHEDX-PO_ITEM = W_EBELP.
ITAB_POSCHEDX-SCHED_LINE = W_EBELP.
ITAB_POSCHEDX-PO_ITEMX = C_X.
ITAB_POSCHEDX-SCHED_LINEX = C_X.
ITAB_POSCHEDX-DEL_DATCAT_EXT = C_X.
ITAB_POSCHEDX-DELIVERY_DATE = C_X.
ITAB_POSCHEDX-QUANTITY = C_X.
APPEND ITAB_POSCHEDX.
CLEAR ITAB_POSCHEDX.
*/----CALL BAPI FUNCTION ----------------------------
CALL FUNCTION 'BAPI_PO_CREATE1'
EXPORTING
POHEADER = POHEAD
POHEADERX = POHEADX
TESTRUN = ' '
NO_PRICE_FROM_PO = 'X'
IMPORTING
EXPPURCHASEORDER = EX_PO_NUMBER
EXPHEADER = EXP_HEAD
TABLES
RETURN = RETURN
POITEM = ITAB_POITEM
POITEMX = ITAB_POITEMX
POSCHEDULE = ITAB_POSCHED
POSCHEDULEX = ITAB_POSCHEDX .
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
EXPORTING
WAIT = 'X' .
- 创建po的bapi BAPI_PO_CREATE1 刚刚sophie提起搜索相关
- BAPI调用 - 创建po的bapi BAPI_PO_CREATE1
- BAPI调用 - BAPI_PO_CREATE1行项目传入货币导致创建PO失败
- bapi_po_create1根据PR创建PO
- SE37 创建PO订单BAPI_PO_CREATE1
- BAPI_PO_CREATE1创建服务类PO的关键数据关系
- BAPI / RFC with Delphi(系列之六)--TSAPFunctions使用BAPI创建PO(有登录对话框的delphi源代码)
- BAPI / RFC with Delphi(系列之六)--TSAPFunctions使用BAPI创建PO(有登录对话框的delphi源代码)
- BAPI_PO_CREATE1 批量创建采购订单(可一个PO采购多个材料)
- BAPI_PO_CREATE1创建采购订单
- 创建物料组件相关BAPI: BAPI…
- 创建 BAPI 程序的步骤
- 创建BAPI程序的步骤
- 创建会计凭证(FB01)的BAPI
- 根据BAPI_PO_CREATE1创建采购订单
- 根据BAPI_PO_CREATE1创建采购订单
- 采购订单批量创建 BAPI_PO_CREATE1
- BAPI_PO_CREATE1 批量创建采购订单
- excel在sap中的应用
- soap编程总结
- 微软.NET 3.0框架概述
- 触动
- 获取某个控件在网页中的绝对位置
- 创建po的bapi BAPI_PO_CREATE1 刚刚sophie提起搜索相关
- 告诉你怎样学Java才是硬道理
- C#常用正则表达式总结
- Set,List , Map , Vector,ArrayList存储数据的应用
- java的同步
- 行列互转
- AutoCode (vs插件)自动生成代码插件 下载及使用教程(C#版)
- 子程序
- 海贼王