625:
626: x_return_status := G_RET_STS_ERROR ;
627: x_msg_data := SQLERRM;
628:
629: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
630:
631: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
632: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
633: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
640: fnd_file.put_line(FND_FILE.LOG,' ');
641:
642: x_return_status := G_RET_STS_UNEXP_ERROR ;
643: x_msg_data := SQLERRM;
644: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
645:
646: WHEN OTHERS THEN
647: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
648: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
655: fnd_file.put_line(FND_FILE.LOG,' ');
656:
657: x_return_status := G_RET_STS_UNEXP_ERROR ;
658: x_msg_data := SQLERRM;
659: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
660: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
661: END IF;
662: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
663:
656:
657: x_return_status := G_RET_STS_UNEXP_ERROR ;
658: x_msg_data := SQLERRM;
659: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
660: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
661: END IF;
662: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
663:
664:
658: x_msg_data := SQLERRM;
659: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
660: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
661: END IF;
662: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
663:
664:
665: END build_statement_rule;
666:
1145: -- Free the CLOB Memory now
1146: DBMS_LOB.FREETEMPORARY(l_rule_text);
1147:
1148: -- Standard call to get message count and if count is 1, get message info.
1149: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1150:
1151:
1152: -- end debug log
1153: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1169: fnd_file.put_line(FND_FILE.LOG,' ');
1170:
1171: x_return_status := G_RET_STS_ERROR ;
1172: x_msg_data := SQLERRM;
1173: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1174:
1175: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1176: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1177: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1184: fnd_file.put_line(FND_FILE.LOG,' ');
1185:
1186: x_return_status := G_RET_STS_UNEXP_ERROR ;
1187: x_msg_data := SQLERRM;
1188: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1189:
1190: WHEN OTHERS THEN
1191: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1192: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1199: fnd_file.put_line(FND_FILE.LOG,' ');
1200:
1201: x_return_status := G_RET_STS_UNEXP_ERROR ;
1202: x_msg_data := SQLERRM;
1203: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1204: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1205: END IF;
1206: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1207:
1200:
1201: x_return_status := G_RET_STS_UNEXP_ERROR ;
1202: x_msg_data := SQLERRM;
1203: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1204: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1205: END IF;
1206: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1207:
1208: END build_and_insert_rule;
1202: x_msg_data := SQLERRM;
1203: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1204: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1205: END IF;
1206: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1207:
1208: END build_and_insert_rule;
1209:
1210:
1402: CLOSE csr_rules;
1403:
1404:
1405: -- Standard call to get message count and if count is 1, get message info.
1406: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1407:
1408:
1409: -- end debug log
1410: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1421: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1422: END IF;
1423:
1424: x_return_status := G_RET_STS_ERROR ;
1425: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1426:
1427: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1428: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1429: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1431: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1432: END IF;
1433:
1434: x_return_status := G_RET_STS_UNEXP_ERROR ;
1435: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1436:
1437: WHEN OTHERS THEN
1438: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1439: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1441: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1442: END IF;
1443:
1444: x_return_status := G_RET_STS_UNEXP_ERROR ;
1445: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1446: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1447: END IF;
1448: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1449:
1442: END IF;
1443:
1444: x_return_status := G_RET_STS_UNEXP_ERROR ;
1445: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1446: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1447: END IF;
1448: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1449:
1450: END import_rules_publish;
1444: x_return_status := G_RET_STS_UNEXP_ERROR ;
1445: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1446: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1447: END IF;
1448: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1449:
1450: END import_rules_publish;
1451:
1452: /*====================================================================+
1559: END LOOP; -- Rules Csr
1560: CLOSE csr_rules;
1561:
1562: -- Standard call to get message count and if count is 1, get message info.
1563: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1564:
1565:
1566: -- end debug log
1567: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1578: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1579: END IF;
1580:
1581: x_return_status := G_RET_STS_ERROR ;
1582: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1583:
1584: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1585: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1588: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1589: END IF;
1590:
1591: x_return_status := G_RET_STS_UNEXP_ERROR ;
1592: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1593:
1594: WHEN OTHERS THEN
1595: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1596: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1598: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
1599: END IF;
1600:
1601: x_return_status := G_RET_STS_UNEXP_ERROR ;
1602: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1603: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1604: END IF;
1605: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1606:
1599: END IF;
1600:
1601: x_return_status := G_RET_STS_UNEXP_ERROR ;
1602: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1603: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1604: END IF;
1605: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1606:
1607: END import_rules_disable;
1601: x_return_status := G_RET_STS_UNEXP_ERROR ;
1602: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1603: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1604: END IF;
1605: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1606:
1607: END import_rules_disable;
1608:
1609:
1790:
1791:
1792:
1793: -- Standard call to get message count and if count is 1, get message info.
1794: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1795:
1796:
1797: -- end debug log
1798: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1813: fnd_file.put_line(FND_FILE.LOG,'Error in import_rule_temp_approval '||SQLERRM);
1814: fnd_file.put_line(FND_FILE.LOG,' ');
1815:
1816: x_return_status := G_RET_STS_ERROR ;
1817: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1818:
1819: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1820: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1821: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
1827: fnd_file.put_line(FND_FILE.LOG,'Unexpected Error in import_rule_temp_approval '||SQLERRM);
1828: fnd_file.put_line(FND_FILE.LOG,' ');
1829:
1830: x_return_status := G_RET_STS_UNEXP_ERROR ;
1831: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1832:
1833: WHEN OTHERS 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,'Other 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: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1846: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1847: END IF;
1848: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1849:
1842: fnd_file.put_line(FND_FILE.LOG,' ');
1843:
1844: x_return_status := G_RET_STS_UNEXP_ERROR ;
1845: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1846: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1847: END IF;
1848: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1849:
1850: END import_rule_temp_approval;
1844: x_return_status := G_RET_STS_UNEXP_ERROR ;
1845: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1846: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
1847: END IF;
1848: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
1849:
1850: END import_rule_temp_approval;
1851:
1852: ---------------------------------------------------
2303: CLOSE csr_intents; -- Insert the Extension Rule for this Intent
2304:
2305:
2306: -- Standard call to get message count and if count is 1, get message info.
2307: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2308:
2309:
2310: -- end debug log
2311: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2322: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2323: END IF;
2324:
2325: x_return_status := G_RET_STS_ERROR ;
2326: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2327:
2328: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2329: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2330: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2332: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2333: END IF;
2334:
2335: x_return_status := G_RET_STS_UNEXP_ERROR ;
2336: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2337:
2338: WHEN OTHERS THEN
2339: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2340: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2342: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2343: END IF;
2344:
2345: x_return_status := G_RET_STS_UNEXP_ERROR ;
2346: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2347: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2348: END IF;
2349: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2350:
2343: END IF;
2344:
2345: x_return_status := G_RET_STS_UNEXP_ERROR ;
2346: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2347: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2348: END IF;
2349: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2350:
2351: END attach_extension_rule;
2345: x_return_status := G_RET_STS_UNEXP_ERROR ;
2346: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2347: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2348: END IF;
2349: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2350:
2351: END attach_extension_rule;
2352:
2353:
2742: CLOSE csr_intents; -- Insert the Extension Rule for this Intent
2743:
2744:
2745: -- Standard call to get message count and if count is 1, get message info.
2746: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2747:
2748:
2749: -- end debug log
2750: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2761: '2000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2762: END IF;
2763:
2764: x_return_status := G_RET_STS_ERROR ;
2765: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2766:
2767: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2768: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2769: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2771: '3000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2772: END IF;
2773:
2774: x_return_status := G_RET_STS_UNEXP_ERROR ;
2775: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2776:
2777: WHEN OTHERS THEN
2778: IF (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2779: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE ,
2781: '4000: Leaving '||G_PKG_NAME ||'.'||l_api_name);
2782: END IF;
2783:
2784: x_return_status := G_RET_STS_UNEXP_ERROR ;
2785: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2786: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2787: END IF;
2788: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2789:
2782: END IF;
2783:
2784: x_return_status := G_RET_STS_UNEXP_ERROR ;
2785: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2786: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2787: END IF;
2788: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2789:
2790: END attach_extension_rule_tmpl;
2784: x_return_status := G_RET_STS_UNEXP_ERROR ;
2785: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
2786: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name );
2787: END IF;
2788: FND_MSG_PUB.Count_And_Get(p_encoded=>'F', p_count => x_msg_count, p_data => x_msg_data );
2789:
2790: END attach_extension_rule_tmpl;
2791:
2792: