1: PACKAGE BODY CST_PacEamCost_GRP AS
2: /* $Header: CSTPPEAB.pls 120.12 2006/08/25 09:44:20 arathee noship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):='CST_PacEamCost_GRP';
5: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6:
7: -- Start of comments
8: -- API name : Estimate_PAC_WipJobs
9: -- Type : Public.
72: /* 2- PROCEDURE */
73: /* 1- STATEMENT */
74:
75: /* In general, we should use the following:
76: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
77: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
78: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
79: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
80: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
73: /* 1- STATEMENT */
74:
75: /* In general, we should use the following:
76: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
77: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
78: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
79: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
80: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
81: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
74:
75: /* In general, we should use the following:
76: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
77: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
78: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
79: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
80: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
81: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
82: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
75: /* In general, we should use the following:
76: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
77: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
78: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
79: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
80: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
81: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
82: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
83: */
76: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
77: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
78: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
79: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
80: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
81: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
82: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
83: */
84:
77: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
78: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
79: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
80: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
81: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
82: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
83: */
84:
85: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
78: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
79: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
80: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
81: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
82: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
83: */
84:
85: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
86: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
81: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
82: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
83: */
84:
85: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
86: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
87: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
88:
89: l_dummy NUMBER;
82: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
83: */
84:
85: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
86: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
87: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
88:
89: l_dummy NUMBER;
90: l_count NUMBER;
83: */
84:
85: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
86: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
87: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
88:
89: l_dummy NUMBER;
90: l_count NUMBER;
91: l_index NUMBER;
123: BEGIN
124:
125: /* Procedure level log message for Entry point */
126: IF (l_pLog) THEN
127: FND_LOG.STRING(
128: FND_LOG.LEVEL_PROCEDURE,
129: l_module || '.begin',
130: 'Estimate_PAC_WipJobs <<');
131: END IF;
124:
125: /* Procedure level log message for Entry point */
126: IF (l_pLog) THEN
127: FND_LOG.STRING(
128: FND_LOG.LEVEL_PROCEDURE,
129: l_module || '.begin',
130: 'Estimate_PAC_WipJobs <<');
131: END IF;
132:
157: || ' p_wip_entity_id ' || to_char(p_wip_entity_id);
158:
159: -- statement level logging
160: IF (l_sLog) THEN
161: FND_LOG.STRING(
162: FND_LOG.LEVEL_STATEMENT,
163: l_module || '.' || l_stmt_num,
164: l_api_message);
165: END IF;
158:
159: -- statement level logging
160: IF (l_sLog) THEN
161: FND_LOG.STRING(
162: FND_LOG.LEVEL_STATEMENT,
163: l_module || '.' || l_stmt_num,
164: l_api_message);
165: END IF;
166:
389: END IF;
390:
391: -- statement level logging
392: IF (l_sLog) THEN
393: FND_LOG.STRING(
394: FND_LOG.LEVEL_STATEMENT,
395: l_module || '.' || l_stmt_num,
396: TO_CHAR(SQL%ROWCOUNT) ||' Job Record(s) Updated with Group Id: '
397: ||TO_CHAR(l_estimation_group_id));
390:
391: -- statement level logging
392: IF (l_sLog) THEN
393: FND_LOG.STRING(
394: FND_LOG.LEVEL_STATEMENT,
395: l_module || '.' || l_stmt_num,
396: TO_CHAR(SQL%ROWCOUNT) ||' Job Record(s) Updated with Group Id: '
397: ||TO_CHAR(l_estimation_group_id));
398: END IF;
436: IF (l_sLog) THEN
437: l_api_message := 'CST_PacEamCost_GRP.Estimate_PAC_WipJobs('
438: || to_char(l_stmt_num) || '): '
439: || 'Delete/Update successful in delete_eamperbal';
440: FND_LOG.STRING(
441: FND_LOG.LEVEL_STATEMENT,
442: l_module || '.' || l_stmt_num,
443: l_api_message);
444: END IF;
437: l_api_message := 'CST_PacEamCost_GRP.Estimate_PAC_WipJobs('
438: || to_char(l_stmt_num) || '): '
439: || 'Delete/Update successful in delete_eamperbal';
440: FND_LOG.STRING(
441: FND_LOG.LEVEL_STATEMENT,
442: l_module || '.' || l_stmt_num,
443: l_api_message);
444: END IF;
445:
473: IF (l_sLog) THEN
474: l_api_message := 'CST_PacEamCost_GRP. delete_PAC_EamBalAcct ('
475: || to_char(l_stmt_num) || '): '
476: || 'Delete/Update successful in delete_pac_eambalacct';
477: FND_LOG.STRING(
478: FND_LOG.LEVEL_STATEMENT,
479: l_module || '.' || l_stmt_num,
480: l_api_message);
481: END IF;
474: l_api_message := 'CST_PacEamCost_GRP. delete_PAC_EamBalAcct ('
475: || to_char(l_stmt_num) || '): '
476: || 'Delete/Update successful in delete_pac_eambalacct';
477: FND_LOG.STRING(
478: FND_LOG.LEVEL_STATEMENT,
479: l_module || '.' || l_stmt_num,
480: l_api_message);
481: END IF;
482:
518: IF (l_sLog) THEN
519: l_api_message := 'CST_eamCost_PUB.Insert_tempEstimateDetails ('
520: || to_char(l_stmt_num) || '): '
521: || 'Insert int CEDIV successful Insert_tempEstimateDetails';
522: FND_LOG.STRING(
523: FND_LOG.LEVEL_STATEMENT,
524: l_module || '.' || l_stmt_num,
525: l_api_message);
526: END IF;
519: l_api_message := 'CST_eamCost_PUB.Insert_tempEstimateDetails ('
520: || to_char(l_stmt_num) || '): '
521: || 'Insert int CEDIV successful Insert_tempEstimateDetails';
522: FND_LOG.STRING(
523: FND_LOG.LEVEL_STATEMENT,
524: l_module || '.' || l_stmt_num,
525: l_api_message);
526: END IF;
527:
538: SAVEPOINT Estimate_PAC_WipJobs_PUB;
539:
540: -- statement level logging
541: IF (l_sLog) THEN
542: FND_LOG.STRING(
543: FND_LOG.LEVEL_STATEMENT,
544: l_module || '.' || l_stmt_num,
545: 'Processing Job:' || TO_CHAR(l_wip_entity_id_tab(l_index)));
546: END IF;
539:
540: -- statement level logging
541: IF (l_sLog) THEN
542: FND_LOG.STRING(
543: FND_LOG.LEVEL_STATEMENT,
544: l_module || '.' || l_stmt_num,
545: 'Processing Job:' || TO_CHAR(l_wip_entity_id_tab(l_index)));
546: END IF;
547:
592: -- statement level logging
593: IF (l_sLog) THEN
594: l_api_message := 'Estimation complete for wip_entity_id = '
595: || to_char(l_wip_entity_id_tab(l_index));
596: FND_LOG.STRING(
597: FND_LOG.LEVEL_STATEMENT,
598: l_module || '.' || l_stmt_num,
599: l_api_message);
600: END IF;
593: IF (l_sLog) THEN
594: l_api_message := 'Estimation complete for wip_entity_id = '
595: || to_char(l_wip_entity_id_tab(l_index));
596: FND_LOG.STRING(
597: FND_LOG.LEVEL_STATEMENT,
598: l_module || '.' || l_stmt_num,
599: l_api_message);
600: END IF;
601:
623: -- statement level logging
624: IF (l_sLog) THEN
625: l_api_message := 'Estimation failed for wip_entity_id = '
626: || to_char(l_wip_entity_id_tab(l_index));
627: FND_LOG.STRING(
628: FND_LOG.LEVEL_STATEMENT,
629: l_module || '.' || l_stmt_num,
630: l_api_message);
631: END IF;
624: IF (l_sLog) THEN
625: l_api_message := 'Estimation failed for wip_entity_id = '
626: || to_char(l_wip_entity_id_tab(l_index));
627: FND_LOG.STRING(
628: FND_LOG.LEVEL_STATEMENT,
629: l_module || '.' || l_stmt_num,
630: l_api_message);
631: END IF;
632:
661: COMMIT;
662:
663: -- Procedure level log message for exit point
664: IF (l_pLog) THEN
665: FND_LOG.STRING(
666: FND_LOG.LEVEL_PROCEDURE,
667: l_module || '.end',
668: 'Estimate_PAC_WipJobs >>'
669: );
662:
663: -- Procedure level log message for exit point
664: IF (l_pLog) THEN
665: FND_LOG.STRING(
666: FND_LOG.LEVEL_PROCEDURE,
667: l_module || '.end',
668: 'Estimate_PAC_WipJobs >>'
669: );
670: END IF;
688: AND cost_type_id = p_cost_type_id
689: AND cost_group_id = p_cost_group_id;
690:
691: IF (l_uLog) THEN
692: FND_LOG.STRING(
693: FND_LOG.LEVEL_UNEXPECTED,
694: l_module || '.' || l_stmt_num ,
695: l_msg_data); -- show the message of where it failed.
696: END IF;
689: AND cost_group_id = p_cost_group_id;
690:
691: IF (l_uLog) THEN
692: FND_LOG.STRING(
693: FND_LOG.LEVEL_UNEXPECTED,
694: l_module || '.' || l_stmt_num ,
695: l_msg_data); -- show the message of where it failed.
696: END IF;
697:
795: /* 2- PROCEDURE */
796: /* 1- STATEMENT */
797:
798: /* In general, we should use the following:
799: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
800: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
801: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
802: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
803: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
796: /* 1- STATEMENT */
797:
798: /* In general, we should use the following:
799: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
800: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
801: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
802: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
803: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
804: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
797:
798: /* In general, we should use the following:
799: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
800: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
801: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
802: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
803: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
804: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
805: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
798: /* In general, we should use the following:
799: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
800: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
801: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
802: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
803: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
804: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
805: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
806: */
799: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
800: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
801: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
802: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
803: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
804: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
805: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
806: */
807:
800: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
801: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
802: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
803: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
804: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
805: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
806: */
807:
808: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
801: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
802: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
803: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
804: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
805: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
806: */
807:
808: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
809: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
804: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
805: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
806: */
807:
808: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
809: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
810: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
811:
812: CURSOR v_est_csr(c_organization_id NUMBER,
805: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
806: */
807:
808: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
809: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
810: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
811:
812: CURSOR v_est_csr(c_organization_id NUMBER,
813: c_wip_entity_id NUMBER) IS
806: */
807:
808: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
809: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
810: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
811:
812: CURSOR v_est_csr(c_organization_id NUMBER,
813: c_wip_entity_id NUMBER) IS
814: SELECT period_set_name,
830: BEGIN
831:
832: -- Procedure level log message for Entry point
833: IF (l_pLog) THEN
834: FND_LOG.STRING(
835: FND_LOG.LEVEL_PROCEDURE,
836: l_module || '.begin',
837: 'Delete_PAC_EamPerBal <<');
838: END IF;
831:
832: -- Procedure level log message for Entry point
833: IF (l_pLog) THEN
834: FND_LOG.STRING(
835: FND_LOG.LEVEL_PROCEDURE,
836: l_module || '.begin',
837: 'Delete_PAC_EamPerBal <<');
838: END IF;
839:
926: AND cost_type_id = p_cost_type_id ;
927:
928: -- statement level logging
929: IF (l_sLog) THEN
930: FND_LOG.STRING(
931: FND_LOG.LEVEL_STATEMENT,
932: l_module || '.' || l_stmt_num,
933: 'Delete/Update CPEAPB successful for ' || TO_CHAR(p_wip_entity_id_tab(l_index)));
934: END IF;
927:
928: -- statement level logging
929: IF (l_sLog) THEN
930: FND_LOG.STRING(
931: FND_LOG.LEVEL_STATEMENT,
932: l_module || '.' || l_stmt_num,
933: 'Delete/Update CPEAPB successful for ' || TO_CHAR(p_wip_entity_id_tab(l_index)));
934: END IF;
935:
942: l_stmt_num := 130;
943:
944: -- statement level logging
945: IF (l_sLog) THEN
946: FND_LOG.STRING(
947: FND_LOG.LEVEL_STATEMENT,
948: l_module || '.' || l_stmt_num,
949: 'CPEAPB Updation completed successfully.');
950: END IF;
943:
944: -- statement level logging
945: IF (l_sLog) THEN
946: FND_LOG.STRING(
947: FND_LOG.LEVEL_STATEMENT,
948: l_module || '.' || l_stmt_num,
949: 'CPEAPB Updation completed successfully.');
950: END IF;
951:
963: l_stmt_num := 140;
964:
965: -- statement level logging
966: IF (l_sLog) THEN
967: FND_LOG.STRING(
968: FND_LOG.LEVEL_STATEMENT,
969: l_module || '.' || l_stmt_num,
970: 'CPEPB Updation completed successfully.');
971: END IF;
964:
965: -- statement level logging
966: IF (l_sLog) THEN
967: FND_LOG.STRING(
968: FND_LOG.LEVEL_STATEMENT,
969: l_module || '.' || l_stmt_num,
970: 'CPEPB Updation completed successfully.');
971: END IF;
972:
987: l_stmt_num := 150;
988:
989: -- statement level logging
990: IF (l_sLog) THEN
991: FND_LOG.STRING(
992: FND_LOG.LEVEL_STATEMENT,
993: l_module || '.' || l_stmt_num,
994: 'Delted from CPEPB successfully.');
995: END IF;
988:
989: -- statement level logging
990: IF (l_sLog) THEN
991: FND_LOG.STRING(
992: FND_LOG.LEVEL_STATEMENT,
993: l_module || '.' || l_stmt_num,
994: 'Delted from CPEPB successfully.');
995: END IF;
996:
997: END IF; -- end check count of records
998:
999: -- Procedure level log message for exit point
1000: IF (l_pLog) THEN
1001: FND_LOG.STRING(
1002: FND_LOG.LEVEL_PROCEDURE,
1003: l_module || '.end',
1004: 'Delete_PAC_EamPerBal >>'
1005: );
998:
999: -- Procedure level log message for exit point
1000: IF (l_pLog) THEN
1001: FND_LOG.STRING(
1002: FND_LOG.LEVEL_PROCEDURE,
1003: l_module || '.end',
1004: 'Delete_PAC_EamPerBal >>'
1005: );
1006: END IF;
1026: ROLLBACK TO Delete_PAC_EamPerBal_PUB;
1027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1028:
1029: IF (l_uLog) THEN
1030: FND_LOG.STRING(
1031: FND_LOG.LEVEL_UNEXPECTED,
1032: l_module || '.' || l_stmt_num ,
1033: SUBSTRB (SQLERRM , 1 , 240));
1034: END IF;
1027: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1028:
1029: IF (l_uLog) THEN
1030: FND_LOG.STRING(
1031: FND_LOG.LEVEL_UNEXPECTED,
1032: l_module || '.' || l_stmt_num ,
1033: SUBSTRB (SQLERRM , 1 , 240));
1034: END IF;
1035:
1199: /* 2- PROCEDURE */
1200: /* 1- STATEMENT */
1201:
1202: /* In general, we should use the following:
1203: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1204: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1205: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1206: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
1207: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1200: /* 1- STATEMENT */
1201:
1202: /* In general, we should use the following:
1203: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1204: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1205: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1206: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
1207: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1208: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1201:
1202: /* In general, we should use the following:
1203: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1204: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1205: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1206: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
1207: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1208: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1209: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1202: /* In general, we should use the following:
1203: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1204: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1205: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1206: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
1207: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1208: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1209: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1210: */
1203: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1204: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1205: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1206: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
1207: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1208: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1209: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1210: */
1211:
1204: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1205: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1206: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
1207: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1208: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1209: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1210: */
1211:
1212: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1205: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
1206: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
1207: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
1208: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1209: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1210: */
1211:
1212: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1213: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1208: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1209: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1210: */
1211:
1212: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1213: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1214: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1215:
1216:
1209: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1210: */
1211:
1212: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1213: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1214: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1215:
1216:
1217: /* Cursor to fetch all resources and their rates for a wip entity */
1210: */
1211:
1212: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
1213: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
1214: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
1215:
1216:
1217: /* Cursor to fetch all resources and their rates for a wip entity */
1218:
1535: BEGIN
1536:
1537: -- Procedure level log message for Entry point
1538: IF (l_pLog) THEN
1539: FND_LOG.STRING(
1540: FND_LOG.LEVEL_PROCEDURE,
1541: l_module || '.begin',
1542: 'Compute_PAC_JobEstimates <<');
1543: END IF;
1536:
1537: -- Procedure level log message for Entry point
1538: IF (l_pLog) THEN
1539: FND_LOG.STRING(
1540: FND_LOG.LEVEL_PROCEDURE,
1541: l_module || '.begin',
1542: 'Compute_PAC_JobEstimates <<');
1543: END IF;
1544:
1622: END IF;
1623:
1624: -- statement level logging
1625: IF (l_sLog) THEN
1626: FND_LOG.STRING(
1627: FND_LOG.LEVEL_STATEMENT,
1628: l_module || '.' || l_stmt_num,
1629: l_api_message);
1630: END IF;
1623:
1624: -- statement level logging
1625: IF (l_sLog) THEN
1626: FND_LOG.STRING(
1627: FND_LOG.LEVEL_STATEMENT,
1628: l_module || '.' || l_stmt_num,
1629: l_api_message);
1630: END IF;
1631:
1690: END IF; -- check for l_dummy
1691:
1692: -- statement level logging
1693: IF (l_sLog) THEN
1694: FND_LOG.STRING(
1695: FND_LOG.LEVEL_STATEMENT,
1696: l_module || '.' || l_stmt_num,
1697: 'Period Details- l_acct_period_id: ' || TO_CHAR(l_acct_period_id)
1698: || ' l_period_set_name: '|| TO_CHAR(l_period_set_name)
1691:
1692: -- statement level logging
1693: IF (l_sLog) THEN
1694: FND_LOG.STRING(
1695: FND_LOG.LEVEL_STATEMENT,
1696: l_module || '.' || l_stmt_num,
1697: 'Period Details- l_acct_period_id: ' || TO_CHAR(l_acct_period_id)
1698: || ' l_period_set_name: '|| TO_CHAR(l_period_set_name)
1699: || ' l_period_name: ' || TO_CHAR(l_period_name));
2011: l_stmt_num := 285;
2012:
2013: -- statement level logging
2014: IF (l_sLog) THEN
2015: FND_LOG.STRING(
2016: FND_LOG.LEVEL_STATEMENT,
2017: l_module || '.' || l_stmt_num,
2018: 'Resource Cost Calc completed successfully');
2019: END IF;
2012:
2013: -- statement level logging
2014: IF (l_sLog) THEN
2015: FND_LOG.STRING(
2016: FND_LOG.LEVEL_STATEMENT,
2017: l_module || '.' || l_stmt_num,
2018: 'Resource Cost Calc completed successfully');
2019: END IF;
2020:
2115: l_api_message :=' Calling Insert_eamBalAcct... ';
2116: l_api_message :=l_api_message|| ' mfg_cost_element_id = l_mfg_cost_element_id,' ;
2117: l_api_message :=l_api_message|| ' account_id = ' || TO_CHAR(l_account) || ',';
2118: l_api_message :=l_api_message|| ' eam_cost_element_id = '||TO_CHAR(l_eam_cost_element);
2119: FND_LOG.STRING(
2120: FND_LOG.LEVEL_STATEMENT,
2121: l_module || '.' || l_stmt_num,
2122: l_api_message);
2123: END IF;
2116: l_api_message :=l_api_message|| ' mfg_cost_element_id = l_mfg_cost_element_id,' ;
2117: l_api_message :=l_api_message|| ' account_id = ' || TO_CHAR(l_account) || ',';
2118: l_api_message :=l_api_message|| ' eam_cost_element_id = '||TO_CHAR(l_eam_cost_element);
2119: FND_LOG.STRING(
2120: FND_LOG.LEVEL_STATEMENT,
2121: l_module || '.' || l_stmt_num,
2122: l_api_message);
2123: END IF;
2124:
2223: l_stmt_num := 310;
2224:
2225: -- statement level logging
2226: IF (l_sLog) THEN
2227: FND_LOG.STRING(
2228: FND_LOG.LEVEL_STATEMENT,
2229: l_module || '.' || l_stmt_num,
2230: 'WRO Cost Calc completed successfully');
2231: END IF;
2224:
2225: -- statement level logging
2226: IF (l_sLog) THEN
2227: FND_LOG.STRING(
2228: FND_LOG.LEVEL_STATEMENT,
2229: l_module || '.' || l_stmt_num,
2230: 'WRO Cost Calc completed successfully');
2231: END IF;
2232:
2392: l_stmt_num := 340;
2393:
2394: -- statement level logging
2395: IF (l_sLog) THEN
2396: FND_LOG.STRING(
2397: FND_LOG.LEVEL_STATEMENT,
2398: l_module || '.' || l_stmt_num,
2399: 'WRODI Cost Calc completed successfully');
2400: END IF;
2393:
2394: -- statement level logging
2395: IF (l_sLog) THEN
2396: FND_LOG.STRING(
2397: FND_LOG.LEVEL_STATEMENT,
2398: l_module || '.' || l_stmt_num,
2399: 'WRODI Cost Calc completed successfully');
2400: END IF;
2401:
2546: l_stmt_num := 365;
2547:
2548: -- statement level logging
2549: IF (l_sLog) THEN
2550: FND_LOG.STRING(
2551: FND_LOG.LEVEL_STATEMENT,
2552: l_module || '.' || l_stmt_num,
2553: 'CST_PacEamCost_GRP.Compute_PAC_JobEstimatess(' || to_char(l_stmt_num)
2554: || '): WEDI Cost Calc completed successfully');
2547:
2548: -- statement level logging
2549: IF (l_sLog) THEN
2550: FND_LOG.STRING(
2551: FND_LOG.LEVEL_STATEMENT,
2552: l_module || '.' || l_stmt_num,
2553: 'CST_PacEamCost_GRP.Compute_PAC_JobEstimatess(' || to_char(l_stmt_num)
2554: || '): WEDI Cost Calc completed successfully');
2555: END IF;
2710: l_stmt_num := 395;
2711:
2712: -- statement level logging
2713: IF (l_sLog) THEN
2714: FND_LOG.STRING(
2715: FND_LOG.LEVEL_STATEMENT,
2716: l_module || '.' || l_stmt_num,
2717: 'CST_PacEamCost_GRP.Compute_PAC_JobEstimatess(' || to_char(l_stmt_num)
2718: || '): PO/REQ Cost Calc completed successfully');
2711:
2712: -- statement level logging
2713: IF (l_sLog) THEN
2714: FND_LOG.STRING(
2715: FND_LOG.LEVEL_STATEMENT,
2716: l_module || '.' || l_stmt_num,
2717: 'CST_PacEamCost_GRP.Compute_PAC_JobEstimatess(' || to_char(l_stmt_num)
2718: || '): PO/REQ Cost Calc completed successfully');
2719: END IF;
2728: p_data => x_msg_data );
2729:
2730: -- Procedure level log message for exit point
2731: IF (l_pLog) THEN
2732: FND_LOG.STRING(
2733: FND_LOG.LEVEL_PROCEDURE,
2734: l_module || '.end',
2735: 'Compute_PAC_JobEstimates >>'
2736: );
2729:
2730: -- Procedure level log message for exit point
2731: IF (l_pLog) THEN
2732: FND_LOG.STRING(
2733: FND_LOG.LEVEL_PROCEDURE,
2734: l_module || '.end',
2735: 'Compute_PAC_JobEstimates >>'
2736: );
2737: END IF;
2743: x_return_status := FND_API.G_RET_STS_ERROR;
2744:
2745: -- statement level logging
2746: IF (l_uLog) THEN
2747: FND_LOG.STRING(
2748: FND_LOG.LEVEL_UNEXPECTED,
2749: l_module || '.' || l_stmt_num ,
2750: l_msg_data);
2751: END IF;
2744:
2745: -- statement level logging
2746: IF (l_uLog) THEN
2747: FND_LOG.STRING(
2748: FND_LOG.LEVEL_UNEXPECTED,
2749: l_module || '.' || l_stmt_num ,
2750: l_msg_data);
2751: END IF;
2752:
2759: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
2760:
2761: -- statement level logging
2762: IF (l_uLog) THEN
2763: FND_LOG.STRING(
2764: FND_LOG.LEVEL_UNEXPECTED,
2765: l_module || '.' || l_stmt_num ,
2766: l_msg_data);
2767: END IF;
2760:
2761: -- statement level logging
2762: IF (l_uLog) THEN
2763: FND_LOG.STRING(
2764: FND_LOG.LEVEL_UNEXPECTED,
2765: l_module || '.' || l_stmt_num ,
2766: l_msg_data);
2767: END IF;
2768:
2781: || SUBSTRB (SQLERRM , 1 , 240));
2782: END IF;
2783:
2784: IF (l_uLog) THEN
2785: FND_LOG.STRING(
2786: FND_LOG.LEVEL_UNEXPECTED,
2787: l_module || '.' || l_stmt_num ,
2788: l_msg_data || SUBSTRB (SQLERRM , 1 , 240));
2789: END IF;
2782: END IF;
2783:
2784: IF (l_uLog) THEN
2785: FND_LOG.STRING(
2786: FND_LOG.LEVEL_UNEXPECTED,
2787: l_module || '.' || l_stmt_num ,
2788: l_msg_data || SUBSTRB (SQLERRM , 1 , 240));
2789: END IF;
2790:
2934: /* 2- PROCEDURE */
2935: /* 1- STATEMENT */
2936:
2937: /* In general, we should use the following:
2938: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2939: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2940: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2941: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
2942: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2935: /* 1- STATEMENT */
2936:
2937: /* In general, we should use the following:
2938: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2939: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2940: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2941: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
2942: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2943: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2936:
2937: /* In general, we should use the following:
2938: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2939: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2940: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2941: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
2942: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2943: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2944: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2937: /* In general, we should use the following:
2938: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2939: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2940: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2941: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
2942: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2943: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2944: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2945: */
2938: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2939: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2940: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2941: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
2942: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2943: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2944: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2945: */
2946:
2939: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2940: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2941: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
2942: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2943: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2944: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2945: */
2946:
2947: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2940: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
2941: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
2942: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
2943: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2944: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2945: */
2946:
2947: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2948: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2943: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2944: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2945: */
2946:
2947: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2948: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2949: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2950:
2951: BEGIN
2944: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2945: */
2946:
2947: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2948: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2949: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2950:
2951: BEGIN
2952:
2945: */
2946:
2947: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
2948: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
2949: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
2950:
2951: BEGIN
2952:
2953: -- Procedure level log message for Entry point
2951: BEGIN
2952:
2953: -- Procedure level log message for Entry point
2954: IF (l_pLog) THEN
2955: FND_LOG.STRING(
2956: FND_LOG.LEVEL_PROCEDURE,
2957: l_module || '.begin',
2958: 'InsertUpdate_PAC_eamPerBal <<');
2959: END IF;
2952:
2953: -- Procedure level log message for Entry point
2954: IF (l_pLog) THEN
2955: FND_LOG.STRING(
2956: FND_LOG.LEVEL_PROCEDURE,
2957: l_module || '.begin',
2958: 'InsertUpdate_PAC_eamPerBal <<');
2959: END IF;
2960:
3112: l_stmt_num := 425;
3113:
3114: -- statement level logging
3115: IF (l_sLog) THEN
3116: FND_LOG.STRING(
3117: FND_LOG.LEVEL_STATEMENT,
3118: l_module || '.' || l_stmt_num,
3119: 'Update Successful for Job id: ' || TO_CHAR(p_wip_entity_id));
3120: END IF;
3113:
3114: -- statement level logging
3115: IF (l_sLog) THEN
3116: FND_LOG.STRING(
3117: FND_LOG.LEVEL_STATEMENT,
3118: l_module || '.' || l_stmt_num,
3119: 'Update Successful for Job id: ' || TO_CHAR(p_wip_entity_id));
3120: END IF;
3121:
3185: l_stmt_num := 435;
3186:
3187: -- statement level logging
3188: IF (l_sLog) THEN
3189: FND_LOG.STRING(
3190: FND_LOG.LEVEL_STATEMENT,
3191: l_module || '.' || l_stmt_num,
3192: 'Insert Successful for Job id: ' || TO_CHAR(p_wip_entity_id));
3193: END IF;
3186:
3187: -- statement level logging
3188: IF (l_sLog) THEN
3189: FND_LOG.STRING(
3190: FND_LOG.LEVEL_STATEMENT,
3191: l_module || '.' || l_stmt_num,
3192: 'Insert Successful for Job id: ' || TO_CHAR(p_wip_entity_id));
3193: END IF;
3194:
3256: p_data => x_msg_data );
3257:
3258: -- Procedure level log message for exit point
3259: IF (l_pLog) THEN
3260: FND_LOG.STRING(
3261: FND_LOG.LEVEL_PROCEDURE,
3262: l_module || '.end',
3263: 'InsertUpdate_PAC_eamPerBal >>'
3264: );
3257:
3258: -- Procedure level log message for exit point
3259: IF (l_pLog) THEN
3260: FND_LOG.STRING(
3261: FND_LOG.LEVEL_PROCEDURE,
3262: l_module || '.end',
3263: 'InsertUpdate_PAC_eamPerBal >>'
3264: );
3265: END IF;
3270: ROLLBACK TO InsertUpdate_PAC_eamPerBal_PUB;
3271: x_return_status := FND_API.G_RET_STS_ERROR;
3272:
3273: IF (l_uLog) THEN
3274: FND_LOG.STRING(
3275: FND_LOG.LEVEL_UNEXPECTED,
3276: l_module || '.' || l_stmt_num ,
3277: l_msg_data);
3278: END IF;
3271: x_return_status := FND_API.G_RET_STS_ERROR;
3272:
3273: IF (l_uLog) THEN
3274: FND_LOG.STRING(
3275: FND_LOG.LEVEL_UNEXPECTED,
3276: l_module || '.' || l_stmt_num ,
3277: l_msg_data);
3278: END IF;
3279:
3285: ROLLBACK TO InsertUpdate_PAC_eamPerBal_PUB;
3286: x_return_status := FND_API.g_ret_sts_unexp_error ;
3287:
3288: IF (l_uLog) THEN
3289: FND_LOG.STRING(
3290: FND_LOG.LEVEL_UNEXPECTED,
3291: l_module || '.' || l_stmt_num ,
3292: l_msg_data);
3293: END IF;
3286: x_return_status := FND_API.g_ret_sts_unexp_error ;
3287:
3288: IF (l_uLog) THEN
3289: FND_LOG.STRING(
3290: FND_LOG.LEVEL_UNEXPECTED,
3291: l_module || '.' || l_stmt_num ,
3292: l_msg_data);
3293: END IF;
3294:
3307: || SUBSTRB (SQLERRM , 1 , 240));
3308: END IF;
3309:
3310: IF (l_uLog) THEN
3311: FND_LOG.STRING(
3312: FND_LOG.LEVEL_UNEXPECTED,
3313: l_module || '.' || l_stmt_num ,
3314: l_msg_data || SUBSTRB (SQLERRM , 1 , 240));
3315: END IF;
3308: END IF;
3309:
3310: IF (l_uLog) THEN
3311: FND_LOG.STRING(
3312: FND_LOG.LEVEL_UNEXPECTED,
3313: l_module || '.' || l_stmt_num ,
3314: l_msg_data || SUBSTRB (SQLERRM , 1 , 240));
3315: END IF;
3316:
3422: /* 2- PROCEDURE */
3423: /* 1- STATEMENT */
3424:
3425: /* In general, we should use the following:
3426: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3427: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3428: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3429: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3430: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3423: /* 1- STATEMENT */
3424:
3425: /* In general, we should use the following:
3426: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3427: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3428: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3429: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3430: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3431: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3424:
3425: /* In general, we should use the following:
3426: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3427: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3428: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3429: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3430: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3431: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3432: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3425: /* In general, we should use the following:
3426: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3427: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3428: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3429: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3430: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3431: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3432: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3433: */
3426: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3427: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3428: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3429: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3430: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3431: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3432: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3433: */
3434:
3427: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3428: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3429: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3430: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3431: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3432: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3433: */
3434:
3435: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3428: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3429: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3430: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3431: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3432: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3433: */
3434:
3435: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3436: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3431: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3432: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3433: */
3434:
3435: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3436: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3437: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3438:
3439: BEGIN
3432: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3433: */
3434:
3435: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3436: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3437: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3438:
3439: BEGIN
3440:
3433: */
3434:
3435: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3436: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3437: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3438:
3439: BEGIN
3440:
3441: -- Procedure level log message for Entry point
3439: BEGIN
3440:
3441: -- Procedure level log message for Entry point
3442: IF (l_pLog) THEN
3443: FND_LOG.STRING(
3444: FND_LOG.LEVEL_PROCEDURE,
3445: l_module || '.begin',
3446: 'InsertUpdate_PAC_assetPerBal <<');
3447: END IF;
3440:
3441: -- Procedure level log message for Entry point
3442: IF (l_pLog) THEN
3443: FND_LOG.STRING(
3444: FND_LOG.LEVEL_PROCEDURE,
3445: l_module || '.begin',
3446: 'InsertUpdate_PAC_assetPerBal <<');
3447: END IF;
3448:
3507: l_stmt_num := 510;
3508:
3509: -- statement level logging
3510: IF (l_sLog) THEN
3511: FND_LOG.STRING(
3512: FND_LOG.LEVEL_STATEMENT,
3513: l_module || '.' || l_stmt_num,
3514: 'Update Successful for Serial Number ' || TO_CHAR(p_asset_number));
3515: END IF;
3508:
3509: -- statement level logging
3510: IF (l_sLog) THEN
3511: FND_LOG.STRING(
3512: FND_LOG.LEVEL_STATEMENT,
3513: l_module || '.' || l_stmt_num,
3514: 'Update Successful for Serial Number ' || TO_CHAR(p_asset_number));
3515: END IF;
3516:
3576: l_stmt_num := 520;
3577:
3578: -- statement level logging
3579: IF (l_sLog) THEN
3580: FND_LOG.STRING(
3581: FND_LOG.LEVEL_STATEMENT,
3582: l_module || '.' || l_stmt_num,
3583: 'Insert Successful for Serial Number ' || TO_CHAR(p_asset_number));
3584: END IF;
3577:
3578: -- statement level logging
3579: IF (l_sLog) THEN
3580: FND_LOG.STRING(
3581: FND_LOG.LEVEL_STATEMENT,
3582: l_module || '.' || l_stmt_num,
3583: 'Insert Successful for Serial Number ' || TO_CHAR(p_asset_number));
3584: END IF;
3585:
3597: p_data => x_msg_data );
3598:
3599: -- Procedure level log message for exit point
3600: IF (l_pLog) THEN
3601: FND_LOG.STRING(
3602: FND_LOG.LEVEL_PROCEDURE,
3603: l_module || '.end',
3604: 'InsertUpdate_PAC_assetPerBal >>'
3605: );
3598:
3599: -- Procedure level log message for exit point
3600: IF (l_pLog) THEN
3601: FND_LOG.STRING(
3602: FND_LOG.LEVEL_PROCEDURE,
3603: l_module || '.end',
3604: 'InsertUpdate_PAC_assetPerBal >>'
3605: );
3606: END IF;
3611: ROLLBACK TO InsertUpdate_PAC_astPerBal_PUB;
3612: x_return_status := FND_API.G_RET_STS_ERROR;
3613:
3614: IF (l_uLog) THEN
3615: FND_LOG.STRING(
3616: FND_LOG.LEVEL_UNEXPECTED,
3617: l_module || '.' || l_stmt_num ,
3618: l_msg_data);
3619: END IF;
3612: x_return_status := FND_API.G_RET_STS_ERROR;
3613:
3614: IF (l_uLog) THEN
3615: FND_LOG.STRING(
3616: FND_LOG.LEVEL_UNEXPECTED,
3617: l_module || '.' || l_stmt_num ,
3618: l_msg_data);
3619: END IF;
3620:
3626: ROLLBACK TO InsertUpdate_PAC_astPerBal_PUB;
3627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3628:
3629: IF (l_uLog) THEN
3630: FND_LOG.STRING(
3631: FND_LOG.LEVEL_UNEXPECTED,
3632: l_module || '.' || l_stmt_num ,
3633: l_msg_data);
3634: END IF;
3627: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3628:
3629: IF (l_uLog) THEN
3630: FND_LOG.STRING(
3631: FND_LOG.LEVEL_UNEXPECTED,
3632: l_module || '.' || l_stmt_num ,
3633: l_msg_data);
3634: END IF;
3635:
3649:
3650: END IF;
3651:
3652: IF (l_uLog) THEN
3653: FND_LOG.STRING(
3654: FND_LOG.LEVEL_UNEXPECTED,
3655: l_module || '.' || l_stmt_num ,
3656: l_msg_data || SUBSTRB (SQLERRM , 1 , 240));
3657: END IF;
3650: END IF;
3651:
3652: IF (l_uLog) THEN
3653: FND_LOG.STRING(
3654: FND_LOG.LEVEL_UNEXPECTED,
3655: l_module || '.' || l_stmt_num ,
3656: l_msg_data || SUBSTRB (SQLERRM , 1 , 240));
3657: END IF;
3658:
3777: /* 2- PROCEDURE */
3778: /* 1- STATEMENT */
3779:
3780: /* In general, we should use the following:
3781: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3782: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3783: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3784: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3785: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3778: /* 1- STATEMENT */
3779:
3780: /* In general, we should use the following:
3781: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3782: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3783: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3784: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3785: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3786: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3779:
3780: /* In general, we should use the following:
3781: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3782: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3783: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3784: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3785: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3786: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3787: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3780: /* In general, we should use the following:
3781: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3782: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3783: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3784: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3785: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3786: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3787: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3788: */
3781: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
3782: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3783: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3784: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3785: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3786: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3787: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3788: */
3789:
3782: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3783: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3784: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3785: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3786: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3787: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3788: */
3789:
3790: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3783: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
3784: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
3785: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
3786: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3787: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3788: */
3789:
3790: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3791: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3786: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3787: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3788: */
3789:
3790: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3791: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3792: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3793:
3794: BEGIN
3787: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3788: */
3789:
3790: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3791: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3792: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3793:
3794: BEGIN
3795:
3788: */
3789:
3790: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
3791: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
3792: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
3793:
3794: BEGIN
3795:
3796: -- Procedure level log message for Entry point
3794: BEGIN
3795:
3796: -- Procedure level log message for Entry point
3797: IF (l_pLog) THEN
3798: FND_LOG.STRING(
3799: FND_LOG.LEVEL_PROCEDURE,
3800: l_module || '.begin',
3801: 'Compute_PAC_JobActuals <<');
3802: END IF;
3795:
3796: -- Procedure level log message for Entry point
3797: IF (l_pLog) THEN
3798: FND_LOG.STRING(
3799: FND_LOG.LEVEL_PROCEDURE,
3800: l_module || '.begin',
3801: 'Compute_PAC_JobActuals <<');
3802: END IF;
3803:
3832: WHERE cpp.pac_period_id = p_pac_period_id;
3833:
3834: -- statement level logging
3835: IF (l_sLog) THEN
3836: FND_LOG.STRING(
3837: FND_LOG.LEVEL_STATEMENT,
3838: l_module || '.' || l_stmt_num,
3839: 'Period details retreived');
3840: END IF;
3833:
3834: -- statement level logging
3835: IF (l_sLog) THEN
3836: FND_LOG.STRING(
3837: FND_LOG.LEVEL_STATEMENT,
3838: l_module || '.' || l_stmt_num,
3839: 'Period details retreived');
3840: END IF;
3841:
3876: END IF;
3877:
3878: -- statement level logging
3879: IF (l_sLog) THEN
3880: FND_LOG.STRING(
3881: FND_LOG.LEVEL_STATEMENT,
3882: l_module || '.' || l_stmt_num,
3883: 'Got associated Asset Item');
3884: END IF;
3877:
3878: -- statement level logging
3879: IF (l_sLog) THEN
3880: FND_LOG.STRING(
3881: FND_LOG.LEVEL_STATEMENT,
3882: l_module || '.' || l_stmt_num,
3883: 'Got associated Asset Item');
3884: END IF;
3885:
3895: IF (p_txn_mode = 17 ) then -- For Direct Item txns
3896:
3897: -- statement level logging
3898: IF (l_sLog) THEN
3899: FND_LOG.STRING(
3900: FND_LOG.LEVEL_STATEMENT,
3901: l_module || '.' || l_stmt_num,
3902: 'Processing for Direct Item');
3903: END IF;
3896:
3897: -- statement level logging
3898: IF (l_sLog) THEN
3899: FND_LOG.STRING(
3900: FND_LOG.LEVEL_STATEMENT,
3901: l_module || '.' || l_stmt_num,
3902: 'Processing for Direct Item');
3903: END IF;
3904:
3953: END IF;
3954:
3955: -- statement level logging
3956: IF (l_sLog) THEN
3957: FND_LOG.STRING(
3958: FND_LOG.LEVEL_STATEMENT,
3959: l_module || '.' || l_stmt_num,
3960: 'Maint cost cat and cost element got for Direct Item');
3961: END IF;
3954:
3955: -- statement level logging
3956: IF (l_sLog) THEN
3957: FND_LOG.STRING(
3958: FND_LOG.LEVEL_STATEMENT,
3959: l_module || '.' || l_stmt_num,
3960: 'Maint cost cat and cost element got for Direct Item');
3961: END IF;
3962:
3963: ELSE -- Not a direct Item
3964:
3965: -- statement level logging
3966: IF (l_sLog) THEN
3967: FND_LOG.STRING(
3968: FND_LOG.LEVEL_STATEMENT,
3969: l_module || '.' || l_stmt_num,
3970: 'Not a Direct Item');
3971: END IF;
3964:
3965: -- statement level logging
3966: IF (l_sLog) THEN
3967: FND_LOG.STRING(
3968: FND_LOG.LEVEL_STATEMENT,
3969: l_module || '.' || l_stmt_num,
3970: 'Not a Direct Item');
3971: END IF;
3972:
4011: END IF;
4012:
4013: -- statement level logging
4014: IF (l_sLog) THEN
4015: FND_LOG.STRING(
4016: FND_LOG.LEVEL_STATEMENT,
4017: l_module || '.' || l_stmt_num,
4018: 'Got Maint cost cat and cost element values');
4019: END IF;
4012:
4013: -- statement level logging
4014: IF (l_sLog) THEN
4015: FND_LOG.STRING(
4016: FND_LOG.LEVEL_STATEMENT,
4017: l_module || '.' || l_stmt_num,
4018: 'Got Maint cost cat and cost element values');
4019: END IF;
4020:
4063: END IF;
4064:
4065: -- statement level logging
4066: IF (l_sLog) THEN
4067: FND_LOG.STRING(
4068: FND_LOG.LEVEL_STATEMENT,
4069: l_module || '.' || l_stmt_num,
4070: 'Insert/Update successful for Actuals');
4071: END IF;
4064:
4065: -- statement level logging
4066: IF (l_sLog) THEN
4067: FND_LOG.STRING(
4068: FND_LOG.LEVEL_STATEMENT,
4069: l_module || '.' || l_stmt_num,
4070: 'Insert/Update successful for Actuals');
4071: END IF;
4072:
4080: p_data => x_msg_data );
4081:
4082: -- Procedure level log message for exit point
4083: IF (l_pLog) THEN
4084: FND_LOG.STRING(
4085: FND_LOG.LEVEL_PROCEDURE,
4086: l_module || '.end',
4087: 'Compute_PAC_JobActuals >>'
4088: );
4081:
4082: -- Procedure level log message for exit point
4083: IF (l_pLog) THEN
4084: FND_LOG.STRING(
4085: FND_LOG.LEVEL_PROCEDURE,
4086: l_module || '.end',
4087: 'Compute_PAC_JobActuals >>'
4088: );
4089: END IF;
4094: ROLLBACK TO Compute_PAC_JobActuals_PUB;
4095: x_return_status := FND_API.G_RET_STS_ERROR;
4096:
4097: IF (l_uLog) THEN
4098: FND_LOG.STRING(
4099: FND_LOG.LEVEL_UNEXPECTED,
4100: l_module || '.' || l_stmt_num ,
4101: l_msg_data);
4102: END IF;
4095: x_return_status := FND_API.G_RET_STS_ERROR;
4096:
4097: IF (l_uLog) THEN
4098: FND_LOG.STRING(
4099: FND_LOG.LEVEL_UNEXPECTED,
4100: l_module || '.' || l_stmt_num ,
4101: l_msg_data);
4102: END IF;
4103:
4109: ROLLBACK TO Compute_PAC_JobActuals_PUB;
4110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4111:
4112: IF (l_uLog) THEN
4113: FND_LOG.STRING(
4114: FND_LOG.LEVEL_UNEXPECTED,
4115: l_module || '.' || l_stmt_num ,
4116: l_msg_data);
4117: END IF;
4110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4111:
4112: IF (l_uLog) THEN
4113: FND_LOG.STRING(
4114: FND_LOG.LEVEL_UNEXPECTED,
4115: l_module || '.' || l_stmt_num ,
4116: l_msg_data);
4117: END IF;
4118:
4131: || SUBSTRB (SQLERRM , 1 , 240));
4132: END IF;
4133:
4134: IF (l_uLog) THEN
4135: FND_LOG.STRING(
4136: FND_LOG.LEVEL_UNEXPECTED,
4137: l_module || '.' || l_stmt_num ,
4138: l_msg_data || SUBSTRB (SQLERRM , 1 , 240));
4139: END IF;
4132: END IF;
4133:
4134: IF (l_uLog) THEN
4135: FND_LOG.STRING(
4136: FND_LOG.LEVEL_UNEXPECTED,
4137: l_module || '.' || l_stmt_num ,
4138: l_msg_data || SUBSTRB (SQLERRM , 1 , 240));
4139: END IF;
4140:
4243: /* 2- PROCEDURE */
4244: /* 1- STATEMENT */
4245:
4246: /* In general, we should use the following:
4247: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4248: l_uLog CONSTANT BOOLEAN := FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4249: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
4250: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
4251: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
4244: /* 1- STATEMENT */
4245:
4246: /* In general, we should use the following:
4247: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4248: l_uLog CONSTANT BOOLEAN := FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4249: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
4250: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
4251: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
4252: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4245:
4246: /* In general, we should use the following:
4247: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4248: l_uLog CONSTANT BOOLEAN := FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4249: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
4250: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
4251: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
4252: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4253: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4246: /* In general, we should use the following:
4247: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4248: l_uLog CONSTANT BOOLEAN := FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4249: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
4250: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
4251: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
4252: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4253: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4254: */
4247: G_LOG_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4248: l_uLog CONSTANT BOOLEAN := FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4249: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
4250: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
4251: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
4252: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4253: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4254: */
4255:
4248: l_uLog CONSTANT BOOLEAN := FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4249: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
4250: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
4251: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
4252: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4253: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4254: */
4255:
4256: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4249: l_errorLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_ERROR >= G_LOG_LEVEL);
4250: l_exceptionLog CONSTANT BOOLEAN := l_errorLog AND (FND_LOG.LEVEL_EXCEPTION >= G_LOG_LEVEL);
4251: l_eventLog CONSTANT BOOLEAN := l_exceptionLog AND (FND_LOG.LEVEL_EVENT >= G_LOG_LEVEL);
4252: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4253: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4254: */
4255:
4256: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4257: FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4252: l_pLog CONSTANT BOOLEAN := l_eventLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4253: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4254: */
4255:
4256: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4257: FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4258: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4259: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4260:
4253: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4254: */
4255:
4256: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4257: FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4258: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4259: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4260:
4261: l_cnt_cebba NUMBER;
4254: */
4255:
4256: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4257: FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4258: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4259: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4260:
4261: l_cnt_cebba NUMBER;
4262: l_stmt_num NUMBER;
4255:
4256: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4257: FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4258: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4259: l_sLog CONSTANT BOOLEAN := l_pLog AND (FND_LOG.LEVEL_STATEMENT >= G_LOG_LEVEL);
4260:
4261: l_cnt_cebba NUMBER;
4262: l_stmt_num NUMBER;
4263:
4265: -- Standard Start of API savepoint
4266: SAVEPOINT Insert_PAC_eamBalAcct_PUB;
4267:
4268: if( l_pLog ) then
4269: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
4270: l_module || '.begin',
4271: 'Start of ' || l_full_name || '(' ||
4272: 'p_user_id=' || p_user_id || ',' ||
4273: 'p_login_id=' || p_login_id ||',' ||
4391: p_login_id
4392: );
4393:
4394: if( l_sLog ) then
4395: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
4396: l_module || '.' || to_char(l_stmt_num),
4397: '.updated/inserted the record for :' || to_char(p_wip_entity_id)
4398: );
4399: end if;
4405:
4406:
4407: /* Procedure level log message for Exit point */
4408: IF (l_pLog) THEN
4409: FND_LOG.STRING(
4410: FND_LOG.LEVEL_PROCEDURE,
4411: l_module || '.end',
4412: 'End of ' || l_full_name
4413: );
4406:
4407: /* Procedure level log message for Exit point */
4408: IF (l_pLog) THEN
4409: FND_LOG.STRING(
4410: FND_LOG.LEVEL_PROCEDURE,
4411: l_module || '.end',
4412: 'End of ' || l_full_name
4413: );
4414: END IF;
4424: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4425: ROLLBACK TO Insert_PAC_eamBalAcct_PUB;
4426:
4427: IF (l_uLog) THEN
4428: FND_LOG.STRING(
4429: FND_LOG.LEVEL_UNEXPECTED,
4430: l_module || '.' || l_stmt_num,
4431: l_full_name ||'('|| l_stmt_num ||') :' || SUBSTRB (SQLERRM , 1 , 240)
4432: );
4425: ROLLBACK TO Insert_PAC_eamBalAcct_PUB;
4426:
4427: IF (l_uLog) THEN
4428: FND_LOG.STRING(
4429: FND_LOG.LEVEL_UNEXPECTED,
4430: l_module || '.' || l_stmt_num,
4431: l_full_name ||'('|| l_stmt_num ||') :' || SUBSTRB (SQLERRM , 1 , 240)
4432: );
4433: END IF;
4441: ROLLBACK TO Insert_PAC_eamBalAcct_PUB;
4442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4443:
4444: IF (l_uLog) THEN
4445: FND_LOG.STRING(
4446: FND_LOG.LEVEL_UNEXPECTED,
4447: l_module || '.' || l_stmt_num,
4448: l_full_name ||'('|| l_stmt_num ||') :' || SUBSTRB (SQLERRM , 1 , 240)
4449: );
4442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4443:
4444: IF (l_uLog) THEN
4445: FND_LOG.STRING(
4446: FND_LOG.LEVEL_UNEXPECTED,
4447: l_module || '.' || l_stmt_num,
4448: l_full_name ||'('|| l_stmt_num ||') :' || SUBSTRB (SQLERRM , 1 , 240)
4449: );
4450: END IF;
4512:
4513: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
4514: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.'||l_full_name;
4515:
4516: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4517: FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4518: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4519:
4520: l_stmt_num NUMBER;
4513: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
4514: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.'||l_full_name;
4515:
4516: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4517: FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4518: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4519:
4520: l_stmt_num NUMBER;
4521: BEGIN
4514: l_module CONSTANT VARCHAR2(60) := 'cst.plsql.'||l_full_name;
4515:
4516: l_uLog CONSTANT BOOLEAN := FND_LOG.LEVEL_UNEXPECTED >= G_LOG_LEVEL AND
4517: FND_LOG.TEST(FND_LOG.LEVEL_UNEXPECTED, l_module);
4518: l_pLog CONSTANT BOOLEAN := l_uLog AND (FND_LOG.LEVEL_PROCEDURE >= G_LOG_LEVEL);
4519:
4520: l_stmt_num NUMBER;
4521: BEGIN
4522: -- Standard Start of API savepoint
4534: FND_MSG_PUB.initialize;
4535: END IF;
4536:
4537: if( l_pLog ) then
4538: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
4539: l_module || '.begin',
4540: 'Start of ' || l_full_name);
4541: end if;
4542:
4561: END IF;
4562:
4563: /* Procedure level log message for Exit point */
4564: IF (l_pLog) THEN
4565: FND_LOG.STRING(
4566: FND_LOG.LEVEL_PROCEDURE,
4567: l_module || '.end',
4568: 'End of ' || l_full_name
4569: );
4562:
4563: /* Procedure level log message for Exit point */
4564: IF (l_pLog) THEN
4565: FND_LOG.STRING(
4566: FND_LOG.LEVEL_PROCEDURE,
4567: l_module || '.end',
4568: 'End of ' || l_full_name
4569: );
4570: END IF;
4581: ROLLBACK TO Delete_PAC_eamBalAcct_PUB;
4582: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4583:
4584: IF (l_uLog) THEN
4585: FND_LOG.STRING(
4586: FND_LOG.LEVEL_UNEXPECTED,
4587: l_module || '.' || l_stmt_num,
4588: l_full_name ||'('|| l_stmt_num ||') :' ||
4589: SUBSTRB (SQLERRM , 1 , 240));
4582: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4583:
4584: IF (l_uLog) THEN
4585: FND_LOG.STRING(
4586: FND_LOG.LEVEL_UNEXPECTED,
4587: l_module || '.' || l_stmt_num,
4588: l_full_name ||'('|| l_stmt_num ||') :' ||
4589: SUBSTRB (SQLERRM , 1 , 240));
4590: END IF;
4597: ROLLBACK TO Delete_PAC_eamBalAcct_PUB;
4598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4599:
4600: IF (l_uLog) THEN
4601: FND_LOG.STRING(
4602: FND_LOG.LEVEL_UNEXPECTED,
4603: l_module || '.' || l_stmt_num,
4604: l_full_name ||'('|| l_stmt_num ||') :' ||
4605: SUBSTRB (SQLERRM , 1 , 240));
4598: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4599:
4600: IF (l_uLog) THEN
4601: FND_LOG.STRING(
4602: FND_LOG.LEVEL_UNEXPECTED,
4603: l_module || '.' || l_stmt_num,
4604: l_full_name ||'('|| l_stmt_num ||') :' ||
4605: SUBSTRB (SQLERRM , 1 , 240));
4606: END IF;