438:
439: -- initialize message list if p_init_msg_list is set to TRUE.
440:
441: IF FND_API.to_boolean( p_init_msg_list ) THEN
442: FND_MSG_PUB.initialize;
443: END IF;
444:
445: -- initialize API return status to success
446: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
484: EXCEPTION
485:
486: WHEN FND_API.g_exc_error THEN
487: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
488: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
489: p_data => x_msg_data );
490: --
491: -- Debug Statements
492: --
498: RETURN null;
499:
500: WHEN FND_API.g_exc_unexpected_error THEN
501: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
502: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
503: p_data => x_msg_data );
504: --
505: -- Debug Statements
506: --
622: END IF;
623:
624: -- initialize message list if p_init_msg_list is set to TRUE.
625: IF FND_API.to_boolean( p_init_msg_list ) THEN
626: FND_MSG_PUB.initialize;
627: END IF;
628:
629: -- initialize API return status to success
630: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
657: EXCEPTION
658:
659: WHEN FND_API.g_exc_error THEN
660: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
661: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
662: p_data => x_msg_data );
663: --
664: -- Debug Statements
665: --
671: RETURN null;
672:
673: WHEN FND_API.g_exc_unexpected_error THEN
674: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
675: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
676: p_data => x_msg_data );
677: --
678: -- Debug Statements
679: --
797: END IF;
798:
799: -- initialize message list if p_init_msg_list is set to TRUE.
800: IF FND_API.to_boolean( p_init_msg_list ) THEN
801: FND_MSG_PUB.initialize;
802: END IF;
803:
804: -- initialize API return status to success
805: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
815: AND doc.entity_name='WSH_NEW_DELIVERIES'
816: AND doc.document_type=p_document_type;
817:
818: -- get message count and the message itself (if only one message)
819: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
820: p_data => x_msg_data);
821:
822: -- Standard check of p_commit.
823: IF FND_API.to_boolean( p_commit ) THEN
836: WHEN FND_API.g_exc_error THEN
837:
838: ROLLBACK to WSH_Document_PVT;
839: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
840: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
841: p_data => x_msg_data );
842:
843: --
844: -- Debug Statements
851: WHEN FND_API.g_exc_unexpected_error THEN
852:
853: ROLLBACK to WSH_Document_PVT;
854: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
855: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
856: p_data => x_msg_data );
857: --
858: -- Debug Statements
859: --
870: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
871: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
872: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
873: WSH_UTIL_CORE.add_message (x_return_status);
874: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
875: p_data => x_msg_data );
876:
877: --
878: -- Debug Statements
1158:
1159: -- initialize message list if p_init_msg_list is set to TRUE.
1160:
1161: IF FND_API.to_boolean( p_init_msg_list ) THEN
1162: FND_MSG_PUB.initialize;
1163: END IF;
1164:
1165: -- initialize API return status to success
1166: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
1657: );
1658: END IF;--for l_entity_name <> 'WSH_TRIPS'
1659:
1660: -- get message count and the message itself (if only one message)
1661: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
1662: p_data => x_msg_data);
1663:
1664: -- Standard check of p_commit.
1665: IF FND_API.to_boolean( p_commit ) THEN
1692: FND_MESSAGE.SET_TOKEN('DEL_NAME',l_delivery_name);
1693: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
1694: wsh_util_core.add_message(WSH_UTIL_CORE.g_ret_sts_error,l_module_name);
1695:
1696: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
1697: p_data => x_msg_data );
1698: IF l_debug_on THEN
1699: WSH_DEBUG_SV.logmsg(l_module_name,'Cannot lock delivery leg for update');
1700: END IF;
1706: END IF;
1707:
1708: ROLLBACK to WSH_Document_PVT;
1709: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
1710: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
1711: p_data => x_msg_data );
1712: --
1713: -- Debug Statements
1714: --
1724: END IF;
1725:
1726: ROLLBACK to WSH_Document_PVT;
1727: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
1728: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
1729: p_data => x_msg_data );
1730: --
1731: -- Debug Statements
1732: --
1747: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
1748: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
1749: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
1750: WSH_UTIL_CORE.add_message (x_return_status);
1751: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
1752: p_data => x_msg_data );
1753:
1754: --
1755: -- Debug Statements
1933:
1934: -- initialize message list if p_init_msg_list is set to TRUE.
1935:
1936: IF FND_API.to_boolean( p_init_msg_list ) THEN
1937: FND_MSG_PUB.initialize;
1938: END IF;
1939:
1940: -- initialize API return status to success
1941: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
2050: CLOSE old_values_csr;
2051: END IF;
2052:
2053: -- get message count and the message itself (if only one message)
2054: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2055: p_data => x_msg_data);
2056: -- Standard check of p_commit.
2057: IF FND_API.to_boolean( p_commit ) THEN
2058: COMMIT WORK;
2068:
2069: WHEN FND_API.g_exc_error THEN
2070: ROLLBACK to WSH_Document_PVT;
2071: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
2072: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2073: p_data => x_msg_data );
2074:
2075: --
2076: -- Debug Statements
2082: --
2083: WHEN FND_API.g_exc_unexpected_error THEN
2084: ROLLBACK to WSH_Document_PVT;
2085: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
2086: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2087: p_data => x_msg_data );
2088:
2089: --
2090: -- Debug Statements
2101: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
2102: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
2103: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
2104: WSH_UTIL_CORE.add_message (x_return_status);
2105: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2106: p_data => x_msg_data );
2107: --
2108: -- Debug Statements
2109: --
2255:
2256: -- initialize message list if p_init_msg_list is set to TRUE.
2257:
2258: IF FND_API.to_boolean( p_init_msg_list ) THEN
2259: FND_MSG_PUB.initialize;
2260: END IF;
2261:
2262: -- initialize API return status to success
2263: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
2378: AND status in ('OPEN', 'PLANNED');
2379:
2380: END IF;
2381: -- get message count and the message itself (if only one message)
2382: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2383: p_data => x_msg_data);
2384: -- Standard check of p_commit.
2385: IF FND_API.to_boolean( p_commit ) THEN
2386: COMMIT WORK;
2396:
2397: WHEN FND_API.g_exc_error THEN
2398: ROLLBACK to WSH_Document_PVT;
2399: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
2400: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2401: p_data => x_msg_data );
2402:
2403: --
2404: -- Debug Statements
2410: --
2411: WHEN FND_API.g_exc_unexpected_error THEN
2412: ROLLBACK to WSH_Document_PVT;
2413: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
2414: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2415: p_data => x_msg_data );
2416:
2417: --
2418: -- Debug Statements
2429: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
2430: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
2431: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
2432: WSH_UTIL_CORE.add_message (x_return_status);
2433: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2434: p_data => x_msg_data );
2435: --
2436: -- Debug Statements
2437: --
2574:
2575: -- initialize message list if p_init_msg_list is set to TRUE.
2576:
2577: IF FND_API.to_boolean( p_init_msg_list ) THEN
2578: FND_MSG_PUB.initialize;
2579: END IF;
2580:
2581: -- initialize API return status to success
2582: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
2681: CLOSE status_csr;
2682: END IF;
2683:
2684: -- get message count and the message itself (if only one message)
2685: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2686: p_data => x_msg_data);
2687: -- Standard check of p_commit.
2688: IF FND_API.to_boolean( p_commit ) THEN
2689: COMMIT WORK;
2699:
2700: WHEN FND_API.g_exc_error THEN
2701: ROLLBACK to WSH_Document_PVT;
2702: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
2703: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2704: p_data => x_msg_data );
2705:
2706: --
2707: -- Debug Statements
2713: --
2714: WHEN FND_API.g_exc_unexpected_error THEN
2715: ROLLBACK to WSH_Document_PVT;
2716: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
2717: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2718: p_data => x_msg_data );
2719:
2720: --
2721: -- Debug Statements
2732: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
2733: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
2734: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
2735: WSH_UTIL_CORE.add_message (x_return_status);
2736: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
2737: p_data => x_msg_data );
2738: --
2739: -- Debug Statements
2740: --
2878:
2879: -- initialize message list if p_init_msg_list is set to TRUE.
2880:
2881: IF FND_API.to_boolean( p_init_msg_list ) THEN
2882: FND_MSG_PUB.initialize;
2883: END IF;
2884:
2885: -- initialize API return status to success
2886: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
2985: CLOSE status_csr;
2986: END IF;
2987:
2988: -- get message count and the message itself (if only one message)
2989: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
2990: p_data => x_msg_data);
2991: -- Standard check of p_commit.
2992: IF FND_API.to_boolean( p_commit ) THEN
2993: COMMIT WORK;
3003:
3004: WHEN FND_API.g_exc_error THEN
3005: ROLLBACK to WSH_Document_PVT;
3006: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
3007: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3008: p_data => x_msg_data );
3009:
3010: --
3011: -- Debug Statements
3017: --
3018: WHEN FND_API.g_exc_unexpected_error THEN
3019: ROLLBACK to WSH_Document_PVT;
3020: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3021: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3022: p_data => x_msg_data );
3023:
3024: --
3025: -- Debug Statements
3036: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
3037: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
3038: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3039: WSH_UTIL_CORE.add_message (x_return_status);
3040: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3041: p_data => x_msg_data );
3042: --
3043: -- Debug Statements
3044: --
3164:
3165: -- initialize message list if p_init_msg_list is set to TRUE.
3166:
3167: IF FND_API.to_boolean( p_init_msg_list ) THEN
3168: FND_MSG_PUB.initialize;
3169: END IF;
3170:
3171: -- initialize API return status to success
3172: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
3203:
3204: x_conc_request_id := l_conc_request_id;
3205:
3206: -- get message count and the message itself (if only one message)
3207: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3208: p_data => x_msg_data);
3209:
3210: --
3211: -- Debug Statements
3218: EXCEPTION
3219:
3220: WHEN FND_API.g_exc_error THEN
3221: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
3222: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3223: p_data => x_msg_data );
3224:
3225: --
3226: -- Debug Statements
3231: END IF;
3232: --
3233: WHEN FND_API.g_exc_unexpected_error THEN
3234: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3235: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3236: p_data => x_msg_data );
3237: --
3238: -- Debug Statements
3239: --
3248: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
3249: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
3250: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3251: WSH_UTIL_CORE.add_message (x_return_status);
3252: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3253: p_data => x_msg_data );
3254: --
3255: -- Debug Statements
3256: --
3364: END IF;
3365:
3366: -- initialize message list if p_init_msg_list is set to TRUE.
3367: IF FND_API.to_boolean( p_init_msg_list ) THEN
3368: FND_MSG_PUB.initialize;
3369: END IF;
3370:
3371: -- initialize API return status to success
3372: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
3485: EXCEPTION
3486:
3487: WHEN FND_API.g_exc_error THEN
3488: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
3489: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3490: p_data => x_msg_data );
3491: --
3492: -- Debug Statements
3493: --
3499: RETURN null;
3500:
3501: WHEN FND_API.g_exc_unexpected_error THEN
3502: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3503: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3504: p_data => x_msg_data );
3505: --
3506: -- Debug Statements
3507: --
3618: END IF;
3619:
3620: -- initialize message list if p_init_msg_list is set to TRUE.
3621: IF FND_API.to_boolean( p_init_msg_list ) THEN
3622: FND_MSG_PUB.initialize;
3623: END IF;
3624:
3625: -- initialize API return status to success
3626: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
3634: WHERE entity_name = p_entity_name
3635: AND entity_id = p_entity_id;
3636:
3637: -- get message count and the message itself (if only one message)
3638: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3639: p_data => x_msg_data);
3640: -- Standard check of p_commit.
3641: IF FND_API.to_boolean( p_commit ) THEN
3642: COMMIT WORK;
3652:
3653: WHEN FND_API.g_exc_error THEN
3654: ROLLBACK to WSH_Document_PVT;
3655: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
3656: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3657: p_data => x_msg_data );
3658:
3659: --
3660: -- Debug Statements
3666: --
3667: WHEN FND_API.g_exc_unexpected_error THEN
3668: ROLLBACK to WSH_Document_PVT;
3669: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3670: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3671: p_data => x_msg_data );
3672:
3673: --
3674: -- Debug Statements
3685: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
3686: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
3687: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3688: WSH_UTIL_CORE.add_message (x_return_status);
3689: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3690: p_data => x_msg_data );
3691: --
3692: -- Debug Statements
3693: --
3822: END IF;
3823:
3824: -- initialize message list if p_init_msg_list is set to TRUE.
3825: IF FND_API.to_boolean( p_init_msg_list ) THEN
3826: FND_MSG_PUB.initialize;
3827: END IF;
3828:
3829: -- initialize API return status to success
3830: x_return_status := WSH_UTIL_CORE.g_ret_sts_success;
3881: i := i + 1;
3882: END LOOP;
3883:
3884: -- get message count and the message itself (if only one message)
3885: FND_MSG_PUB.count_and_get (p_count => x_msg_count,
3886: p_data => x_msg_data);
3887: -- Standard check of p_commit.
3888: IF FND_API.to_boolean( p_commit ) THEN
3889: COMMIT WORK;
3899: EXCEPTION
3900:
3901: WHEN FND_API.g_exc_error THEN
3902: x_return_status := WSH_UTIL_CORE.g_ret_sts_error;
3903: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3904: p_data => x_msg_data );
3905:
3906: --
3907: -- Debug Statements
3912: END IF;
3913: --
3914: WHEN FND_API.g_exc_unexpected_error THEN
3915: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3916: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3917: p_data => x_msg_data );
3918:
3919: --
3920: -- Debug Statements
3930: FND_MESSAGE.set_token ('ORA_ERROR',to_char(sqlcode));
3931: FND_MESSAGE.set_token ('ORA_TEXT','Failure in performing action');
3932: x_return_status := WSH_UTIL_CORE.g_ret_sts_unexp_error;
3933: WSH_UTIL_CORE.add_message (x_return_status);
3934: FND_MSG_PUB.count_and_get ( p_count => x_msg_count,
3935: p_data => x_msg_data );
3936: --
3937: -- Debug Statements
3938: --