DBA Data[Home] [Help]

APPS.JTF_TAE_CONTROL_PVT dependencies on JTF_TAE_CONTROL_PVT

Line 1: PACKAGE BODY jtf_tae_control_pvt AS

1: PACKAGE BODY jtf_tae_control_pvt AS
2: /* $Header: jtftaecb.pls 120.2 2006/06/23 21:25:32 solin ship $ */
3: -- ---------------------------------------------------
4: -- Start of Comments
5: -- ---------------------------------------------------

Line 53: g_pkg_name CONSTANT VARCHAR2(30) := 'JTF_TAE_CONTROL_PVT';

49: -- 03/08/2004 ACHANDA Fix bug # 3373687
50: -- 11/17/2004 ACHANDA Fix bug # 4009495
51: -- 06/23/2006 SOLIN Bug 5355020
52: --
53: g_pkg_name CONSTANT VARCHAR2(30) := 'JTF_TAE_CONTROL_PVT';
54: g_file_name CONSTANT VARCHAR2(12) := 'jtftaecb.pls';
55:
56: --
57: -- write_log procedure JDOCHERT: 4/21/02

Line 70: IF (JTF_TAE_CONTROL_PVT.G_DEBUG) Then

66: l_time VARCHAR2(60) := TO_CHAR(SYSDATE, 'mm/dd/yyyy hh24:mi:ss');
67:
68: BEGIN
69:
70: IF (JTF_TAE_CONTROL_PVT.G_DEBUG) Then
71:
72: l_mssg := mssg;
73:
74: /* If the output message and if debug flag is set then also write

Line 326: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

322: EXCEPTION
323: WHEN NO_DATA_FOUND THEN
324: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [1] NO_DATA_FOUND: ' ||
325: 'NO territories exist for this Usage/Transaction combination.';
326: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
327: RAISE FND_API.G_EXC_ERROR;
328:
329: WHEN OTHERS THEN
330: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [1] OTHERS: ' ||

Line 332: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

328:
329: WHEN OTHERS THEN
330: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [1] OTHERS: ' ||
331: SQLERRM;
332: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
333: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
334: END;
335:
336:

Line 429: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

425: EXCEPTION
426: WHEN NO_DATA_FOUND THEN
427: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [2] NO_DATA_FOUND: ' ||
428: 'UPDATE JTF_TERR_DENORM_RULES_ALL.QUAL_RELATION_PRODUCT.';
429: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
430: RAISE FND_API.G_EXC_ERROR;
431:
432: WHEN OTHERS THEN
433: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [2] OTHERS: ' ||

Line 435: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

431:
432: WHEN OTHERS THEN
433: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [2] OTHERS: ' ||
434: SQLERRM;
435: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
436: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
437: END;
438: --dbms_output.put_line(' Update time: ' ||
439: --trunc((sysdate - looptime) * 86400, 3) || ' seconds');

Line 482: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

478: EXCEPTION
479: WHEN NO_DATA_FOUND THEN
480: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [3] NO_DATA_FOUND: ' ||
481: 'Clearing Qualifier Combination data.';
482: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
483: RAISE FND_API.G_EXC_ERROR;
484:
485: WHEN OTHERS THEN
486: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [3] OTHERS: ' ||

Line 488: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

484:
485: WHEN OTHERS THEN
486: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [3] OTHERS: ' ||
487: SQLERRM;
488: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
490: END;
491:
492: l_counter_qtype_offset := 0;

Line 547: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

543: EXCEPTION
544: WHEN NO_DATA_FOUND THEN
545: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [4] NO_DATA_FOUND: ' ||
546: 'Populating JTF_TAE_QUAL_PRODUCTS table.';
547: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
548: RAISE FND_API.G_EXC_ERROR;
549:
550: WHEN OTHERS THEN
551: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [4] OTHERS: ' ||

Line 553: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

549:
550: WHEN OTHERS THEN
551: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [4] OTHERS: ' ||
552: SQLERRM;
553: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
554: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
555: END;
556:
557: --dbms_output.put_line(' Qualifier used in this cursor: ');

Line 632: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

628: EXCEPTION
629: WHEN NO_DATA_FOUND THEN
630: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [5] NO_DATA_FOUND: ' ||
631: 'Populating JTF_TAE_QUAL_FACTORS table.';
632: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
633: RAISE FND_API.G_EXC_ERROR;
634:
635: WHEN OTHERS THEN
636: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [5] OTHERS: ' ||

Line 638: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

634:
635: WHEN OTHERS THEN
636: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [5] OTHERS: ' ||
637: SQLERRM;
638: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
639: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
640: END;
641:
642: end if;

Line 694: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

690: EXCEPTION
691: WHEN NO_DATA_FOUND THEN
692: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [6] NO_DATA_FOUND: ' ||
693: 'Populating JTF_TAE_QUAL_PROD_FACTORS table.';
694: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
695: RAISE FND_API.G_EXC_ERROR;
696:
697: WHEN OTHERS THEN
698: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [6] OTHERS: ' ||

Line 700: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

696:
697: WHEN OTHERS THEN
698: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [6] OTHERS: ' ||
699: SQLERRM;
700: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
701: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
702: END;
703:
704: end loop; -- all factors per combination

Line 721: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

717: WHEN FND_API.G_EXC_ERROR THEN
718: x_return_status := FND_API.G_RET_STS_ERROR;
719: RETCODE := 1;
720:
721: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
722:
723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
725: RETCODE := 2;

Line 727: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

723: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
724: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
725: RETCODE := 2;
726:
727: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
728:
729:
730: WHEN utl_file.invalid_path OR
731: utl_file.invalid_mode OR

Line 741: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

737: RETCODE := 2;
738: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [END] UTL_FILE: ' ||
739: SQLERRM;
740:
741: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
742:
743:
744: WHEN OTHERS THEN
745:

Line 751: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);

747: RETCODE := 2;
748: ERRBUF := 'JTF_TAE_CONTROL.Classify_Territories: [END] OTHERS: ' ||
749: SQLERRM;
750:
751: JTF_TAE_CONTROL_PVT.Write_Log(2, ERRBUF);
752:
753:
754: END Classify_Territories;
755:

Line 1190: --dbms_output.put_line('JTF_TAE_CONTROL_PVT.Decompose_Terr_Defns: l_return_status= ' || l_return_status);

1186: errbuf => ERRBUF,
1187: retcode => RETCODE
1188: );
1189:
1190: --dbms_output.put_line('JTF_TAE_CONTROL_PVT.Decompose_Terr_Defns: l_return_status= ' || l_return_status);
1191: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1192:
1193: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [1]' ||
1194: 'CALL to JTF_TAE_CONTROL.Classify_Territories API has failed.';

Line 1193: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [1]' ||

1189:
1190: --dbms_output.put_line('JTF_TAE_CONTROL_PVT.Decompose_Terr_Defns: l_return_status= ' || l_return_status);
1191: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1192:
1193: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [1]' ||
1194: 'CALL to JTF_TAE_CONTROL.Classify_Territories API has failed.';
1195: RAISE FND_API.G_EXC_ERROR;
1196:
1197: END IF;

Line 1234: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [2]' ||

1230: );
1231:
1232: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1233:
1234: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [2]' ||
1235: 'CALL to JTF_TAE_CONTROL.Reduce_TX_OIN_Index_Set API has failed.';
1236: RAISE FND_API.G_EXC_ERROR;
1237:
1238: END IF;

Line 1251: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [3]' ||

1247: , x_return_status => l_return_status);
1248:
1249: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1250:
1251: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [3]' ||
1252: 'CALL to JTF_TAE_INDEX_CREATION_PVT.DROP_TABLE_INDEXES ' ||
1253: 'API has failed.';
1254: RAISE FND_API.G_EXC_ERROR;
1255:

Line 1268: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [4]' ||

1264: , p_run_mode => p_run_mode );
1265:
1266: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1267:
1268: ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [4]' ||
1269: 'CALL to JTF_TAE_INDEX_CREATION_PVT.CREATE_INDEX ' ||
1270: 'API has failed.';
1271: RAISE FND_API.G_EXC_ERROR;
1272:

Line 1282: -- ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [5]' ||

1278: -- p_table_name => l_trans_input_target
1279: -- , p_percent => 5
1280: -- , x_Return_Status => l_return_status );
1281: -- IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1282: -- ERRBUF := 'JTF_TAE_CONTROL_PVT.DECOMPOSE_TERR_DEFNS: [5]' ||
1283: -- 'CALL to JTF_TAE_INDEX_CREATION_PVT.ANALYZE_TABLE_INDEX ' ||
1284: -- 'API has failed.';
1285: -- RAISE FND_API.G_EXC_ERROR;
1286: -- END IF;

Line 1398: ERRBUF := 'JTF_TAE_CONTROL_PVT.set_session_parameters: [END] UTL_FILE: ' ||

1394: utl_file.invalid_operation OR
1395: utl_file.write_error THEN
1396:
1397: RETCODE := 2;
1398: ERRBUF := 'JTF_TAE_CONTROL_PVT.set_session_parameters: [END] UTL_FILE: ' ||
1399: SQLERRM;
1400:
1401: If G_Debug Then
1402: Write_Log(2, ERRBUF);

Line 1410: ERRBUF := 'JTF_TAE_CONTROL_PVT.set_session_parameters: [END] OTHERS: ' ||

1406:
1407: WHEN OTHERS THEN
1408:
1409: RETCODE := 2;
1410: ERRBUF := 'JTF_TAE_CONTROL_PVT.set_session_parameters: [END] OTHERS: ' ||
1411: SQLERRM;
1412:
1413: If G_Debug Then
1414: Write_Log(2, ERRBUF);

Line 1463: ERRBUF := 'JTF_TAE_CONTROL_PVT.set_table_nologging: [END] UTL_FILE: ' ||

1459: utl_file.invalid_operation OR
1460: utl_file.write_error THEN
1461:
1462: RETCODE := 2;
1463: ERRBUF := 'JTF_TAE_CONTROL_PVT.set_table_nologging: [END] UTL_FILE: ' ||
1464: SQLERRM;
1465:
1466: If G_Debug Then
1467: Write_Log(2, ERRBUF);

Line 1475: ERRBUF := 'JTF_TAE_CONTROL_PVT.set_table_nologging: [END] OTHERS: ' ||

1471:
1472: WHEN OTHERS THEN
1473:
1474: RETCODE := 2;
1475: ERRBUF := 'JTF_TAE_CONTROL_PVT.set_table_nologging: [END] OTHERS: ' ||
1476: SQLERRM;
1477:
1478: If G_Debug Then
1479: Write_Log(2, ERRBUF);

Line 1486: END JTF_TAE_CONTROL_PVT;

1482: RAISE;
1483:
1484: END set_table_nologging;
1485:
1486: END JTF_TAE_CONTROL_PVT;