DBA Data[Home] [Help]

APPS.WMS_CONTAINER2_PUB dependencies on FND_API

Line 34: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,

30: -- ----------------------------------------------------------------------------------
31: -- ----------------------------------------------------------------------------------
32: PROCEDURE Purge_LPN
33: ( p_api_version IN NUMBER ,
34: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
35: p_commit IN VARCHAR2 := fnd_api.g_false ,
36: x_return_status OUT VARCHAR2 ,
37: x_msg_count OUT NUMBER ,
38: x_msg_data OUT VARCHAR2 ,

Line 35: p_commit IN VARCHAR2 := fnd_api.g_false ,

31: -- ----------------------------------------------------------------------------------
32: PROCEDURE Purge_LPN
33: ( p_api_version IN NUMBER ,
34: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
35: p_commit IN VARCHAR2 := fnd_api.g_false ,
36: x_return_status OUT VARCHAR2 ,
37: x_msg_count OUT NUMBER ,
38: x_msg_data OUT VARCHAR2 ,
39: p_lpn_id IN NUMBER ,

Line 78: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

74: BEGIN
75: -- Standard Start of API savepoint
76: SAVEPOINT Purge_LPN_PUB;
77: -- Standard call to check for call compatibility.
78: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
79: p_api_version ,
80: l_api_name ,
81: G_PKG_NAME )
82: THEN

Line 85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

81: G_PKG_NAME )
82: THEN
83: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
84: FND_MSG_PUB.ADD;
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88: IF FND_API.to_Boolean( p_init_msg_list ) THEN
89: FND_MSG_PUB.initialize;

Line 88: IF FND_API.to_Boolean( p_init_msg_list ) THEN

84: FND_MSG_PUB.ADD;
85: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
86: END IF;
87: -- Initialize message list if p_init_msg_list is set to TRUE.
88: IF FND_API.to_Boolean( p_init_msg_list ) THEN
89: FND_MSG_PUB.initialize;
90: END IF;
91: -- Initialize API return status to success
92: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 92: x_return_status := FND_API.G_RET_STS_SUCCESS;

88: IF FND_API.to_Boolean( p_init_msg_list ) THEN
89: FND_MSG_PUB.initialize;
90: END IF;
91: -- Initialize API return status to success
92: x_return_status := FND_API.G_RET_STS_SUCCESS;
93:
94: -- API body
95: /* Validate all inputs */
96:

Line 104: RAISE FND_API.G_EXC_ERROR;

100: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);
101: IF (l_result = INV_Validate.F) THEN
102: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
103: FND_MSG_PUB.ADD;
104: RAISE FND_API.G_EXC_ERROR;
105: END IF;
106:
107: /* End of input validation */
108:

Line 115: RAISE FND_API.G_EXC_ERROR;

111: FETCH c_lpn INTO l_lpn_exist;
112: IF c_lpn%FOUND THEN
113: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_NON_EMPTY_LPN');
114: FND_MSG_PUB.ADD;
115: RAISE FND_API.G_EXC_ERROR;
116: END IF;
117: CLOSE c_lpn;
118:
119: /* Check WMS_LPN_CONTENTS table for any item(s) stored within the LPN */

Line 125: RAISE FND_API.G_EXC_ERROR;

121: FETCH c_lpn_contents INTO l_lpn_contents_exist;
122: IF c_lpn_contents%FOUND THEN
123: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_NON_EMPTY_LPN');
124: FND_MSG_PUB.ADD;
125: RAISE FND_API.G_EXC_ERROR;
126: END IF;
127: CLOSE c_lpn_contents;
128:
129: /* Check MTL_SERIAL_NUMBERS table for any serialized item(s) stored within the LPN */

Line 135: RAISE FND_API.G_EXC_ERROR;

131: FETCH c_lpn_serial_contents INTO l_lpn_serial_contents_exist;
132: IF c_lpn_serial_contents%FOUND THEN
133: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_NON_EMPTY_LPN');
134: FND_MSG_PUB.ADD;
135: RAISE FND_API.G_EXC_ERROR;
136: END IF;
137: CLOSE c_lpn_serial_contents;
138:
139: /* Nothing found within the LPN so okay to purge it now */

Line 165: IF FND_API.To_Boolean( p_commit ) THEN

161:
162: -- End of API body
163:
164: -- Standard check of p_commit.
165: IF FND_API.To_Boolean( p_commit ) THEN
166: COMMIT WORK;
167: END IF;
168: -- Standard call to get message count and if count is 1,
169: -- get message info.

Line 175: WHEN FND_API.G_EXC_ERROR THEN

171: ( p_count => x_msg_count,
172: p_data => x_msg_data
173: );
174: EXCEPTION
175: WHEN FND_API.G_EXC_ERROR THEN
176: ROLLBACK TO Purge_LPN_PUB;
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: FND_MSG_PUB.Count_And_Get
179: ( p_count => x_msg_count,

Line 177: x_return_status := FND_API.G_RET_STS_ERROR;

173: );
174: EXCEPTION
175: WHEN FND_API.G_EXC_ERROR THEN
176: ROLLBACK TO Purge_LPN_PUB;
177: x_return_status := FND_API.G_RET_STS_ERROR;
178: FND_MSG_PUB.Count_And_Get
179: ( p_count => x_msg_count,
180: p_data => x_msg_data
181: );

Line 182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

178: FND_MSG_PUB.Count_And_Get
179: ( p_count => x_msg_count,
180: p_data => x_msg_data
181: );
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: ROLLBACK TO Purge_LPN_PUB;
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
185: FND_MSG_PUB.Count_And_Get
186: ( p_count => x_msg_count,

Line 184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

180: p_data => x_msg_data
181: );
182: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
183: ROLLBACK TO Purge_LPN_PUB;
184: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
185: FND_MSG_PUB.Count_And_Get
186: ( p_count => x_msg_count,
187: p_data => x_msg_data
188: );

Line 191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

187: p_data => x_msg_data
188: );
189: WHEN OTHERS THEN
190: ROLLBACK TO Purge_LPN_PUB;
191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
192: IF FND_MSG_PUB.Check_Msg_Level
193: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
194: THEN
195: FND_MSG_PUB.Add_Exc_Msg

Line 212: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,

208: -- ----------------------------------------------------------------------------------
209: -- ----------------------------------------------------------------------------------
210: PROCEDURE Explode_LPN
211: ( p_api_version IN NUMBER ,
212: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
213: p_commit IN VARCHAR2 := fnd_api.g_false ,
214: x_return_status OUT VARCHAR2 ,
215: x_msg_count OUT NUMBER ,
216: x_msg_data OUT VARCHAR2 ,

Line 213: p_commit IN VARCHAR2 := fnd_api.g_false ,

209: -- ----------------------------------------------------------------------------------
210: PROCEDURE Explode_LPN
211: ( p_api_version IN NUMBER ,
212: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
213: p_commit IN VARCHAR2 := fnd_api.g_false ,
214: x_return_status OUT VARCHAR2 ,
215: x_msg_count OUT NUMBER ,
216: x_msg_data OUT VARCHAR2 ,
217: p_lpn_id IN NUMBER ,

Line 269: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

265: BEGIN
266: -- Standard Start of API savepoint
267: SAVEPOINT Explode_LPN_PUB;
268: -- Standard call to check for call compatibility.
269: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
270: p_api_version ,
271: l_api_name ,
272: G_PKG_NAME )
273: THEN

Line 276: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

272: G_PKG_NAME )
273: THEN
274: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
275: FND_MSG_PUB.ADD;
276: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
277: END IF;
278: -- Initialize message list if p_init_msg_list is set to TRUE.
279: IF FND_API.to_Boolean( p_init_msg_list ) THEN
280: FND_MSG_PUB.initialize;

Line 279: IF FND_API.to_Boolean( p_init_msg_list ) THEN

275: FND_MSG_PUB.ADD;
276: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
277: END IF;
278: -- Initialize message list if p_init_msg_list is set to TRUE.
279: IF FND_API.to_Boolean( p_init_msg_list ) THEN
280: FND_MSG_PUB.initialize;
281: END IF;
282: -- Initialize API return status to success
283: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 283: x_return_status := FND_API.G_RET_STS_SUCCESS;

279: IF FND_API.to_Boolean( p_init_msg_list ) THEN
280: FND_MSG_PUB.initialize;
281: END IF;
282: -- Initialize API return status to success
283: x_return_status := FND_API.G_RET_STS_SUCCESS;
284:
285: -- API body
286: /* Validate all inputs */
287:

Line 295: RAISE FND_API.G_EXC_ERROR;

291: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);
292: IF (l_result = INV_Validate.F) THEN
293: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
294: FND_MSG_PUB.ADD;
295: RAISE FND_API.G_EXC_ERROR;
296: END IF;
297:
298: /* Validate Explosion Level */
299: IF (p_explosion_level < 0) THEN

Line 302: RAISE FND_API.G_EXC_ERROR;

298: /* Validate Explosion Level */
299: IF (p_explosion_level < 0) THEN
300: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_EXP_LVL');
301: FND_MSG_PUB.ADD;
302: RAISE FND_API.G_EXC_ERROR;
303: END IF;
304: /* End of input validation */
305:
306: IF (p_explosion_level = 0) THEN

Line 457: IF FND_API.To_Boolean( p_commit ) THEN

453:
454: -- End of API body
455:
456: -- Standard check of p_commit.
457: IF FND_API.To_Boolean( p_commit ) THEN
458: COMMIT WORK;
459: END IF;
460: -- Standard call to get message count and if count is 1,
461: -- get message info.

Line 467: WHEN FND_API.G_EXC_ERROR THEN

463: ( p_count => x_msg_count,
464: p_data => x_msg_data
465: );
466: EXCEPTION
467: WHEN FND_API.G_EXC_ERROR THEN
468: ROLLBACK TO Explode_LPN_PUB;
469: x_return_status := FND_API.G_RET_STS_ERROR;
470: FND_MSG_PUB.Count_And_Get
471: ( p_count => x_msg_count,

Line 469: x_return_status := FND_API.G_RET_STS_ERROR;

465: );
466: EXCEPTION
467: WHEN FND_API.G_EXC_ERROR THEN
468: ROLLBACK TO Explode_LPN_PUB;
469: x_return_status := FND_API.G_RET_STS_ERROR;
470: FND_MSG_PUB.Count_And_Get
471: ( p_count => x_msg_count,
472: p_data => x_msg_data
473: );

Line 474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

470: FND_MSG_PUB.Count_And_Get
471: ( p_count => x_msg_count,
472: p_data => x_msg_data
473: );
474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
475: ROLLBACK TO Explode_LPN_PUB;
476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
477: FND_MSG_PUB.Count_And_Get
478: ( p_count => x_msg_count,

Line 476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

472: p_data => x_msg_data
473: );
474: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
475: ROLLBACK TO Explode_LPN_PUB;
476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
477: FND_MSG_PUB.Count_And_Get
478: ( p_count => x_msg_count,
479: p_data => x_msg_data
480: );

Line 483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

479: p_data => x_msg_data
480: );
481: WHEN OTHERS THEN
482: ROLLBACK TO Explode_LPN_PUB;
483: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
484: IF FND_MSG_PUB.Check_Msg_Level
485: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
486: THEN
487: FND_MSG_PUB.Add_Exc_Msg

Line 504: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,

500: -- ----------------------------------------------------------------------------------
501: -- ----------------------------------------------------------------------------------
502: PROCEDURE Transfer_LPN_Contents
503: ( p_api_version IN NUMBER ,
504: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
505: p_commit IN VARCHAR2 := fnd_api.g_false ,
506: x_return_status OUT VARCHAR2 ,
507: x_msg_count OUT NUMBER ,
508: x_msg_data OUT VARCHAR2 ,

Line 505: p_commit IN VARCHAR2 := fnd_api.g_false ,

501: -- ----------------------------------------------------------------------------------
502: PROCEDURE Transfer_LPN_Contents
503: ( p_api_version IN NUMBER ,
504: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
505: p_commit IN VARCHAR2 := fnd_api.g_false ,
506: x_return_status OUT VARCHAR2 ,
507: x_msg_count OUT NUMBER ,
508: x_msg_data OUT VARCHAR2 ,
509: p_lpn_id_source IN NUMBER ,

Line 524: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

520: BEGIN
521: -- Standard Start of API savepoint
522: SAVEPOINT Transfer_LPN_Contents_PUB;
523: -- Standard call to check for call compatibility.
524: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
525: p_api_version ,
526: l_api_name ,
527: G_PKG_NAME )
528: THEN

Line 531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

527: G_PKG_NAME )
528: THEN
529: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
530: FND_MSG_PUB.ADD;
531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
532: END IF;
533: -- Initialize message list if p_init_msg_list is set to TRUE.
534: IF FND_API.to_Boolean( p_init_msg_list ) THEN
535: FND_MSG_PUB.initialize;

Line 534: IF FND_API.to_Boolean( p_init_msg_list ) THEN

530: FND_MSG_PUB.ADD;
531: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
532: END IF;
533: -- Initialize message list if p_init_msg_list is set to TRUE.
534: IF FND_API.to_Boolean( p_init_msg_list ) THEN
535: FND_MSG_PUB.initialize;
536: END IF;
537: -- Initialize API return status to success
538: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 538: x_return_status := FND_API.G_RET_STS_SUCCESS;

534: IF FND_API.to_Boolean( p_init_msg_list ) THEN
535: FND_MSG_PUB.initialize;
536: END IF;
537: -- Initialize API return status to success
538: x_return_status := FND_API.G_RET_STS_SUCCESS;
539:
540: -- API body
541: /* Validate all inputs */
542:

Line 550: RAISE FND_API.G_EXC_ERROR;

546: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn_source);
547: IF (l_result = INV_Validate.F) THEN
548: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
549: FND_MSG_PUB.ADD;
550: RAISE FND_API.G_EXC_ERROR;
551: END IF;
552:
553: /* Validate destination LPN */
554: l_lpn_dest.lpn_id := p_lpn_id_dest;

Line 560: RAISE FND_API.G_EXC_ERROR;

556: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn_dest);
557: IF (l_result = INV_Validate.F) THEN
558: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
559: FND_MSG_PUB.ADD;
560: RAISE FND_API.G_EXC_ERROR;
561: END IF;
562: /* End of input validation */
563:
564: UPDATE WMS_LICENSE_PLATE_NUMBERS

Line 579: IF FND_API.To_Boolean( p_commit ) THEN

575:
576: -- End of API body
577:
578: -- Standard check of p_commit.
579: IF FND_API.To_Boolean( p_commit ) THEN
580: COMMIT WORK;
581: END IF;
582: -- Standard call to get message count and if count is 1,
583: -- get message info.

Line 589: WHEN FND_API.G_EXC_ERROR THEN

585: ( p_count => x_msg_count,
586: p_data => x_msg_data
587: );
588: EXCEPTION
589: WHEN FND_API.G_EXC_ERROR THEN
590: ROLLBACK TO Transfer_LPN_Contents_PUB;
591: x_return_status := FND_API.G_RET_STS_ERROR;
592: FND_MSG_PUB.Count_And_Get
593: ( p_count => x_msg_count,

Line 591: x_return_status := FND_API.G_RET_STS_ERROR;

587: );
588: EXCEPTION
589: WHEN FND_API.G_EXC_ERROR THEN
590: ROLLBACK TO Transfer_LPN_Contents_PUB;
591: x_return_status := FND_API.G_RET_STS_ERROR;
592: FND_MSG_PUB.Count_And_Get
593: ( p_count => x_msg_count,
594: p_data => x_msg_data
595: );

Line 596: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

592: FND_MSG_PUB.Count_And_Get
593: ( p_count => x_msg_count,
594: p_data => x_msg_data
595: );
596: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
597: ROLLBACK TO Transfer_LPN_Contents_PUB;
598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
599: FND_MSG_PUB.Count_And_Get
600: ( p_count => x_msg_count,

Line 598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

594: p_data => x_msg_data
595: );
596: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
597: ROLLBACK TO Transfer_LPN_Contents_PUB;
598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
599: FND_MSG_PUB.Count_And_Get
600: ( p_count => x_msg_count,
601: p_data => x_msg_data
602: );

Line 605: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

601: p_data => x_msg_data
602: );
603: WHEN OTHERS THEN
604: ROLLBACK TO Transfer_LPN_Contents_PUB;
605: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
606: IF FND_MSG_PUB.Check_Msg_Level
607: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
608: THEN
609: FND_MSG_PUB.Add_Exc_Msg

Line 626: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,

622: -- ----------------------------------------------------------------------------------
623: -- ----------------------------------------------------------------------------------
624: PROCEDURE Container_Required_Qty
625: ( p_api_version IN NUMBER ,
626: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
627: p_commit IN VARCHAR2 := fnd_api.g_false ,
628: x_return_status OUT VARCHAR2 ,
629: x_msg_count OUT NUMBER ,
630: x_msg_data OUT VARCHAR2 ,

Line 627: p_commit IN VARCHAR2 := fnd_api.g_false ,

623: -- ----------------------------------------------------------------------------------
624: PROCEDURE Container_Required_Qty
625: ( p_api_version IN NUMBER ,
626: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
627: p_commit IN VARCHAR2 := fnd_api.g_false ,
628: x_return_status OUT VARCHAR2 ,
629: x_msg_count OUT NUMBER ,
630: x_msg_data OUT VARCHAR2 ,
631: p_source_item_id IN NUMBER ,

Line 680: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

676: BEGIN
677: -- Standard Start of API savepoint
678: SAVEPOINT Container_Required_Qty_PUB;
679: -- Standard call to check for call compatibility.
680: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
681: p_api_version ,
682: l_api_name ,
683: G_PKG_NAME )
684: THEN

Line 687: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

683: G_PKG_NAME )
684: THEN
685: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
686: FND_MSG_PUB.ADD;
687: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
688: END IF;
689: -- Initialize message list if p_init_msg_list is set to TRUE.
690: IF FND_API.to_Boolean( p_init_msg_list ) THEN
691: FND_MSG_PUB.initialize;

Line 690: IF FND_API.to_Boolean( p_init_msg_list ) THEN

686: FND_MSG_PUB.ADD;
687: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
688: END IF;
689: -- Initialize message list if p_init_msg_list is set to TRUE.
690: IF FND_API.to_Boolean( p_init_msg_list ) THEN
691: FND_MSG_PUB.initialize;
692: END IF;
693: -- Initialize API return status to success
694: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 694: x_return_status := FND_API.G_RET_STS_SUCCESS;

690: IF FND_API.to_Boolean( p_init_msg_list ) THEN
691: FND_MSG_PUB.initialize;
692: END IF;
693: -- Initialize API return status to success
694: x_return_status := FND_API.G_RET_STS_SUCCESS;
695:
696: -- API body
697: /* Validate all inputs */
698:

Line 705: RAISE FND_API.G_EXC_ERROR;

701: l_result := INV_Validate.Organization(l_org);
702: IF (l_result = INV_Validate.F) THEN
703: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_ORG');
704: FND_MSG_PUB.ADD;
705: RAISE FND_API.G_EXC_ERROR;
706: END IF;
707:
708: /* Validate Source item */
709: l_source_item.inventory_item_id := p_source_item_id;

Line 714: RAISE FND_API.G_EXC_ERROR;

710: l_result := INV_Validate.inventory_item(l_source_item, l_org);
711: IF (l_result = INV_Validate.F) THEN
712: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_ITEM');
713: FND_MSG_PUB.ADD;
714: RAISE FND_API.G_EXC_ERROR;
715: END IF;
716:
717: /* Validate Source Quantity */
718: IF ((p_source_qty IS NULL) OR (p_source_qty <= 0)) THEN

Line 721: RAISE FND_API.G_EXC_ERROR;

717: /* Validate Source Quantity */
718: IF ((p_source_qty IS NULL) OR (p_source_qty <= 0)) THEN
719: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_SRC_QTY');
720: FND_MSG_PUB.ADD;
721: RAISE FND_API.G_EXC_ERROR;
722: END IF;
723:
724: /* Validate Source UOM */
725: l_result := INV_Validate.Uom(p_source_qty_uom, l_org, l_source_item);

Line 729: RAISE FND_API.G_EXC_ERROR;

725: l_result := INV_Validate.Uom(p_source_qty_uom, l_org, l_source_item);
726: IF (l_result = INV_Validate.F) THEN
727: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_SRC_UOM');
728: FND_MSG_PUB.ADD;
729: RAISE FND_API.G_EXC_ERROR;
730: END IF;
731:
732: /* Validate Quantity Per Container */
733: IF (p_qty_per_cont IS NOT NULL) THEN

Line 737: RAISE FND_API.G_EXC_ERROR;

733: IF (p_qty_per_cont IS NOT NULL) THEN
734: IF (p_qty_per_cont <= 0) THEN
735: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVLD_QTY_PER_CONT');
736: FND_MSG_PUB.ADD;
737: RAISE FND_API.G_EXC_ERROR;
738: END IF;
739: END IF;
740:
741: /* Validate Quantity Per Container UOM */

Line 747: RAISE FND_API.G_EXC_ERROR;

743: l_result := INV_Validate.Uom(p_qty_per_cont_uom, l_org, l_source_item);
744: IF (l_result = INV_Validate.F) THEN
745: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVLD_QTY_PER_UOM');
746: FND_MSG_PUB.ADD;
747: RAISE FND_API.G_EXC_ERROR;
748: END IF;
749: END IF;
750:
751: /* Validate Destination container item */

Line 758: RAISE FND_API.G_EXC_ERROR;

754: l_result := INV_Validate.inventory_item(l_dest_cont_item, l_org);
755: IF (l_result = INV_Validate.F) THEN
756: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_CONT_ITEM');
757: FND_MSG_PUB.ADD;
758: RAISE FND_API.G_EXC_ERROR;
759: ELSIF (l_dest_cont_item.container_item_flag = 'N') THEN
760: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_ITEM_NOT_A_CONT');
761: FND_MSG_PUB.ADD;
762: RAISE FND_API.G_EXC_ERROR;

Line 762: RAISE FND_API.G_EXC_ERROR;

758: RAISE FND_API.G_EXC_ERROR;
759: ELSIF (l_dest_cont_item.container_item_flag = 'N') THEN
760: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_ITEM_NOT_A_CONT');
761: FND_MSG_PUB.ADD;
762: RAISE FND_API.G_EXC_ERROR;
763: END IF;
764: END IF;
765: /* End of input validation */
766:

Line 781: RAISE FND_API.G_EXC_ERROR;

777: (l_source_item.unit_volume IS NULL) OR
778: (l_source_item.volume_uom_code IS NULL)) THEN
779: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_NOT_ENOUGH_INFO');
780: FND_MSG_PUB.ADD;
781: RAISE FND_API.G_EXC_ERROR;
782: END IF;
783:
784: /* Volume constraint */
785: l_temp_value := inv_convert.inv_um_convert(l_source_item.inventory_item_id, 6,

Line 793: RAISE FND_API.G_EXC_ERROR;

789: NULL, NULL);
790: IF (l_temp_value = -99999) THEN
791: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_CONVERSION');
792: FND_MSG_PUB.ADD;
793: RAISE FND_API.G_EXC_ERROR;
794: END IF;
795:
796: IF (l_dest_cont_item.internal_volume IS NOT NULL) THEN
797: -- Check that the source item's unit volume is less than or

Line 804: RAISE FND_API.G_EXC_ERROR;

800: l_max_load_quantity := FLOOR(l_dest_cont_item.internal_volume/l_temp_value);
801: ELSE
802: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_ITEM_TOO_LARGE');
803: FND_MSG_PUB.ADD;
804: RAISE FND_API.G_EXC_ERROR;
805: END IF;
806: END IF;
807: /* Weight constraint */
808: l_temp_value := inv_convert.inv_um_convert(l_source_item.inventory_item_id, 6,

Line 816: RAISE FND_API.G_EXC_ERROR;

812: NULL, NULL);
813: IF (l_temp_value = -99999) THEN
814: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_CONVERSION');
815: FND_MSG_PUB.ADD;
816: RAISE FND_API.G_EXC_ERROR;
817: END IF;
818:
819: /* Select the most constraining value for l_max_load_quantity */
820: IF (l_dest_cont_item.maximum_load_weight IS NOT NULL) THEN

Line 832: RAISE FND_API.G_EXC_ERROR;

828: END IF;
829: ELSE
830: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_ITEM_TOO_LARGE');
831: FND_MSG_PUB.ADD;
832: RAISE FND_API.G_EXC_ERROR;
833: END IF;
834: END IF;
835: END IF;
836: CLOSE max_load_cursor;

Line 848: RAISE FND_API.G_EXC_ERROR;

844: NULL, NULL);
845: IF (l_max_load_quantity = -99999) THEN
846: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_CONVERSION');
847: FND_MSG_PUB.ADD;
848: RAISE FND_API.G_EXC_ERROR;
849: END IF;
850: END IF;
851:
852: /* Calculate the required number of containers needed to store the items */

Line 862: RAISE FND_API.G_EXC_ERROR;

858: NULL, NULL);
859: IF (l_qty_per_cont = -99999) THEN
860: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_CONVERSION');
861: FND_MSG_PUB.ADD;
862: RAISE FND_API.G_EXC_ERROR;
863: END IF;
864:
865: IF (l_qty_per_cont > l_max_load_quantity) THEN
866: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_OVERPACKED_OPERATION');

Line 868: RAISE FND_API.G_EXC_ERROR;

864:
865: IF (l_qty_per_cont > l_max_load_quantity) THEN
866: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_OVERPACKED_OPERATION');
867: FND_MSG_PUB.ADD;
868: RAISE FND_API.G_EXC_ERROR;
869: ELSE
870: p_qty_required := CEIL(p_source_qty/l_qty_per_cont);
871: END IF;
872: ELSIF ((p_qty_per_cont IS NULL) AND (l_max_load_quantity IS NOT NULL)) THEN

Line 893: RAISE FND_API.G_EXC_ERROR;

889: l_result := INV_Validate.inventory_item(l_cont_item, l_org);
890: IF (l_result = INV_Validate.F) THEN
891: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_CONT_ITEM');
892: FND_MSG_PUB.ADD;
893: RAISE FND_API.G_EXC_ERROR;
894: END IF;
895:
896: /* Get the max load quantity for that given container */
897: l_temp_load_quantity := inv_convert.inv_um_convert

Line 903: RAISE FND_API.G_EXC_ERROR;

899: l_source_item.primary_uom_code, p_source_qty_uom, NULL, NULL);
900: IF (l_temp_load_quantity = -99999) THEN
901: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_CONVERSION');
902: FND_MSG_PUB.ADD;
903: RAISE FND_API.G_EXC_ERROR;
904: END IF;
905:
906: -- Calculate the min value, i.e. how much space is empty in the final container
907: -- used to store the items in units of the source item's uom

Line 936: RAISE FND_API.G_EXC_ERROR;

932: IF (l_curr_min_container = 0) THEN
933: p_qty_required := 0;
934: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_NO_CONTAINER_FOUND');
935: FND_MSG_PUB.ADD;
936: RAISE FND_API.G_EXC_ERROR;
937: ELSE
938: /* Valid container found. Store this information in the output parameters */
939: p_dest_cont_item_id := l_curr_min_container;
940: p_qty_required := CEIL(p_source_qty / l_curr_load_quantity);

Line 946: IF FND_API.To_Boolean( p_commit ) THEN

942: END IF;
943: -- End of API body
944:
945: -- Standard check of p_commit.
946: IF FND_API.To_Boolean( p_commit ) THEN
947: COMMIT WORK;
948: END IF;
949: -- Standard call to get message count and if count is 1,
950: -- get message info.

Line 956: WHEN FND_API.G_EXC_ERROR THEN

952: ( p_count => x_msg_count,
953: p_data => x_msg_data
954: );
955: EXCEPTION
956: WHEN FND_API.G_EXC_ERROR THEN
957: ROLLBACK TO Container_Required_Qty_PUB;
958: x_return_status := FND_API.G_RET_STS_ERROR;
959: FND_MSG_PUB.Count_And_Get
960: ( p_count => x_msg_count,

Line 958: x_return_status := FND_API.G_RET_STS_ERROR;

954: );
955: EXCEPTION
956: WHEN FND_API.G_EXC_ERROR THEN
957: ROLLBACK TO Container_Required_Qty_PUB;
958: x_return_status := FND_API.G_RET_STS_ERROR;
959: FND_MSG_PUB.Count_And_Get
960: ( p_count => x_msg_count,
961: p_data => x_msg_data
962: );

Line 963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

959: FND_MSG_PUB.Count_And_Get
960: ( p_count => x_msg_count,
961: p_data => x_msg_data
962: );
963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
964: ROLLBACK TO Container_Required_Qty_PUB;
965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
966: FND_MSG_PUB.Count_And_Get
967: ( p_count => x_msg_count,

Line 965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

961: p_data => x_msg_data
962: );
963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
964: ROLLBACK TO Container_Required_Qty_PUB;
965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
966: FND_MSG_PUB.Count_And_Get
967: ( p_count => x_msg_count,
968: p_data => x_msg_data
969: );

Line 972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

968: p_data => x_msg_data
969: );
970: WHEN OTHERS THEN
971: ROLLBACK TO Container_Required_Qty_PUB;
972: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
973: IF FND_MSG_PUB.Check_Msg_Level
974: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
975: THEN
976: FND_MSG_PUB.Add_Exc_Msg

Line 994: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,

990: -- ----------------------------------------------------------------------------------
991: -- ----------------------------------------------------------------------------------
992: PROCEDURE Get_Outermost_LPN
993: ( p_api_version IN NUMBER ,
994: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
995: p_commit IN VARCHAR2 := fnd_api.g_false ,
996: x_return_status OUT VARCHAR2 ,
997: x_msg_count OUT NUMBER ,
998: x_msg_data OUT VARCHAR2 ,

Line 995: p_commit IN VARCHAR2 := fnd_api.g_false ,

991: -- ----------------------------------------------------------------------------------
992: PROCEDURE Get_Outermost_LPN
993: ( p_api_version IN NUMBER ,
994: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
995: p_commit IN VARCHAR2 := fnd_api.g_false ,
996: x_return_status OUT VARCHAR2 ,
997: x_msg_count OUT NUMBER ,
998: x_msg_data OUT VARCHAR2 ,
999: p_lpn_id IN NUMBER := NULL ,

Line 1036: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

1032: BEGIN
1033: -- Standard Start of API savepoint
1034: SAVEPOINT Get_Outermost_LPN_PUB;
1035: -- Standard call to check for call compatibility.
1036: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
1037: p_api_version ,
1038: l_api_name ,
1039: G_PKG_NAME )
1040: THEN

Line 1043: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1039: G_PKG_NAME )
1040: THEN
1041: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
1042: FND_MSG_PUB.ADD;
1043: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1044: END IF;
1045: -- Initialize message list if p_init_msg_list is set to TRUE.
1046: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1047: FND_MSG_PUB.initialize;

Line 1046: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1042: FND_MSG_PUB.ADD;
1043: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1044: END IF;
1045: -- Initialize message list if p_init_msg_list is set to TRUE.
1046: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1047: FND_MSG_PUB.initialize;
1048: END IF;
1049: -- Initialize API return status to success
1050: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1050: x_return_status := FND_API.G_RET_STS_SUCCESS;

1046: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1047: FND_MSG_PUB.initialize;
1048: END IF;
1049: -- Initialize API return status to success
1050: x_return_status := FND_API.G_RET_STS_SUCCESS;
1051:
1052: -- API body
1053: /* Validate all inputs */
1054:

Line 1059: RAISE FND_API.G_EXC_ERROR;

1055: /* Validate that enough info has been passed in */
1056: IF ((p_lpn_id IS NULL) AND (p_inventory_item_id IS NULL)) THEN
1057: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_NOT_ENOUGH_INFO');
1058: FND_MSG_PUB.ADD;
1059: RAISE FND_API.G_EXC_ERROR;
1060: END IF;
1061:
1062: /* Validate LPN */
1063: IF (p_lpn_id IS NOT NULL) THEN

Line 1070: RAISE FND_API.G_EXC_ERROR;

1066: l_result := WMS_CONTAINER_PUB.Validate_LPN(l_lpn);
1067: IF (l_result = INV_Validate.F) THEN
1068: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_LPN');
1069: FND_MSG_PUB.ADD;
1070: RAISE FND_API.G_EXC_ERROR;
1071: END IF;
1072: END IF;
1073: /* End of input validation */
1074:

Line 1194: IF FND_API.To_Boolean( p_commit ) THEN

1190: END IF;
1191: -- End of API body
1192:
1193: -- Standard check of p_commit.
1194: IF FND_API.To_Boolean( p_commit ) THEN
1195: COMMIT WORK;
1196: END IF;
1197: -- Standard call to get message count and if count is 1,
1198: -- get message info.

Line 1205: WHEN FND_API.G_EXC_ERROR THEN

1201: p_data => x_msg_data
1202: );
1203:
1204: EXCEPTION
1205: WHEN FND_API.G_EXC_ERROR THEN
1206: ROLLBACK TO Get_Outermost_LPN_PUB;
1207: x_return_status := FND_API.G_RET_STS_ERROR;
1208: FND_MSG_PUB.Count_And_Get
1209: ( p_count => x_msg_count,

Line 1207: x_return_status := FND_API.G_RET_STS_ERROR;

1203:
1204: EXCEPTION
1205: WHEN FND_API.G_EXC_ERROR THEN
1206: ROLLBACK TO Get_Outermost_LPN_PUB;
1207: x_return_status := FND_API.G_RET_STS_ERROR;
1208: FND_MSG_PUB.Count_And_Get
1209: ( p_count => x_msg_count,
1210: p_data => x_msg_data
1211: );

Line 1212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1208: FND_MSG_PUB.Count_And_Get
1209: ( p_count => x_msg_count,
1210: p_data => x_msg_data
1211: );
1212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1213: ROLLBACK TO Get_Outermost_LPN_PUB;
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1215: FND_MSG_PUB.Count_And_Get
1216: ( p_count => x_msg_count,

Line 1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1210: p_data => x_msg_data
1211: );
1212: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1213: ROLLBACK TO Get_Outermost_LPN_PUB;
1214: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1215: FND_MSG_PUB.Count_And_Get
1216: ( p_count => x_msg_count,
1217: p_data => x_msg_data
1218: );

Line 1222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1218: );
1219: WHEN OTHERS THEN
1220: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
1221: ROLLBACK TO Get_Outermost_LPN_PUB;
1222: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1223: IF FND_MSG_PUB.Check_Msg_Level
1224: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1225: THEN
1226: FND_MSG_PUB.Add_Exc_Msg

Line 1244: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,

1240: -- ----------------------------------------------------------------------------------
1241: -- ----------------------------------------------------------------------------------
1242: PROCEDURE Get_LPN_List
1243: ( p_api_version IN NUMBER ,
1244: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
1245: p_commit IN VARCHAR2 := fnd_api.g_false ,
1246: x_return_status OUT VARCHAR2 ,
1247: x_msg_count OUT NUMBER ,
1248: x_msg_data OUT VARCHAR2 ,

Line 1245: p_commit IN VARCHAR2 := fnd_api.g_false ,

1241: -- ----------------------------------------------------------------------------------
1242: PROCEDURE Get_LPN_List
1243: ( p_api_version IN NUMBER ,
1244: p_init_msg_list IN VARCHAR2 := fnd_api.g_false ,
1245: p_commit IN VARCHAR2 := fnd_api.g_false ,
1246: x_return_status OUT VARCHAR2 ,
1247: x_msg_count OUT NUMBER ,
1248: x_msg_data OUT VARCHAR2 ,
1249: p_lpn_context IN NUMBER := NULL ,

Line 1293: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

1289: BEGIN
1290: -- Standard Start of API savepoint
1291: SAVEPOINT Get_LPN_List_PUB;
1292: -- Standard call to check for call compatibility.
1293: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
1294: p_api_version ,
1295: l_api_name ,
1296: G_PKG_NAME )
1297: THEN

Line 1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1296: G_PKG_NAME )
1297: THEN
1298: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
1299: FND_MSG_PUB.ADD;
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;
1302: -- Initialize message list if p_init_msg_list is set to TRUE.
1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1304: FND_MSG_PUB.initialize;

Line 1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1299: FND_MSG_PUB.ADD;
1300: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1301: END IF;
1302: -- Initialize message list if p_init_msg_list is set to TRUE.
1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1304: FND_MSG_PUB.initialize;
1305: END IF;
1306: -- Initialize API return status to success
1307: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1307: x_return_status := FND_API.G_RET_STS_SUCCESS;

1303: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1304: FND_MSG_PUB.initialize;
1305: END IF;
1306: -- Initialize API return status to success
1307: x_return_status := FND_API.G_RET_STS_SUCCESS;
1308:
1309: -- API body
1310: /* Validate all inputs */
1311:

Line 1318: RAISE FND_API.G_EXC_ERROR;

1314: l_result := INV_Validate.Organization(l_org);
1315: IF (l_result = INV_Validate.F) THEN
1316: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INVALID_ORG');
1317: FND_MSG_PUB.ADD;
1318: RAISE FND_API.G_EXC_ERROR;
1319: END IF;
1320: /* End of input validation */
1321:
1322: -- First we need to get all of the LPN's which store the given

Line 1448: IF FND_API.To_Boolean( p_commit ) THEN

1444: END IF;
1445: -- End of API body
1446:
1447: -- Standard check of p_commit.
1448: IF FND_API.To_Boolean( p_commit ) THEN
1449: COMMIT WORK;
1450: END IF;
1451: -- Standard call to get message count and if count is 1,
1452: -- get message info.

Line 1459: WHEN FND_API.G_EXC_ERROR THEN

1455: p_data => x_msg_data
1456: );
1457:
1458: EXCEPTION
1459: WHEN FND_API.G_EXC_ERROR THEN
1460: ROLLBACK TO Get_LPN_List_PUB;
1461: x_return_status := FND_API.G_RET_STS_ERROR;
1462: FND_MSG_PUB.Count_And_Get
1463: ( p_count => x_msg_count,

Line 1461: x_return_status := FND_API.G_RET_STS_ERROR;

1457:
1458: EXCEPTION
1459: WHEN FND_API.G_EXC_ERROR THEN
1460: ROLLBACK TO Get_LPN_List_PUB;
1461: x_return_status := FND_API.G_RET_STS_ERROR;
1462: FND_MSG_PUB.Count_And_Get
1463: ( p_count => x_msg_count,
1464: p_data => x_msg_data
1465: );

Line 1466: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1462: FND_MSG_PUB.Count_And_Get
1463: ( p_count => x_msg_count,
1464: p_data => x_msg_data
1465: );
1466: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1467: ROLLBACK TO Get_LPN_List_PUB;
1468: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1469: FND_MSG_PUB.Count_And_Get
1470: ( p_count => x_msg_count,

Line 1468: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1464: p_data => x_msg_data
1465: );
1466: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1467: ROLLBACK TO Get_LPN_List_PUB;
1468: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1469: FND_MSG_PUB.Count_And_Get
1470: ( p_count => x_msg_count,
1471: p_data => x_msg_data
1472: );

Line 1476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1472: );
1473: WHEN OTHERS THEN
1474: DBMS_SQL.CLOSE_CURSOR(l_CursorID);
1475: ROLLBACK TO Get_LPN_List_PUB;
1476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1477: IF FND_MSG_PUB.Check_Msg_Level
1478: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1479: THEN
1480: FND_MSG_PUB.Add_Exc_Msg

Line 1498: p_init_msg_lst IN VARCHAR2 := fnd_api.g_false ,

1494: -- ----------------------------------------------------------------------------------
1495: -- ----------------------------------------------------------------------------------
1496: FUNCTION validate_pick_drop_lpn
1497: ( p_api_version_number IN NUMBER ,
1498: p_init_msg_lst IN VARCHAR2 := fnd_api.g_false ,
1499: p_pick_lpn_id IN NUMBER ,
1500: p_organization_id IN NUMBER ,
1501: p_drop_lpn IN VARCHAR2,
1502: p_drop_sub IN VARCHAR2,

Line 1512: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

1508: l_dummy VARCHAR2(1) := NULL;
1509:
1510: l_api_version_number CONSTANT NUMBER := 1.0;
1511: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Pick_Drop_Lpn';
1512: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
1513:
1514: l_drop_lpn_exists BOOLEAN := FALSE;
1515: l_drop_lpn_has_picked_inv BOOLEAN := FALSE;
1516: l_pick_lpn_delivery_id NUMBER := NULL;

Line 1570: l_return_status := FND_API.G_RET_STS_SUCCESS;

1566:
1567: --
1568: -- Initialize API return status to success
1569: --
1570: l_return_status := FND_API.G_RET_STS_SUCCESS;
1571: l_delivery_match_flag := -1;
1572:
1573: --
1574: -- Begin validation process:

Line 1706: IF l_return_status =FND_API.g_ret_sts_success THEN

1702: RETURN 1;
1703:
1704: END IF;
1705:
1706: IF l_return_status =FND_API.g_ret_sts_success THEN
1707: RETURN 1;
1708: ELSE
1709: RETURN 0;
1710: END IF;

Line 1713: WHEN fnd_api.g_exc_error THEN

1709: RETURN 0;
1710: END IF;
1711:
1712: EXCEPTION
1713: WHEN fnd_api.g_exc_error THEN
1714:
1715: RETURN 0;
1716:
1717: WHEN OTHERS THEN

Line 1727: p_init_msg_lst IN VARCHAR2 := fnd_api.g_false ,

1723: -- ----------------------------------------------------------------------------------
1724: -- ----------------------------------------------------------------------------------
1725: PROCEDURE validate_pick_drop_lpn
1726: ( p_api_version_number IN NUMBER ,
1727: p_init_msg_lst IN VARCHAR2 := fnd_api.g_false ,
1728: x_return_status OUT VARCHAR2 ,
1729: x_msg_count OUT NUMBER ,
1730: x_msg_data OUT VARCHAR2 ,
1731: p_pick_lpn_id IN NUMBER ,

Line 1739: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;

1735: l_dummy VARCHAR2(1) := NULL;
1736:
1737: l_api_version_number CONSTANT NUMBER := 1.0;
1738: l_api_name CONSTANT VARCHAR2(30) := 'Validate_Pick_Drop_Lpn';
1739: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
1740:
1741: l_drop_lpn_exists BOOLEAN := FALSE;
1742: l_drop_lpn_has_picked_inv BOOLEAN := FALSE;
1743: l_pick_lpn_delivery_id NUMBER := NULL;

Line 1806: IF NOT fnd_api.compatible_api_call(l_api_version_number

1802:
1803: --
1804: -- Standard call to check for call compatibility
1805: --
1806: IF NOT fnd_api.compatible_api_call(l_api_version_number
1807: , p_api_version_number
1808: , l_api_name
1809: , G_PKG_NAME
1810: ) THEN

Line 1813: RAISE FND_API.G_EXC_ERROR;

1809: , G_PKG_NAME
1810: ) THEN
1811: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
1812: FND_MSG_PUB.ADD;
1813: RAISE FND_API.G_EXC_ERROR;
1814: END IF;
1815:
1816: --
1817: -- Initialize message list.

Line 1819: IF fnd_api.to_boolean(p_init_msg_lst) THEN

1815:
1816: --
1817: -- Initialize message list.
1818: --
1819: IF fnd_api.to_boolean(p_init_msg_lst) THEN
1820: fnd_msg_pub.initialize;
1821: END IF;
1822:
1823: --

Line 1826: x_return_status := FND_API.G_RET_STS_SUCCESS;

1822:
1823: --
1824: -- Initialize API return status to success
1825: --
1826: x_return_status := FND_API.G_RET_STS_SUCCESS;
1827:
1828: --
1829: -- Begin validation process:
1830: -- Check if drop lpn exists by trying to retrieve

Line 1875: RAISE FND_API.G_EXC_ERROR;

1871: mdebug ('Drop LPN cannot be the picked LPN.');
1872: END IF;
1873: FND_MESSAGE.SET_NAME('WMS', 'WMS_PICK_LPN_INVLD_DROP_LPN');
1874: FND_MSG_PUB.ADD;
1875: RAISE FND_API.G_EXC_ERROR;
1876: END IF;
1877:
1878: --
1879: -- Make sure the drop LPN or one of its child LPNs

Line 1932: RAISE FND_API.G_EXC_ERROR;

1928: mdebug('Drop LPN does not have child LPNs with picked inventory.');
1929: END IF;
1930: FND_MESSAGE.SET_NAME('WMS', 'WMS_DROP_LPN_NOT_PICKED');
1931: FND_MSG_PUB.ADD;
1932: RAISE FND_API.G_EXC_ERROR;
1933: END IF;
1934: END IF;
1935:
1936: --

Line 1972: RAISE FND_API.G_EXC_ERROR;

1968: mdebug('Picked and drop LPNs are on different deliveries.');
1969: END IF;
1970: FND_MESSAGE.SET_NAME('WMS', 'WMS_DROP_LPN_DIFF_DELIV');
1971: FND_MSG_PUB.ADD;
1972: RAISE FND_API.G_EXC_ERROR;
1973: ELSE
1974: --
1975: -- Drop LPN and picked LPN are on the same delivery
1976: -- return success

Line 2011: RAISE FND_API.G_EXC_ERROR;

2007: mdebug('LPNs are on diff deliveries.');
2008: END IF;
2009: FND_MESSAGE.SET_NAME('WMS', 'WMS_DROP_LPN_DIFF_DELIV');
2010: FND_MSG_PUB.ADD;
2011: RAISE FND_API.G_EXC_ERROR;
2012: ELSE
2013: --
2014: -- Drop LPN has a child LPN that is assigned to the
2015: -- same delivery as the picked LPN, return success

Line 2035: WHEN fnd_api.g_exc_error THEN

2031: END IF;
2032: END IF;
2033:
2034: EXCEPTION
2035: WHEN fnd_api.g_exc_error THEN
2036: x_return_status := fnd_api.g_ret_sts_error;
2037:
2038: -- Get message count and data
2039: fnd_msg_pub.count_and_get

Line 2036: x_return_status := fnd_api.g_ret_sts_error;

2032: END IF;
2033:
2034: EXCEPTION
2035: WHEN fnd_api.g_exc_error THEN
2036: x_return_status := fnd_api.g_ret_sts_error;
2037:
2038: -- Get message count and data
2039: fnd_msg_pub.count_and_get
2040: ( p_count => x_msg_count

Line 2048: x_return_status := fnd_api.g_ret_sts_unexp_error ;

2044: mdebug ('@'||x_msg_data||'@');
2045: END IF;
2046:
2047: WHEN OTHERS THEN
2048: x_return_status := fnd_api.g_ret_sts_unexp_error ;
2049:
2050: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error)
2051: THEN
2052: fnd_msg_pub.add_exc_msg

Line 2072: p_init_msg_lst IN VARCHAR2 := fnd_api.g_false ,

2068: */
2069:
2070: Procedure default_pick_drop_lpn
2071: ( p_api_version_number IN NUMBER ,
2072: p_init_msg_lst IN VARCHAR2 := fnd_api.g_false ,
2073: p_pick_lpn_id IN NUMBER ,
2074: p_organization_id IN NUMBER ,
2075: x_lpn_number OUT VARCHAR2)
2076:

Line 2083: fnd_api.g_ret_sts_success;

2079: l_api_version_number CONSTANT NUMBER := 1.0;
2080: l_api_name CONSTANT VARCHAR2(30) :=
2081: 'default_pick_drop_lpn';
2082: l_return_status VARCHAR2(1) :=
2083: fnd_api.g_ret_sts_success;
2084: l_delivery_id NUMBER;
2085: l_drop_sub VARCHAR2(10);
2086: l_drop_loc NUMBER;
2087: l_lpn_id NUMBER;

Line 2125: IF NOT fnd_api.compatible_api_call (l_api_version_number

2121: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2122: BEGIN
2123:
2124:
2125: IF NOT fnd_api.compatible_api_call (l_api_version_number
2126: , p_api_version_number
2127: , l_api_name
2128: , G_PKG_NAME
2129: ) THEN

Line 2132: RAISE FND_API.G_EXC_ERROR;

2128: , G_PKG_NAME
2129: ) THEN
2130: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
2131: FND_MSG_PUB.ADD;
2132: RAISE FND_API.G_EXC_ERROR;
2133: END IF;
2134:
2135:
2136: l_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2136: l_return_status := FND_API.G_RET_STS_SUCCESS;

2132: RAISE FND_API.G_EXC_ERROR;
2133: END IF;
2134:
2135:
2136: l_return_status := FND_API.G_RET_STS_SUCCESS;
2137: --
2138: -- Initialize message list.
2139: --
2140:

Line 2141: IF fnd_api.to_boolean(p_init_msg_lst) THEN

2137: --
2138: -- Initialize message list.
2139: --
2140:
2141: IF fnd_api.to_boolean(p_init_msg_lst) THEN
2142: fnd_msg_pub.initialize;
2143: END IF;
2144:
2145: