/* Update a Modifier header of type 'PRO' (Promotion) */
l_MODIFIER_LIST_rec.active_flag := 'N';
l_MODIFIER_LIST_rec.list_header_Id := 79722;
l_MODIFIER_LIST_rec.operation := QP_GLOBALS.G_OPR_UPDATE;
/* Call the Modifiers Public API to Process the modifier header, modifier line,
qualifier and a pricing attributes record */
QP_Modifiers_PUB.Process_Modifiers
( p_api_version_number=> 1.0
, p_init_msg_list => FND_API.G_FALSE
, p_return_values => FND_API.G_FALSE
, p_commit => FND_API.G_FALSE
, x_return_status => l_return_status
, x_msg_count =>x_msg_count
, x_msg_data =>x_msg_data
,p_MODIFIER_LIST_rec => l_MODIFIER_LIST_rec
,p_MODIFIERS_tbl => l_MODIFIERS_tbl
,p_QUALIFIERS_tbl => l_QUALIFIERS_tbl
,p_PRICING_ATTR_tbl => l_PRICING_ATTR_tbl
,x_MODIFIER_LIST_rec => l_x_MODIFIER_LIST_rec
,x_MODIFIER_LIST_val_rec => l_x_MODIFIER_LIST_val_rec
,x_MODIFIERS_tbl => l_x_MODIFIERS_tbl
,x_MODIFIERS_val_tbl => l_x_MODIFIERS_val_tbl
,x_QUALIFIERS_tbl => l_x_QUALIFIERS_tbl
,x_QUALIFIERS_val_tbl => l_x_QUALIFIERS_val_tbl
,x_PRICING_ATTR_tbl => l_x_PRICING_ATTR_tbl
,x_PRICING_ATTR_val_tbl => l_x_PRICING_ATTR_val_tbl
);
转载于:https://www.cnblogs.com/wanghang/p/6299079.html