58: , 'Update_Row'
59: );
60: END IF;
61:
62: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
63:
64: END Update_Row;
65:
66: -- Procedure Insert_Row
147: , 'Insert_Row'
148: );
149: END IF;
150:
151: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
152:
153: END Insert_Row;
154:
155: -- Procedure Delete_Row
158: ( p_Sr_Receipt_Id IN NUMBER
159: )
160: IS
161:
162: l_sr_source_id NUMBER := FND_API.G_MISS_NUM;
163:
164: CURSOR cur_Shipping_Org IS
165: SELECT SR_SOURCE_ID
166: FROM MRP_SR_SOURCE_ORG
203: , 'Delete_Row'
204: );
205: END IF;
206:
207: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
208:
209: END Delete_Row;
210:
211: -- Procedure lock_Row
287: -- Row locked. Compare IN attributes to DB attributes.
288:
289: IF ( (l_Receiving_Org_rec.Sr_Receipt_Id =
290: p_Receiving_Org_rec.Sr_Receipt_Id) OR
291: ((p_Receiving_Org_rec.Sr_Receipt_Id = FND_API.G_MISS_NUM) OR
292: ( (l_Receiving_Org_rec.Sr_Receipt_Id IS NULL) AND
293: (p_Receiving_Org_rec.Sr_Receipt_Id IS NULL))))
294: AND ( (l_Receiving_Org_rec.Attribute1 =
295: p_Receiving_Org_rec.Attribute1) OR
292: ( (l_Receiving_Org_rec.Sr_Receipt_Id IS NULL) AND
293: (p_Receiving_Org_rec.Sr_Receipt_Id IS NULL))))
294: AND ( (l_Receiving_Org_rec.Attribute1 =
295: p_Receiving_Org_rec.Attribute1) OR
296: ((p_Receiving_Org_rec.Attribute1 = FND_API.G_MISS_CHAR) OR
297: ( (l_Receiving_Org_rec.Attribute1 IS NULL) AND
298: (p_Receiving_Org_rec.Attribute1 IS NULL))))
299: AND ( (l_Receiving_Org_rec.Attribute10 =
300: p_Receiving_Org_rec.Attribute10) OR
297: ( (l_Receiving_Org_rec.Attribute1 IS NULL) AND
298: (p_Receiving_Org_rec.Attribute1 IS NULL))))
299: AND ( (l_Receiving_Org_rec.Attribute10 =
300: p_Receiving_Org_rec.Attribute10) OR
301: ((p_Receiving_Org_rec.Attribute10 = FND_API.G_MISS_CHAR) OR
302: ( (l_Receiving_Org_rec.Attribute10 IS NULL) AND
303: (p_Receiving_Org_rec.Attribute10 IS NULL))))
304: AND ( (l_Receiving_Org_rec.Attribute11 =
305: p_Receiving_Org_rec.Attribute11) OR
302: ( (l_Receiving_Org_rec.Attribute10 IS NULL) AND
303: (p_Receiving_Org_rec.Attribute10 IS NULL))))
304: AND ( (l_Receiving_Org_rec.Attribute11 =
305: p_Receiving_Org_rec.Attribute11) OR
306: ((p_Receiving_Org_rec.Attribute11 = FND_API.G_MISS_CHAR) OR
307: ( (l_Receiving_Org_rec.Attribute11 IS NULL) AND
308: (p_Receiving_Org_rec.Attribute11 IS NULL))))
309: AND ( (l_Receiving_Org_rec.Attribute12 =
310: p_Receiving_Org_rec.Attribute12) OR
307: ( (l_Receiving_Org_rec.Attribute11 IS NULL) AND
308: (p_Receiving_Org_rec.Attribute11 IS NULL))))
309: AND ( (l_Receiving_Org_rec.Attribute12 =
310: p_Receiving_Org_rec.Attribute12) OR
311: ((p_Receiving_Org_rec.Attribute12 = FND_API.G_MISS_CHAR) OR
312: ( (l_Receiving_Org_rec.Attribute12 IS NULL) AND
313: (p_Receiving_Org_rec.Attribute12 IS NULL))))
314: AND ( (l_Receiving_Org_rec.Attribute13 =
315: p_Receiving_Org_rec.Attribute13) OR
312: ( (l_Receiving_Org_rec.Attribute12 IS NULL) AND
313: (p_Receiving_Org_rec.Attribute12 IS NULL))))
314: AND ( (l_Receiving_Org_rec.Attribute13 =
315: p_Receiving_Org_rec.Attribute13) OR
316: ((p_Receiving_Org_rec.Attribute13 = FND_API.G_MISS_CHAR) OR
317: ( (l_Receiving_Org_rec.Attribute13 IS NULL) AND
318: (p_Receiving_Org_rec.Attribute13 IS NULL))))
319: AND ( (l_Receiving_Org_rec.Attribute14 =
320: p_Receiving_Org_rec.Attribute14) OR
317: ( (l_Receiving_Org_rec.Attribute13 IS NULL) AND
318: (p_Receiving_Org_rec.Attribute13 IS NULL))))
319: AND ( (l_Receiving_Org_rec.Attribute14 =
320: p_Receiving_Org_rec.Attribute14) OR
321: ((p_Receiving_Org_rec.Attribute14 = FND_API.G_MISS_CHAR) OR
322: ( (l_Receiving_Org_rec.Attribute14 IS NULL) AND
323: (p_Receiving_Org_rec.Attribute14 IS NULL))))
324: AND ( (l_Receiving_Org_rec.Attribute15 =
325: p_Receiving_Org_rec.Attribute15) OR
322: ( (l_Receiving_Org_rec.Attribute14 IS NULL) AND
323: (p_Receiving_Org_rec.Attribute14 IS NULL))))
324: AND ( (l_Receiving_Org_rec.Attribute15 =
325: p_Receiving_Org_rec.Attribute15) OR
326: ((p_Receiving_Org_rec.Attribute15 = FND_API.G_MISS_CHAR) OR
327: ( (l_Receiving_Org_rec.Attribute15 IS NULL) AND
328: (p_Receiving_Org_rec.Attribute15 IS NULL))))
329: AND ( (l_Receiving_Org_rec.Attribute2 =
330: p_Receiving_Org_rec.Attribute2) OR
327: ( (l_Receiving_Org_rec.Attribute15 IS NULL) AND
328: (p_Receiving_Org_rec.Attribute15 IS NULL))))
329: AND ( (l_Receiving_Org_rec.Attribute2 =
330: p_Receiving_Org_rec.Attribute2) OR
331: ((p_Receiving_Org_rec.Attribute2 = FND_API.G_MISS_CHAR) OR
332: ( (l_Receiving_Org_rec.Attribute2 IS NULL) AND
333: (p_Receiving_Org_rec.Attribute2 IS NULL))))
334: AND ( (l_Receiving_Org_rec.Attribute3 =
335: p_Receiving_Org_rec.Attribute3) OR
332: ( (l_Receiving_Org_rec.Attribute2 IS NULL) AND
333: (p_Receiving_Org_rec.Attribute2 IS NULL))))
334: AND ( (l_Receiving_Org_rec.Attribute3 =
335: p_Receiving_Org_rec.Attribute3) OR
336: ((p_Receiving_Org_rec.Attribute3 = FND_API.G_MISS_CHAR) OR
337: ( (l_Receiving_Org_rec.Attribute3 IS NULL) AND
338: (p_Receiving_Org_rec.Attribute3 IS NULL))))
339: AND ( (l_Receiving_Org_rec.Attribute4 =
340: p_Receiving_Org_rec.Attribute4) OR
337: ( (l_Receiving_Org_rec.Attribute3 IS NULL) AND
338: (p_Receiving_Org_rec.Attribute3 IS NULL))))
339: AND ( (l_Receiving_Org_rec.Attribute4 =
340: p_Receiving_Org_rec.Attribute4) OR
341: ((p_Receiving_Org_rec.Attribute4 = FND_API.G_MISS_CHAR) OR
342: ( (l_Receiving_Org_rec.Attribute4 IS NULL) AND
343: (p_Receiving_Org_rec.Attribute4 IS NULL))))
344: AND ( (l_Receiving_Org_rec.Attribute5 =
345: p_Receiving_Org_rec.Attribute5) OR
342: ( (l_Receiving_Org_rec.Attribute4 IS NULL) AND
343: (p_Receiving_Org_rec.Attribute4 IS NULL))))
344: AND ( (l_Receiving_Org_rec.Attribute5 =
345: p_Receiving_Org_rec.Attribute5) OR
346: ((p_Receiving_Org_rec.Attribute5 = FND_API.G_MISS_CHAR) OR
347: ( (l_Receiving_Org_rec.Attribute5 IS NULL) AND
348: (p_Receiving_Org_rec.Attribute5 IS NULL))))
349: AND ( (l_Receiving_Org_rec.Attribute6 =
350: p_Receiving_Org_rec.Attribute6) OR
347: ( (l_Receiving_Org_rec.Attribute5 IS NULL) AND
348: (p_Receiving_Org_rec.Attribute5 IS NULL))))
349: AND ( (l_Receiving_Org_rec.Attribute6 =
350: p_Receiving_Org_rec.Attribute6) OR
351: ((p_Receiving_Org_rec.Attribute6 = FND_API.G_MISS_CHAR) OR
352: ( (l_Receiving_Org_rec.Attribute6 IS NULL) AND
353: (p_Receiving_Org_rec.Attribute6 IS NULL))))
354: AND ( (l_Receiving_Org_rec.Attribute7 =
355: p_Receiving_Org_rec.Attribute7) OR
352: ( (l_Receiving_Org_rec.Attribute6 IS NULL) AND
353: (p_Receiving_Org_rec.Attribute6 IS NULL))))
354: AND ( (l_Receiving_Org_rec.Attribute7 =
355: p_Receiving_Org_rec.Attribute7) OR
356: ((p_Receiving_Org_rec.Attribute7 = FND_API.G_MISS_CHAR) OR
357: ( (l_Receiving_Org_rec.Attribute7 IS NULL) AND
358: (p_Receiving_Org_rec.Attribute7 IS NULL))))
359: AND ( (l_Receiving_Org_rec.Attribute8 =
360: p_Receiving_Org_rec.Attribute8) OR
357: ( (l_Receiving_Org_rec.Attribute7 IS NULL) AND
358: (p_Receiving_Org_rec.Attribute7 IS NULL))))
359: AND ( (l_Receiving_Org_rec.Attribute8 =
360: p_Receiving_Org_rec.Attribute8) OR
361: ((p_Receiving_Org_rec.Attribute8 = FND_API.G_MISS_CHAR) OR
362: ( (l_Receiving_Org_rec.Attribute8 IS NULL) AND
363: (p_Receiving_Org_rec.Attribute8 IS NULL))))
364: AND ( (l_Receiving_Org_rec.Attribute9 =
365: p_Receiving_Org_rec.Attribute9) OR
362: ( (l_Receiving_Org_rec.Attribute8 IS NULL) AND
363: (p_Receiving_Org_rec.Attribute8 IS NULL))))
364: AND ( (l_Receiving_Org_rec.Attribute9 =
365: p_Receiving_Org_rec.Attribute9) OR
366: ((p_Receiving_Org_rec.Attribute9 = FND_API.G_MISS_CHAR) OR
367: ( (l_Receiving_Org_rec.Attribute9 IS NULL) AND
368: (p_Receiving_Org_rec.Attribute9 IS NULL))))
369: AND ( (l_Receiving_Org_rec.Attribute_Category =
370: p_Receiving_Org_rec.Attribute_Category) OR
367: ( (l_Receiving_Org_rec.Attribute9 IS NULL) AND
368: (p_Receiving_Org_rec.Attribute9 IS NULL))))
369: AND ( (l_Receiving_Org_rec.Attribute_Category =
370: p_Receiving_Org_rec.Attribute_Category) OR
371: ((p_Receiving_Org_rec.Attribute_Category = FND_API.G_MISS_CHAR) OR
372: ( (l_Receiving_Org_rec.Attribute_Category IS NULL) AND
373: (p_Receiving_Org_rec.Attribute_Category IS NULL))))
374: AND ( (l_Receiving_Org_rec.Created_By =
375: p_Receiving_Org_rec.Created_By) OR
372: ( (l_Receiving_Org_rec.Attribute_Category IS NULL) AND
373: (p_Receiving_Org_rec.Attribute_Category IS NULL))))
374: AND ( (l_Receiving_Org_rec.Created_By =
375: p_Receiving_Org_rec.Created_By) OR
376: ((p_Receiving_Org_rec.Created_By = FND_API.G_MISS_NUM) OR
377: ( (l_Receiving_Org_rec.Created_By IS NULL) AND
378: (p_Receiving_Org_rec.Created_By IS NULL))))
379: AND ( (l_Receiving_Org_rec.Creation_Date =
380: p_Receiving_Org_rec.Creation_Date) OR
377: ( (l_Receiving_Org_rec.Created_By IS NULL) AND
378: (p_Receiving_Org_rec.Created_By IS NULL))))
379: AND ( (l_Receiving_Org_rec.Creation_Date =
380: p_Receiving_Org_rec.Creation_Date) OR
381: ((p_Receiving_Org_rec.Creation_Date = FND_API.G_MISS_DATE) OR
382: ( (l_Receiving_Org_rec.Creation_Date IS NULL) AND
383: (p_Receiving_Org_rec.Creation_Date IS NULL))))
384: AND ( (l_Receiving_Org_rec.Disable_Date =
385: p_Receiving_Org_rec.Disable_Date) OR
382: ( (l_Receiving_Org_rec.Creation_Date IS NULL) AND
383: (p_Receiving_Org_rec.Creation_Date IS NULL))))
384: AND ( (l_Receiving_Org_rec.Disable_Date =
385: p_Receiving_Org_rec.Disable_Date) OR
386: ((p_Receiving_Org_rec.Disable_Date = FND_API.G_MISS_DATE) OR
387: ( (l_Receiving_Org_rec.Disable_Date IS NULL) AND
388: (p_Receiving_Org_rec.Disable_Date IS NULL))))
389: AND ( (l_Receiving_Org_rec.Effective_Date =
390: p_Receiving_Org_rec.Effective_Date) OR
387: ( (l_Receiving_Org_rec.Disable_Date IS NULL) AND
388: (p_Receiving_Org_rec.Disable_Date IS NULL))))
389: AND ( (l_Receiving_Org_rec.Effective_Date =
390: p_Receiving_Org_rec.Effective_Date) OR
391: ((p_Receiving_Org_rec.Effective_Date = FND_API.G_MISS_DATE) OR
392: ( (l_Receiving_Org_rec.Effective_Date IS NULL) AND
393: (p_Receiving_Org_rec.Effective_Date IS NULL))))
394: AND ( (l_Receiving_Org_rec.Last_Updated_By =
395: p_Receiving_Org_rec.Last_Updated_By) OR
392: ( (l_Receiving_Org_rec.Effective_Date IS NULL) AND
393: (p_Receiving_Org_rec.Effective_Date IS NULL))))
394: AND ( (l_Receiving_Org_rec.Last_Updated_By =
395: p_Receiving_Org_rec.Last_Updated_By) OR
396: ((p_Receiving_Org_rec.Last_Updated_By = FND_API.G_MISS_NUM) OR
397: ( (l_Receiving_Org_rec.Last_Updated_By IS NULL) AND
398: (p_Receiving_Org_rec.Last_Updated_By IS NULL))))
399: AND ( (l_Receiving_Org_rec.Last_Update_Date =
400: p_Receiving_Org_rec.Last_Update_Date) OR
397: ( (l_Receiving_Org_rec.Last_Updated_By IS NULL) AND
398: (p_Receiving_Org_rec.Last_Updated_By IS NULL))))
399: AND ( (l_Receiving_Org_rec.Last_Update_Date =
400: p_Receiving_Org_rec.Last_Update_Date) OR
401: ((p_Receiving_Org_rec.Last_Update_Date = FND_API.G_MISS_DATE) OR
402: ( (l_Receiving_Org_rec.Last_Update_Date IS NULL) AND
403: (p_Receiving_Org_rec.Last_Update_Date IS NULL))))
404: AND ( (l_Receiving_Org_rec.Last_Update_Login =
405: p_Receiving_Org_rec.Last_Update_Login) OR
402: ( (l_Receiving_Org_rec.Last_Update_Date IS NULL) AND
403: (p_Receiving_Org_rec.Last_Update_Date IS NULL))))
404: AND ( (l_Receiving_Org_rec.Last_Update_Login =
405: p_Receiving_Org_rec.Last_Update_Login) OR
406: ((p_Receiving_Org_rec.Last_Update_Login = FND_API.G_MISS_NUM) OR
407: ( (l_Receiving_Org_rec.Last_Update_Login IS NULL) AND
408: (p_Receiving_Org_rec.Last_Update_Login IS NULL))))
409: AND ( (l_Receiving_Org_rec.Program_Application_Id =
410: p_Receiving_Org_rec.Program_Application_Id) OR
407: ( (l_Receiving_Org_rec.Last_Update_Login IS NULL) AND
408: (p_Receiving_Org_rec.Last_Update_Login IS NULL))))
409: AND ( (l_Receiving_Org_rec.Program_Application_Id =
410: p_Receiving_Org_rec.Program_Application_Id) OR
411: ((p_Receiving_Org_rec.Program_Application_Id = FND_API.G_MISS_NUM) OR
412: ( (l_Receiving_Org_rec.Program_Application_Id IS NULL) AND
413: (p_Receiving_Org_rec.Program_Application_Id IS NULL))))
414: AND ( (l_Receiving_Org_rec.Program_Id =
415: p_Receiving_Org_rec.Program_Id) OR
412: ( (l_Receiving_Org_rec.Program_Application_Id IS NULL) AND
413: (p_Receiving_Org_rec.Program_Application_Id IS NULL))))
414: AND ( (l_Receiving_Org_rec.Program_Id =
415: p_Receiving_Org_rec.Program_Id) OR
416: ((p_Receiving_Org_rec.Program_Id = FND_API.G_MISS_NUM) OR
417: ( (l_Receiving_Org_rec.Program_Id IS NULL) AND
418: (p_Receiving_Org_rec.Program_Id IS NULL))))
419: AND ( (l_Receiving_Org_rec.Program_Update_Date =
420: p_Receiving_Org_rec.Program_Update_Date) OR
417: ( (l_Receiving_Org_rec.Program_Id IS NULL) AND
418: (p_Receiving_Org_rec.Program_Id IS NULL))))
419: AND ( (l_Receiving_Org_rec.Program_Update_Date =
420: p_Receiving_Org_rec.Program_Update_Date) OR
421: ((p_Receiving_Org_rec.Program_Update_Date = FND_API.G_MISS_DATE) OR
422: ( (l_Receiving_Org_rec.Program_Update_Date IS NULL) AND
423: (p_Receiving_Org_rec.Program_Update_Date IS NULL))))
424: AND ( (l_Receiving_Org_rec.Receipt_Organization_Id =
425: p_Receiving_Org_rec.Receipt_Organization_Id) OR
422: ( (l_Receiving_Org_rec.Program_Update_Date IS NULL) AND
423: (p_Receiving_Org_rec.Program_Update_Date IS NULL))))
424: AND ( (l_Receiving_Org_rec.Receipt_Organization_Id =
425: p_Receiving_Org_rec.Receipt_Organization_Id) OR
426: ((p_Receiving_Org_rec.Receipt_Organization_Id = FND_API.G_MISS_NUM) OR
427: ( (l_Receiving_Org_rec.Receipt_Organization_Id IS NULL) AND
428: (p_Receiving_Org_rec.Receipt_Organization_Id IS NULL))))
429: AND ( (l_Receiving_Org_rec.Request_Id =
430: p_Receiving_Org_rec.Request_Id) OR
427: ( (l_Receiving_Org_rec.Receipt_Organization_Id IS NULL) AND
428: (p_Receiving_Org_rec.Receipt_Organization_Id IS NULL))))
429: AND ( (l_Receiving_Org_rec.Request_Id =
430: p_Receiving_Org_rec.Request_Id) OR
431: ((p_Receiving_Org_rec.Request_Id = FND_API.G_MISS_NUM) OR
432: ( (l_Receiving_Org_rec.Request_Id IS NULL) AND
433: (p_Receiving_Org_rec.Request_Id IS NULL))))
434: AND ( (l_Receiving_Org_rec.Sourcing_Rule_Id =
435: p_Receiving_Org_rec.Sourcing_Rule_Id) OR
432: ( (l_Receiving_Org_rec.Request_Id IS NULL) AND
433: (p_Receiving_Org_rec.Request_Id IS NULL))))
434: AND ( (l_Receiving_Org_rec.Sourcing_Rule_Id =
435: p_Receiving_Org_rec.Sourcing_Rule_Id) OR
436: ((p_Receiving_Org_rec.Sourcing_Rule_Id = FND_API.G_MISS_NUM) OR
437: ( (l_Receiving_Org_rec.Sourcing_Rule_Id IS NULL) AND
438: (p_Receiving_Org_rec.Sourcing_Rule_Id IS NULL))))
439: THEN
440:
443: x_Receiving_Org_rec := l_Receiving_Org_rec;
444:
445: -- Set return status
446:
447: x_return_status := FND_API.G_RET_STS_SUCCESS;
448: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_SUCCESS;
449:
450: ELSE
451:
444:
445: -- Set return status
446:
447: x_return_status := FND_API.G_RET_STS_SUCCESS;
448: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_SUCCESS;
449:
450: ELSE
451:
452: -- Row has changed by another user.
450: ELSE
451:
452: -- Row has changed by another user.
453:
454: x_return_status := FND_API.G_RET_STS_ERROR;
455: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_ERROR;
456:
457: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
458: THEN
451:
452: -- Row has changed by another user.
453:
454: x_return_status := FND_API.G_RET_STS_ERROR;
455: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_ERROR;
456:
457: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
458: THEN
459:
467: EXCEPTION
468:
469: WHEN NO_DATA_FOUND THEN
470:
471: x_return_status := FND_API.G_RET_STS_ERROR;
472: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_ERROR;
473:
474: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
475: THEN
468:
469: WHEN NO_DATA_FOUND THEN
470:
471: x_return_status := FND_API.G_RET_STS_ERROR;
472: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_ERROR;
473:
474: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
475: THEN
476:
479:
480: END IF;
481: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
482:
483: x_return_status := FND_API.G_RET_STS_ERROR;
484: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_ERROR;
485:
486: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
487: THEN
480: END IF;
481: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
482:
483: x_return_status := FND_API.G_RET_STS_ERROR;
484: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_ERROR;
485:
486: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
487: THEN
488:
491:
492: END IF;
493: WHEN OTHERS THEN
494:
495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
496: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
497:
498: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
499: THEN
492: END IF;
493: WHEN OTHERS THEN
494:
495: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
496: x_Receiving_Org_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
497:
498: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
499: THEN
500: FND_MSG_PUB.Add_Exc_Msg
529: , 'Query_Row'
530: );
531: END IF;
532:
533: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
534:
535: END Query_Row;
536:
537: -- Procedure Query_Entity
569: , 'Query_Entity'
570: );
571: END IF;
572:
573: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
574:
575: END Query_Entity;
576:
577: -- Function Query_Rows
579: --
580:
581: FUNCTION Query_Rows
582: ( p_Sr_Receipt_Id IN NUMBER :=
583: FND_API.G_MISS_NUM
584: , p_Sourcing_Rule_Id IN NUMBER :=
585: FND_API.G_MISS_NUM
586: ) RETURN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
587: IS
581: FUNCTION Query_Rows
582: ( p_Sr_Receipt_Id IN NUMBER :=
583: FND_API.G_MISS_NUM
584: , p_Sourcing_Rule_Id IN NUMBER :=
585: FND_API.G_MISS_NUM
586: ) RETURN MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
587: IS
588: l_Receiving_Org_rec MRP_Sourcing_Rule_PUB.Receiving_Org_Rec_Type;
589: l_Receiving_Org_tbl MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type;
629:
630: IF
631: (p_Sr_Receipt_Id IS NOT NULL
632: AND
633: p_Sr_Receipt_Id <> FND_API.G_MISS_NUM)
634: AND
635: (p_Sourcing_Rule_Id IS NOT NULL
636: AND
637: p_Sourcing_Rule_Id <> FND_API.G_MISS_NUM)
633: p_Sr_Receipt_Id <> FND_API.G_MISS_NUM)
634: AND
635: (p_Sourcing_Rule_Id IS NOT NULL
636: AND
637: p_Sourcing_Rule_Id <> FND_API.G_MISS_NUM)
638: THEN
639: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
640: THEN
641: FND_MSG_PUB.Add_Exc_Msg
644: , 'Keys are mutually exclusive: Sr_Receipt_Id = '|| p_Sr_Receipt_Id || ', Sourcing_Rule_Id = '|| p_Sourcing_Rule_Id
645: );
646: END IF;
647:
648: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
649:
650: END IF;
651:
652:
694:
695: IF
696: (p_Sr_Receipt_Id IS NOT NULL
697: AND
698: p_Sr_Receipt_Id <> FND_API.G_MISS_NUM)
699: AND
700: (l_Receiving_Org_tbl.COUNT = 0)
701: THEN
702: RAISE NO_DATA_FOUND;
708: RETURN l_Receiving_Org_tbl;
709:
710: EXCEPTION
711:
712: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
713:
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
715:
716: WHEN OTHERS THEN
710: EXCEPTION
711:
712: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
713:
714: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
715:
716: WHEN OTHERS THEN
717:
718: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
722: , 'Query_Rows'
723: );
724: END IF;
725:
726: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
727:
728: END Query_Rows;
729:
730: -- Procedure Query_Entities
732: --
733:
734: PROCEDURE Query_Entities
735: ( p_Sr_Receipt_Id IN NUMBER :=
736: FND_API.G_MISS_NUM
737: , p_Sourcing_Rule_Id IN NUMBER :=
738: FND_API.G_MISS_NUM
739: , x_Receiving_Org_tbl OUT MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
740: , x_Receiving_Org_val_tbl OUT MRP_Sourcing_Rule_PUB.Receiving_Org_Val_Tbl_Type
734: PROCEDURE Query_Entities
735: ( p_Sr_Receipt_Id IN NUMBER :=
736: FND_API.G_MISS_NUM
737: , p_Sourcing_Rule_Id IN NUMBER :=
738: FND_API.G_MISS_NUM
739: , x_Receiving_Org_tbl OUT MRP_Sourcing_Rule_PUB.Receiving_Org_Tbl_Type
740: , x_Receiving_Org_val_tbl OUT MRP_Sourcing_Rule_PUB.Receiving_Org_Val_Tbl_Type
741: )
742: IS
785:
786: IF
787: (p_Sr_Receipt_Id IS NOT NULL
788: AND
789: p_Sr_Receipt_Id <> FND_API.G_MISS_NUM)
790: AND
791: (p_Sourcing_Rule_Id IS NOT NULL
792: AND
793: p_Sourcing_Rule_Id <> FND_API.G_MISS_NUM)
789: p_Sr_Receipt_Id <> FND_API.G_MISS_NUM)
790: AND
791: (p_Sourcing_Rule_Id IS NOT NULL
792: AND
793: p_Sourcing_Rule_Id <> FND_API.G_MISS_NUM)
794: THEN
795: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
796: THEN
797: FND_MSG_PUB.Add_Exc_Msg
800: , 'Keys are mutually exclusive: Sr_Receipt_Id = '|| p_Sr_Receipt_Id || ', Sourcing_Rule_Id = '|| p_Sourcing_Rule_Id
801: );
802: END IF;
803:
804: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
805:
806: END IF;
807:
808:
854:
855: IF
856: (p_Sr_Receipt_Id IS NOT NULL
857: AND
858: p_Sr_Receipt_Id <> FND_API.G_MISS_NUM)
859: AND
860: (NOT l_rows_fetched)
861: THEN
862: RAISE NO_DATA_FOUND;
863: END IF;
864:
865: EXCEPTION
866:
867: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
868:
869: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
870:
871: WHEN OTHERS THEN
865: EXCEPTION
866:
867: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
868:
869: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
870:
871: WHEN OTHERS THEN
872:
873: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
877: , 'Query_Entities'
878: );
879: END IF;
880:
881: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
882:
883: END Query_Entities;
884:
885: END MRP_Receiving_Org_Handlers;