49:
50: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
51: THEN
52:
53: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
54: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','list_header_id');
55: oe_msg_pub.Add;
56:
57: END IF;
50: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
51: THEN
52:
53: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
54: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','list_header_id');
55: oe_msg_pub.Add;
56:
57: END IF;
58:
65: nvl(p_PRICE_LIST_rec.shareable_flag,'X')
66: THEN
67: l_return_status := FND_API.G_RET_STS_ERROR;
68:
69: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
70: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','shareable_flag');
71: OE_MSG_PUB.Add;
72:
73: END IF;
66: THEN
67: l_return_status := FND_API.G_RET_STS_ERROR;
68:
69: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
70: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','shareable_flag');
71: OE_MSG_PUB.Add;
72:
73: END IF;
74:
76: nvl(p_PRICE_LIST_rec.list_source_code,'X')
77: THEN
78: l_return_status := FND_API.G_RET_STS_ERROR;
79:
80: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
81: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','list_source_code');
82: OE_MSG_PUB.Add;
83:
84: END IF;
77: THEN
78: l_return_status := FND_API.G_RET_STS_ERROR;
79:
80: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
81: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','list_source_code');
82: OE_MSG_PUB.Add;
83:
84: END IF;
85:
92:
93: IF l_unit_precision_type = 'STANDARD' THEN
94: IF l_price_rounding = 'PRECISION' THEN
95: l_return_status := FND_API.G_RET_STS_ERROR;
96: FND_MESSAGE.SET_NAME('QP', 'QP_ROUNDING_FACTOR_NO_UPDATE');
97: OE_MSG_PUB.Add;
98: END IF;
99: END IF;
100: END IF;
103: nvl(p_PRICE_LIST_rec.pte_code,'X')
104: THEN
105: l_return_status := FND_API.G_RET_STS_ERROR;
106:
107: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
108: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','pte_code');
109: OE_MSG_PUB.Add;
110:
111: END IF;
104: THEN
105: l_return_status := FND_API.G_RET_STS_ERROR;
106:
107: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
108: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','pte_code');
109: OE_MSG_PUB.Add;
110:
111: END IF;
112:
114: nvl(p_PRICE_LIST_rec.source_system_code,'X')
115: THEN
116: l_return_status := FND_API.G_RET_STS_ERROR;
117:
118: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
119: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','source_system_code');
120: OE_MSG_PUB.Add;
121:
122: END IF;
115: THEN
116: l_return_status := FND_API.G_RET_STS_ERROR;
117:
118: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
119: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','source_system_code');
120: OE_MSG_PUB.Add;
121:
122: END IF;
123:
125: nvl(p_PRICE_LIST_rec.sold_to_org_id,9999999)
126: THEN
127: l_return_status := FND_API.G_RET_STS_ERROR;
128:
129: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
130: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','sold_to_org_id');
131: OE_MSG_PUB.Add;
132:
133: END IF;
126: THEN
127: l_return_status := FND_API.G_RET_STS_ERROR;
128:
129: FND_MESSAGE.SET_NAME('QP','QP_CANNOT_UPDATE_ATTRIBUTE');
130: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','sold_to_org_id');
131: OE_MSG_PUB.Add;
132:
133: END IF;
134:
143:
144: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
145: THEN
146:
147: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
148: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',QP_PRC_UTIL.Get_Attribute_Name('LIST_TYPE_CODE')); -- Fix For Bug-1974413
149: oe_msg_pub.Add;
150:
151: END IF;
144: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
145: THEN
146:
147: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
148: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',QP_PRC_UTIL.Get_Attribute_Name('LIST_TYPE_CODE')); -- Fix For Bug-1974413
149: oe_msg_pub.Add;
150:
151: END IF;
152:
160:
161: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
162: THEN
163:
164: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
165: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',QP_PRC_UTIL.Get_Attribute_Name('CURRENCY_CODE')); -- Fix For Bug-1974413
166: oe_msg_pub.Add;
167:
168: END IF;
161: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
162: THEN
163:
164: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
165: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',QP_PRC_UTIL.Get_Attribute_Name('CURRENCY_CODE')); -- Fix For Bug-1974413
166: oe_msg_pub.Add;
167:
168: END IF;
169:
174: IF p_PRICE_LIST_rec.currency_code IS NOT NULL AND
175: ( p_PRICE_LIST_rec.currency_code <>
176: p_old_PRICE_LIST_rec.currency_code )
177: THEN
178: FND_MESSAGE.SET_NAME('QP','QP_CHANGE_SEC_PRL_CURR');
179: OE_MSG_PUB.Add;
180: END IF;
181:
182: -- Bug 2347427 end
188:
189: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
190: THEN
191:
192: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
193: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',QP_PRC_UTIL.Get_Attribute_Name('NAME')); -- Fix For Bug-1974413
194: oe_msg_pub.Add;
195:
196: END IF;
189: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
190: THEN
191:
192: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
193: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',QP_PRC_UTIL.Get_Attribute_Name('NAME')); -- Fix For Bug-1974413
194: oe_msg_pub.Add;
195:
196: END IF;
197:
227:
228: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
229: THEN
230:
231: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
232: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','automatic');
233: oe_msg_pub.Add;
234:
235: END IF;
228: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
229: THEN
230:
231: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
232: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','automatic');
233: oe_msg_pub.Add;
234:
235: END IF;
236:
247:
248: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
249: THEN
250:
251: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
252: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','active_flag');
253: oe_msg_pub.add;
254: END IF;
255: END IF;
248: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
249: THEN
250:
251: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
252: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','active_flag');
253: oe_msg_pub.add;
254: END IF;
255: END IF;
256: END IF;
264: l_return_status := FND_API.G_RET_STS_ERROR;
265:
266: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
267:
268: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
269: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','mobile_download');
270: oe_msg_pub.add;
271: END IF;
272: END IF;
265:
266: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
267:
268: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
269: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','mobile_download');
270: oe_msg_pub.add;
271: END IF;
272: END IF;
273: END IF;
280:
281: l_return_status := FND_API.G_RET_STS_ERROR;
282: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
283:
284: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
285: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Global_flag');
286: oe_msg_pub.add;
287: END IF;
288: END IF;
281: l_return_status := FND_API.G_RET_STS_ERROR;
282: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
283:
284: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
285: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Global_flag');
286: oe_msg_pub.add;
287: END IF;
288: END IF;
289: END IF;
298: IF (l_security_profile = 'N'
299: and p_PRICE_LIST_rec.global_flag in ('N', 'n')) THEN
300: l_return_status := FND_API.G_RET_STS_ERROR;
301: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
302: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
303: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','global_flag');
304: oe_msg_pub.add;
305: END IF;
306: END IF;
299: and p_PRICE_LIST_rec.global_flag in ('N', 'n')) THEN
300: l_return_status := FND_API.G_RET_STS_ERROR;
301: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
302: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
303: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','global_flag');
304: oe_msg_pub.add;
305: END IF;
306: END IF;
307:
310: IF (p_PRICE_LIST_rec.global_flag in ('N', 'n')
311: and p_PRICE_LIST_rec.org_id is null) THEN
312: l_return_status := FND_API.G_RET_STS_ERROR;
313: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
314: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
315: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORG_ID');
316: oe_msg_pub.add;
317: END IF;
318: END IF;
311: and p_PRICE_LIST_rec.org_id is null) THEN
312: l_return_status := FND_API.G_RET_STS_ERROR;
313: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
314: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
315: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORG_ID');
316: oe_msg_pub.add;
317: END IF;
318: END IF;
319:
321: IF (p_PRICE_LIST_rec.org_id is not null
322: and QP_UTIL.validate_org_id(p_PRICE_LIST_rec.org_id) = 'N') THEN
323: l_return_status := FND_API.G_RET_STS_ERROR;
324: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
325: FND_MESSAGE.SET_NAME('FND','FND_MO_ORG_INVALID');
326: -- FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORG_ID');
327: oe_msg_pub.add;
328: END IF;
329: END IF;
322: and QP_UTIL.validate_org_id(p_PRICE_LIST_rec.org_id) = 'N') THEN
323: l_return_status := FND_API.G_RET_STS_ERROR;
324: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
325: FND_MESSAGE.SET_NAME('FND','FND_MO_ORG_INVALID');
326: -- FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ORG_ID');
327: oe_msg_pub.add;
328: END IF;
329: END IF;
330: END IF;--IF l_security_profile = 'Y'
334: and p_PRICE_LIST_rec.org_id is not null) OR (p_PRICE_LIST_rec.global_flag ='N' and p_PRICE_LIST_rec.org_id is null)) THEN
335: -- and p_MODIFIER_LIST_rec.org_id <> FND_API.G_MISS_NUM THEN
336: l_return_status := FND_API.G_RET_STS_ERROR;
337: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR) THEN
338: FND_MESSAGE.SET_NAME('QP', 'QP_GLOBAL_OR_ORG');
339: oe_msg_pub.add;
340: END IF;
341: END IF;--p_header_rec.global_flag
342: END IF;
356: p_PRICE_LIST_rec.currency_header_id = FND_API.G_MISS_NUM )
357: then
358: l_return_status := FND_API.G_RET_STS_ERROR;
359:
360: FND_MESSAGE.SET_NAME('QP','QP_MUL_CURR_REQD');
361: oe_msg_pub.add;
362:
363: end if;
364:
367: p_PRICE_LIST_rec.rounding_factor <> FND_API.G_MISS_NUM )
368: then
369: l_return_status := FND_API.G_RET_STS_ERROR;
370:
371: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE'); -- CHANGE
372: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','rounding_factor');
373: oe_msg_pub.add;
374:
375: end if;
368: then
369: l_return_status := FND_API.G_RET_STS_ERROR;
370:
371: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE'); -- CHANGE
372: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','rounding_factor');
373: oe_msg_pub.add;
374:
375: end if;
376: */
381: p_old_PRICE_LIST_rec.currency_header_id <> p_PRICE_LIST_rec.currency_header_id)
382: then
383: l_return_status := FND_API.G_RET_STS_ERROR;
384:
385: FND_MESSAGE.SET_NAME('QP','QP_MUL_CURR_NULL');
386: oe_msg_pub.add;
387:
388: end if;
389:
394: p_PRICE_LIST_rec.rounding_factor = FND_API.G_MISS_NUM )
395: then
396: l_return_status := FND_API.G_RET_STS_ERROR;
397:
398: FND_MESSAGE.SET_NAME('QP','QP_RNDG_FACTOR_REQD');
399: oe_msg_pub.add;
400:
401: end if;
402:
412:
413: EXCEPTION
414: WHEN NO_DATA_FOUND THEN
415: l_return_status := FND_API.G_RET_STS_ERROR;
416: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
417: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','currency_header_id');
418: oe_msg_pub.add;
419: END;
420: END IF;
413: EXCEPTION
414: WHEN NO_DATA_FOUND THEN
415: l_return_status := FND_API.G_RET_STS_ERROR;
416: FND_MESSAGE.SET_NAME('QP','QP_INVALID_ATTRIBUTE');
417: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','currency_header_id');
418: oe_msg_pub.add;
419: END;
420: END IF;
421:
455:
456: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
457: THEN
458:
459: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
460: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','list_line_id');
461: oe_msg_pub.Add;
462:
463: END IF;
456: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
457: THEN
458:
459: FND_MESSAGE.SET_NAME('QP','QP_ATTRIBUTE_REQUIRED');
460: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','list_line_id');
461: oe_msg_pub.Add;
462:
463: END IF;
464:
471: open c_lines_edates_cur(p_PRICE_LIST_rec.list_header_id,p_PRICE_LIST_rec.end_date_active);
472: fetch c_lines_edates_cur into l_dummy;
473: IF c_lines_edates_cur%found THEN -- line date not within hdr date
474: l_return_status := FND_API.G_RET_STS_ERROR;
475: FND_MESSAGE.SET_NAME('QP','QP_PLL_END_DATE_NOT_WITHIN');
476: oe_msg_pub.add;
477: END IF;
478:
479: open c_lines_sdates_cur(p_PRICE_LIST_rec.list_header_id,p_PRICE_LIST_rec.start_date_active);
480: fetch c_lines_sdates_cur into l_dummy;
481:
482: IF c_lines_sdates_cur%found THEN -- line date not within hdr date
483: l_return_status := FND_API.G_RET_STS_ERROR;
484: FND_MESSAGE.SET_NAME('QP','QP_PLL_START_DATE_NOT_WITHIN');
485: oe_msg_pub.add;
486: END IF;
487: END IF;
488: