639:
640: x_return_status := G_RET_STS_ERROR ;
641: x_msg_data := SQLERRM;
642:
643: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
644:
645: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
646: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
647: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
654: fnd_file.put_line(FND_FILE.LOG,' ');
655:
656: x_return_status := G_RET_STS_UNEXP_ERROR ;
657: x_msg_data := SQLERRM;
658: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
659:
660: WHEN OTHERS THEN
661: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
662: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
669: fnd_file.put_line(FND_FILE.LOG,' ');
670:
671: x_return_status := G_RET_STS_UNEXP_ERROR ;
672: x_msg_data := SQLERRM;
673: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
674: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
675: END IF;
676: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
677:
670:
671: x_return_status := G_RET_STS_UNEXP_ERROR ;
672: x_msg_data := SQLERRM;
673: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
674: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
675: END IF;
676: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
677:
678:
672: x_msg_data := SQLERRM;
673: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
674: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
675: END IF;
676: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
677:
678:
679: END build_statement_rule;
680:
1159: -- Free the CLOB Memory now
1160: DBMS_LOB.FREETEMPORARY(l_rule_text);
1161:
1162: -- Standard call to get message count and if count is 1, get message info.
1163: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1164:
1165:
1166: -- end debug log
1167: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1183: fnd_file.put_line(FND_FILE.LOG,' ');
1184:
1185: x_return_status := G_RET_STS_ERROR ;
1186: x_msg_data := SQLERRM;
1187: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1188:
1189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1190: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1191: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1198: fnd_file.put_line(FND_FILE.LOG,' ');
1199:
1200: x_return_status := G_RET_STS_UNEXP_ERROR ;
1201: x_msg_data := SQLERRM;
1202: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1203:
1204: WHEN OTHERS THEN
1205: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1206: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1213: fnd_file.put_line(FND_FILE.LOG,' ');
1214:
1215: x_return_status := G_RET_STS_UNEXP_ERROR ;
1216: x_msg_data := SQLERRM;
1217: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1218: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1219: END IF;
1220: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1221:
1214:
1215: x_return_status := G_RET_STS_UNEXP_ERROR ;
1216: x_msg_data := SQLERRM;
1217: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1218: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1219: END IF;
1220: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1221:
1222: END build_and_insert_rule;
1216: x_msg_data := SQLERRM;
1217: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1218: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1219: END IF;
1220: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1221:
1222: END build_and_insert_rule;
1223:
1224:
1416: CLOSE csr_rules;
1417:
1418:
1419: -- Standard call to get message count and if count is 1, get message info.
1420: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1421:
1422:
1423: -- end debug log
1424: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1435: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1436: END IF;
1437:
1438: x_return_status := G_RET_STS_ERROR ;
1439: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1440:
1441: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1442: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1443: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1445: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1446: END IF;
1447:
1448: x_return_status := G_RET_STS_UNEXP_ERROR ;
1449: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1450:
1451: WHEN OTHERS THEN
1452: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1453: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1455: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1456: END IF;
1457:
1458: x_return_status := G_RET_STS_UNEXP_ERROR ;
1459: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1460: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1461: END IF;
1462: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1463:
1456: END IF;
1457:
1458: x_return_status := G_RET_STS_UNEXP_ERROR ;
1459: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1460: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1461: END IF;
1462: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1463:
1464: END import_rules_publish;
1458: x_return_status := G_RET_STS_UNEXP_ERROR ;
1459: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1460: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1461: END IF;
1462: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1463:
1464: END import_rules_publish;
1465:
1466: /*====================================================================+
1573: END LOOP; -- Rules Csr
1574: CLOSE csr_rules;
1575:
1576: -- Standard call to get message count and if count is 1, get message info.
1577: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1578:
1579:
1580: -- end debug log
1581: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1592: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1593: END IF;
1594:
1595: x_return_status := G_RET_STS_ERROR ;
1596: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1597:
1598: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1599: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1600: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1602: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1603: END IF;
1604:
1605: x_return_status := G_RET_STS_UNEXP_ERROR ;
1606: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1607:
1608: WHEN OTHERS THEN
1609: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1610: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1612: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1613: END IF;
1614:
1615: x_return_status := G_RET_STS_UNEXP_ERROR ;
1616: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1617: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1618: END IF;
1619: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1620:
1613: END IF;
1614:
1615: x_return_status := G_RET_STS_UNEXP_ERROR ;
1616: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1617: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1618: END IF;
1619: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1620:
1621: END import_rules_disable;
1615: x_return_status := G_RET_STS_UNEXP_ERROR ;
1616: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1617: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1618: END IF;
1619: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1620:
1621: END import_rules_disable;
1622:
1623:
1804:
1805:
1806:
1807: -- Standard call to get message count and if count is 1, get message info.
1808: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1809:
1810:
1811: -- end debug log
1812: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1827: fnd_file.put_line(FND_FILE.LOG,'Error in import_rule_temp_approval '||SQLERRM);
1828: fnd_file.put_line(FND_FILE.LOG,' ');
1829:
1830: x_return_status := G_RET_STS_ERROR ;
1831: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1832:
1833: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1834: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1835: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1841: fnd_file.put_line(FND_FILE.LOG,'Unexpected Error in import_rule_temp_approval '||SQLERRM);
1842: fnd_file.put_line(FND_FILE.LOG,' ');
1843:
1844: x_return_status := G_RET_STS_UNEXP_ERROR ;
1845: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1846:
1847: WHEN OTHERS THEN
1848: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1849: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1855: fnd_file.put_line(FND_FILE.LOG,'Other Error in import_rule_temp_approval '||SQLERRM);
1856: fnd_file.put_line(FND_FILE.LOG,' ');
1857:
1858: x_return_status := G_RET_STS_UNEXP_ERROR ;
1859: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1860: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1861: END IF;
1862: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1863:
1856: fnd_file.put_line(FND_FILE.LOG,' ');
1857:
1858: x_return_status := G_RET_STS_UNEXP_ERROR ;
1859: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1860: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1861: END IF;
1862: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1863:
1864: END import_rule_temp_approval;
1858: x_return_status := G_RET_STS_UNEXP_ERROR ;
1859: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1860: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1861: END IF;
1862: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1863:
1864: END import_rule_temp_approval;
1865:
1866: ---------------------------------------------------
2317: CLOSE csr_intents; -- Insert the Extension Rule for this Intent
2318:
2319:
2320: -- Standard call to get message count and if count is 1, get message info.
2321: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2322:
2323:
2324: -- end debug log
2325: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2336: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2337: END IF;
2338:
2339: x_return_status := G_RET_STS_ERROR ;
2340: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2341:
2342: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2343: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2344: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2346: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2347: END IF;
2348:
2349: x_return_status := G_RET_STS_UNEXP_ERROR ;
2350: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2351:
2352: WHEN OTHERS THEN
2353: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2354: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2356: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2357: END IF;
2358:
2359: x_return_status := G_RET_STS_UNEXP_ERROR ;
2360: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2361: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2362: END IF;
2363: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2364:
2357: END IF;
2358:
2359: x_return_status := G_RET_STS_UNEXP_ERROR ;
2360: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2361: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2362: END IF;
2363: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2364:
2365: END attach_extension_rule;
2359: x_return_status := G_RET_STS_UNEXP_ERROR ;
2360: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2361: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2362: END IF;
2363: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2364:
2365: END attach_extension_rule;
2366:
2367:
2756: CLOSE csr_intents; -- Insert the Extension Rule for this Intent
2757:
2758:
2759: -- Standard call to get message count and if count is 1, get message info.
2760: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2761:
2762:
2763: -- end debug log
2764: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2775: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2776: END IF;
2777:
2778: x_return_status := G_RET_STS_ERROR ;
2779: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2780:
2781: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2782: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2783: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2785: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2786: END IF;
2787:
2788: x_return_status := G_RET_STS_UNEXP_ERROR ;
2789: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2790:
2791: WHEN OTHERS THEN
2792: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2793: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2795: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2796: END IF;
2797:
2798: x_return_status := G_RET_STS_UNEXP_ERROR ;
2799: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2800: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2801: END IF;
2802: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2803:
2796: END IF;
2797:
2798: x_return_status := G_RET_STS_UNEXP_ERROR ;
2799: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2800: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2801: END IF;
2802: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2803:
2804: END attach_extension_rule_tmpl;
2798: x_return_status := G_RET_STS_UNEXP_ERROR ;
2799: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2800: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2801: END IF;
2802: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2803:
2804: END attach_extension_rule_tmpl;
2805:
2806: