EBS-新增和更新价目表行
来源:互联网 发布:新加坡股票行情软件 编辑:程序博客网 时间:2024/05/16 01:52
新增和更新价目表行
--目的:在已有的价目表头基础上,增加行信息
--限制:该api有些问题,如果强制增加头信息,会有很多问题,所以该例子只是在已有头信息基础上,增加行信息
--需要手动传参的部分:见注释
--注意事项:无需模拟登陆
DECLARE
p_list_header_id NUMBER(10 );
p_inventory_item_id NUMBER(10 );
p_product_uom_code VARCHAR2(50 );
p_primary_uom_flag VARCHAR2(50 );
p_operand NUMBER(10 );
p_start_active_date DATE;
p_end_active_date DATE;
x_return_status VARCHAR2(10 );
x_msg_count NUMBER(10 );
x_msg_data VARCHAR2(2000 );
l_price_list_rec qp_price_list_pub.price_list_rec_type;
l_price_list_line_tbl qp_price_list_pub.price_list_line_tbl_type;
l_pricing_attr_tbl qp_price_list_pub.pricing_attr_tbl_type;
x_price_list_rec qp_price_list_pub.price_list_rec_type;
x_price_list_val_rec qp_price_list_pub.price_list_val_rec_type;
x_price_list_line_tbl qp_price_list_pub.price_list_line_tbl_type;
x_price_list_line_val_tbl qp_price_list_pub.price_list_line_val_tbl_type;
x_qualifiers_tbl qp_qualifier_rules_pub.qualifiers_tbl_type;
x_qualifiers_val_tbl qp_qualifier_rules_pub.qualifiers_val_tbl_type;
x_pricing_attr_tbl qp_price_list_pub.pricing_attr_tbl_type;
x_pricing_attr_val_tbl qp_price_list_pub.pricing_attr_val_tbl_type;
BEGIN
l_price_list_rec.list_header_id := p_list_header_id; -- 业务实体 + 价目表名称 确定
l_price_list_rec.list_type_code := 'PRL'; -- 固定
l_price_list_rec.operation := qp_globals.g_opr_update; --固定
l_price_list_line_tbl( 1).list_header_id := p_list_header_id; -- 业务实体 + 价目表名称 确定
l_price_list_line_tbl( 1).list_line_id := fnd_api.g_miss_num;
l_price_list_line_tbl( 1).list_line_type_code := 'PLL' ; -- 固定
l_price_list_line_tbl( 1).operation := qp_globals.g_opr_create; -- 固定
l_price_list_line_tbl( 1).operand := p_operand; -- 值
l_price_list_line_tbl( 1).arithmetic_operator := 'UNIT_PRICE' ; -- 固定
l_price_list_line_tbl( 1).start_date_active := p_start_active_date; -- 直接传入 起始日期
l_price_list_line_tbl( 1).end_date_active := p_end_active_date; -- 直接传入 截止日期
l_price_list_line_tbl( 1).organization_id := NULL ; -- 直接传空
l_price_list_line_tbl( 1).primary_uom_flag := p_primary_uom_flag; --------根据 主要单位 直接传入
/* l_price_list_line_tbl(1).end_date_active := '24-12-2013'; --直接传入varchar 截止日期
*/
l_pricing_attr_tbl( 1).pricing_attribute_id := fnd_api.g_miss_num;
l_pricing_attr_tbl( 1).list_line_id := fnd_api.g_miss_num;
l_pricing_attr_tbl( 1).product_attribute_context := 'ITEM' ; -- 固定
l_pricing_attr_tbl( 1).product_attribute := 'PRICING_ATTRIBUTE1' ; --固定
l_pricing_attr_tbl( 1).product_attr_value := p_inventory_item_id; -- 传入 inventory_item_id
l_pricing_attr_tbl( 1).product_uom_code := p_product_uom_code; --直接传入 单位
l_pricing_attr_tbl( 1).excluder_flag := 'N' ; -- ? 暂时固定
l_pricing_attr_tbl( 1).attribute_grouping_no := 1 ; --固定
l_pricing_attr_tbl( 1).price_list_line_index := 1 ; --固定
l_pricing_attr_tbl( 1).operation := qp_globals.g_opr_create; -- 固定
qp_price_list_pub.process_price_list(p_api_version_number => 1,
p_init_msg_list => fnd_api.g_true,
p_return_values => fnd_api.g_false,
p_commit => fnd_api.g_false,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_price_list_rec => l_price_list_rec,
p_price_list_line_tbl => l_price_list_line_tbl,
p_pricing_attr_tbl => l_pricing_attr_tbl,
x_price_list_rec => x_price_list_rec,
x_price_list_val_rec => x_price_list_val_rec,
x_price_list_line_tbl => x_price_list_line_tbl,
x_qualifiers_tbl => x_qualifiers_tbl,
x_qualifiers_val_tbl => x_qualifiers_val_tbl,
x_pricing_attr_tbl => x_pricing_attr_tbl,
x_pricing_attr_val_tbl => x_pricing_attr_val_tbl,
x_price_list_line_val_tbl => x_price_list_line_val_tbl);
IF x_return_status = fnd_api.g_ret_sts_success THEN
dbms_output.put_line( 'x_return_status:' || x_return_status);
dbms_output.put_line( '新增成功');
ELSE
dbms_output.put_line( 'x_return_status:' || x_return_status);
dbms_output.put_line( '新增出错');
END IF;
END;
0 0
- EBS-新增和更新价目表行
- EBS价目表设置导入功能(2)-价目表行
- EBS价目表设置导入功能(1)-价目表题头
- MyBatis批量新增和更新
- MyBatis批量新增和更新
- MyBatis学习系列六:新增和更新
- TP5新增和更新时条件对比
- EBS 更新银行地址
- 在DTable中的新增和更新界面使用模板文件
- Trigger-demo--新增 更新 和删除的一个 例子
- Amazon EBS的功能更新
- EBS-PAC成本更新事务处理
- 物料分类新增&更新
- MyBatis批量新增、更新
- solrj新增、删除、更新
- EBS R11i和R12
- EBS FA资产模块新增CIP在建工程手册
- cassandra新增、更新、删除数据。
- bootstarp modal自动调整宽度的JS代码
- 智商太低,居然算不出病狗神题了
- boost交叉编译
- IE7,ie8 ,火狐显示正常,ie6就乱码了解决方法
- Android显示系统之View与SurfaceView更新屏幕的区别
- EBS-新增和更新价目表行
- VS2010 工具中添加 command prompt 命令行
- oracle trunc函数
- 各种总线match匹配函数
- DTCoreText使用笔记
- ios网络编程之Scoket
- Eclipse中删除workspace
- ADO 数据库开发技术一些小知识
- 鼠标指针竟然可以用图片替换 屌爆了!