98:
99: -- Set missing old record elements to NULL.
100:
101: l_old_CURR_LISTS_rec :=
102: QP_Curr_Lists_Util.Convert_Miss_To_Null (l_old_CURR_LISTS_rec);
103:
104: ELSIF l_CURR_LISTS_rec.operation = QP_GLOBALS.G_OPR_UPDATE
105: OR l_CURR_LISTS_rec.operation = QP_GLOBALS.G_OPR_DELETE
106: THEN
111:
112: IF l_old_CURR_LISTS_rec.currency_header_id = FND_API.G_MISS_NUM
113: THEN
114:
115: l_old_CURR_LISTS_rec := QP_Curr_Lists_Util.Query_Row
116: ( p_currency_header_id => l_CURR_LISTS_rec.currency_header_id
117: );
118:
119: ELSE
120:
121: -- Set missing old record elements to NULL.
122:
123: l_old_CURR_LISTS_rec :=
124: QP_Curr_Lists_Util.Convert_Miss_To_Null (l_old_CURR_LISTS_rec);
125:
126: END IF;
127:
128: -- Complete new record from old
126: END IF;
127:
128: -- Complete new record from old
129:
130: l_CURR_LISTS_rec := QP_Curr_Lists_Util.Complete_Record
131: ( p_CURR_LISTS_rec => l_CURR_LISTS_rec
132: , p_old_CURR_LISTS_rec => l_old_CURR_LISTS_rec
133: );
134:
170: IF l_control_rec.change_attributes THEN
171:
172: l_p_CURR_LISTS_rec := l_CURR_LISTS_rec; --[prarasto]
173:
174: QP_Curr_Lists_Util.Clear_Dependent_Attr
175: ( p_CURR_LISTS_rec => l_p_CURR_LISTS_rec
176: , p_old_CURR_LISTS_rec => l_old_CURR_LISTS_rec
177: , x_CURR_LISTS_rec => l_CURR_LISTS_rec
178: );
206: THEN
207:
208: l_p_CURR_LISTS_rec := l_CURR_LISTS_rec; --[prarasto]
209:
210: QP_Curr_Lists_Util.Apply_Attribute_Changes
211: ( p_CURR_LISTS_rec => l_p_CURR_LISTS_rec
212: , p_old_CURR_LISTS_rec => l_old_CURR_LISTS_rec
213: , x_CURR_LISTS_rec => l_CURR_LISTS_rec
214: );
271: IF l_control_rec.write_to_db THEN
272:
273: IF l_CURR_LISTS_rec.operation = QP_GLOBALS.G_OPR_DELETE THEN
274:
275: QP_Curr_Lists_Util.Delete_Row
276: ( p_currency_header_id => l_CURR_LISTS_rec.currency_header_id
277: );
278:
279: ELSE
285: l_CURR_LISTS_rec.last_update_login := FND_GLOBAL.LOGIN_ID;
286:
287: IF l_CURR_LISTS_rec.operation = QP_GLOBALS.G_OPR_UPDATE THEN
288:
289: -- oe_debug_pub.add('Calling QP_Curr_Lists_Util.Update_Row from CURR_LISTS package');
290: QP_Curr_Lists_Util.Update_Row (l_CURR_LISTS_rec);
291:
292: ELSIF l_CURR_LISTS_rec.operation = QP_GLOBALS.G_OPR_CREATE THEN
293:
286:
287: IF l_CURR_LISTS_rec.operation = QP_GLOBALS.G_OPR_UPDATE THEN
288:
289: -- oe_debug_pub.add('Calling QP_Curr_Lists_Util.Update_Row from CURR_LISTS package');
290: QP_Curr_Lists_Util.Update_Row (l_CURR_LISTS_rec);
291:
292: ELSIF l_CURR_LISTS_rec.operation = QP_GLOBALS.G_OPR_CREATE THEN
293:
294: l_CURR_LISTS_rec.creation_date := SYSDATE;
293:
294: l_CURR_LISTS_rec.creation_date := SYSDATE;
295: l_CURR_LISTS_rec.created_by := FND_GLOBAL.USER_ID;
296:
297: QP_Curr_Lists_Util.Insert_Row (l_CURR_LISTS_rec);
298:
299: END IF;
300:
301: END IF;
1169: -- oe_debug_pub.add('Inside QPXFCURB Lock_Row; p_CURR_LISTS_rec.operation: '||p_CURR_LISTS_rec.operation);
1170:
1171: IF p_CURR_LISTS_rec.operation = QP_GLOBALS.G_OPR_LOCK THEN
1172:
1173: QP_Curr_Lists_Util.Lock_Row
1174: ( p_CURR_LISTS_rec => p_CURR_LISTS_rec
1175: , x_CURR_LISTS_rec => x_CURR_LISTS_rec
1176: , x_return_status => l_return_status
1177: );
1330: END IF;
1331:
1332: -- Get CURR_LISTS ( parent = CURR_LISTS )
1333:
1334: l_CURR_LISTS_rec := QP_Curr_Lists_Util.Query_Row
1335: ( p_currency_header_id => p_currency_header_id
1336: );
1337:
1338: -- Get CURR_DETAILS ( parent = CURR_LISTS )