[置顶]EBS-新增和更新价目表行
作者：_忘却的思念_ | 来源：互联网 | 2023-09-03 13:47
新增和更新价目表行--目的：在已有的价目表头基础上，增加行信息--限制：该api有些问题，如果强制增加头信息，会有很多问题，所以该例子只是在已有头信息基础上，增加行信息
新增和更新价目表行 --目的：在已有的价目表头基础上，增加行信息 --限制：该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 ;
推荐阅读
本文介绍了一段通用代码示例，该代码不仅能够操作 Azure Active Directory (AAD)，还可以通过 Azure Service Principal 的授权访问和管理 Azure 订阅资源。Azure 的架构可以分为两个层级：AAD 和 Subscription。 ...
[详细]
蜡笔小新 2024-12-27 16:07:12
本文深入探讨了 Java 中的 Serializable 接口，解释了其实现机制、用途及注意事项，帮助开发者更好地理解和使用序列化功能。 ...
[详细]
蜡笔小新 2024-12-27 15:06:12
本文介绍如何在 XNA 3.0 游戏项目中从 XML 文件加载数据。我们将探讨如何将 XML 数据序列化为二进制文件，并通过内容管道加载到游戏中。此外，还会涉及自定义类型读取器和写入器的实现。 ...
[详细]
蜡笔小新 2024-12-27 11:39:44
本文详细探讨了Redis中的数据结构和对象系统的实现，包括字符串、列表、集合、哈希表和有序集合等五种核心对象类型，以及它们所使用的底层数据结构。通过分析源码和相关文献，帮助读者更好地理解Redis的设计原理。 ...
[详细]
蜡笔小新 2024-12-25 04:11:22
本文详细介绍了如何使用Python处理Word文档，涵盖从基础操作到高级功能的各种技巧。我们将探讨如何生成文档、定义样式、提取表格数据以及处理超链接和图片等内容。 ...
[详细]
蜡笔小新 2024-12-23 10:40:32
一、【组网和实验环境】按如上的接口ip先作配置，再作ipsec的相关配置，配置文本见文章最后本文实验采用的交换机是H3C模拟器，下载地址如 ...
[详细]
蜡笔小新 2024-12-22 20:24:15
本文探讨了Android Launcher开发中自定义View的重要性，并通过一道经典的面试题，帮助开发者更好地理解自定义View的实现细节。文章不仅涵盖了基础知识，还提供了实际操作建议。 ...
[详细]
蜡笔小新 2024-12-28 11:15:04
本文将介绍如何编写一些有趣的VBScript脚本，这些脚本可以在朋友之间进行无害的恶作剧。通过简单的代码示例，帮助您了解VBScript的基本语法和功能。 ...
[详细]
蜡笔小新 2024-12-28 09:46:23
Explore how Matterverse is redefining the metaverse experience, creating immersive and meaningful virtual environments that foster genuine connections and economic opportunities. ...
[详细]
蜡笔小新 2024-12-28 09:44:49
本文详细介绍了Spring Cloud中的Ribbon组件如何实现服务调用的负载均衡。通过分析其工作原理、源码结构及配置方式，帮助读者理解Ribbon在分布式系统中的重要作用。 ...
[详细]
蜡笔小新 2024-12-27 16:01:25
本文详细介绍了Akka中的BackoffSupervisor机制，探讨其在处理持久化失败和Actor重启时的应用。通过具体示例，展示了如何配置和使用BackoffSupervisor以实现更细粒度的异常处理。 ...
[详细]
蜡笔小新 2024-12-27 15:04:09
本章探讨了用于在主机名和数值地址之间进行转换的函数，如gethostbyname和gethostbyaddr。此外，还介绍了getservbyname和getservbyport函数，用于在服务器名和端口号之间进行转换。 ...
[详细]
蜡笔小新 2024-12-27 11:26:39
在使用 DataGridView 时，如果在当前单元格中输入内容但光标未移开，点击保存按钮后，输入的内容可能无法保存。只有当光标离开单元格后，才能成功保存数据。本文将探讨如何通过调用 DataGridView 的内置方法解决此问题。 ...
[详细]
蜡笔小新 2024-12-27 09:27:14
本文详细探讨了VxWorks操作系统中双向链表和环形缓冲区的实现原理及使用方法，通过具体示例代码加深理解。 ...
[详细]
蜡笔小新 2024-12-26 13:26:16
本文介绍了如何使用JavaScript的Fetch API与Express服务器进行交互，涵盖了GET、POST、PUT和DELETE请求的实现，并展示了如何处理JSON响应。 ...
[详细]
蜡笔小新 2024-12-22 12:55:37
京公网安备 11010802041100号