The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_rowtype_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
l_rowtype_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;
l_rowtype_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
l_rowtype_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
l_rowtype_rec.updated_flag := FND_API.G_MISS_CHAR;
l_rowtype_rec.update_allowed := FND_API.G_MISS_CHAR;
SELECT
a.PRICE_ADJUSTMENT_ID
,a.CREATION_DATE
,a.CREATED_BY
,a.LAST_UPDATE_DATE
,a.LAST_UPDATED_BY
,a.LAST_UPDATE_LOGIN
,a.PROGRAM_APPLICATION_ID
,a.PROGRAM_ID
,a.PROGRAM_UPDATE_DATE
,a.REQUEST_ID
,a.PRICE_ADJ_ASSOC_ID
,a.LINE_ID
,a.RLTD_PRICE_ADJ_ID
,a.LOCK_CONTROL
from oe_price_adj_Assocs a, oe_price_adjustments b
where a.price_adjustment_id = p_price_adjustment_id
and a.rltd_price_adj_id = b.price_adjustment_id
and b.list_line_type_code in ('SUR','DIS');
x_rowtype_rec.LAST_UPDATED_BY := p_line_adj_rec.LAST_UPDATED_BY;
x_rowtype_rec.LAST_UPDATE_DATE := p_line_adj_rec.LAST_UPDATE_DATE;
x_rowtype_rec.LAST_UPDATE_LOGIN := p_line_adj_rec.LAST_UPDATE_LOGIN;
x_rowtype_rec.PROGRAM_UPDATE_DATE := p_line_adj_rec.PROGRAM_UPDATE_DATE;
x_rowtype_rec.updated_flag := p_line_adj_rec.updated_flag;
x_rowtype_rec.update_allowed := p_line_adj_rec.update_allowed;
x_api_rec.LAST_UPDATED_BY := p_record.LAST_UPDATED_BY;
x_api_rec.LAST_UPDATE_DATE := p_record.LAST_UPDATE_DATE;
x_api_rec.LAST_UPDATE_LOGIN := p_record.LAST_UPDATE_LOGIN;
x_api_rec.PROGRAM_UPDATE_DATE := p_record.PROGRAM_UPDATE_DATE;
x_api_rec.updated_flag := p_record.updated_flag;
x_api_rec.update_allowed := p_record.update_allowed;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.last_update_date,p_old_Line_Adj_rec.last_update_date)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := OE_LINE_ADJ_UTIL.G_LAST_UPDATE_DATE;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.last_updated_by,p_old_Line_Adj_rec.last_updated_by)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := OE_LINE_ADJ_UTIL.G_LAST_UPDATED_BY;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.last_update_login,p_old_Line_Adj_rec.last_update_login)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := OE_LINE_ADJ_UTIL.G_LAST_UPDATE_LOGIN;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.program_update_date,p_old_Line_Adj_rec.program_update_date)
THEN
l_index := l_index + 1;
l_src_attr_tbl(l_index) := OE_LINE_ADJ_UTIL.G_PROGRAM_UPDATE_DATE;
ELSIF l_dep_attr_tbl(I) = OE_LINE_ADJ_UTIL.G_LAST_UPDATE_DATE THEN
p_x_Line_Adj_rec.LAST_UPDATE_DATE := FND_API.G_MISS_DATE;
ELSIF l_dep_attr_tbl(I) = OE_LINE_ADJ_UTIL.G_LAST_UPDATED_BY THEN
p_x_Line_Adj_rec.LAST_UPDATED_BY := FND_API.G_MISS_NUM;
ELSIF l_dep_attr_tbl(I) = OE_LINE_ADJ_UTIL.G_LAST_UPDATE_LOGIN THEN
p_x_Line_Adj_rec.LAST_UPDATE_LOGIN := FND_API.G_MISS_NUM;
ELSIF l_dep_attr_tbl(I) = OE_LINE_ADJ_UTIL.G_PROGRAM_UPDATE_DATE THEN
p_x_Line_Adj_rec.PROGRAM_UPDATE_DATE := FND_API.G_MISS_DATE;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.last_update_date,p_old_Line_Adj_rec.last_update_date)
THEN
NULL;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.last_updated_by,p_old_Line_Adj_rec.last_updated_by)
THEN
NULL;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.last_update_login,p_old_Line_Adj_rec.last_update_login)
THEN
NULL;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.program_update_date,p_old_Line_Adj_rec.program_update_date)
THEN
NULL;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.update_allowed,
p_old_Line_Adj_rec.update_allowed)
THEN
NULL;
IF NOT OE_GLOBALS.Equal(p_x_Line_Adj_rec.updated_flag,
p_old_Line_Adj_rec.updated_flag)
THEN
l_price_flag := TRUE;
p_x_line_Adj_rec.updated_flag = 'Y'
THEN
p_x_line_adj_rec.estimated_flag := 'N';
p_x_line_Adj_rec.updated_flag = 'N'
THEN
p_x_line_adj_rec.estimated_flag := 'Y';
SELECT lookup_code, meaning
INTO p_x_Line_Adj_rec.change_reason_code,
p_x_Line_Adj_rec.change_reason_text
FROM oe_lookups
WHERE lookup_type = 'CHANGE_CODE'
AND lookup_code = 'MANUAL';
SELECT commitment_id
INTO l_commitment_id
FROM oe_order_lines
WHERE line_id = p_old_line_adj_rec.line_id;
SELECT line_category_code
INTO l_line_category_code
FROM oe_order_lines_all
WHERE line_id = p_x_line_adj_rec.line_id;
IF l_Line_Adj_rec.last_update_date = FND_API.G_MISS_DATE THEN
l_Line_Adj_rec.last_update_date := p_old_Line_Adj_rec.last_update_date;
IF l_Line_Adj_rec.last_updated_by = FND_API.G_MISS_NUM THEN
l_Line_Adj_rec.last_updated_by := p_old_Line_Adj_rec.last_updated_by;
IF l_Line_Adj_rec.last_update_login = FND_API.G_MISS_NUM THEN
l_Line_Adj_rec.last_update_login := p_old_Line_Adj_rec.last_update_login;
IF l_Line_Adj_rec.program_update_date = FND_API.G_MISS_DATE THEN
l_Line_Adj_rec.program_update_date := p_old_Line_Adj_rec.program_update_date;
IF l_Line_Adj_rec.updated_flag = FND_API.G_MISS_CHAR THEN
l_Line_Adj_rec.updated_flag := p_old_Line_Adj_rec.updated_flag;
IF l_Line_Adj_rec.update_allowed = FND_API.G_MISS_CHAR THEN
l_Line_Adj_rec.update_allowed := p_old_Line_Adj_rec.update_allowed;
IF l_Line_Adj_rec.last_update_date = FND_API.G_MISS_DATE THEN
l_Line_Adj_rec.last_update_date := NULL;
IF l_Line_Adj_rec.last_updated_by = FND_API.G_MISS_NUM THEN
l_Line_Adj_rec.last_updated_by := NULL;
IF l_Line_Adj_rec.last_update_login = FND_API.G_MISS_NUM THEN
l_Line_Adj_rec.last_update_login := NULL;
IF l_Line_Adj_rec.program_update_date = FND_API.G_MISS_DATE THEN
l_Line_Adj_rec.program_update_date := NULL;
IF l_Line_Adj_rec.updated_flag = FND_API.G_MISS_CHAR THEN
l_Line_Adj_rec.updated_flag := NULL;
IF l_Line_Adj_rec.update_allowed = FND_API.G_MISS_CHAR THEN
l_Line_Adj_rec.update_allowed := NULL;
PROCEDURE Update_Row
( p_Line_Adj_rec IN OUT NOCOPY OE_Order_PUB.Line_Adj_Rec_Type
)
IS
l_lock_control NUMBER;
oe_debug_pub.add( 'ENTERING OE_LINE_ADJ_UTIL.UPDATE_ROW' , 1 ) ;
SELECT lock_control
INTO l_lock_control
FROM OE_PRICE_ADJUSTMENTS
WHERE price_adjustment_id = p_Line_Adj_rec.price_adjustment_id;
OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
p_Line_adj_rec =>p_line_adj_rec,
p_line_adj_id => p_line_adj_rec.price_adjustment_id,
x_index => l_index,
x_return_status => l_return_status);
oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_LINE_ADJ_UTIL.UPDATE_ROW IS: ' || L_RETURN_STATUS ) ;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.UPDATE_ROW' , 1 ) ;
oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_LINE_ADJ_UTIL.UPDATE_ROW' ) ;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.UPDATE_ROW' , 1 ) ;
UPDATE OE_PRICE_ADJUSTMENTS
SET PRICE_ADJUSTMENT_ID = p_Line_Adj_rec.price_adjustment_id
, CREATION_DATE = p_Line_Adj_rec.creation_date
, CREATED_BY = p_Line_Adj_rec.created_by
, LAST_UPDATE_DATE = p_Line_Adj_rec.last_update_date
, LAST_UPDATED_BY = p_Line_Adj_rec.last_updated_by
, LAST_UPDATE_LOGIN = p_Line_Adj_rec.last_update_login
, PROGRAM_APPLICATION_ID = p_Line_Adj_rec.program_application_id
, PROGRAM_ID = p_Line_Adj_rec.program_id
, PROGRAM_UPDATE_DATE = p_Line_Adj_rec.program_update_date
, REQUEST_ID = p_Line_Adj_rec.request_id
, HEADER_ID = p_Line_Adj_rec.header_id
, DISCOUNT_ID = p_Line_Adj_rec.discount_id
, DISCOUNT_LINE_ID = p_Line_Adj_rec.discount_line_id
, AUTOMATIC_FLAG = p_Line_Adj_rec.automatic_flag
, PERCENT = p_Line_Adj_rec.percent
, LINE_ID = p_Line_Adj_rec.line_id
, CONTEXT = p_Line_Adj_rec.context
, ATTRIBUTE1 = p_Line_Adj_rec.attribute1
, ATTRIBUTE2 = p_Line_Adj_rec.attribute2
, ATTRIBUTE3 = p_Line_Adj_rec.attribute3
, ATTRIBUTE4 = p_Line_Adj_rec.attribute4
, ATTRIBUTE5 = p_Line_Adj_rec.attribute5
, ATTRIBUTE6 = p_Line_Adj_rec.attribute6
, ATTRIBUTE7 = p_Line_Adj_rec.attribute7
, ATTRIBUTE8 = p_Line_Adj_rec.attribute8
, ATTRIBUTE9 = p_Line_Adj_rec.attribute9
, ATTRIBUTE10 = p_Line_Adj_rec.attribute10
, ATTRIBUTE11 = p_Line_Adj_rec.attribute11
, ATTRIBUTE12 = p_Line_Adj_rec.attribute12
, ATTRIBUTE13 = p_Line_Adj_rec.attribute13
, ATTRIBUTE14 = p_Line_Adj_rec.attribute14
, ATTRIBUTE15 = p_Line_Adj_rec.attribute15
, ORIG_SYS_DISCOUNT_REF = p_Line_Adj_rec.orig_sys_discount_ref
, LIST_HEADER_ID = p_Line_Adj_rec.list_header_id
, LIST_LINE_ID = p_Line_Adj_rec.list_line_id
, LIST_LINE_TYPE_CODE = p_Line_Adj_rec.list_line_type_code
, MODIFIER_MECHANISM_TYPE_CODE = p_Line_Adj_rec.modifier_mechanism_type_code
, MODIFIED_FROM = p_Line_Adj_rec.modified_from
, MODIFIED_TO = p_Line_Adj_rec.modified_to
, UPDATED_FLAG = p_Line_Adj_rec.updated_flag
, UPDATE_ALLOWED = p_Line_Adj_rec.update_allowed
, APPLIED_FLAG = p_Line_Adj_rec.applied_flag
, CHANGE_REASON_CODE = p_Line_Adj_rec.change_reason_code
, CHANGE_REASON_TEXT = p_Line_Adj_rec.change_reason_text
, operand = p_Line_Adj_rec.operand
, Arithmetic_operator = p_Line_Adj_rec.arithmetic_operator
, COST_ID = p_Line_Adj_rec.cost_id
, TAX_CODE = p_Line_Adj_rec.tax_code
, TAX_EXEMPT_FLAG = p_Line_Adj_rec.tax_exempt_flag
, TAX_EXEMPT_NUMBER = p_Line_Adj_rec.tax_exempt_number
, TAX_EXEMPT_REASON_CODE = p_Line_Adj_rec.tax_exempt_reason_code
, PARENT_ADJUSTMENT_ID = p_Line_Adj_rec.parent_adjustment_id
, INVOICED_FLAG = p_Line_Adj_rec.invoiced_flag
, ESTIMATED_FLAG = p_Line_Adj_rec.estimated_flag
, INC_IN_SALES_PERFORMANCE = p_Line_Adj_rec.inc_in_sales_performance
, SPLIT_ACTION_CODE = p_Line_Adj_rec.split_action_code
, ADJUSTED_AMOUNT = p_Line_Adj_rec.adjusted_amount
, PRICING_PHASE_ID = p_Line_Adj_rec.pricing_phase_id
, CHARGE_TYPE_CODE = p_Line_Adj_rec.charge_type_code
, CHARGE_SUBTYPE_CODE = p_Line_Adj_rec.charge_subtype_code
, LIST_LINE_NO = p_Line_Adj_rec.list_line_no
, SOURCE_SYSTEM_CODE = p_Line_Adj_rec.source_system_code
, BENEFIT_QTY = p_Line_Adj_rec.benefit_qty
, BENEFIT_UOM_CODE = p_Line_Adj_rec.benefit_uom_code
, PRINT_ON_INVOICE_FLAG = p_Line_Adj_rec.print_on_invoice_flag
, EXPIRATION_DATE = p_Line_Adj_rec.expiration_date
, REBATE_TRANSACTION_TYPE_CODE = p_Line_Adj_rec.rebate_transaction_type_code
, REBATE_TRANSACTION_REFERENCE = p_Line_Adj_rec.rebate_transaction_reference
, REBATE_PAYMENT_SYSTEM_CODE = p_Line_Adj_rec.rebate_payment_system_code
, REDEEMED_DATE = p_Line_Adj_rec.redeemed_date
, REDEEMED_FLAG = p_Line_Adj_rec.redeemed_flag
, ACCRUAL_FLAG = p_Line_Adj_rec.accrual_flag
, range_break_quantity = p_Line_Adj_rec.range_break_quantity
, accrual_conversion_rate = p_Line_Adj_rec.accrual_conversion_rate
, pricing_group_sequence = p_Line_Adj_rec.pricing_group_sequence
, modifier_level_code = p_Line_Adj_rec.modifier_level_code
, price_break_type_code = p_Line_Adj_rec.price_break_type_code
, substitution_attribute = p_Line_Adj_rec.substitution_attribute
, proration_type_code = p_Line_Adj_rec.proration_type_code
, CREDIT_OR_CHARGE_FLAG = p_Line_Adj_rec.credit_or_charge_flag
, INCLUDE_ON_RETURNS_FLAG = p_Line_Adj_rec.include_on_returns_flag
, AC_CONTEXT = p_Line_Adj_rec.ac_context
, AC_ATTRIBUTE1 = p_Line_Adj_rec.ac_attribute1
, AC_ATTRIBUTE2 = p_Line_Adj_rec.ac_attribute2
, AC_ATTRIBUTE3 = p_Line_Adj_rec.ac_attribute3
, AC_ATTRIBUTE4 = p_Line_Adj_rec.ac_attribute4
, AC_ATTRIBUTE5 = p_Line_Adj_rec.ac_attribute5
, AC_ATTRIBUTE6 = p_Line_Adj_rec.ac_attribute6
, AC_ATTRIBUTE7 = p_Line_Adj_rec.ac_attribute7
, AC_ATTRIBUTE8 = p_Line_Adj_rec.ac_attribute8
, AC_ATTRIBUTE9 = p_Line_Adj_rec.ac_attribute9
, AC_ATTRIBUTE10 = p_Line_Adj_rec.ac_attribute10
, AC_ATTRIBUTE11 = p_Line_Adj_rec.ac_attribute11
, AC_ATTRIBUTE12 = p_Line_Adj_rec.ac_attribute12
, AC_ATTRIBUTE13 = p_Line_Adj_rec.ac_attribute13
, AC_ATTRIBUTE14 = p_Line_Adj_rec.ac_attribute14
, AC_ATTRIBUTE15 = p_Line_Adj_rec.ac_attribute15
, LOCK_CONTROL = l_lock_control
--uom begin
, OPERAND_PER_PQTY = p_line_adj_rec.operand_per_pqty
, ADJUSTED_AMOUNT_PER_PQTY = p_line_adj_rec.adjusted_amount_per_pqty
--uom end
, INVOICED_AMOUNT = p_Line_Adj_rec.invoiced_amount
-- eBTax changes
, TAX_RATE_ID = p_Line_Adj_rec.tax_rate_id
WHERE PRICE_ADJUSTMENT_ID = p_Line_Adj_rec.price_adjustment_id
;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.UPDATE_ROW.' , 1 ) ;
, 'Update_Row'
);
oe_debug_pub.add( 'EXCEPTION IN UPDATE_ROW'||SQLERRM , 2 ) ;
END Update_Row;
select max(price_adjustment_id)
into j
from oe_price_adjustments;
Select oe_price_adjustments_s.nextval
Into h
From dual;
select oe_price_adjustments_s.nextval into k from dual;
PROCEDURE Insert_Row
( p_Line_Adj_rec IN OUT NOCOPY OE_Order_PUB.Line_Adj_Rec_Type
)
IS
l_lock_control NUMBER := 1;
oe_debug_pub.add( 'ENTERING OE_LINE_ADJ_UTIL.INSERT_ROW' , 1 ) ;
oe_debug_pub.add(' list_line_id insert:'|| p_Line_Adj_rec.list_line_id||
' ,operand insert:'||p_line_adj_rec.operand||
' ,operand pqty insert:'||p_line_adj_rec.operand_per_pqty||
' ,applied_flag insert:'||p_line_adj_rec.applied_flag||
' ,list_line_type_code:'||p_line_adj_rec.list_line_type_code||
' ,operator:'||p_line_adj_rec.arithmetic_operator);
INSERT INTO OE_PRICE_ADJUSTMENTS
( PRICE_ADJUSTMENT_ID
, CREATION_DATE
, CREATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATED_BY
, LAST_UPDATE_LOGIN
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, REQUEST_ID
, HEADER_ID
, DISCOUNT_ID
, DISCOUNT_LINE_ID
, AUTOMATIC_FLAG
, PERCENT
, LINE_ID
, CONTEXT
, ATTRIBUTE1
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ORIG_SYS_DISCOUNT_REF
, LIST_HEADER_ID
, LIST_LINE_ID
, LIST_LINE_TYPE_CODE
, MODIFIER_MECHANISM_TYPE_CODE
, MODIFIED_FROM
, MODIFIED_TO
, UPDATED_FLAG
, UPDATE_ALLOWED
, APPLIED_FLAG
, CHANGE_REASON_CODE
, CHANGE_REASON_TEXT
, operand
, Arithmetic_operator
, COST_ID
, TAX_CODE
, TAX_EXEMPT_FLAG
, TAX_EXEMPT_NUMBER
, TAX_EXEMPT_REASON_CODE
, PARENT_ADJUSTMENT_ID
, INVOICED_FLAG
, ESTIMATED_FLAG
, INC_IN_SALES_PERFORMANCE
, SPLIT_ACTION_CODE
, ADJUSTED_AMOUNT
, PRICING_PHASE_ID
, CHARGE_TYPE_CODE
, CHARGE_SUBTYPE_CODE
, list_line_no
, source_system_code
, benefit_qty
, benefit_uom_code
, print_on_invoice_flag
, expiration_date
, rebate_transaction_type_code
, rebate_transaction_reference
, rebate_payment_system_code
, redeemed_date
, redeemed_flag
, accrual_flag
, range_break_quantity
, accrual_conversion_rate
, pricing_group_sequence
, modifier_level_code
, price_break_type_code
, substitution_attribute
, proration_type_code
, CREDIT_OR_CHARGE_FLAG
, INCLUDE_ON_RETURNS_FLAG
, AC_CONTEXT
, AC_ATTRIBUTE1
, AC_ATTRIBUTE2
, AC_ATTRIBUTE3
, AC_ATTRIBUTE4
, AC_ATTRIBUTE5
, AC_ATTRIBUTE6
, AC_ATTRIBUTE7
, AC_ATTRIBUTE8
, AC_ATTRIBUTE9
, AC_ATTRIBUTE10
, AC_ATTRIBUTE11
, AC_ATTRIBUTE12
, AC_ATTRIBUTE13
, AC_ATTRIBUTE14
, AC_ATTRIBUTE15
--uom begin
, OPERAND_PER_PQTY
, ADJUSTED_AMOUNT_PER_PQTY
--uom end
--RETRO{
, retrobill_request_id
--RETRO}
, INVOICED_AMOUNT
, LOCK_CONTROL
-- eBTax Changes
, TAX_RATE_ID
)
VALUES
( p_Line_Adj_rec.price_adjustment_id
, p_Line_Adj_rec.creation_date
, p_Line_Adj_rec.created_by
, p_Line_Adj_rec.last_update_date
, p_Line_Adj_rec.last_updated_by
, p_Line_Adj_rec.last_update_login
, p_Line_Adj_rec.program_application_id
, p_Line_Adj_rec.program_id
, p_Line_Adj_rec.program_update_date
, p_Line_Adj_rec.request_id
, p_Line_Adj_rec.header_id
, p_Line_Adj_rec.discount_id
, p_Line_Adj_rec.discount_line_id
, p_Line_Adj_rec.automatic_flag
, p_Line_Adj_rec.percent
, p_Line_Adj_rec.line_id
, p_Line_Adj_rec.context
, p_Line_Adj_rec.attribute1
, p_Line_Adj_rec.attribute2
, p_Line_Adj_rec.attribute3
, p_Line_Adj_rec.attribute4
, p_Line_Adj_rec.attribute5
, p_Line_Adj_rec.attribute6
, p_Line_Adj_rec.attribute7
, p_Line_Adj_rec.attribute8
, p_Line_Adj_rec.attribute9
, p_Line_Adj_rec.attribute10
, p_Line_Adj_rec.attribute11
, p_Line_Adj_rec.attribute12
, p_Line_Adj_rec.attribute13
, p_Line_Adj_rec.attribute14
, p_Line_Adj_rec.attribute15
, p_Line_Adj_rec.orig_sys_discount_ref
, p_Line_Adj_rec.LIST_HEADER_ID
, p_Line_Adj_rec.LIST_LINE_ID
, p_Line_Adj_rec.LIST_LINE_TYPE_CODE
, p_Line_Adj_rec.MODIFIER_MECHANISM_TYPE_CODE
, p_Line_Adj_rec.MODIFIED_FROM
, p_Line_Adj_rec.MODIFIED_TO
, p_Line_Adj_rec.UPDATED_FLAG
, p_Line_Adj_rec.UPDATE_ALLOWED
, p_Line_Adj_rec.APPLIED_FLAG
, p_Line_Adj_rec.CHANGE_REASON_CODE
, p_Line_Adj_rec.CHANGE_REASON_TEXT
, p_Line_Adj_rec.operand
, p_Line_Adj_rec.arithmetic_operator
, p_line_Adj_rec.COST_ID
, p_line_Adj_rec.TAX_CODE
, p_line_Adj_rec.TAX_EXEMPT_FLAG
, p_line_Adj_rec.TAX_EXEMPT_NUMBER
, p_line_Adj_rec.TAX_EXEMPT_REASON_CODE
, p_line_Adj_rec.PARENT_ADJUSTMENT_ID
, p_line_Adj_rec.INVOICED_FLAG
, p_line_Adj_rec.ESTIMATED_FLAG
, p_line_Adj_rec.INC_IN_SALES_PERFORMANCE
, p_line_Adj_rec.SPLIT_ACTION_CODE
, p_line_Adj_rec.ADJUSTED_AMOUNT
, p_line_Adj_rec.PRICING_PHASE_ID
, p_line_Adj_rec.CHARGE_TYPE_CODE
, p_line_Adj_rec.CHARGE_SUBTYPE_CODE
, p_Line_Adj_rec.list_line_no
, p_Line_Adj_rec.source_system_code
, p_Line_Adj_rec.benefit_qty
, p_Line_Adj_rec.benefit_uom_code
, p_Line_Adj_rec.print_on_invoice_flag
, p_Line_Adj_rec.expiration_date
, p_Line_Adj_rec.rebate_transaction_type_code
, p_Line_Adj_rec.rebate_transaction_reference
, p_Line_Adj_rec.rebate_payment_system_code
, p_Line_Adj_rec.redeemed_date
, p_Line_Adj_rec.redeemed_flag
, p_Line_Adj_rec.accrual_flag
, p_Line_Adj_rec.range_break_quantity
, p_Line_Adj_rec.accrual_conversion_rate
, p_Line_Adj_rec.pricing_group_sequence
, p_Line_Adj_rec.modifier_level_code
, p_Line_Adj_rec.price_break_type_code
, p_Line_Adj_rec.substitution_attribute
, p_Line_Adj_rec.proration_type_code
, p_Line_Adj_rec.credit_or_charge_flag
, p_Line_Adj_rec.include_on_returns_flag
, p_Line_Adj_rec.ac_context
, p_Line_Adj_rec.ac_attribute1
, p_Line_Adj_rec.ac_attribute2
, p_Line_Adj_rec.ac_attribute3
, p_Line_Adj_rec.ac_attribute4
, p_Line_Adj_rec.ac_attribute5
, p_Line_Adj_rec.ac_attribute6
, p_Line_Adj_rec.ac_attribute7
, p_Line_Adj_rec.ac_attribute8
, p_Line_Adj_rec.ac_attribute9
, p_Line_Adj_rec.ac_attribute10
, p_Line_Adj_rec.ac_attribute11
, p_Line_Adj_rec.ac_attribute12
, p_Line_Adj_rec.ac_attribute13
, p_Line_Adj_rec.ac_attribute14
, p_Line_Adj_rec.ac_attribute15
--uom begin
, p_line_adj_rec.OPERAND_PER_PQTY
, p_line_adj_rec.ADJUSTED_AMOUNT_PER_PQTY
--uom end
--RETRO{
, p_line_adj_rec.retrobill_request_id
--RETRO}
, p_line_Adj_rec.INVOICED_AMOUNT
, l_lock_control
-- eBTax changes
, p_line_adj_rec.tax_rate_id
);
OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
p_old_line_adj_rec => NULL,
p_line_adj_rec =>p_line_adj_rec,
p_line_adj_id => p_line_adj_rec.price_adjustment_id,
x_index => l_index,
x_return_status => l_return_status);
oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_LINE_ADJ_UTIL.INSERT_RO IS: ' || L_RETURN_STATUS ) ;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.INSERT_ROW' , 1 ) ;
oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_LINE_ADJ_UTIL.INSERT_ROW' ) ;
oe_debug_pub.add( 'EXITINGOE_LINE_ADJ_UTIL.INSERT_ROW' , 1 ) ;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.INSERT_ROW.' , 1 ) ;
, 'Insert_Row'
);
, 'Insert_Row'
);
END Insert_Row;
PROCEDURE Delete_Row
( p_price_adjustment_id IN NUMBER :=
FND_API.G_MISS_NUM
, p_line_id IN NUMBER :=
FND_API.G_MISS_NUM
)
IS
l_return_status VARCHAR2(30);
SELECT price_adjustment_id
FROM OE_PRICE_ADJUSTMENTS
WHERE LINE_ID = p_line_id;
oe_debug_pub.add( 'ENTERING OE_LINE_ADJ_UTIL.DELETE_ROW' ) ;
oe_debug_pub.add( 'JFC: IN DELETE ROW , PRICE_ADJUSTMENT_ID'||L_ADJ.PRICE_ADJUSTMENT_ID , 1 ) ;
/* Set the operation on the record so that globals are updated as well */
l_new_line_adj_rec.operation := OE_GLOBALS.G_OPR_DELETE;
OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
p_line_adj_rec =>l_new_line_adj_rec,
p_line_adj_id => l_adj.price_adjustment_id,
x_index => l_index,
x_return_status => l_return_status);
oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_LINE_ADJ_UTIL.DELETE_ROW IS: ' || L_RETURN_STATUS ) ;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.DELETE_ROW' , 1 ) ;
oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_LINE_ADJ_UTIL.DELETE_ROW' ) ;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.DELETE_ROW' , 1 ) ;
OE_Delayed_Requests_Pvt.Delete_Reqs_for_deleted_entity(
p_entity_code => OE_GLOBALS.G_ENTITY_LINE_ADJ,
p_entity_id => l_adj.price_adjustment_id,
x_return_status => l_return_status
);
OE_Line_Price_Aattr_Util.delete_row(
p_price_adjustment_id=>l_adj.price_adjustment_id);
OE_Line_Adj_Assocs_Util.delete_row(
p_price_adjustment_id=>l_adj.price_adjustment_id);
DELETE FROM OE_PRICE_ADJUSTMENTS
WHERE LINE_ID = p_line_id;
oe_debug_pub.add( 'JFC: IN DELETE ROW , LINE_ID IS G_MISS_NUM , PRICE_ADJUSTMENT_ID'||P_PRICE_ADJUSTMENT_ID , 1 ) ;
/* Set the operation on the record so that globals are updated as well */
l_new_line_adj_rec.operation := OE_GLOBALS.G_OPR_DELETE;
OE_ORDER_UTIL.Update_Global_Picture(p_Upd_New_Rec_If_Exists => True,
p_line_adj_rec =>l_new_line_adj_rec,
p_line_adj_id => p_price_adjustment_id,
x_index => l_index,
x_return_status => l_return_status);
oe_debug_pub.add( 'UPDATE_GLOBAL RETURN STATUS FROM OE_LINE_ADJ_UTIL.DELETE_ROW IS: ' || L_RETURN_STATUS ) ;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.DELETE_ROW' , 1 ) ;
oe_debug_pub.add( 'UPDATE_GLOBAL_PICTURE ERROR IN OE_LINE_ADJ_UTIL.DELETE_ROW' ) ;
oe_debug_pub.add( 'EXITING OE_LINE_ADJ_UTIL.DELETE_ROW' , 1 ) ;
OE_Delayed_Requests_Pvt.Delete_Reqs_for_deleted_entity
(p_entity_code => OE_GLOBALS.G_ENTITY_LINE_ADJ,
p_entity_id => p_price_adjustment_id,
x_return_status => l_return_status
);
OE_Line_Price_Aattr_Util.delete_row(
p_price_adjustment_id=>p_price_adjustment_id);
OE_Line_Adj_Assocs_Util.delete_row(
p_price_adjustment_id=>p_price_adjustment_id);
DELETE FROM OE_PRICE_ADJUSTMENTS
WHERE PRICE_ADJUSTMENT_ID IN (SELECT RLTD_PRICE_ADJ_ID
FROM OE_PRICE_ADJ_ASSOCS ASSOCS,
OE_PRICE_ADJUSTMENTS PARENT
WHERE ASSOCS.PRICE_ADJUSTMENT_ID=PARENT.PRICE_ADJUSTMENT_ID
AND PARENT.PRICE_ADJUSTMENT_ID=p_price_adjustment_id
AND PARENT.LIST_LINE_TYPE_CODE='PBH');
oe_debug_pub.add('pviprana: Deleted '|| SQL%ROWCOUNT || ' Child Lines');
DELETE FROM OE_PRICE_ADJUSTMENTS
WHERE PRICE_ADJUSTMENT_ID = p_price_adjustment_id;
oe_debug_pub.add( 'LEAVING OE_LINE_ADJ_UTIL.DELETE_ROW' ) ;
oe_debug_pub.add( G_PKG_NAME||':DELETE_ROW:'||SQLERRM ) ;
, 'Delete_Row'
);
END Delete_Row;
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, AUTOMATIC_FLAG
, CONTEXT
, CREATED_BY
, CREATION_DATE
, DISCOUNT_ID
, DISCOUNT_LINE_ID
, HEADER_ID
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, LINE_ID
, PERCENT
, PRICE_ADJUSTMENT_ID
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, REQUEST_ID
, LIST_HEADER_ID
, LIST_LINE_ID
, LIST_LINE_TYPE_CODE
, MODIFIER_MECHANISM_TYPE_CODE
, MODIFIED_FROM
, MODIFIED_TO
, UPDATED_FLAG
, UPDATE_ALLOWED
, APPLIED_FLAG
, CHANGE_REASON_CODE
, CHANGE_REASON_TEXT
, operand
, Arithmetic_operator
, COST_ID
, TAX_CODE
, TAX_EXEMPT_FLAG
, TAX_EXEMPT_NUMBER
, TAX_EXEMPT_REASON_CODE
, PARENT_ADJUSTMENT_ID
, INVOICED_FLAG
, ESTIMATED_FLAG
, INC_IN_SALES_PERFORMANCE
, SPLIT_ACTION_CODE
, ADJUSTED_AMOUNT
, PRICING_PHASE_ID
, CHARGE_TYPE_CODE
, CHARGE_SUBTYPE_CODE
, list_line_no
, source_system_code
, benefit_qty
, benefit_uom_code
, print_on_invoice_flag
, expiration_date
, rebate_transaction_type_code
, rebate_transaction_reference
, rebate_payment_system_code
, redeemed_date
, redeemed_flag
, accrual_flag
, range_break_quantity
, accrual_conversion_rate
, pricing_group_sequence
, modifier_level_code
, price_break_type_code
, substitution_attribute
, proration_type_code
, credit_or_charge_flag
, include_on_returns_flag
, AC_ATTRIBUTE1
, AC_ATTRIBUTE10
, AC_ATTRIBUTE11
, AC_ATTRIBUTE12
, AC_ATTRIBUTE13
, AC_ATTRIBUTE14
, AC_ATTRIBUTE15
, AC_ATTRIBUTE2
, AC_ATTRIBUTE3
, AC_ATTRIBUTE4
, AC_ATTRIBUTE5
, AC_ATTRIBUTE6
, AC_ATTRIBUTE7
, AC_ATTRIBUTE8
, AC_ATTRIBUTE9
, AC_CONTEXT
--uom begin
, OPERAND_PER_PQTY
, ADJUSTED_AMOUNT_PER_PQTY
--uom end
, INVOICED_AMOUNT
, orig_sys_discount_ref
--RETRO{
, retrobill_request_id
--RETRO}
, LOCK_CONTROL
-- eBTax changes
, TAX_RATE_ID
FROM OE_PRICE_ADJUSTMENTS
WHERE PRICE_ADJUSTMENT_ID = p_price_adjustment_id;
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, AUTOMATIC_FLAG
, CONTEXT
, CREATED_BY
, CREATION_DATE
, DISCOUNT_ID
, DISCOUNT_LINE_ID
, HEADER_ID
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, LINE_ID
, PERCENT
, PRICE_ADJUSTMENT_ID
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, REQUEST_ID
, LIST_HEADER_ID
, LIST_LINE_ID
, LIST_LINE_TYPE_CODE
, MODIFIER_MECHANISM_TYPE_CODE
, MODIFIED_FROM
, MODIFIED_TO
, UPDATED_FLAG
, UPDATE_ALLOWED
, APPLIED_FLAG
, CHANGE_REASON_CODE
, CHANGE_REASON_TEXT
, operand
, Arithmetic_operator
, COST_ID
, TAX_CODE
, TAX_EXEMPT_FLAG
, TAX_EXEMPT_NUMBER
, TAX_EXEMPT_REASON_CODE
, PARENT_ADJUSTMENT_ID
, INVOICED_FLAG
, ESTIMATED_FLAG
, INC_IN_SALES_PERFORMANCE
, SPLIT_ACTION_CODE
, ADJUSTED_AMOUNT
, PRICING_PHASE_ID
, CHARGE_TYPE_CODE
, CHARGE_SUBTYPE_CODE
, list_line_no
, source_system_code
, benefit_qty
, benefit_uom_code
, print_on_invoice_flag
, expiration_date
, rebate_transaction_type_code
, rebate_transaction_reference
, rebate_payment_system_code
, redeemed_date
, redeemed_flag
, accrual_flag
, range_break_quantity
, accrual_conversion_rate
, pricing_group_sequence
, modifier_level_code
, price_break_type_code
, substitution_attribute
, proration_type_code
, credit_or_charge_flag
, include_on_returns_flag
, AC_ATTRIBUTE1
, AC_ATTRIBUTE10
, AC_ATTRIBUTE11
, AC_ATTRIBUTE12
, AC_ATTRIBUTE13
, AC_ATTRIBUTE14
, AC_ATTRIBUTE15
, AC_ATTRIBUTE2
, AC_ATTRIBUTE3
, AC_ATTRIBUTE4
, AC_ATTRIBUTE5
, AC_ATTRIBUTE6
, AC_ATTRIBUTE7
, AC_ATTRIBUTE8
, AC_ATTRIBUTE9
, AC_CONTEXT
--uom begin
, OPERAND_PER_PQTY
, ADJUSTED_AMOUNT_PER_PQTY
--uom end
, INVOICED_AMOUNT
, orig_sys_discount_ref
--RETRO{
, retrobill_request_id
--RETRO}
, LOCK_CONTROL
-- eBTax changes
, TAX_RATE_ID
FROM OE_PRICE_ADJUSTMENTS
WHERE line_id = p_line_id;
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, AUTOMATIC_FLAG
, CONTEXT
, CREATED_BY
, CREATION_DATE
, DISCOUNT_ID
, DISCOUNT_LINE_ID
, HEADER_ID
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, LINE_ID
, PERCENT
, PRICE_ADJUSTMENT_ID
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, REQUEST_ID
, LIST_HEADER_ID
, LIST_LINE_ID
, LIST_LINE_TYPE_CODE
, MODIFIER_MECHANISM_TYPE_CODE
, MODIFIED_FROM
, MODIFIED_TO
, UPDATED_FLAG
, UPDATE_ALLOWED
, APPLIED_FLAG
, CHANGE_REASON_CODE
, CHANGE_REASON_TEXT
, operand
, Arithmetic_operator
, COST_ID
, TAX_CODE
, TAX_EXEMPT_FLAG
, TAX_EXEMPT_NUMBER
, TAX_EXEMPT_REASON_CODE
, PARENT_ADJUSTMENT_ID
, INVOICED_FLAG
, ESTIMATED_FLAG
, INC_IN_SALES_PERFORMANCE
, SPLIT_ACTION_CODE
, ADJUSTED_AMOUNT
, PRICING_PHASE_ID
, CHARGE_TYPE_CODE
, CHARGE_SUBTYPE_CODE
, list_line_no
, source_system_code
, benefit_qty
, benefit_uom_code
, print_on_invoice_flag
, expiration_date
, rebate_transaction_type_code
, rebate_transaction_reference
, rebate_payment_system_code
, redeemed_date
, redeemed_flag
, accrual_flag
, range_break_quantity
, accrual_conversion_rate
, pricing_group_sequence
, modifier_level_code
, price_break_type_code
, substitution_attribute
, proration_type_code
, credit_or_charge_flag
, include_on_returns_flag
, AC_ATTRIBUTE1
, AC_ATTRIBUTE10
, AC_ATTRIBUTE11
, AC_ATTRIBUTE12
, AC_ATTRIBUTE13
, AC_ATTRIBUTE14
, AC_ATTRIBUTE15
, AC_ATTRIBUTE2
, AC_ATTRIBUTE3
, AC_ATTRIBUTE4
, AC_ATTRIBUTE5
, AC_ATTRIBUTE6
, AC_ATTRIBUTE7
, AC_ATTRIBUTE8
, AC_ATTRIBUTE9
, AC_CONTEXT
--uom begin
, OPERAND_PER_PQTY
, ADJUSTED_AMOUNT_PER_PQTY
--uom end
, INVOICED_AMOUNT
, orig_sys_discount_ref
--RETRO{
, retrobill_request_id
--RETRO}
, LOCK_CONTROL
-- eBTax changes
, TAX_RATE_ID
FROM OE_PRICE_ADJUSTMENTS
WHERE header_id = p_header_id
and line_id is null;
SELECT ATTRIBUTE1
, ATTRIBUTE10
, ATTRIBUTE11
, ATTRIBUTE12
, ATTRIBUTE13
, ATTRIBUTE14
, ATTRIBUTE15
, ATTRIBUTE2
, ATTRIBUTE3
, ATTRIBUTE4
, ATTRIBUTE5
, ATTRIBUTE6
, ATTRIBUTE7
, ATTRIBUTE8
, ATTRIBUTE9
, AUTOMATIC_FLAG
, CONTEXT
, CREATED_BY
, CREATION_DATE
, DISCOUNT_ID
, DISCOUNT_LINE_ID
, HEADER_ID
, LAST_UPDATED_BY
, LAST_UPDATE_DATE
, LAST_UPDATE_LOGIN
, LINE_ID
, PERCENT
, PRICE_ADJUSTMENT_ID
, PROGRAM_APPLICATION_ID
, PROGRAM_ID
, PROGRAM_UPDATE_DATE
, REQUEST_ID
, LIST_HEADER_ID
, LIST_LINE_ID
, LIST_LINE_TYPE_CODE
, MODIFIER_MECHANISM_TYPE_CODE
, MODIFIED_FROM
, MODIFIED_TO
, UPDATED_FLAG
, UPDATE_ALLOWED
, APPLIED_FLAG
, CHANGE_REASON_CODE
, CHANGE_REASON_TEXT
, operand
, Arithmetic_operator
, COST_ID
, TAX_CODE
, TAX_EXEMPT_FLAG
, TAX_EXEMPT_NUMBER
, TAX_EXEMPT_REASON_CODE
, PARENT_ADJUSTMENT_ID
, INVOICED_FLAG
, ESTIMATED_FLAG
, INC_IN_SALES_PERFORMANCE
, SPLIT_ACTION_CODE
, ADJUSTED_AMOUNT
, PRICING_PHASE_ID
, CHARGE_TYPE_CODE
, CHARGE_SUBTYPE_CODE
, list_line_no
, source_system_code
, benefit_qty
, benefit_uom_code
, print_on_invoice_flag
, expiration_date
, rebate_transaction_type_code
, rebate_transaction_reference
, rebate_payment_system_code
, redeemed_date
, redeemed_flag
, accrual_flag
, range_break_quantity
, accrual_conversion_rate
, pricing_group_sequence
, modifier_level_code
, price_break_type_code
, substitution_attribute
, proration_type_code
, credit_or_charge_flag
, include_on_returns_flag
, AC_ATTRIBUTE1
, AC_ATTRIBUTE10
, AC_ATTRIBUTE11
, AC_ATTRIBUTE12
, AC_ATTRIBUTE13
, AC_ATTRIBUTE14
, AC_ATTRIBUTE15
, AC_ATTRIBUTE2
, AC_ATTRIBUTE3
, AC_ATTRIBUTE4
, AC_ATTRIBUTE5
, AC_ATTRIBUTE6
, AC_ATTRIBUTE7
, AC_ATTRIBUTE8
, AC_ATTRIBUTE9
, AC_CONTEXT
--uom begin
, OPERAND_PER_PQTY
, ADJUSTED_AMOUNT_PER_PQTY
--uom end
, INVOICED_AMOUNT
, orig_sys_discount_ref
--RETRO{
, retrobill_request_id
--RETRO}
, LOCK_CONTROL
-- eBTax changes
, TAX_RATE_ID
FROM OE_PRICE_ADJUSTMENTS
WHERE header_id = p_line_level_header_id
and line_id is not null;
x_Line_Adj_tbl(l_count).last_updated_by := l_implicit_rec.LAST_UPDATED_BY;
x_Line_Adj_tbl(l_count).last_update_date := l_implicit_rec.LAST_UPDATE_DATE;
x_Line_Adj_tbl(l_count).last_update_login := l_implicit_rec.LAST_UPDATE_LOGIN;
x_Line_Adj_tbl(l_count).program_update_date := l_implicit_rec.PROGRAM_UPDATE_DATE;
x_Line_Adj_tbl(l_count).updated_flag := l_implicit_rec.updated_flag;
x_Line_Adj_tbl(l_count).update_allowed := l_implicit_rec.update_allowed;
SELECT price_adjustment_id
INTO l_price_adjustment_id
FROM oe_price_adjustments
WHERE price_adjustment_id = l_price_adjustment_id
FOR UPDATE NOWAIT;
oe_debug_pub.add( 'SELECTING FOR UPDATE.' , 1 ) ;
FND_MESSAGE.SET_NAME('ONT','OE_LOCK_ROW_DELETED');
SELECT price_adjustment_id
FROM oe_price_adjustments
WHERE line_id = p_line_id
FOR UPDATE NOWAIT;
SELECT price_adjustment_id
INTO l_price_adjustment_id
FROM oe_price_adjustments
WHERE price_adjustment_id = p_price_adjustment_id
FOR UPDATE NOWAIT;
fnd_message.set_name('ONT','OE_LOCK_ROW_DELETED');
, p_delete_flag IN BOOLEAN DEFAULT FALSE
) IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
p_delete_flag)
THEN
/*
oe_delayed_requests_pvt.log_request(p_entity_code => OE_GLOBALS.G_ENTITY_LINE_ADJ,
p_entity_id => p_adj_rec.line_id,
p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE_ADJ,
p_requesting_entity_id => p_adj_rec.price_adjustment_id,
p_request_type => OE_GLOBALS.G_PRICE_ADJ,
x_return_status => x_return_status);
l_line_adj_rec.last_updated_by := p_header_adj_rec.last_updated_by;
l_line_adj_rec.last_update_date:= p_header_adj_rec.last_update_date;
l_line_adj_rec.last_update_login:= p_header_adj_rec.last_update_login;
l_line_adj_rec.program_update_date := p_header_adj_rec.program_update_date;
l_line_adj_rec.updated_flag := p_header_adj_rec.updated_flag;
l_line_adj_rec.update_allowed := p_header_adj_rec.update_allowed;
SELECT ordered_quantity,pricing_quantity
INTO l_ordered_quantity,
l_pricing_quantity
FROM oe_order_lines_all
WHERE line_id = px_line_adj_rec.line_id;
x_copy_from_line_adj_rec.operation := oe_globals.g_opr_update;
SELECT ordered_quantity
INTO l_ordered_quantity
FROM oe_order_lines_all
WHERE line_id = p_to_line_id;
, 'Update_Row'
);
SELECT UNIT_LIST_PRICE
FROM OE_ORDER_LINES_ALL
WHERE LINE_ID = p_line_id;
p_operation <> OE_GLOBALS.G_OPR_DELETE THEN
--RT{
--we need to retrieve the latest adjustments if it is a retrobilled line
--call retrobill api to get the retrobill line id, if none l_line_id will
--set to the same value as p_line_id
Oe_Retrobill_Pvt.Get_Last_Retro_LinID(p_line_id=>p_line_id,
x_line_id=>l_line_id);
p_operation <> OE_GLOBALS.G_OPR_DELETE THEN
--RT{
Oe_Retrobill_Pvt.Get_Last_Retro_HdrID(p_header_id=>p_header_id,
x_header_id=>l_header_id);
If p_operation = OE_GLOBALS.G_OPR_DELETE then
l_Line_Adj_Tbl(i).operation := p_operation;
= OE_GLOBALS.G_OPR_UPDATE THEN
IF l_debug_level > 0 THEN
oe_debug_pub.add( ' UPDATING OPERAND FOR LINE ID:'||L_COPY_FROM_LINE_ADJ_REC.LINE_ID ) ;
select line_category_code into l_from_line_category
from oe_order_lines_all
where line_id = p_line_id ;
select line_category_code into l_from_line_category
from oe_order_lines_all
where line_id = p_line_id ;
l_Line_Adj_Tbl(i).updated_flag := 'Y';
l_Line_Adj_Tbl(i).updated_flag := 'N';
/*select line_category_code into l_from_line_category
from oe_order_lines_all
where line_id = p_line_id ;*/
l_Line_Adj_Tbl(i).updated_flag := 'Y';
End if; -- operation=g_opr_delete
-- Set the existing rows to delete
Append_Adjustment_Lines(
p_line_id => p_to_line_id
,p_operation => OE_GLOBALS.G_OPR_DELETE
,p_line_category_code => p_line_category_code
,px_Line_Adj_Att_Tbl => l_Line_Adj_Att_Tbl
,px_Line_Adj_Tbl => l_Line_Adj_tbl
,px_line_adj_assoc_tbl => l_line_adj_assoc_tbl);
if (p_x_line_adj_rec.operation = OE_GLOBALS.G_OPR_UPDATE) then
IF OE_GLOBALS.G_AUDIT_REASON_RQD_FLAG = 'Y' OR
OE_GLOBALS.G_AUDIT_HISTORY_RQD_FLAG = 'Y' THEN
IF l_debug_level > 0 THEN
oe_debug_pub.add( 'CALL TO RECORD LINE PRICE ADJ HISTORY' , 5 ) ;
p_hist_type_code => 'UPDATE');
p_hist_type_code => 'UPDATE',
p_reason_code => p_x_line_adj_rec.change_reason_code,
p_comments => p_x_line_adj_rec.change_reason_text,
p_wf_activity_code => null,
p_wf_result_code => null,
x_return_status => l_return_status );
oe_debug_pub.add( 'INSERT INTO LINE PRICE ADJUSTMENTS AUDIT HISTORY CAUSED ERROR' , 1 ) ;
/* 1503357 - Delete all PRG lines associated with a particular line */
Procedure Delete_PRG_Lines(p_line_id In Number, p_operation In Varchar2) Is
-- Get all PRG lines
Cursor prg_lines is
select adj1.line_id, assoc.rltd_price_adj_id
from oe_price_adjustments adj1,
oe_price_adj_assocs assoc,
oe_price_adjustments adj2,
oe_order_lines_all line
where adj1.price_adjustment_id = assoc.rltd_price_adj_id AND
assoc.price_adjustment_id = adj2.price_adjustment_id AND
adj2.list_line_type_code = 'PRG' AND
adj1.line_id = line.line_id AND /*Added for bug 4018279*/
line.open_flag = 'Y' AND
adj2.line_id = p_line_id;
select price_adjustment_id
from oe_price_adjustments
where line_id = p_line_id AND list_line_type_code = 'PRG';
l_delete_prg varchar2(1);
oe_debug_pub.add( 'ENTERING OEXULADB.DELETE_PRG_LINES WITH LINE_ID = ' || P_LINE_ID ) ;
l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
if (p_operation = OE_GLOBALS.G_OPR_DELETE) Then
-- bug 2756288, if buy line can be deleted, so can get line
l_line_rec.operation := OE_GLOBALS.G_OPR_DELETE;
l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
OE_LINE_ADJ_UTIL.DELETE_ROW(p_price_adjustment_id => i.price_adjustment_id);
DELETE FROM OE_PRICE_ADJ_ASSOCS WHERE PRICE_ADJUSTMENT_ID = i.price_adjustment_id;
l_delete_prg := 'N';
SELECT price_adj_assoc_id INTO l_dummy from oe_price_adj_assocs
WHERE rltd_price_adj_id = l_rltd_price_adj_id and rownum < 2;
l_delete_prg := 'Y';
IF (l_delete_prg = 'Y') THEN
-- Call Process Order
l_control_rec.controlled_operation := TRUE;
oe_debug_pub.add( 'EXITING OEXULADB.DELETE_PRG_LINES' ) ;
oe_debug_pub.add( 'EXCEPTION IN DELETE_PRG_LINES'||SQLERRM , 3 ) ;
End Delete_PRG_Lines;
IF p_new_line_rec.operation = OE_GLOBALS.G_OPR_DELETE OR NOT OE_GLOBALS.EQUAL(p_new_line_rec.ordered_quantity, p_old_line_rec.ordered_quantity) Then
IF (nvl(p_new_line_rec.booked_flag, 'X') <> 'Y') Then
IF (p_new_line_rec.operation = OE_GLOBALS.G_OPR_DELETE OR p_new_line_rec.ordered_quantity = 0) Then
IF l_debug_level > 0 THEN
oe_debug_pub.add( 'OPEN ORDER , ORDERED QTY CHANGED TO ZERO , DELETE ALL PRG LINES' ) ;
Delete_PRG_Lines(p_new_line_rec.line_id, p_new_line_rec.operation);
OR p_new_line_rec.operation = OE_GLOBALS.G_OPR_DELETE Then
IF l_debug_level > 0 THEN
oe_debug_pub.add( 'BOOKED ORDER , ORDERED QTY CHANGED TO ZERO , DELETE ALL PRG LINES' ) ;
Delete_PRG_Lines(p_new_line_rec.line_id, p_new_line_rec.operation);
Elsif p_x_new_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE
and p_x_new_line_rec.split_by = 'SYSTEM'
and p_x_new_line_rec.split_action_code = 'SPLIT'
and p_x_new_line_rec.calculate_price_flag = 'Y' Then
p_x_new_line_rec.calculate_price_flag :='P';
Procedure Delete_Changed_Lines_Tbl Is
Begin
G_CHANGED_LINE_TBL.delete;
If p_operation In (OE_GLOBALS.G_OPR_CREATE,OE_GLOBALS.G_OPR_UPDATE) Then
--bug 3020702 begin
G_CHANGED_LINE_TBL(mod(p_line_id,G_BINARY_LIMIT)).line_id :=p_line_id;
Elsif p_operation = OE_GLOBALS.G_OPR_DELETE Then
If G_CHANGED_LINE_TBL.exists(mod(p_line_id,G_BINARY_LIMIT)) Then
G_CHANGED_LINE_TBL.delete(mod(p_line_id,G_BINARY_LIMIT));
Select line_id,
service_reference_line_id
From oe_order_lines_all
Where header_id = p_header_id
And service_reference_line_id IS NOT NULL;
update oe_price_adjustments
set adjusted_amount = adjusted_amount * l_new_pricing_qty / l_old_pricing_qty
where line_id = p_x_Line_rec.line_id
and list_line_type_code in ('DIS','SUR')
and applied_flag = 'Y'
and updated_flag = 'Y'
and arithmetic_operator in ('AMT' , '%' , 'NEWPRICE');
update oe_price_adjustments
set operand = operand * l_new_pricing_qty / l_old_pricing_qty
where line_id = p_x_Line_rec.line_id
and list_line_type_code in ('DIS','SUR')
and applied_flag = 'Y'
and updated_flag = 'Y'
and arithmetic_operator in ('AMT' , 'NEWPRICE');
Select line_id
INTO l_dummy
From OE_ORDER_LINES_ALL
Where header_id = p_header_id
AND service_reference_line_id IS NOT NULL
AND rownum = 1;
select adj1.line_id line_id
from oe_price_adjustments adj1,
oe_price_adj_assocs assoc,
oe_price_adjustments adj2
where adj1.price_adjustment_id = assoc.rltd_price_adj_id AND
assoc.price_adjustment_id = adj2.price_adjustment_id AND
adj2.list_line_type_code = 'PRG' AND
adj2.header_id = p_header_id;
G_PRG_TBL.DELETE;