壹佰网|ERP100 - 企业信息化知识门户

 找回密码
 注册

QQ登录

只需一步,快速开始

查看: 6835|回复: 3

订单导入求助(订单接口)

[复制链接]
发表于 2006/7/27 21:59:34 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ: 83569622  。

您需要 登录 才可以下载或查看,没有帐号?注册

x
启用价目表,价目表价格不可更改,想导入销售价格的订单。如何实现?我使用订单头和行两张接口表,导进去的订单都变成了价目表价格,是不是要启用价格调整的接口表?
发表于 2006/7/27 22:37:43 | 显示全部楼层
参考一下这个代码
  1. declare cursor cu is
  2.   select distinct :control.order_source_id ORDER_SOURCE_ID, to_char(sysdate, 'yyyymmddhh24mi') ORIG_SYS_DOCUMENT_REF, :parameter.org_id ORG_ID, to_date(replace(aic.issue, '/', '-'), :control.date_fmt) ORDERED_DATE, :control.order_type_id ORDER_TYPE_ID, aic.price_list_id PRICE_LIST_ID, aic.cur TRANSACTIONAL_CURR_CODE, 'No Sales Credit' SALESREP, aic.po_no CUSTOMER_PO_NUMBER, aic.customer_id SOLD_TO_ORG_ID, aic.site_use_id SHIP_TO_ORG_ID, aic.customer_id CUSTOMER_ID, :parameter.USER_ID CREATED_BY, :parameter.USER_ID LAST_UPDATED_BY, SYSDATE CREATION_DATE, SYSDATE LAST_UPDATE_DATE from zexsa_cust_om_data_temp aic where aic.batch_seq = :parameter.batch_seq and err_msg = '0';
  3.   REQ_ID NUMBER;
  4.   r      number;
  5. BEGIN
  6.   if :control.order_type_id is null or :control.order_source_id is null then
  7.     fnd_message.debug('You must choose order type and order source');
  8.   
  9.   else
  10.   
  11.     for lr in cu loop
  12.       r := cu%rowcount;
  13.       insert into OE_HEADERS_IFACE_ALL
  14.         (ORDER_SOURCE_ID,
  15.          ORIG_SYS_DOCUMENT_REF,
  16.          ORG_ID,
  17.          ORDERED_DATE,
  18.          ORDER_TYPE_ID,
  19.          PRICE_LIST_ID,
  20.          TRANSACTIONAL_CURR_CODE,
  21.          SALESREP,
  22.          CUSTOMER_PO_NUMBER,
  23.          SOLD_TO_ORG_ID,
  24.          SHIP_TO_ORG_ID,
  25.          CUSTOMER_ID,
  26.          CREATED_BY,
  27.          LAST_UPDATED_BY,
  28.          CREATION_DATE,
  29.          LAST_UPDATE_DATE)
  30.       values
  31.         (lr.ORDER_SOURCE_ID,
  32.          lr.ORIG_SYS_DOCUMENT_REF || r,
  33.          lr.ORG_ID,
  34.          lr.ORDERED_DATE,
  35.          lr.ORDER_TYPE_ID,
  36.          lr.PRICE_LIST_ID,
  37.          lr.TRANSACTIONAL_CURR_CODE,
  38.          lr.SALESREP,
  39.          lr.CUSTOMER_PO_NUMBER,
  40.          lr.SOLD_TO_ORG_ID,
  41.          lr.SHIP_TO_ORG_ID,
  42.          lr.CUSTOMER_ID,
  43.          lr.CREATED_BY,
  44.          lr.LAST_UPDATED_BY,
  45.          lr.CREATION_DATE,
  46.          lr.LAST_UPDATE_DATE);
  47.    
  48.       insert into OE_lineS_IFACE_ALL
  49.         (ORDER_SOURCE_ID,
  50.          ORIG_SYS_DOCUMENT_REF,
  51.          ORIG_SYS_LINE_REF,
  52.          ORIG_SYS_SHIPMENT_REF,
  53.          ORG_ID,
  54.          customer_po_number,
  55.          LINE_NUMBER,
  56.          INVENTORY_ITEM_ID,
  57.          ORDERED_QUANTITY,
  58.          ORDER_QUANTITY_UOM,
  59.          schedule_ship_date,
  60.          CREATED_BY,
  61.          LAST_UPDATED_BY,
  62.          CREATION_DATE,
  63.          LAST_UPDATE_DATE)
  64.         (select :control.order_source_id,
  65.                 lr.ORIG_SYS_DOCUMENT_REF,
  66.                 rownum,
  67.                 rownum,
  68.                 :parameter.org_id,
  69.                 aic.po_no,
  70.                 rownum,
  71.                 aic.item_id,
  72.                 aic.qty,
  73.                 null,
  74.                 to_date(replace(aic.del_date, '/', '-'), :control.date_fmt),
  75.                 :parameter.USER_ID,
  76.                 :parameter.USER_ID,
  77.                 SYSDATE,
  78.                 SYSDATE
  79.            from zexsa_cust_om_data_temp aic
  80.           where aic.batch_seq = :parameter.batch_seq
  81.             and err_msg = '0'
  82.             and aic.customer_id = lr.CUSTOMER_ID
  83.             and aic.site_use_id = lr.SHIP_TO_ORG_ID
  84.             and nvl(aic.po_no, 'a') = nvl(lr.CUSTOMER_PO_NUMBER, 'a')
  85.             and to_date(replace(aic.issue, '/', '-'), :control.date_fmt) =
  86.                 lr.ORDERED_DATE
  87.          
  88.          );
  89.     end loop;
  90.   
  91.     forms_ddl('commit');
  92.   
  93.     --FND_REQUEST.SET_MODE(true).
  94.     /*
  95.    
  96.     REQ_ID:=FND_REQUEST.SUBMIT_REQUEST
  97.     ('ONT',
  98.     'OEOIMP'
  99.     ,null,
  100.     to_char(SYSDATE,'DD-MON-YY HH24:MI:SS'),
  101.     FALSE,
  102.     '',
  103.     'ZEXSA_WEB_ORDER',
  104.     '',
  105.     'N',
  106.     '1',
  107.     '4',
  108.     null,--to_number(null),
  109.     null,--to_number(null),
  110.     null,--to_number(null),
  111.     'Y',
  112.    
  113.     -- , zexsa , , N , 1 , 4, , , , Y,
  114.     -- N
  115.     'N', '', '', '', '', '', '', '', '', '',
  116.     '', '', '', '', '', '', '', '', '', '',
  117.     '', '', '', '', '', '', '', '', '', '',
  118.     '', '', '', '', '', '', '', '', '', '',
  119.     '', '', '', '', '', '', '', '', '', '',
  120.     '', '', '', '', '', '', '', '', '', '',
  121.     '', '', '', '', '', '', '', '', '', '',
  122.     '', '', '', '', '', '', '', '', '', '',
  123.     '', '', '', '', '', '', '', '', '', '');
  124.    
  125.     */
  126.     fnd_message.debug('Your data transfer into interface OK.');
  127.   
  128.     delete from zexsa_cust_om_data_temp aic
  129.      where aic.batch_seq = :parameter.batch_seq
  130.        and err_msg = '0';
  131.     forms_ddl('commit');
  132.   
  133.     go_block('ZEXSA_CUST_OM_DATA_TEMP');
  134.     execute_query;
  135.   
  136.   end if;
  137. end;
  138. end;
复制代码
 楼主| 发表于 2006/7/27 23:09:25 | 显示全部楼层
谢谢!!
不过我这里需要用价目表,我写的程序跟你的差不多,结果接口表里的unit_selling_price价格自动变成价目表价格了。
如果,把caculate_price_flag 改成'N' 价格可以进去,不过再进去手工修改导进去的订单价格,系统会自动重新计算,发现计算公式为 新价格-旧价格+价目表价格。

我想是不是必须通用使用另一张接口表OE_PRICE_ADJS_IFACE_ALL 但一直没试成功。不知道斑竹有没有这样的代码?
发表于 2012/6/20 14:52:15 | 显示全部楼层
请问一下销售协议的导入,是否可以用这种方法。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|Archiver|小黑屋|手机版|壹佰网 ERP100 ( 京ICP备19053597号-2 )

Copyright © 2005-2012 北京海之大网络技术有限责任公司 服务器托管由互联互通
手机:13911575376
网站技术点击发送消息给对方83569622   广告&合作 点击发送消息给对方27675401   点击发送消息给对方634043306   咨询及人才点击发送消息给对方138011526

GMT+8, 2025/11/30 15:12 , Processed in 0.011490 second(s), 14 queries , File On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表