31: -- It will do some basic validations on the the input parameters
32:
33: --
34: -- PARAMETERS : p_api_version_number known api version number
35: -- p_init_msg_list FND_API.G_TRUE to reset list
36: -- p_commit FND_API.G_TRUE to perform a commit
37: -- x_return_status return status
38: -- x_msg_count number of messages in the list
39: -- x_msg_data text of messages
32:
33: --
34: -- PARAMETERS : p_api_version_number known api version number
35: -- p_init_msg_list FND_API.G_TRUE to reset list
36: -- p_commit FND_API.G_TRUE to perform a commit
37: -- x_return_status return status
38: -- x_msg_count number of messages in the list
39: -- x_msg_data text of messages
40: -- p_rule_id Pick Release Rule Id --For Defaulting purpose
211: WSH_DEBUG_SV.logmsg(l_module_name,'************************************************************************');
212: --}
213: END IF;
214:
215: IF NOT FND_API.compatible_api_call( l_api_version,
216: p_api_version,
217: l_api_name,
218: G_PKG_NAME) THEN
219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
215: IF NOT FND_API.compatible_api_call( l_api_version,
216: p_api_version,
217: l_api_name,
218: G_PKG_NAME) THEN
219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
220: END IF;
221:
222: -- Check p_init_msg_list
223: IF FND_API.to_boolean(p_init_msg_list) THEN
219: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
220: END IF;
221:
222: -- Check p_init_msg_list
223: IF FND_API.to_boolean(p_init_msg_list) THEN
224: --{
225: FND_MSG_PUB.initialize;
226: --}
227: END IF;
323: --}
324: END IF;
325:
326:
327: IF FND_API.TO_BOOLEAN(p_commit) THEN
328: --{
329: COMMIT WORK;
330: --}
331: END IF;
333: FND_MSG_PUB.Count_And_Get
334: (
335: p_count => x_msg_count,
336: p_data => x_msg_data,
337: p_encoded => FND_API.G_FALSE
338: );
339:
340: IF l_debug_on THEN
341: --{
345: --
346:
347:
348: EXCEPTION
349: WHEN FND_API.G_EXC_ERROR THEN
350: ROLLBACK TO PICKING_BATCH_PUB;
351: x_return_status := FND_API.G_RET_STS_ERROR ;
352: wsh_util_core.add_message(x_return_status);
353: FND_MSG_PUB.Count_And_Get
347:
348: EXCEPTION
349: WHEN FND_API.G_EXC_ERROR THEN
350: ROLLBACK TO PICKING_BATCH_PUB;
351: x_return_status := FND_API.G_RET_STS_ERROR ;
352: wsh_util_core.add_message(x_return_status);
353: FND_MSG_PUB.Count_And_Get
354: (
355: p_count => x_msg_count,
353: FND_MSG_PUB.Count_And_Get
354: (
355: p_count => x_msg_count,
356: p_data => x_msg_data,
357: p_encoded => FND_API.G_FALSE
358: );
359:
360: IF l_debug_on THEN
361: --{
358: );
359:
360: IF l_debug_on THEN
361: --{
362: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
363: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
364: --}
365: END IF;
366: --
359:
360: IF l_debug_on THEN
361: --{
362: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
363: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
364: --}
365: END IF;
366: --
367:
364: --}
365: END IF;
366: --
367:
368: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
369: ROLLBACK TO PICKING_BATCH_PUB;
370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
371: wsh_util_core.add_message(x_return_status, l_module_name);
372: FND_MSG_PUB.Count_And_Get
366: --
367:
368: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
369: ROLLBACK TO PICKING_BATCH_PUB;
370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
371: wsh_util_core.add_message(x_return_status, l_module_name);
372: FND_MSG_PUB.Count_And_Get
373: (
374: p_count => x_msg_count,
372: FND_MSG_PUB.Count_And_Get
373: (
374: p_count => x_msg_count,
375: p_data => x_msg_data,
376: p_encoded => FND_API.G_FALSE
377: );
378: --
379:
380: IF l_debug_on THEN
378: --
379:
380: IF l_debug_on THEN
381: --{
382: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
383: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
384: --}
385: END IF;
386: WHEN OTHERS THEN
379:
380: IF l_debug_on THEN
381: --{
382: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
383: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
384: --}
385: END IF;
386: WHEN OTHERS THEN
387: ROLLBACK TO PICKING_BATCH_PUB;
390: FND_MSG_PUB.Count_And_Get
391: (
392: p_count => x_msg_count,
393: p_data => x_msg_data,
394: p_encoded => FND_API.G_FALSE
395: );
396:
397: IF l_debug_on THEN
398: --{
417: -- It will do some basic validations on the the input parameters
418: -- like log_level should be positive , and on the not null values of p_batch_rec.
419: --
420: -- PARAMETERS : p_api_version_number known api version number
421: -- p_init_msg_list FND_API.G_TRUE to reset list
422: -- p_commit FND_API.G_TRUE to perform a commit
423: -- x_return_status return status
424: -- x_msg_count number of messages in the list
425: -- x_msg_data text of messages
418: -- like log_level should be positive , and on the not null values of p_batch_rec.
419: --
420: -- PARAMETERS : p_api_version_number known api version number
421: -- p_init_msg_list FND_API.G_TRUE to reset list
422: -- p_commit FND_API.G_TRUE to perform a commit
423: -- x_return_status return status
424: -- x_msg_count number of messages in the list
425: -- x_msg_data text of messages
426: -- p_batch_id Picking Batch Id which is used to get Batch
506: WSH_DEBUG_SV.log(l_module_name,'P_LOG_LEVEL',P_LOG_LEVEL);
507: WSH_DEBUG_SV.logmsg(l_module_name,'************************************************************************');
508: --}
509: END IF;
510: IF NOT FND_API.compatible_api_call( l_api_version,
511: p_api_version,
512: l_api_name,
513: G_PKG_NAME) THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
510: IF NOT FND_API.compatible_api_call( l_api_version,
511: p_api_version,
512: l_api_name,
513: G_PKG_NAME) THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
515: END IF;
516:
517: -- Check p_init_msg_list
518: IF FND_API.to_boolean(p_init_msg_list) THEN
514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
515: END IF;
516:
517: -- Check p_init_msg_list
518: IF FND_API.to_boolean(p_init_msg_list) THEN
519: --{
520: FND_MSG_PUB.initialize;
521: --}
522: END IF;
580: --}
581: END IF;
582:
583:
584: IF FND_API.TO_BOOLEAN(p_commit) THEN
585: --{
586: COMMIT WORK;
587: --}
588: END IF;
590: FND_MSG_PUB.Count_And_Get
591: (
592: p_count => x_msg_count,
593: p_data => x_msg_data,
594: p_encoded => FND_API.G_FALSE
595: );
596:
597: IF l_debug_on THEN
598: --{
600: --}
601: END IF;
602: --
603: EXCEPTION
604: WHEN FND_API.G_EXC_ERROR THEN
605: x_return_status := FND_API.G_RET_STS_ERROR ;
606: wsh_util_core.add_message(x_return_status);
607: FND_MSG_PUB.Count_And_Get
608: (
601: END IF;
602: --
603: EXCEPTION
604: WHEN FND_API.G_EXC_ERROR THEN
605: x_return_status := FND_API.G_RET_STS_ERROR ;
606: wsh_util_core.add_message(x_return_status);
607: FND_MSG_PUB.Count_And_Get
608: (
609: p_count => x_msg_count,
607: FND_MSG_PUB.Count_And_Get
608: (
609: p_count => x_msg_count,
610: p_data => x_msg_data,
611: p_encoded => FND_API.G_FALSE
612: );
613:
614: IF l_debug_on THEN
615: --{
612: );
613:
614: IF l_debug_on THEN
615: --{
616: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
617: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
618: --}
619: END IF;
620: --
613:
614: IF l_debug_on THEN
615: --{
616: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
617: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
618: --}
619: END IF;
620: --
621:
618: --}
619: END IF;
620: --
621:
622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
623: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
624: wsh_util_core.add_message(x_return_status, l_module_name);
625: FND_MSG_PUB.Count_And_Get
626: (
619: END IF;
620: --
621:
622: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
623: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
624: wsh_util_core.add_message(x_return_status, l_module_name);
625: FND_MSG_PUB.Count_And_Get
626: (
627: p_count => x_msg_count,
625: FND_MSG_PUB.Count_And_Get
626: (
627: p_count => x_msg_count,
628: p_data => x_msg_data,
629: p_encoded => FND_API.G_FALSE
630: );
631: --
632:
633: IF l_debug_on THEN
631: --
632:
633: IF l_debug_on THEN
634: --{
635: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
636: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
637: --}
638: END IF;
639: WHEN OTHERS THEN
632:
633: IF l_debug_on THEN
634: --{
635: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
636: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
637: --}
638: END IF;
639: WHEN OTHERS THEN
640: wsh_util_core.default_handler('WSH_PICKING_BATCHES_PUB.RELEASE_BATCH');
642: FND_MSG_PUB.Count_And_Get
643: (
644: p_count => x_msg_count,
645: p_data => x_msg_data,
646: p_encoded => FND_API.G_FALSE
647: );
648:
649: IF l_debug_on THEN
650: --{
670: -- the batch record from wsh_picking_batches.
671: -- Note: Non-database attributes will be NULL.
672: --
673: -- PARAMETERS : p_api_version_number known api version number
674: -- p_init_msg_list FND_API.G_TRUE to reset list
675: -- p_commit FND_API.G_TRUE to perform a commit
676: -- x_return_status return status
677: -- x_msg_count number of messages in the list
678: -- x_msg_data text of messages
671: -- Note: Non-database attributes will be NULL.
672: --
673: -- PARAMETERS : p_api_version_number known api version number
674: -- p_init_msg_list FND_API.G_TRUE to reset list
675: -- p_commit FND_API.G_TRUE to perform a commit
676: -- x_return_status return status
677: -- x_msg_count number of messages in the list
678: -- x_msg_data text of messages
679: -- p_batch_id Picking Batch Id which is used to get Batch
833: WSH_DEBUG_SV.log(l_module_name,'P_BATCH_NAME',P_BATCH_NAME);
834: WSH_DEBUG_SV.logmsg(l_module_name,'************************************************************************');
835: --}
836: END IF;
837: IF NOT FND_API.compatible_api_call( l_api_version,
838: p_api_version,
839: l_api_name,
840: G_PKG_NAME) THEN
841: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
837: IF NOT FND_API.compatible_api_call( l_api_version,
838: p_api_version,
839: l_api_name,
840: G_PKG_NAME) THEN
841: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
842: END IF;
843:
844: -- Check p_init_msg_list
845: IF FND_API.to_boolean(p_init_msg_list) THEN
841: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
842: END IF;
843:
844: -- Check p_init_msg_list
845: IF FND_API.to_boolean(p_init_msg_list) THEN
846: --{
847: FND_MSG_PUB.initialize;
848: --}
849: END IF;
854: l_batch_id := p_batch_id;
855: l_batch_name := p_batch_name;
856:
857: -- Validating Batch Name and Batch Id
858: IF ( ( l_batch_Id IS NOT NULL AND l_batch_Id <> FND_API.G_MISS_NUM ) OR ( l_batch_Name IS NOT NULL AND l_batch_name <> FND_API.G_MISS_CHAR ) ) THEN
859: --{
860: IF ( l_batch_Id = FND_API.G_MISS_NUM ) THEN
861: --{
862: l_batch_Id := NULL;
856:
857: -- Validating Batch Name and Batch Id
858: IF ( ( l_batch_Id IS NOT NULL AND l_batch_Id <> FND_API.G_MISS_NUM ) OR ( l_batch_Name IS NOT NULL AND l_batch_name <> FND_API.G_MISS_CHAR ) ) THEN
859: --{
860: IF ( l_batch_Id = FND_API.G_MISS_NUM ) THEN
861: --{
862: l_batch_Id := NULL;
863: --}
864: END IF;
861: --{
862: l_batch_Id := NULL;
863: --}
864: END IF;
865: IF ( l_batch_name = FND_API.G_MISS_CHAR ) THEN
866: --{
867: l_batch_name := NULL;
868: --}
869: END IF;
1001: END IF;
1002:
1003:
1004:
1005: IF FND_API.TO_BOOLEAN(p_commit) THEN
1006: COMMIT WORK;
1007: END IF;
1008:
1009: FND_MSG_PUB.Count_And_Get
1009: FND_MSG_PUB.Count_And_Get
1010: (
1011: p_count => x_msg_count,
1012: p_data => x_msg_data,
1013: p_encoded => FND_API.G_FALSE
1014: );
1015:
1016: IF l_debug_on THEN
1017: WSH_DEBUG_SV.pop(l_module_name);
1017: WSH_DEBUG_SV.pop(l_module_name);
1018: END IF;
1019: --
1020: EXCEPTION
1021: WHEN FND_API.G_EXC_ERROR THEN
1022: IF c_batch_info%ISOPEN THEN
1023: CLOSE c_batch_info;
1024: END IF;
1025: x_return_status := FND_API.G_RET_STS_ERROR ;
1021: WHEN FND_API.G_EXC_ERROR THEN
1022: IF c_batch_info%ISOPEN THEN
1023: CLOSE c_batch_info;
1024: END IF;
1025: x_return_status := FND_API.G_RET_STS_ERROR ;
1026: wsh_util_core.add_message(x_return_status);
1027: FND_MSG_PUB.Count_And_Get
1028: (
1029: p_count => x_msg_count,
1027: FND_MSG_PUB.Count_And_Get
1028: (
1029: p_count => x_msg_count,
1030: p_data => x_msg_data,
1031: p_encoded => FND_API.G_FALSE
1032: );
1033:
1034: IF l_debug_on THEN
1035: --{
1032: );
1033:
1034: IF l_debug_on THEN
1035: --{
1036: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1037: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1038: --}
1039: END IF;
1040: --
1033:
1034: IF l_debug_on THEN
1035: --{
1036: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1037: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_ERROR');
1038: --}
1039: END IF;
1040: --
1041:
1038: --}
1039: END IF;
1040: --
1041:
1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: IF c_batch_info%ISOPEN THEN
1044: CLOSE c_batch_info;
1045: END IF;
1046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1042: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1043: IF c_batch_info%ISOPEN THEN
1044: CLOSE c_batch_info;
1045: END IF;
1046: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1047: wsh_util_core.add_message(x_return_status, l_module_name);
1048: FND_MSG_PUB.Count_And_Get
1049: (
1050: p_count => x_msg_count,
1048: FND_MSG_PUB.Count_And_Get
1049: (
1050: p_count => x_msg_count,
1051: p_data => x_msg_data,
1052: p_encoded => FND_API.G_FALSE
1053: );
1054: --
1055:
1056: IF l_debug_on THEN
1054: --
1055:
1056: IF l_debug_on THEN
1057: --{
1058: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1060: --}
1061: END IF;
1062:
1055:
1056: IF l_debug_on THEN
1057: --{
1058: WSH_DEBUG_SV.logmsg(l_module_name,'FND_API.G_EXC_UNEXPECTED_ERROR exception has occured.',WSH_DEBUG_SV.C_EXCEP_LEVEL);
1059: WSH_DEBUG_SV.pop(l_module_name,'EXCEPTION:FND_API.G_EXC_UNEXPECTED_ERROR');
1060: --}
1061: END IF;
1062:
1063: WHEN OTHERS THEN
1069: FND_MSG_PUB.Count_And_Get
1070: (
1071: p_count => x_msg_count,
1072: p_data => x_msg_data,
1073: p_encoded => FND_API.G_FALSE
1074: );
1075:
1076: IF l_debug_on THEN
1077: --{