The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
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
,PRICE_ADJ_ASSOC_ID
,LINE_ID
,RLTD_PRICE_ADJ_ID
,LOCK_CONTROL
from oe_price_adj_Assocs where
( PRICE_ADJ_assoc_ID = p_price_adj_Assoc_id
or price_adjustment_id = p_price_adjustment_id);
x_Line_Adj_Assoc_Tbl(l_count).LAST_UPDATE_DATE := iml_rec.LAST_UPDATE_DATE;
x_Line_Adj_Assoc_Tbl(l_count).LAST_UPDATED_BY := iml_rec.LAST_UPDATED_BY;
x_Line_Adj_Assoc_Tbl(l_count).LAST_UPDATE_LOGIN := iml_rec.LAST_UPDATE_LOGIN;
x_Line_Adj_Assoc_Tbl(l_count).PROGRAM_UPDATE_DATE :=iml_rec.PROGRAM_UPDATE_DATE;
PROCEDURE Insert_Row
( p_Line_Adj_Assoc_Rec IN OUT NOCOPY OE_Order_PUB.Line_Adj_Assoc_Rec_Type
)
IS
l_lock_control NUMBER := 1;
INSERT INTO OE_PRICE_ADJ_ASSOCS
( 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
,PRICE_ADJ_ASSOC_ID
,LINE_ID
,RLTD_PRICE_ADJ_ID
,LOCK_CONTROL
)
VALUES
( p_Line_Adj_Assoc_Rec.PRICE_ADJUSTMENT_ID
,p_Line_Adj_Assoc_Rec.CREATION_DATE
,p_Line_Adj_Assoc_Rec.CREATED_BY
,p_Line_Adj_Assoc_Rec.LAST_UPDATE_DATE
,p_Line_Adj_Assoc_Rec.LAST_UPDATED_BY
,p_Line_Adj_Assoc_Rec.LAST_UPDATE_LOGIN
,p_Line_Adj_Assoc_Rec.PROGRAM_APPLICATION_ID
,p_Line_Adj_Assoc_Rec.PROGRAM_ID
,p_Line_Adj_Assoc_Rec.PROGRAM_UPDATE_DATE
,p_Line_Adj_Assoc_Rec.REQUEST_ID
,p_Line_Adj_Assoc_Rec.PRICE_ADJ_ASSOC_ID
,p_Line_Adj_Assoc_Rec.LINE_ID
,p_Line_Adj_Assoc_Rec.RLTD_PRICE_ADJ_ID
,l_lock_control
);
, 'Insert_Row'
);
END Insert_Row;
PROCEDURE Update_Row
( p_Line_Adj_Assoc_Rec IN OUT NOCOPY OE_Order_PUB.Line_Adj_Assoc_Rec_Type
)
IS
l_lock_control NUMBER;
SELECT lock_control
INTO l_lock_control
FROM OE_PRICE_ADJ_ASSOCS
WHERE price_adj_assoc_id = p_Line_Adj_Assoc_rec.price_adj_assoc_id;
UPDATE OE_PRICE_ADJ_ASSOCS
SET PRICE_ADJUSTMENT_ID = p_Line_Adj_Assoc_Rec.Price_Adjustment_id
,CREATION_DATE = p_Line_Adj_Assoc_Rec.creation_date
,CREATED_BY = p_Line_Adj_Assoc_Rec.created_by
,LAST_UPDATE_DATE = p_Line_Adj_Assoc_Rec.last_update_date
,LAST_UPDATED_BY = p_Line_Adj_Assoc_Rec.last_updated_by
,LAST_UPDATE_LOGIN = p_Line_Adj_Assoc_Rec.last_update_login
,PROGRAM_APPLICATION_ID = p_Line_Adj_Assoc_Rec.program_application_id
,PROGRAM_ID = p_Line_Adj_Assoc_Rec.program_id
,PROGRAM_UPDATE_DATE = p_Line_Adj_Assoc_Rec.program_update_date
,REQUEST_ID = p_Line_Adj_Assoc_Rec.request_id
,LINE_ID = p_Line_Adj_Assoc_Rec.Line_id
,RLTD_PRICE_ADJ_ID = p_Line_Adj_Assoc_Rec.rltd_price_adj_id
,LOCK_CONTROL = l_lock_control
WHERE PRICE_ADJ_ASSOC_ID = p_Line_Adj_Assoc_Rec.price_adj_Assoc_id;
, 'Update_Row'
);
END Update_Row ;
PROCEDURE Delete_Row
( p_price_adj_Assoc_id NUMBER := FND_API.G_MISS_NUM
, p_price_adjustment_id NUMBER := FND_API.G_MISS_NUM
)
IS
--
l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
oe_debug_pub.add( 'PRICE ADJ: DELETE ROW OE_LINE_ADJ_ASSOCS_UTIL' , 5 ) ;
DELETE OE_PRICE_ADJ_ASSOCS opaa
WHERE opaa.rltd_price_adj_id in
( select to_number(p_price_adjustment_id) from dual
UNION ALL
select opaa1.rltd_price_adj_id
from OE_PRICE_ADJ_ASSOCS opaa1 where
opaa1.price_adjustment_id = p_price_adjustment_id
) ;
DELETE OE_PRICE_ADJ_ASSOCS
WHERE PRICE_ADJ_Assoc_ID = p_price_adj_Assoc_id;
, 'Delete_Row- '||sqlerrm
);
END Delete_Row;
IF l_Line_Adj_Assoc_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
l_Line_Adj_Assoc_Rec.LAST_UPDATE_DATE := p_old_Line_Adj_Assoc_Rec.LAST_UPDATE_DATE;
IF l_Line_Adj_Assoc_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
l_Line_Adj_Assoc_Rec.LAST_UPDATED_BY := p_old_Line_Adj_Assoc_Rec.LAST_UPDATED_BY;
IF l_Line_Adj_Assoc_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
l_Line_Adj_Assoc_Rec.LAST_UPDATE_LOGIN := p_old_Line_Adj_Assoc_Rec.LAST_UPDATE_LOGIN;
IF l_Line_Adj_Assoc_Rec.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
l_Line_Adj_Assoc_Rec.PROGRAM_UPDATE_DATE := p_old_Line_Adj_Assoc_Rec.PROGRAM_UPDATE_DATE;
IF l_Line_Adj_Assoc_Rec.LAST_UPDATE_DATE = FND_API.G_MISS_DATE THEN
l_Line_Adj_Assoc_Rec.LAST_UPDATE_DATE := Null;
IF l_Line_Adj_Assoc_Rec.LAST_UPDATED_BY = FND_API.G_MISS_NUM THEN
l_Line_Adj_Assoc_Rec.LAST_UPDATED_BY := Null;
IF l_Line_Adj_Assoc_Rec.LAST_UPDATE_LOGIN = FND_API.G_MISS_NUM THEN
l_Line_Adj_Assoc_Rec.LAST_UPDATE_LOGIN := Null;
IF l_Line_Adj_Assoc_Rec.PROGRAM_UPDATE_DATE = FND_API.G_MISS_DATE THEN
l_Line_Adj_Assoc_Rec.PROGRAM_UPDATE_DATE := Null;
SELECT price_adj_assoc_id
INTO l_price_adj_assoc_id
FROM oe_price_adj_assocs
WHERE price_adj_assoc_id = l_price_adj_assoc_id
FOR UPDATE NOWAIT;
FND_MESSAGE.SET_NAME('ONT','OE_LOCK_ROW_DELETED');
SELECT price_adj_assoc_id
FROM oe_price_adj_assocs
WHERE price_adjustment_id = p_price_adjustment_id
FOR UPDATE NOWAIT;
SELECT price_adj_assoc_id
INTO l_price_adj_assoc_id
FROM oe_price_adj_assocs
WHERE price_adj_assoc_id = p_price_adj_assoc_id
FOR UPDATE NOWAIT;
fnd_message.set_name('ONT','OE_LOCK_ROW_DELETED');
SELECT p.price_adjustment_id INTO l_price_adjustment_id FROM oe_order_lines_all l, oe_price_adjustments p
WHERE l.line_id = p_to_line_id AND l.service_reference_type_code = 'ORDER' AND p.line_id = l.service_reference_line_id AND p.list_line_id = p_prg_list_line_id;
SELECT p.price_adjustment_id INTO l_rltd_price_adj_id FROM oe_price_adjustments p
WHERE p.line_id =p_to_line_id AND p.list_line_id = p_assoc_list_line_id;
l_Line_Adj_Assoc_rec.last_update_date := SYSDATE;
l_Line_Adj_Assoc_rec.last_updated_by := FND_GLOBAL.USER_ID;
Insert_Row(p_Line_Adj_Assoc_Rec =>l_Line_Adj_Assoc_Rec);