29: G_AMEND_CODE_DELETED CONSTANT VARCHAR2(30) := 'DELETED';
30: G_AMEND_CODE_ADDED CONSTANT VARCHAR2(30) := 'ADDED';
31: G_AMEND_CODE_UPDATED CONSTANT VARCHAR2(30) := 'UPDATED';
32:
33: G_DBG_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
34: G_PROC_LEVEL NUMBER := FND_LOG.LEVEL_PROCEDURE;
35: G_EXCP_LEVEL NUMBER := FND_LOG.LEVEL_EXCEPTION;
36:
37: ---------------------------------------
30: G_AMEND_CODE_ADDED CONSTANT VARCHAR2(30) := 'ADDED';
31: G_AMEND_CODE_UPDATED CONSTANT VARCHAR2(30) := 'UPDATED';
32:
33: G_DBG_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
34: G_PROC_LEVEL NUMBER := FND_LOG.LEVEL_PROCEDURE;
35: G_EXCP_LEVEL NUMBER := FND_LOG.LEVEL_EXCEPTION;
36:
37: ---------------------------------------
38: -- PROCEDURE validate_row --
31: G_AMEND_CODE_UPDATED CONSTANT VARCHAR2(30) := 'UPDATED';
32:
33: G_DBG_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
34: G_PROC_LEVEL NUMBER := FND_LOG.LEVEL_PROCEDURE;
35: G_EXCP_LEVEL NUMBER := FND_LOG.LEVEL_EXCEPTION;
36:
37: ---------------------------------------
38: -- PROCEDURE validate_row --
39: ---------------------------------------
86: okc_debug.log('100: Entered validate_row', 2);
87: END IF;*/
88:
89: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
90: FND_LOG.STRING(G_PROC_LEVEL,
91: G_PKG_NAME, '100: Entered validate_row' );
92: END IF;
93:
94: -- Standard Start of API savepoint
158: okc_debug.log('200: Leaving validate_row', 2);
159: END IF;*/
160:
161: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
162: FND_LOG.STRING(G_PROC_LEVEL,
163: G_PKG_NAME, '200: Leaving validate_row' );
164: END IF;
165:
166: EXCEPTION
169: okc_debug.log('300: Leaving Validate_Row: OKC_API.G_EXCEPTION_ERROR Exception', 2);
170: END IF;*/
171:
172: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
173: FND_LOG.STRING(G_EXCP_LEVEL,
174: G_PKG_NAME, '300: Leaving Validate_Row: OKC_API.G_EXCEPTION_ERROR Exception' );
175: END IF;
176: ROLLBACK TO g_validate_row_GRP;
177: x_return_status := G_RET_STS_ERROR ;
182: okc_debug.log('400: Leaving Validate_Row: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
183: END IF;*/
184:
185: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
186: FND_LOG.STRING(G_EXCP_LEVEL,
187: G_PKG_NAME, '400: Leaving Validate_Row: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception' );
188: END IF;
189: ROLLBACK TO g_validate_row_GRP;
190: x_return_status := G_RET_STS_UNEXP_ERROR ;
195: okc_debug.log('500: Leaving Validate_Row because of EXCEPTION: '||sqlerrm, 2);
196: END IF;*/
197:
198: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
199: FND_LOG.STRING(G_EXCP_LEVEL,
200: G_PKG_NAME, '500: Leaving Validate_Row because of EXCEPTION: '||sqlerrm);
201: END IF;
202: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
203: p_msg_name => G_UNEXPECTED_ERROR,
274: okc_debug.log('600: Entered create_section', 2);
275: END IF;*/
276:
277: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
278: FND_LOG.STRING(G_PROC_LEVEL,
279: G_PKG_NAME, '600: Entered create_section' );
280: END IF;
281:
282: -- Standard Start of API savepoint
363: okc_debug.log('700: Leaving create_section', 2);
364: END IF;*/
365:
366: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
367: FND_LOG.STRING(G_PROC_LEVEL,
368: G_PKG_NAME, '700: Leaving create_section' );
369: END IF;
370:
371: EXCEPTION
374: okc_debug.log('800: Leaving create_section: OKC_API.G_EXCEPTION_ERROR Exception', 2);
375: END IF;*/
376:
377: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
378: FND_LOG.STRING(G_EXCP_LEVEL,
379: G_PKG_NAME, '800: Leaving create_section: OKC_API.G_EXCEPTION_ERROR Exception');
380: END IF;
381: ROLLBACK TO g_create_section_GRP;
382: x_return_status := G_RET_STS_ERROR ;
387: okc_debug.log('900: Leaving create_section: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
388: END IF;*/
389:
390: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
391: FND_LOG.STRING(G_EXCP_LEVEL,
392: G_PKG_NAME, '900: Leaving create_section: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception');
393: END IF;
394: ROLLBACK TO g_create_section_GRP;
395: x_return_status := G_RET_STS_UNEXP_ERROR ;
400: okc_debug.log('1000: Leaving create_section because of EXCEPTION: '||sqlerrm, 2);
401: END IF;*/
402:
403: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
404: FND_LOG.STRING(G_EXCP_LEVEL,
405: G_PKG_NAME, '1000: Leaving create_section because of EXCEPTION: '||sqlerrm);
406: END IF;
407: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
408: p_msg_name => G_UNEXPECTED_ERROR,
498: okc_debug.log('1600: Entered update_section', 2);
499: END IF;*/
500:
501: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
502: FND_LOG.STRING(G_PROC_LEVEL,
503: G_PKG_NAME, '1600: Entered update_section' );
504: END IF;
505:
506: -- Standard Start of API savepoint
541: okc_debug.log('700: Issue with document header Record.Cannot commit', 2);
542: END IF;*/
543:
544: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
545: FND_LOG.STRING(G_PROC_LEVEL,
546: G_PKG_NAME, '700: Issue with document header Record.Cannot commit' );
547: END IF;
548: RAISE FND_API.G_EXC_ERROR ;
549: END IF;
665: okc_debug.log('1800: Leaving update_section', 2);
666: END IF;*/
667:
668: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
669: FND_LOG.STRING(G_PROC_LEVEL,
670: G_PKG_NAME, '1800: Leaving update_section' );
671: END IF;
672:
673: EXCEPTION
676: okc_debug.log('1900: Leaving update_section: OKC_API.G_EXCEPTION_ERROR Exception', 2);
677: END IF;*/
678:
679: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
680: FND_LOG.STRING(G_EXCP_LEVEL,
681: G_PKG_NAME, '1900: Leaving update_section: OKC_API.G_EXCEPTION_ERROR Exception' );
682: END IF;
683:
684: IF l_document_id_csr%ISOPEN THEN
694: okc_debug.log('2000: Leaving update_section: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
695: END IF;*/
696:
697: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
698: FND_LOG.STRING(G_EXCP_LEVEL,
699: G_PKG_NAME, '2000: Leaving update_section: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception' );
700: END IF;
701:
702: IF l_document_id_csr%ISOPEN THEN
712: okc_debug.log('2100: Leaving update_section because of EXCEPTION: '||sqlerrm, 2);
713: END IF;*/
714:
715: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
716: FND_LOG.STRING(G_EXCP_LEVEL,
717: G_PKG_NAME, '2100: Leaving update_section because of EXCEPTION: '||sqlerrm );
718: END IF;
719: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
720: p_msg_name => G_UNEXPECTED_ERROR,
871: okc_debug.log('600: Entered add_section', 2);
872: END IF;*/
873:
874: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
875: FND_LOG.STRING(G_PROC_LEVEL,
876: G_PKG_NAME, '600: Entered add_section' );
877: END IF;
878:
879: -- Standard Start of API savepoint
902: okc_debug.log('700: Issue with document header Record.Cannot commit', 2);
903: END IF;*/
904:
905: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
906: FND_LOG.STRING(G_PROC_LEVEL,
907: G_PKG_NAME, '700: Issue with document header Record.Cannot commit' );
908: END IF;
909: RAISE FND_API.G_EXC_ERROR ;
910: END IF;
918: okc_debug.log('800: Error: Ref point should be either A,B or S', 2);
919: END IF;*/
920:
921: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
922: FND_LOG.STRING(G_PROC_LEVEL,
923: G_PKG_NAME, '800: Error: Ref point should be either A,B or S' );
924: END IF;
925:
926: Okc_Api.Set_Message( G_FND_APP, 'OKC_WRONG_REF_POINT');
997: okc_debug.log('900: Error: Reference not found', 2);
998: END IF;*/
999:
1000: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1001: FND_LOG.STRING(G_PROC_LEVEL,
1002: G_PKG_NAME, '900: Error: Reference not found' );
1003: END IF;
1004: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1005: END IF;
1067: okc_debug.log('1000: Updating Display Sequence of scn_id '||scn_tbl(k).id, 2);
1068: END IF;*/
1069:
1070: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1071: FND_LOG.STRING(G_PROC_LEVEL,
1072: G_PKG_NAME, '1000: Updating Display Sequence of scn_id '||scn_tbl(k).id );
1073: END IF;
1074:
1075: OKC_TERMS_SECTIONS_GRP.update_section(
1090: okc_debug.log('1200: Updating Display Sequence of cat_id '||scn_tbl(k).id, 2);
1091: END IF;*/
1092:
1093: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1094: FND_LOG.STRING(G_PROC_LEVEL,
1095: G_PKG_NAME, '1200: Updating Display Sequence of cat_id '||scn_tbl(k).id );
1096: END IF;
1097:
1098: OKC_K_ARTICLES_GRP.update_article(
1133: okc_debug.log('1100: Leaving add_section', 2);
1134: END IF;*/
1135:
1136: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1137: FND_LOG.STRING(G_PROC_LEVEL,
1138: G_PKG_NAME, '1100: Leaving add_section' );
1139: END IF;
1140:
1141: EXCEPTION
1144: okc_debug.log('1200: Leaving add_section: OKC_API.G_EXCEPTION_ERROR Exception', 2);
1145: END IF;*/
1146:
1147: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1148: FND_LOG.STRING(G_EXCP_LEVEL,
1149: G_PKG_NAME, '1200: Leaving add_section: OKC_API.G_EXCEPTION_ERROR Exception' );
1150: END IF;
1151:
1152: IF l_get_scn_csr%ISOPEN THEN
1174: okc_debug.log('1300: Leaving add_section: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1175: END IF;*/
1176:
1177: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1178: FND_LOG.STRING(G_EXCP_LEVEL,
1179: G_PKG_NAME, '1300: Leaving add_section: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception' );
1180: END IF;
1181:
1182: IF l_get_scn_csr%ISOPEN THEN
1204: okc_debug.log('1400: Leaving add_section because of EXCEPTION: '||sqlerrm, 2);
1205: END IF;*/
1206:
1207: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1208: FND_LOG.STRING(G_EXCP_LEVEL,
1209: G_PKG_NAME, '1400: Leaving add_section because of EXCEPTION: '||sqlerrm );
1210: END IF;
1211:
1212: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1262: okc_debug.log('1100: Entered lock_row', 2);
1263: END IF;*/
1264:
1265: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1266: FND_LOG.STRING(G_PROC_LEVEL,
1267: G_PKG_NAME, '1100: Entered lock_row' );
1268: END IF;
1269:
1270: -- Standard Start of API savepoint
1303: okc_debug.log('1200: Leaving lock_row', 2);
1304: END IF;*/
1305:
1306: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1307: FND_LOG.STRING(G_PROC_LEVEL,
1308: G_PKG_NAME, '1200: Leaving lock_row' );
1309: END IF;
1310:
1311: EXCEPTION
1314: okc_debug.log('1300: Leaving lock_Row: OKC_API.G_EXCEPTION_ERROR Exception', 2);
1315: END IF;*/
1316:
1317: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1318: FND_LOG.STRING(G_EXCP_LEVEL,
1319: G_PKG_NAME, '1300: Leaving lock_Row: OKC_API.G_EXCEPTION_ERROR Exception' );
1320: END IF;
1321: ROLLBACK TO g_lock_row_GRP;
1322: x_return_status := G_RET_STS_ERROR ;
1327: okc_debug.log('1400: Leaving lock_Row: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1328: END IF;*/
1329:
1330: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1331: FND_LOG.STRING(G_EXCP_LEVEL,
1332: G_PKG_NAME, '1400: Leaving lock_Row: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception' );
1333: END IF;
1334: ROLLBACK TO g_lock_row_GRP;
1335: x_return_status := G_RET_STS_UNEXP_ERROR ;
1340: okc_debug.log('1500: Leaving lock_Row because of EXCEPTION: '||sqlerrm, 2);
1341: END IF;*/
1342:
1343: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1344: FND_LOG.STRING(G_EXCP_LEVEL,
1345: G_PKG_NAME, '1500: Leaving lock_Row because of EXCEPTION: '||sqlerrm );
1346: END IF;
1347: Okc_Api.Set_Message(p_app_name => G_APP_NAME,
1348: p_msg_name => G_UNEXPECTED_ERROR,
1419: okc_debug.log('2200: Entered delete_section', 2);
1420: END IF;*/
1421:
1422: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1423: FND_LOG.STRING(G_PROC_LEVEL,
1424: G_PKG_NAME, '2200: Entered delete_section' );
1425: END IF;
1426:
1427: -- Standard Start of API savepoint
1458: okc_debug.log('2210: Issue with document header Record.Cannot commit', 2);
1459: END IF;*/
1460:
1461: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1462: FND_LOG.STRING(G_PROC_LEVEL,
1463: G_PKG_NAME, '2210: Issue with document header Record.Cannot commit' );
1464: END IF;
1465: RAISE FND_API.G_EXC_ERROR ;
1466: END IF;
1486: okc_debug.log('2220: Calling Delete API to delete Section '|| l_scn_id , 2);
1487: END IF;*/
1488:
1489: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1490: FND_LOG.STRING(G_PROC_LEVEL,
1491: G_PKG_NAME, '2220: Calling Delete API to delete Section '|| l_scn_id );
1492: END IF;
1493:
1494: OKC_TERMS_SECTIONS_GRP.delete_section(
1515: okc_debug.log('2230: Section '|| l_scn_id||' deleted' , 2);
1516: END IF;*/
1517:
1518: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1519: FND_LOG.STRING(G_PROC_LEVEL,
1520: G_PKG_NAME, '2230: Section '|| l_scn_id||' deleted' );
1521: END IF;
1522: END LOOP;
1523: IF l_subsection_csr%ISOPEN then
1529: okc_debug.log('2230: Going to delete Articles of section '|| p_id , 2);
1530: END IF;*/
1531:
1532: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1533: FND_LOG.STRING(G_PROC_LEVEL,
1534: G_PKG_NAME, '2230: Going to delete Articles of section '|| p_id );
1535: END IF;
1536:
1537: FOR l_article_rec IN l_get_article_csr(p_id) LOOP
1565: okc_debug.log('2240: Articles of section '|| p_id||' deleted' , 2);
1566: END IF;*/
1567:
1568: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1569: FND_LOG.STRING(G_PROC_LEVEL,
1570: G_PKG_NAME, '2240: Articles of section '|| p_id||' deleted' );
1571: END IF;
1572:
1573: IF p_mode='AMEND' THEN
1670: okc_debug.log('2300: Leaving delete_section', 2);
1671: END IF;*/
1672:
1673: IF ( G_PROC_LEVEL >= G_DBG_LEVEL ) THEN
1674: FND_LOG.STRING(G_PROC_LEVEL,
1675: G_PKG_NAME, '2300: Leaving delete_section' );
1676: END IF;
1677:
1678: EXCEPTION
1681: okc_debug.log('2400: Leaving delete_section: OKC_API.G_EXCEPTION_ERROR Exception', 2);
1682: END IF;*/
1683:
1684: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1685: FND_LOG.STRING(G_EXCP_LEVEL,
1686: G_PKG_NAME, '2400: Leaving delete_section: OKC_API.G_EXCEPTION_ERROR Exception' );
1687: END IF;
1688:
1689: IF l_document_id_csr%ISOPEN THEN
1707: okc_debug.log('2500: Leaving delete_section: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception', 2);
1708: END IF;*/
1709:
1710: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1711: FND_LOG.STRING(G_EXCP_LEVEL,
1712: G_PKG_NAME, '2500: Leaving delete_section: OKC_API.G_EXCEPTION_UNEXPECTED_ERROR Exception' );
1713: END IF;
1714:
1715: IF l_document_id_csr%ISOPEN THEN
1733: okc_debug.log('2600: Leaving delete_section because of EXCEPTION: '||sqlerrm, 2);
1734: END IF;*/
1735:
1736: IF ( G_EXCP_LEVEL >= G_DBG_LEVEL ) THEN
1737: FND_LOG.STRING(G_EXCP_LEVEL,
1738: G_PKG_NAME, '2600: Leaving delete_section because of EXCEPTION: '||sqlerrm );
1739: END IF;
1740:
1741: Okc_Api.Set_Message(p_app_name => G_APP_NAME,