110: END IF;
111: EXCEPTION
112: WHEN FND_API.G_EXC_ERROR THEN
113: x_return_status := FND_API.G_RET_STS_ERROR;
114: FND_MSG_Pub.count_and_get
115: ( p_count => x_msg_count
116: , p_data => x_msg_data
117: );
118: debug('save. error exception');
118: debug('save. error exception');
119: WHEN OTHERS THEN
120: debug('save others'||SQLCODE||'.');
121: x_return_status := SQLCODE;
122: FND_MSG_PUB.Add_Exc_Msg ( g_pkg_name
123: , l_api_name
124: );
125: /* Get message count and data */
126: FND_MSG_Pub.count_and_get
122: FND_MSG_PUB.Add_Exc_Msg ( g_pkg_name
123: , l_api_name
124: );
125: /* Get message count and data */
126: FND_MSG_Pub.count_and_get
127: ( p_count => x_msg_count
128: , p_data => x_msg_data
129: );
130: END save;
226: end if;
227: EXCEPTION
228: WHEN FND_API.G_EXC_ERROR THEN
229: x_return_status := FND_API.G_RET_STS_ERROR;
230: FND_MSG_Pub.count_and_get
231: ( p_count => x_msg_count
232: , p_data => x_msg_data
233: );
234: WHEN OTHERS THEN
233: );
234: WHEN OTHERS THEN
235: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
236: x_return_status := SQLCODE;
237: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
238: , l_api_name
239: );
240: /* Get message count and data */
241: FND_MSG_Pub.count_and_get
237: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
238: , l_api_name
239: );
240: /* Get message count and data */
241: FND_MSG_Pub.count_and_get
242: ( p_count => x_msg_count
243: , p_data => x_msg_data
244: );
245: END save_to_mtl_picking_rules;
359:
360: EXCEPTION
361: WHEN FND_API.G_EXC_ERROR THEN
362: x_return_status := FND_API.G_RET_STS_ERROR;
363: FND_MSG_Pub.count_and_get
364: ( p_count => x_msg_count
365: , p_data => x_msg_data
366: );
367: WHEN OTHERS THEN
366: );
367: WHEN OTHERS THEN
368: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
369: x_return_status := SQLCODE;
370: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
371: , l_api_name
372: );
373: /* Get message count and data */
374: FND_MSG_Pub.count_and_get
370: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
371: , l_api_name
372: );
373: /* Get message count and data */
374: FND_MSG_Pub.count_and_get
375: ( p_count => x_msg_count
376: , p_data => x_msg_data
377: );
378: END save_to_wms_rule;
692: END LOOP;
693: EXCEPTION
694: WHEN FND_API.G_EXC_ERROR THEN
695: x_return_status := FND_API.G_RET_STS_ERROR;
696: FND_MSG_Pub.count_and_get
697: ( p_count => x_msg_count
698: , p_data => x_msg_data
699: );
700: WHEN OTHERS THEN
699: );
700: WHEN OTHERS THEN
701: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
702: x_return_status := SQLCODE;
703: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
704: , l_api_name
705: );
706: /* Get message count and data */
707: FND_MSG_Pub.count_and_get
703: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
704: , l_api_name
705: );
706: /* Get message count and data */
707: FND_MSG_Pub.count_and_get
708: ( p_count => x_msg_count
709: , p_data => x_msg_data
710: );
711: END restrictions_insert;
737: );
738: EXCEPTION
739: WHEN FND_API.G_EXC_ERROR THEN
740: x_return_status := FND_API.G_RET_STS_ERROR;
741: FND_MSG_Pub.count_and_get
742: ( p_count => x_msg_count
743: , p_data => x_msg_data
744: );
745: WHEN OTHERS THEN
744: );
745: WHEN OTHERS THEN
746: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
747: x_return_status := SQLCODE;
748: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
749: , l_api_name
750: );
751: /* Get message count and data */
752: FND_MSG_Pub.count_and_get
748: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
749: , l_api_name
750: );
751: /* Get message count and data */
752: FND_MSG_Pub.count_and_get
753: ( p_count => x_msg_count
754: , p_data => x_msg_data
755: );
756: END restrictions_update;
767: Delete wms_restrictions where rule_id = p_mtl_picking_rule_rec.wms_rule_id;
768: EXCEPTION
769: WHEN FND_API.G_EXC_ERROR THEN
770: x_return_status := FND_API.G_RET_STS_ERROR;
771: FND_MSG_Pub.count_and_get
772: ( p_count => x_msg_count
773: , p_data => x_msg_data
774: );
775: WHEN OTHERS THEN
774: );
775: WHEN OTHERS THEN
776: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
777: x_return_status := SQLCODE;
778: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
779: , l_api_name
780: );
781: /* Get message count and data */
782: FND_MSG_Pub.count_and_get
778: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
779: , l_api_name
780: );
781: /* Get message count and data */
782: FND_MSG_Pub.count_and_get
783: ( p_count => x_msg_count
784: , p_data => x_msg_data
785: );
786: END restrictions_delete;
836: end if;
837: EXCEPTION
838: WHEN FND_API.G_EXC_ERROR THEN
839: x_return_status := FND_API.G_RET_STS_ERROR;
840: FND_MSG_Pub.count_and_get
841: ( p_count => x_msg_count
842: , p_data => x_msg_data
843: );
844: WHEN OTHERS THEN
843: );
844: WHEN OTHERS THEN
845: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
846: x_return_status := SQLCODE;
847: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
848: , l_api_name
849: );
850: /* Get message count and data */
851: FND_MSG_Pub.count_and_get
847: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
848: , l_api_name
849: );
850: /* Get message count and data */
851: FND_MSG_Pub.count_and_get
852: ( p_count => x_msg_count
853: , p_data => x_msg_data
854: );
855: END consistency_insert;
878: );
879: EXCEPTION
880: WHEN FND_API.G_EXC_ERROR THEN
881: x_return_status := FND_API.G_RET_STS_ERROR;
882: FND_MSG_Pub.count_and_get
883: ( p_count => x_msg_count
884: , p_data => x_msg_data
885: );
886: WHEN OTHERS THEN
885: );
886: WHEN OTHERS THEN
887: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
888: x_return_status := SQLCODE;
889: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
890: , l_api_name
891: );
892: /* Get message count and data */
893: FND_MSG_Pub.count_and_get
889: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
890: , l_api_name
891: );
892: /* Get message count and data */
893: FND_MSG_Pub.count_and_get
894: ( p_count => x_msg_count
895: , p_data => x_msg_data
896: );
897: END consistency_update;
909: Delete wms_rule_consistencies where rule_id = p_mtl_picking_Rule_rec.wms_rule_id;
910: EXCEPTION
911: WHEN FND_API.G_EXC_ERROR THEN
912: x_return_status := FND_API.G_RET_STS_ERROR;
913: FND_MSG_Pub.count_and_get
914: ( p_count => x_msg_count
915: , p_data => x_msg_data
916: );
917: WHEN OTHERS THEN
916: );
917: WHEN OTHERS THEN
918: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
919: x_return_status := SQLCODE;
920: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
921: , l_api_name
922: );
923: /* Get message count and data */
924: FND_MSG_Pub.count_and_get
920: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
921: , l_api_name
922: );
923: /* Get message count and data */
924: FND_MSG_Pub.count_and_get
925: ( p_count => x_msg_count
926: , p_data => x_msg_data
927: );
928: END consistency_delete;
1069: END LOOP;
1070: EXCEPTION
1071: WHEN FND_API.G_EXC_ERROR THEN
1072: x_return_status := FND_API.G_RET_STS_ERROR;
1073: FND_MSG_Pub.count_and_get
1074: ( p_count => x_msg_count
1075: , p_data => x_msg_data
1076: );
1077: WHEN OTHERS THEN
1076: );
1077: WHEN OTHERS THEN
1078: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1079: x_return_status := SQLCODE;
1080: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1081: , l_api_name
1082: );
1083: /* Get message count and data */
1084: FND_MSG_Pub.count_and_get
1080: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1081: , l_api_name
1082: );
1083: /* Get message count and data */
1084: FND_MSG_Pub.count_and_get
1085: ( p_count => x_msg_count
1086: , p_data => x_msg_data
1087: );
1088: END sorting_criteria_insert;
1115: );
1116: EXCEPTION
1117: WHEN FND_API.G_EXC_ERROR THEN
1118: x_return_status := FND_API.G_RET_STS_ERROR;
1119: FND_MSG_Pub.count_and_get
1120: ( p_count => x_msg_count
1121: , p_data => x_msg_data
1122: );
1123: WHEN OTHERS THEN
1122: );
1123: WHEN OTHERS THEN
1124: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1125: x_return_status := SQLCODE;
1126: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1127: , l_api_name
1128: );
1129: /* Get message count and data */
1130: FND_MSG_Pub.count_and_get
1126: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1127: , l_api_name
1128: );
1129: /* Get message count and data */
1130: FND_MSG_Pub.count_and_get
1131: ( p_count => x_msg_count
1132: , p_data => x_msg_data
1133: );
1134: END sorting_criteria_update;
1146: Delete wms_sort_criteria where rule_id = p_mtl_picking_Rule_rec.wms_rule_id;
1147: EXCEPTION
1148: WHEN FND_API.G_EXC_ERROR THEN
1149: x_return_status := FND_API.G_RET_STS_ERROR;
1150: FND_MSG_Pub.count_and_get
1151: ( p_count => x_msg_count
1152: , p_data => x_msg_data
1153: );
1154: WHEN OTHERS THEN
1153: );
1154: WHEN OTHERS THEN
1155: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1156: x_return_status := SQLCODE;
1157: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1158: , l_api_name
1159: );
1160: /* Get message count and data */
1161: FND_MSG_Pub.count_and_get
1157: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1158: , l_api_name
1159: );
1160: /* Get message count and data */
1161: FND_MSG_Pub.count_and_get
1162: ( p_count => x_msg_count
1163: , p_data => x_msg_data
1164: );
1165: END sorting_criteria_delete;
1258: );
1259: EXCEPTION
1260: WHEN FND_API.G_EXC_ERROR THEN
1261: x_return_status := FND_API.G_RET_STS_ERROR;
1262: FND_MSG_Pub.count_and_get
1263: ( p_count => x_msg_count
1264: , p_data => x_msg_data
1265: );
1266: WHEN OTHERS THEN
1265: );
1266: WHEN OTHERS THEN
1267: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1268: x_return_status := SQLCODE;
1269: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1270: , l_api_name
1271: );
1272: /* Get message count and data */
1273: FND_MSG_Pub.count_and_get
1269: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1270: , l_api_name
1271: );
1272: /* Get message count and data */
1273: FND_MSG_Pub.count_and_get
1274: ( p_count => x_msg_count
1275: , p_data => x_msg_data
1276: );
1277: End strategy_insert;
1320: end if;
1321: EXCEPTION
1322: WHEN FND_API.G_EXC_ERROR THEN
1323: x_return_status := FND_API.G_RET_STS_ERROR;
1324: FND_MSG_Pub.count_and_get
1325: ( p_count => x_msg_count
1326: , p_data => x_msg_data
1327: );
1328: WHEN OTHERS THEN
1327: );
1328: WHEN OTHERS THEN
1329: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1330: x_return_status := SQLCODE;
1331: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1332: , l_api_name
1333: );
1334: /* Get message count and data */
1335: FND_MSG_Pub.count_and_get
1331: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1332: , l_api_name
1333: );
1334: /* Get message count and data */
1335: FND_MSG_Pub.count_and_get
1336: ( p_count => x_msg_count
1337: , p_data => x_msg_data
1338: );
1339: END;
1352: null;
1353: EXCEPTION
1354: WHEN FND_API.G_EXC_ERROR THEN
1355: x_return_status := FND_API.G_RET_STS_ERROR;
1356: FND_MSG_Pub.count_and_get
1357: ( p_count => x_msg_count
1358: , p_data => x_msg_data
1359: );
1360: WHEN OTHERS THEN
1359: );
1360: WHEN OTHERS THEN
1361: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1362: x_return_status := SQLCODE;
1363: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1364: , l_api_name
1365: );
1366: /* Get message count and data */
1367: FND_MSG_Pub.count_and_get
1363: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1364: , l_api_name
1365: );
1366: /* Get message count and data */
1367: FND_MSG_Pub.count_and_get
1368: ( p_count => x_msg_count
1369: , p_data => x_msg_data
1370: );
1371: END;
1465: END IF;
1466: EXCEPTION
1467: WHEN FND_API.G_EXC_ERROR THEN
1468: x_return_status := FND_API.G_RET_STS_ERROR;
1469: FND_MSG_Pub.count_and_get
1470: ( p_count => x_msg_count
1471: , p_data => x_msg_data
1472: );
1473: WHEN OTHERS THEN
1472: );
1473: WHEN OTHERS THEN
1474: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1475: x_return_status := SQLCODE;
1476: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1477: , l_api_name
1478: );
1479: /* Get message count and data */
1480: FND_MSG_Pub.count_and_get
1476: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1477: , l_api_name
1478: );
1479: /* Get message count and data */
1480: FND_MSG_Pub.count_and_get
1481: ( p_count => x_msg_count
1482: , p_data => x_msg_data
1483: );
1484: END Rule_Enabled_Flag;
1575: RETURN(l_bReturn);
1576: EXCEPTION
1577: WHEN FND_API.G_EXC_ERROR THEN
1578: x_return_status := FND_API.G_RET_STS_ERROR;
1579: FND_MSG_Pub.count_and_get
1580: ( p_count => x_msg_count
1581: , p_data => x_msg_data
1582: );
1583: WHEN OTHERS THEN
1582: );
1583: WHEN OTHERS THEN
1584: debug('sqlerror'|| SUBSTRB(SQLERRM, 1, 100));
1585: x_return_status := SQLCODE;
1586: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1587: , l_api_name
1588: );
1589: /* Get message count and data */
1590: FND_MSG_Pub.count_and_get
1586: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1587: , l_api_name
1588: );
1589: /* Get message count and data */
1590: FND_MSG_Pub.count_and_get
1591: ( p_count => x_msg_count
1592: , p_data => x_msg_data
1593: );
1594: END rule_assigned_to_strategy;
1622: p_mtl_picking_rule_rec.Enabled_Flag := 'N';
1623: RAISE FND_API.G_EXC_ERROR;
1624: ELSE
1625: fnd_message.set_name('WMS','WMS_PACKAGE_REGENERATE');
1626: FND_MSG_PUB.Add;
1627: RAISE FND_API.G_EXC_ERROR;
1628: END IF;
1629: END IF;
1630: EXCEPTION
1629: END IF;
1630: EXCEPTION
1631: WHEN FND_API.G_EXC_ERROR THEN
1632: x_return_status := FND_API.G_RET_STS_ERROR;
1633: FND_MSG_Pub.count_and_get
1634: ( p_count => x_msg_count
1635: , p_data => x_msg_data
1636: );
1637: debug('regenerate rule pkgs. error exception');
1637: debug('regenerate rule pkgs. error exception');
1638: WHEN OTHERS THEN
1639: debug('regenerate others'||SQLCODE||'.');
1640: x_return_status := SQLCODE;
1641: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1642: , l_api_name
1643: );
1644: /* Get message count and data */
1645: FND_MSG_Pub.count_and_get
1641: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name
1642: , l_api_name
1643: );
1644: /* Get message count and data */
1645: FND_MSG_Pub.count_and_get
1646: ( p_count => x_msg_count
1647: , p_data => x_msg_data
1648: );
1649: END GenerateRulePKG;