DBA Data[Home] [Help]

APPS.CSD_REPAIR_ACTUAL_PROCESS_PVT dependencies on FND_API

Line 135: x_warning_flag := FND_API.G_FALSE;

131: 'p_repair_type_id: ' || p_repair_type_id);
132: end if;
133:
134: -- Set the warning flag
135: x_warning_flag := FND_API.G_FALSE;
136:
137: if (lc_stat_level >= lc_debug_level) then
138: FND_LOG.STRING(lc_stat_level, lc_mod_name,
139: 'Before the FOR LOOP for C_Resource_Item_Not_Defined.');

Line 144: x_warning_flag := FND_API.G_TRUE;

140: end if;
141:
142: -- Simply gets all records and log warnings for each of them.
143: FOR i_rec IN C_Resource_Item_Not_Defined LOOP
144: x_warning_flag := FND_API.G_TRUE;
145: if (lc_stat_level >= lc_debug_level) then
146: FND_LOG.STRING(lc_stat_level, lc_mod_name,
147: 'The billing item is not defined for the Resource = ' || i_rec.RESOURCE_CODE);
148: end if;

Line 175: x_warning_flag := FND_API.G_TRUE;

171: FOR i_rec IN C_Resource_Item_In_Depot_Org LOOP
172:
173: IF i_rec.Quantity > 0 THEN
174: IF ( i_rec.DEPOT_ITEM_ID IS NULL ) THEN
175: x_warning_flag := FND_API.G_TRUE;
176: if (lc_stat_level >= lc_debug_level) then
177: FND_LOG.STRING(lc_stat_level, lc_mod_name,
178: 'The item ' || i_rec.WIP_ITEM_NAME || ' is not defined in the Service '
179: || 'Validation Organization. It is defined only in the WIP organization.');

Line 186: x_warning_flag := FND_API.G_TRUE;

182: -- 'The item $ITEM_NAME is not defined in the Service Validation Organization. It is defined only in the WIP organization.
183: FND_MESSAGE.set_token( 'ITEM_NAME', i_rec.WIP_ITEM_NAME );
184: FND_MSG_PUB.add_detail( p_message_type => FND_MSG_PUB.G_WARNING_MSG );
185: ELSIF ( i_rec.BILLING_TYPE IS NULL ) THEN
186: x_warning_flag := FND_API.G_TRUE;
187: if (lc_stat_level >= lc_debug_level) then
188: FND_LOG.STRING(lc_stat_level, lc_mod_name,
189: 'Billing type is not defined for the item ' || i_rec.WIP_ITEM_NAME);
190: end if;

Line 213: x_warning_flag := FND_API.G_TRUE;

209:
210: -- Simply gets all records and log warnings for each of them.
211: FOR i_rec IN C_Resource_Txn_Billing_Type LOOP
212: IF i_rec.Quantity > 0 THEN
213: x_warning_flag := FND_API.G_TRUE;
214: if (lc_stat_level >= lc_debug_level) then
215: FND_LOG.STRING(lc_stat_level, lc_mod_name,
216: 'Unable to determine service activity billing type for the item ' || i_rec.DEPOT_ITEM_NAME);
217: end if;

Line 366: x_warning_flag := FND_API.G_FALSE;

362: 'p_repair_type_id: ' || p_repair_type_id);
363: end if;
364:
365: -- Set the warning flag
366: x_warning_flag := FND_API.G_FALSE;
367:
368: if (lc_stat_level >= lc_debug_level) then
369: FND_LOG.STRING(lc_stat_level, lc_mod_name,
370: 'Before the FOR LOOP for C_MTL_Item_In_Depot_Org.');

Line 387: x_warning_flag := FND_API.G_TRUE;

383: FND_LOG.STRING(lc_stat_level, lc_mod_name,
384: 'The item ' || i_rec.WIP_ITEM_NAME || ' is not defined in the Service '
385: || 'Validation Organization. It is defined only in the WIP organization.');
386: end if;
387: x_warning_flag := FND_API.G_TRUE;
388: FND_MESSAGE.set_name('CSD','CSD_ACT_ITEM_NOT_SRV_ORG');
389: -- The item $ITEM_NAME is not defined in the Service Validation Organization. It is defined only in the WIP organization.
390: FND_MESSAGE.set_token('ITEM_NAME', i_rec.WIP_ITEM_NAME);
391: FND_MSG_PUB.add_detail( p_message_type => FND_MSG_PUB.G_WARNING_MSG );

Line 397: x_warning_flag := FND_API.G_TRUE;

393: if (lc_stat_level >= lc_debug_level) then
394: FND_LOG.STRING(lc_stat_level, lc_mod_name,
395: 'Billing type is not defined for the item ' || i_rec.WIP_ITEM_NAME);
396: end if;
397: x_warning_flag := FND_API.G_TRUE;
398: FND_MESSAGE.set_name('CSD','CSD_ACT_ITEM_NO_BILLING_TYPE');
399: -- '''Billing type'' is not defined for the item $ITEM_NAME.
400: FND_MESSAGE.set_token('ITEM_NAME', i_rec.WIP_ITEM_NAME);
401: FND_MSG_PUB.add_detail( p_message_type => FND_MSG_PUB.G_WARNING_MSG );

Line 419: x_warning_flag := FND_API.G_TRUE;

415:
416: -- Simply gets all records and log warnings for each of them.
417: FOR i_rec IN C_MTL_Txn_Billing_Type LOOP
418: IF i_rec.Quantity > 0 THEN
419: x_warning_flag := FND_API.G_TRUE;
420: if (lc_stat_level >= lc_debug_level) then
421: FND_LOG.STRING(lc_stat_level, lc_mod_name,
422: 'Unable to determine service activity billing type for the item ' || i_rec.DEPOT_ITEM_NAME);
423: end if;

Line 600: IF NOT FND_API.Compatible_API_Call (lc_api_version,

596: -- Standard start of API Savepoint
597: Savepoint Import_Actuals_Task_sp;
598:
599: -- Standard call to check for call compatibility.
600: IF NOT FND_API.Compatible_API_Call (lc_api_version,
601: p_api_version,
602: lc_api_name ,
603: G_PKG_NAME )
604: THEN

Line 605: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

601: p_api_version,
602: lc_api_name ,
603: G_PKG_NAME )
604: THEN
605: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
606: END IF;
607:
608: -- Initialize message list if p_init_msg_list is set to TRUE.
609: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 609: IF FND_API.to_Boolean( p_init_msg_list ) THEN

605: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
606: END IF;
607:
608: -- Initialize message list if p_init_msg_list is set to TRUE.
609: IF FND_API.to_Boolean( p_init_msg_list ) THEN
610: FND_MSG_PUB.initialize;
611: END IF;
612:
613: -- logging

Line 636: x_return_status := FND_API.G_RET_STS_SUCCESS;

632: 'p_repair_actual_id: ' || p_repair_actual_id);
633: end if;
634:
635: -- Initialize API return status to success
636: x_return_status := FND_API.G_RET_STS_SUCCESS;
637:
638: --
639: -- Begin API Body
640: --

Line 643: x_warning_flag := FND_API.G_FALSE;

639: -- Begin API Body
640: --
641:
642: -- Initialzing the warning flag.
643: x_warning_flag := FND_API.G_FALSE;
644:
645: -- Validate mandatory input parameters.
646: if (lc_proc_level >= lc_debug_level) then
647: FND_LOG.STRING(lc_proc_level, lc_mod_name,

Line 694: RAISE FND_API.G_EXC_ERROR;

690: -- repair order currency. It was found that, one or more
691: -- charge line(s) are in a currency different than the
692: -- repair order currency.
693: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
694: RAISE FND_API.G_EXC_ERROR;
695: END IF;
696:
697: -- Before we start the process of copying the
698: -- lines, we purge any existing error messages for the

Line 706: -- p_commit => FND_API.G_TRUE,

702: 'Calling CSD_GEN_ERRMSGS_PVT.purge_entity_msgs');
703: end if;
704: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs(
705: p_api_version => 1.0,
706: -- p_commit => FND_API.G_TRUE,
707: -- p_init_msg_list => FND_API.G_FALSE,
708: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
709: p_module_code => G_MSG_MODULE_CODE_ACT,
710: p_source_entity_id1 => p_repair_line_id,

Line 707: -- p_init_msg_list => FND_API.G_FALSE,

703: end if;
704: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs(
705: p_api_version => 1.0,
706: -- p_commit => FND_API.G_TRUE,
707: -- p_init_msg_list => FND_API.G_FALSE,
708: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
709: p_module_code => G_MSG_MODULE_CODE_ACT,
710: p_source_entity_id1 => p_repair_line_id,
711: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_TASK,

Line 708: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,

704: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs(
705: p_api_version => 1.0,
706: -- p_commit => FND_API.G_TRUE,
707: -- p_init_msg_list => FND_API.G_FALSE,
708: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
709: p_module_code => G_MSG_MODULE_CODE_ACT,
710: p_source_entity_id1 => p_repair_line_id,
711: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_TASK,
712: p_source_entity_id2 => NULL, -- Since we want to delete all messages.

Line 725: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN

721: end if;
722:
723: -- Stall the process if we were unable to purge
724: -- the older messages.
725: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
726: RAISE FND_API.G_EXC_ERROR;
727: END IF;
728:
729: -- swai: bug 7122368

Line 726: RAISE FND_API.G_EXC_ERROR;

722:
723: -- Stall the process if we were unable to purge
724: -- the older messages.
725: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
726: RAISE FND_API.G_EXC_ERROR;
727: END IF;
728:
729: -- swai: bug 7122368
730: Get_Default_Third_Party_Info (p_repair_line_id => p_repair_line_id,

Line 870: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

866: -- Throw an error if the API returned an error.
867: -- We do not stall the process if we find an error in
868: -- copying the charge line. We continue processing of
869: -- other lines. We just skip the current row.
870: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
871: RAISE FND_API.G_EXC_ERROR;
872: END IF;
873:
874: IF (l_curr_actual_line_rec.repair_actual_line_id IS NULL) THEN

Line 871: RAISE FND_API.G_EXC_ERROR;

867: -- We do not stall the process if we find an error in
868: -- copying the charge line. We continue processing of
869: -- other lines. We just skip the current row.
870: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
871: RAISE FND_API.G_EXC_ERROR;
872: END IF;
873:
874: IF (l_curr_actual_line_rec.repair_actual_line_id IS NULL) THEN
875: if (lc_proc_level >= lc_debug_level) then

Line 882: RAISE FND_API.G_EXC_ERROR;

878: end if;
879: FND_MESSAGE.SET_NAME('CSD','CSD_ACT_NULL_ACTUAL_ID');
880: -- 'Unable to create a repair actual line. Create API returned NULL for the repair actual line identifier.
881: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
882: RAISE FND_API.G_EXC_ERROR;
883: END IF;
884:
885: EXCEPTION
886: WHEN FND_API.G_EXC_ERROR THEN

Line 886: WHEN FND_API.G_EXC_ERROR THEN

882: RAISE FND_API.G_EXC_ERROR;
883: END IF;
884:
885: EXCEPTION
886: WHEN FND_API.G_EXC_ERROR THEN
887: l_skip_curr_row := TRUE;
888: if (lc_excep_level >= lc_debug_level) then
889: FND_LOG.STRING(lc_excep_level, lc_mod_name,
890: 'Encountered an EXC error while creating a repair actual line.');

Line 956: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

952: -- Throw an error if the API returned an error.
953: -- We do not stall the process if we find an error in
954: -- copying the charge line. We continue processing of
955: -- other lines. We just skip the current row.
956: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
957: RAISE FND_API.G_EXC_ERROR;
958: END IF;
959:
960: EXCEPTION

Line 957: RAISE FND_API.G_EXC_ERROR;

953: -- We do not stall the process if we find an error in
954: -- copying the charge line. We continue processing of
955: -- other lines. We just skip the current row.
956: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
957: RAISE FND_API.G_EXC_ERROR;
958: END IF;
959:
960: EXCEPTION
961: WHEN FND_API.G_EXC_ERROR THEN

Line 961: WHEN FND_API.G_EXC_ERROR THEN

957: RAISE FND_API.G_EXC_ERROR;
958: END IF;
959:
960: EXCEPTION
961: WHEN FND_API.G_EXC_ERROR THEN
962: l_skip_curr_row := TRUE;
963: if (lc_proc_level >= lc_debug_level) then
964: FND_LOG.STRING(lc_proc_level, lc_mod_name,
965: 'Encountered an EXEC error while updating a repair actual line with billing information.');

Line 990: x_warning_flag := FND_API.G_TRUE;

986:
987: -- we rollback any updates/inserts for the current
988: -- record and set the warning flag to TRUE.
989: ROLLBACK TO current_actual_line_sp;
990: x_warning_flag := FND_API.G_TRUE;
991:
992: -- Increment the total count.
993: l_import_line_failed_count := l_import_line_failed_count + 1;
994:

Line 1017: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1013: end if;
1014:
1015: -- If we are unable to log messages then we stop
1016: -- further processing.
1017: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1018: if (lc_proc_level >= lc_debug_level) then
1019: FND_LOG.STRING(lc_proc_level, lc_mod_name,
1020: 'Unable to save messages using the generic logging utility.');
1021: end if;

Line 1025: RAISE FND_API.G_EXC_ERROR;

1021: end if;
1022: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_GENERIC_SAVE_FAILED');
1023: -- Unable to save messages using the generic logging utility.
1024: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
1025: RAISE FND_API.G_EXC_ERROR;
1026: END IF;
1027:
1028: END IF;
1029:

Line 1032: x_warning_flag := FND_API.G_TRUE;

1028: END IF;
1029:
1030: END LOOP;
1031:
1032: x_warning_flag := FND_API.G_TRUE;
1033:
1034: -- If no eligible task debrief lines found for import.
1035: IF( l_import_line_total_count <= 0 ) THEN
1036: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_ACT_TASK_INELIGIBLE');

Line 1056: -- p_commit => FND_API.G_TRUE,

1052: end if;
1053:
1054: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs(
1055: p_api_version => 1.0,
1056: -- p_commit => FND_API.G_TRUE,
1057: -- p_init_msg_list => FND_API.G_FALSE,
1058: -- p_validation_level => p_validation_level,
1059: p_module_code => G_MSG_MODULE_CODE_ACT,
1060: p_source_entity_id1 => p_repair_line_id,

Line 1057: -- p_init_msg_list => FND_API.G_FALSE,

1053:
1054: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs(
1055: p_api_version => 1.0,
1056: -- p_commit => FND_API.G_TRUE,
1057: -- p_init_msg_list => FND_API.G_FALSE,
1058: -- p_validation_level => p_validation_level,
1059: p_module_code => G_MSG_MODULE_CODE_ACT,
1060: p_source_entity_id1 => p_repair_line_id,
1061: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_TASK,

Line 1074: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1070: end if;
1071:
1072: -- If we are unable to log messages then we
1073: -- throw an error.
1074: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1075: if (lc_proc_level >= lc_debug_level) then
1076: FND_LOG.STRING(lc_proc_level, lc_mod_name,
1077: 'Unable to save messages using the generic logging utility.');
1078: end if;

Line 1082: RAISE FND_API.G_EXC_ERROR;

1078: end if;
1079: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_GENERIC_SAVE_FAILED');
1080: -- Unable to save messages using the generic logging utility.
1081: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
1082: RAISE FND_API.G_EXC_ERROR;
1083: END IF;
1084:
1085: -- Standard check of p_commit.
1086: IF FND_API.To_Boolean( p_commit ) THEN

Line 1086: IF FND_API.To_Boolean( p_commit ) THEN

1082: RAISE FND_API.G_EXC_ERROR;
1083: END IF;
1084:
1085: -- Standard check of p_commit.
1086: IF FND_API.To_Boolean( p_commit ) THEN
1087: COMMIT WORK;
1088: END IF;
1089:
1090: -- logging

Line 1097: WHEN FND_API.G_EXC_ERROR THEN

1093: 'Leaving CSD_REPAIR_ACTUAL_PROCESS_PVT.import_actuals_from_task');
1094: end if;
1095:
1096: EXCEPTION
1097: WHEN FND_API.G_EXC_ERROR THEN
1098: x_return_status := FND_API.G_RET_STS_ERROR ;
1099: ROLLBACK TO Import_Actuals_Task_sp;
1100: FND_MSG_PUB.Count_And_Get
1101: (p_count => x_msg_count,

Line 1098: x_return_status := FND_API.G_RET_STS_ERROR ;

1094: end if;
1095:
1096: EXCEPTION
1097: WHEN FND_API.G_EXC_ERROR THEN
1098: x_return_status := FND_API.G_RET_STS_ERROR ;
1099: ROLLBACK TO Import_Actuals_Task_sp;
1100: FND_MSG_PUB.Count_And_Get
1101: (p_count => x_msg_count,
1102: p_data => x_msg_data );

Line 1109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1105: IF (lc_excep_level >= lc_debug_level) THEN
1106: FND_LOG.STRING(lc_excep_level, lc_mod_name,
1107: 'EXC_ERROR['||x_msg_data||']');
1108: END IF;
1109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1111: ROLLBACK TO Import_Actuals_Task_sp;
1112: FND_MSG_PUB.Count_And_Get
1113: ( p_count => x_msg_count,

Line 1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1106: FND_LOG.STRING(lc_excep_level, lc_mod_name,
1107: 'EXC_ERROR['||x_msg_data||']');
1108: END IF;
1109: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1110: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1111: ROLLBACK TO Import_Actuals_Task_sp;
1112: FND_MSG_PUB.Count_And_Get
1113: ( p_count => x_msg_count,
1114: p_data => x_msg_data );

Line 1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1118: FND_LOG.STRING(lc_excep_level, lc_mod_name,
1119: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
1120: END IF;
1121: WHEN OTHERS THEN
1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1123: ROLLBACK TO Import_Actuals_Task_sp;
1124: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1125: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME ,lc_api_name );
1126: END IF;

Line 1405: IF NOT FND_API.Compatible_API_Call( lc_api_version,

1401: -- Standard Start of API savepoint
1402: SAVEPOINT Import_actuals_wip_sp;
1403:
1404: -- Standard call to check for call compatibility.
1405: IF NOT FND_API.Compatible_API_Call( lc_api_version,
1406: p_api_version,
1407: lc_api_name,
1408: G_PKG_NAME ) THEN
1409: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1409: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1405: IF NOT FND_API.Compatible_API_Call( lc_api_version,
1406: p_api_version,
1407: lc_api_name,
1408: G_PKG_NAME ) THEN
1409: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1410: END IF;
1411:
1412: -- Initialize message list if p_init_msg_list is set to TRUE.
1413: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 1413: IF FND_API.to_Boolean( p_init_msg_list ) THEN

1409: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1410: END IF;
1411:
1412: -- Initialize message list if p_init_msg_list is set to TRUE.
1413: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1414: FND_MSG_PUB.initialize;
1415: END IF;
1416:
1417: -- logging

Line 1450: x_return_status := FND_API.G_RET_STS_SUCCESS;

1446: 'p_organization_id: ' || p_organization_id);
1447: end if;
1448:
1449: -- Initialize API return status to success
1450: x_return_status := FND_API.G_RET_STS_SUCCESS;
1451:
1452: --
1453: -- Begin API Body
1454: --

Line 1456: x_warning_flag := FND_API.G_FALSE;

1452: --
1453: -- Begin API Body
1454: --
1455:
1456: x_warning_flag := FND_API.G_FALSE;
1457:
1458: --DBMS_OUTPUT.put_line( 'before api begin' );
1459:
1460: -- Validate mandatory input parameters.

Line 1574: RAISE FND_API.G_EXC_ERROR;

1570: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_ACT_DEFAULT_PL_IMPORT');
1571: -- Unable to determine default price list for the repair order.
1572: -- A default price list must be selected for the repair order to import actual lines.
1573: FND_MSG_PUB.ADD;
1574: RAISE FND_API.G_EXC_ERROR;
1575: END IF;
1576:
1577: --DBMS_OUTPUT.put_line( 'The price list is available ' );
1578:

Line 1586: -- p_commit => FND_API.G_TRUE,

1582: FND_LOG.STRING(lc_proc_level, lc_mod_name,
1583: 'Calling CSD_GEN_ERRMSGS_PVT.purge_entity_msgs');
1584: end if;
1585: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs( p_api_version => 1.0,
1586: -- p_commit => FND_API.G_TRUE,
1587: -- p_init_msg_list => FND_API.G_FALSE,
1588: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1589: p_module_code => G_MSG_MODULE_CODE_ACT,
1590: p_source_entity_id1 => p_repair_line_id,

Line 1587: -- p_init_msg_list => FND_API.G_FALSE,

1583: 'Calling CSD_GEN_ERRMSGS_PVT.purge_entity_msgs');
1584: end if;
1585: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs( p_api_version => 1.0,
1586: -- p_commit => FND_API.G_TRUE,
1587: -- p_init_msg_list => FND_API.G_FALSE,
1588: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1589: p_module_code => G_MSG_MODULE_CODE_ACT,
1590: p_source_entity_id1 => p_repair_line_id,
1591: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_WIP,

Line 1588: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1584: end if;
1585: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs( p_api_version => 1.0,
1586: -- p_commit => FND_API.G_TRUE,
1587: -- p_init_msg_list => FND_API.G_FALSE,
1588: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1589: p_module_code => G_MSG_MODULE_CODE_ACT,
1590: p_source_entity_id1 => p_repair_line_id,
1591: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_WIP,
1592: p_source_entity_id2 => NULL,-- Purge all records for the entity

Line 1604: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1600: end if;
1601:
1602: -- Do not proceed if unable to purge.
1603: -- Throw an error if the API returned 'no success'.
1604: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1605: RAISE FND_API.G_EXC_ERROR;
1606: END IF;
1607:
1608: -- Log info messages for all the wip jobs that are shared with other

Line 1605: RAISE FND_API.G_EXC_ERROR;

1601:
1602: -- Do not proceed if unable to purge.
1603: -- Throw an error if the API returned 'no success'.
1604: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1605: RAISE FND_API.G_EXC_ERROR;
1606: END IF;
1607:
1608: -- Log info messages for all the wip jobs that are shared with other
1609: -- repair orders.

Line 1636: -- p_commit => FND_API.G_TRUE,

1632: end if;
1633: -- We have to log message individually as wip_entity_id is required for
1634: -- logging messages.
1635: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
1636: -- p_commit => FND_API.G_TRUE,
1637: -- p_init_msg_list => FND_API.G_FALSE,
1638: -- p_validation_level => p_validation_level,
1639: p_module_code => G_MSG_MODULE_CODE_ACT,
1640: p_source_entity_id1 => p_repair_line_id,

Line 1637: -- p_init_msg_list => FND_API.G_FALSE,

1633: -- We have to log message individually as wip_entity_id is required for
1634: -- logging messages.
1635: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
1636: -- p_commit => FND_API.G_TRUE,
1637: -- p_init_msg_list => FND_API.G_FALSE,
1638: -- p_validation_level => p_validation_level,
1639: p_module_code => G_MSG_MODULE_CODE_ACT,
1640: p_source_entity_id1 => p_repair_line_id,
1641: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_WIP,

Line 1652: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1648: FND_LOG.STRING(lc_proc_level, lc_mod_name,
1649: 'Returned from CSD_GEN_ERRMSGS_PVT.save_fnd_msgs');
1650: end if;
1651:
1652: IF ( x_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1653: --DBMS_OUTPUT.put_line( 'Unable to save FND msgs' );
1654: RAISE GENERIC_MSG_SAVE_FAILED;
1655: END IF;
1656:

Line 1703: l_curr_warning_flag VARCHAR2(5) := FND_API.G_FALSE;

1699: -- CSD_REPAIR_ACTUAL_LINES_PVT.CSD_ACTUAL_LINES_TBL_TYPE is specific to
1700: -- Actuals.
1701: l_actual_lines_tbl CSD_REPAIR_ACTUAL_LINES_PVT.CSD_ACTUAL_LINES_TBL_TYPE;
1702:
1703: l_curr_warning_flag VARCHAR2(5) := FND_API.G_FALSE;
1704: x_curr_warning_flag VARCHAR2(5) := FND_API.G_FALSE;
1705: l_actuals_count NUMBER := 0;
1706:
1707: l_message VARCHAR2(30) := NULL;

Line 1704: x_curr_warning_flag VARCHAR2(5) := FND_API.G_FALSE;

1700: -- Actuals.
1701: l_actual_lines_tbl CSD_REPAIR_ACTUAL_LINES_PVT.CSD_ACTUAL_LINES_TBL_TYPE;
1702:
1703: l_curr_warning_flag VARCHAR2(5) := FND_API.G_FALSE;
1704: x_curr_warning_flag VARCHAR2(5) := FND_API.G_FALSE;
1705: l_actuals_count NUMBER := 0;
1706:
1707: l_message VARCHAR2(30) := NULL;
1708:

Line 1709: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1705: l_actuals_count NUMBER := 0;
1706:
1707: l_message VARCHAR2(30) := NULL;
1708:
1709: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1710: l_msg_count NUMBER;
1711: l_msg_data VARCHAR2(200);
1712:
1713: BEGIN

Line 1757: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN

1753: end if;
1754:
1755: --DBMS_OUTPUT.put_line( 'After log MTL Txn Warnings ...' );
1756:
1757: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN
1758: l_curr_warning_flag := FND_API.G_TRUE;
1759: END IF;
1760:
1761: -- First, we process the material transaction lines for all the WIP

Line 1758: l_curr_warning_flag := FND_API.G_TRUE;

1754:
1755: --DBMS_OUTPUT.put_line( 'After log MTL Txn Warnings ...' );
1756:
1757: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN
1758: l_curr_warning_flag := FND_API.G_TRUE;
1759: END IF;
1760:
1761: -- First, we process the material transaction lines for all the WIP
1762: -- jobs. Getting the table for all the lines.

Line 1823: p_commit => FND_API.G_FALSE,

1819:
1820: -- Filter out all the bad data and populate 'Charges' table
1821: -- and MLE table with valid set of data.
1822: CSD_CHARGE_LINE_UTIL.Convert_To_Charge_Lines( p_api_version => 1.0,
1823: p_commit => FND_API.G_FALSE,
1824: p_init_msg_list => FND_API.G_FALSE,
1825: p_validation_level => p_validation_level,
1826: x_return_status => l_return_status,
1827: x_msg_count => l_msg_count,

Line 1824: p_init_msg_list => FND_API.G_FALSE,

1820: -- Filter out all the bad data and populate 'Charges' table
1821: -- and MLE table with valid set of data.
1822: CSD_CHARGE_LINE_UTIL.Convert_To_Charge_Lines( p_api_version => 1.0,
1823: p_commit => FND_API.G_FALSE,
1824: p_init_msg_list => FND_API.G_FALSE,
1825: p_validation_level => p_validation_level,
1826: x_return_status => l_return_status,
1827: x_msg_count => l_msg_count,
1828: x_msg_data => l_msg_data,

Line 1855: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN

1851:
1852: --DBMS_OUTPUT.put_line( 'after getting the valid MTL data '
1853: -- || x_valid_MLE_lines_tbl.COUNT );
1854:
1855: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN
1856: l_curr_warning_flag := FND_API.G_TRUE;
1857: END IF;
1858:
1859: -- Throw an error if the API returned an error.

Line 1856: l_curr_warning_flag := FND_API.G_TRUE;

1852: --DBMS_OUTPUT.put_line( 'after getting the valid MTL data '
1853: -- || x_valid_MLE_lines_tbl.COUNT );
1854:
1855: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN
1856: l_curr_warning_flag := FND_API.G_TRUE;
1857: END IF;
1858:
1859: -- Throw an error if the API returned an error.
1860: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

Line 1860: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1856: l_curr_warning_flag := FND_API.G_TRUE;
1857: END IF;
1858:
1859: -- Throw an error if the API returned an error.
1860: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1861: RAISE FND_API.G_EXC_ERROR;
1862: END IF;
1863:
1864: if (lc_stat_level >= lc_debug_level) then

Line 1861: RAISE FND_API.G_EXC_ERROR;

1857: END IF;
1858:
1859: -- Throw an error if the API returned an error.
1860: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1861: RAISE FND_API.G_EXC_ERROR;
1862: END IF;
1863:
1864: if (lc_stat_level >= lc_debug_level) then
1865: FND_LOG.STRING(lc_stat_level, lc_mod_name,

Line 1903: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN

1899: || 'x_curr_warning_flag = ' || x_curr_warning_flag);
1900: end if;
1901:
1902: --DBMS_OUTPUT.put_line( 'After Log_WIP_Resource_Txn_warnings ...' );
1903: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN
1904: l_curr_warning_flag := FND_API.G_TRUE;
1905: END IF;
1906:
1907: -- Now, we process the WIP transaction lines (for resources) for all

Line 1904: l_curr_warning_flag := FND_API.G_TRUE;

1900: end if;
1901:
1902: --DBMS_OUTPUT.put_line( 'After Log_WIP_Resource_Txn_warnings ...' );
1903: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN
1904: l_curr_warning_flag := FND_API.G_TRUE;
1905: END IF;
1906:
1907: -- Now, we process the WIP transaction lines (for resources) for all
1908: -- the WIP jobs. Getting the table for all the lines.

Line 1949: p_commit => FND_API.G_FALSE,

1945:
1946: -- Filter out all the bad data and populate 'Charges' table
1947: -- and MLE table with valid set of data.
1948: CSD_CHARGE_LINE_UTIL.Convert_To_Charge_Lines( p_api_version => 1.0,
1949: p_commit => FND_API.G_FALSE,
1950: p_init_msg_list => FND_API.G_FALSE,
1951: p_validation_level => p_validation_level,
1952: x_return_status => l_return_status,
1953: x_msg_count => l_msg_count,

Line 1950: p_init_msg_list => FND_API.G_FALSE,

1946: -- Filter out all the bad data and populate 'Charges' table
1947: -- and MLE table with valid set of data.
1948: CSD_CHARGE_LINE_UTIL.Convert_To_Charge_Lines( p_api_version => 1.0,
1949: p_commit => FND_API.G_FALSE,
1950: p_init_msg_list => FND_API.G_FALSE,
1951: p_validation_level => p_validation_level,
1952: x_return_status => l_return_status,
1953: x_msg_count => l_msg_count,
1954: x_msg_data => l_msg_data,

Line 1981: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN

1977:
1978: --DBMS_OUTPUT.put_line( 'after getting the valid RES lines '
1979: -- || x_valid_MLE_lines_tbl.COUNT );
1980:
1981: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN
1982: l_curr_warning_flag := FND_API.G_TRUE;
1983: END IF;
1984:
1985: -- Throw an error if the API returned an error.

Line 1982: l_curr_warning_flag := FND_API.G_TRUE;

1978: --DBMS_OUTPUT.put_line( 'after getting the valid RES lines '
1979: -- || x_valid_MLE_lines_tbl.COUNT );
1980:
1981: IF ( x_curr_warning_flag <> FND_API.G_FALSE ) THEN
1982: l_curr_warning_flag := FND_API.G_TRUE;
1983: END IF;
1984:
1985: -- Throw an error if the API returned an error.
1986: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

Line 1986: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

1982: l_curr_warning_flag := FND_API.G_TRUE;
1983: END IF;
1984:
1985: -- Throw an error if the API returned an error.
1986: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1987: RAISE FND_API.G_EXC_ERROR;
1988: END IF;
1989:
1990: if (lc_stat_level >= lc_debug_level) then

Line 1987: RAISE FND_API.G_EXC_ERROR;

1983: END IF;
1984:
1985: -- Throw an error if the API returned an error.
1986: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
1987: RAISE FND_API.G_EXC_ERROR;
1988: END IF;
1989:
1990: if (lc_stat_level >= lc_debug_level) then
1991: FND_LOG.STRING(lc_stat_level, lc_mod_name,

Line 2001: IF ( l_curr_warning_flag <> FND_API.G_FALSE ) THEN

1997: --DBMS_OUTPUT.put_line( 'before call to fnd save msgs' );
1998:
1999: -- Log all the warnings that may have been added to
2000: -- the message stack earlier.
2001: IF ( l_curr_warning_flag <> FND_API.G_FALSE ) THEN
2002: x_warning_flag := l_curr_warning_flag;
2003:
2004: if (lc_stat_level >= lc_debug_level) then
2005: FND_LOG.STRING(lc_stat_level, lc_mod_name,

Line 2015: -- p_commit => FND_API.G_TRUE,

2011: 'Calling procedure CSD_GEN_ERRMSGS_PVT.save_fnd_msgs.');
2012: end if;
2013:
2014: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
2015: -- p_commit => FND_API.G_TRUE,
2016: -- p_init_msg_list => FND_API.G_FALSE,
2017: -- p_validation_level => p_validation_level,
2018: p_module_code => G_MSG_MODULE_CODE_ACT,
2019: p_source_entity_id1 => p_repair_line_id,

Line 2016: -- p_init_msg_list => FND_API.G_FALSE,

2012: end if;
2013:
2014: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
2015: -- p_commit => FND_API.G_TRUE,
2016: -- p_init_msg_list => FND_API.G_FALSE,
2017: -- p_validation_level => p_validation_level,
2018: p_module_code => G_MSG_MODULE_CODE_ACT,
2019: p_source_entity_id1 => p_repair_line_id,
2020: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_WIP,

Line 2033: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

2029: end if;
2030:
2031: --DBMS_OUTPUT.put_line( 'before call to generic save msgs' );
2032:
2033: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2034: --DBMS_OUTPUT.put_line( 'Unable to save FND msgs' );
2035: RAISE GENERIC_MSG_SAVE_FAILED;
2036: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2037: END IF;

Line 2036: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2032:
2033: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2034: --DBMS_OUTPUT.put_line( 'Unable to save FND msgs' );
2035: RAISE GENERIC_MSG_SAVE_FAILED;
2036: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2037: END IF;
2038:
2039: -- swai: bug 10383350
2040: -- if profile set so that entire WIP job is not imported if warnings/errors encountered,

Line 2047: RAISE FND_API.G_EXC_ERROR;

2043: if (lc_proc_level >= lc_debug_level) then
2044: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2045: 'Throw EXC error since not all lines were processed sucessfully');
2046: end if;
2047: RAISE FND_API.G_EXC_ERROR;
2048: end if;
2049:
2050: END IF;
2051:

Line 2120: p_commit => FND_API.G_FALSE,

2116: x_charge_lines_tbl( i ).ship_to_account_id := l_ship_to_account_id;
2117: x_charge_lines_tbl( i ).ship_to_org_id := l_ship_to_party_site_id;
2118:
2119: CSD_REPAIR_ACTUAL_LINES_PVT.create_repair_actual_lines( p_api_version => 1.0,
2120: p_commit => FND_API.G_FALSE,
2121: p_init_msg_list => FND_API.G_FALSE,
2122: p_validation_level => 0,
2123: px_CSD_ACTUAL_LINES_REC => l_actual_lines_tbl( i ),
2124: px_CHARGES_REC => x_charge_lines_tbl( i ),

Line 2121: p_init_msg_list => FND_API.G_FALSE,

2117: x_charge_lines_tbl( i ).ship_to_org_id := l_ship_to_party_site_id;
2118:
2119: CSD_REPAIR_ACTUAL_LINES_PVT.create_repair_actual_lines( p_api_version => 1.0,
2120: p_commit => FND_API.G_FALSE,
2121: p_init_msg_list => FND_API.G_FALSE,
2122: p_validation_level => 0,
2123: px_CSD_ACTUAL_LINES_REC => l_actual_lines_tbl( i ),
2124: px_CHARGES_REC => x_charge_lines_tbl( i ),
2125: x_return_status => l_return_status,

Line 2129: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

2125: x_return_status => l_return_status,
2126: x_msg_count => l_msg_count,
2127: x_msg_data => l_msg_data );
2128:
2129: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2130: if (lc_proc_level >= lc_debug_level) then
2131: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2132: 'Unable to create repair actual lines for count = ' || i);
2133: end if;

Line 2135: RAISE FND_API.G_EXC_ERROR;

2131: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2132: 'Unable to create repair actual lines for count = ' || i);
2133: end if;
2134: --DBMS_OUTPUT.put_line( 'Unable to create repair actual lines' );
2135: RAISE FND_API.G_EXC_ERROR;
2136: END IF;
2137: END LOOP;
2138:
2139: if (lc_proc_level >= lc_debug_level) then

Line 2145: IF ( l_curr_warning_flag <> FND_API.G_FALSE ) THEN

2141: 'Returned from procedure CSD_REPAIR_ACTUAL_LINES_PVT.create_repair_actual_lines'
2142: || ' for all actual lines. l_actuals_count = ' || l_actuals_count);
2143: end if;
2144:
2145: IF ( l_curr_warning_flag <> FND_API.G_FALSE ) THEN
2146: l_message := 'CSD_ACT_WIP_IMPORT_W_WARN';
2147: -- Debrief lines import for the WIP Job $JOB_NAME completed with warnings. $ACTUAL_LINE_COUNT new repair actual line(s) were created for the job.
2148: if (lc_stat_level >= lc_debug_level) then
2149: FND_LOG.STRING(lc_stat_level, lc_mod_name,

Line 2184: -- p_commit => FND_API.G_TRUE,

2180: 'Calling procedure CSD_GEN_ERRMSGS_PVT.save_fnd_msgs.');
2181: end if;
2182:
2183: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
2184: -- p_commit => FND_API.G_TRUE,
2185: -- p_init_msg_list => FND_API.G_FALSE,
2186: -- p_validation_level => p_validation_level,
2187: p_module_code => G_MSG_MODULE_CODE_ACT,
2188: p_source_entity_id1 => p_repair_line_id,

Line 2185: -- p_init_msg_list => FND_API.G_FALSE,

2181: end if;
2182:
2183: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
2184: -- p_commit => FND_API.G_TRUE,
2185: -- p_init_msg_list => FND_API.G_FALSE,
2186: -- p_validation_level => p_validation_level,
2187: p_module_code => G_MSG_MODULE_CODE_ACT,
2188: p_source_entity_id1 => p_repair_line_id,
2189: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_WIP,

Line 2200: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

2196: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2197: 'Returning from procedure CSD_GEN_ERRMSGS_PVT.save_fnd_msgs.');
2198: end if;
2199:
2200: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2201: --DBMS_OUTPUT.put_line( 'Unable to save FND msgs' );
2202: RAISE GENERIC_MSG_SAVE_FAILED;
2203: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2204: END IF;

Line 2203: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2199:
2200: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2201: --DBMS_OUTPUT.put_line( 'Unable to save FND msgs' );
2202: RAISE GENERIC_MSG_SAVE_FAILED;
2203: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2204: END IF;
2205:
2206:
2207: EXCEPTION

Line 2213: WHEN FND_API.G_EXC_ERROR THEN

2209: -- do not consider it be a fatal error. We do not stop
2210: -- the process but continue with the next WIP job. We
2211: -- just log messages in the generic utlity as ERROR.
2212:
2213: WHEN FND_API.G_EXC_ERROR THEN
2214: -- x_return_status := FND_API.G_RET_STS_ERROR;
2215: x_warning_flag := FND_API.G_TRUE;
2216: ROLLBACK TO curr_wip_job_sp;
2217:

Line 2214: -- x_return_status := FND_API.G_RET_STS_ERROR;

2210: -- the process but continue with the next WIP job. We
2211: -- just log messages in the generic utlity as ERROR.
2212:
2213: WHEN FND_API.G_EXC_ERROR THEN
2214: -- x_return_status := FND_API.G_RET_STS_ERROR;
2215: x_warning_flag := FND_API.G_TRUE;
2216: ROLLBACK TO curr_wip_job_sp;
2217:
2218: -- Add an ERROR message.

Line 2215: x_warning_flag := FND_API.G_TRUE;

2211: -- just log messages in the generic utlity as ERROR.
2212:
2213: WHEN FND_API.G_EXC_ERROR THEN
2214: -- x_return_status := FND_API.G_RET_STS_ERROR;
2215: x_warning_flag := FND_API.G_TRUE;
2216: ROLLBACK TO curr_wip_job_sp;
2217:
2218: -- Add an ERROR message.
2219: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_ACT_WIP_IMPORT_ERROR');

Line 2226: -- p_commit => FND_API.G_TRUE,

2222: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
2223:
2224: -- Save the messages using generic utility.
2225: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
2226: -- p_commit => FND_API.G_TRUE,
2227: -- p_init_msg_list => FND_API.G_FALSE,
2228: -- p_validation_level => p_validation_level,
2229: p_module_code => G_MSG_MODULE_CODE_ACT,
2230: p_source_entity_id1 => p_repair_line_id,

Line 2227: -- p_init_msg_list => FND_API.G_FALSE,

2223:
2224: -- Save the messages using generic utility.
2225: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
2226: -- p_commit => FND_API.G_TRUE,
2227: -- p_init_msg_list => FND_API.G_FALSE,
2228: -- p_validation_level => p_validation_level,
2229: p_module_code => G_MSG_MODULE_CODE_ACT,
2230: p_source_entity_id1 => p_repair_line_id,
2231: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_WIP,

Line 2237: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

2233: x_return_status => l_return_status,
2234: x_msg_count => l_msg_count,
2235: x_msg_data => l_msg_data );
2236:
2237: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2238: --DBMS_OUTPUT.put_line( 'Unable to save FND msgs' );
2239: RAISE GENERIC_MSG_SAVE_FAILED;
2240: END IF;
2241:

Line 2259: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2255: -- Catch the exception outside, in the outermost loop.
2256: RAISE GENERIC_MSG_SAVE_FAILED;
2257:
2258: WHEN OTHERS THEN
2259: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2260:
2261: ROLLBACK TO curr_wip_job_sp;
2262: x_warning_flag := FND_API.G_TRUE;
2263:

Line 2262: x_warning_flag := FND_API.G_TRUE;

2258: WHEN OTHERS THEN
2259: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2260:
2261: ROLLBACK TO curr_wip_job_sp;
2262: x_warning_flag := FND_API.G_TRUE;
2263:
2264: if (lc_proc_level >= lc_debug_level) then
2265: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2266: 'Encountered an OTHERS error while creating a repair actual lines ' ||

Line 2293: -- p_commit => FND_API.G_TRUE,

2289: 'Calling CSD_GEN_ERRMSGS_PVT.save_fnd_msgs in WHEN OTHERS THEN');
2290: end if;
2291:
2292: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
2293: -- p_commit => FND_API.G_TRUE,
2294: -- p_init_msg_list => FND_API.G_FALSE,
2295: -- p_validation_level => p_validation_level,
2296: p_module_code => G_MSG_MODULE_CODE_ACT,
2297: p_source_entity_id1 => p_repair_line_id,

Line 2294: -- p_init_msg_list => FND_API.G_FALSE,

2290: end if;
2291:
2292: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs( p_api_version => 1.0,
2293: -- p_commit => FND_API.G_TRUE,
2294: -- p_init_msg_list => FND_API.G_FALSE,
2295: -- p_validation_level => p_validation_level,
2296: p_module_code => G_MSG_MODULE_CODE_ACT,
2297: p_source_entity_id1 => p_repair_line_id,
2298: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_WIP,

Line 2309: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

2305: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2306: 'Returned from CSD_GEN_ERRMSGS_PVT.save_fnd_msgs in WHEN OTHERS THEN');
2307: end if;
2308:
2309: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
2310: --DBMS_OUTPUT.put_line( 'Unable to save FND msgs' );
2311: RAISE GENERIC_MSG_SAVE_FAILED;
2312: END IF;
2313: /*

Line 2326: x_warning_flag := FND_API.G_TRUE;

2322: 'End LOOP c_eligible_WIP_Jobs');
2323: end if;
2324:
2325: IF( l_wip_count <= 0 ) THEN
2326: x_warning_flag := FND_API.G_TRUE;
2327: -- FND_MESSAGE.SET_NAME( 'CSD', 'CSD_ACT_WIP_INELIGIBLE');
2328: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_ACT_NO_INELIGIBLE_WIP');
2329: -- No eligible WIP jobs found for import
2330: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_INFORMATION_MSG);

Line 2341: -- p_commit => FND_API.G_TRUE,

2337: end if;
2338:
2339: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs(
2340: p_api_version => 1.0,
2341: -- p_commit => FND_API.G_TRUE,
2342: -- p_init_msg_list => FND_API.G_FALSE,
2343: -- p_validation_level => p_validation_level,
2344: p_module_code => G_MSG_MODULE_CODE_ACT,
2345: p_source_entity_id1 => p_repair_line_id,

Line 2342: -- p_init_msg_list => FND_API.G_FALSE,

2338:
2339: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs(
2340: p_api_version => 1.0,
2341: -- p_commit => FND_API.G_TRUE,
2342: -- p_init_msg_list => FND_API.G_FALSE,
2343: -- p_validation_level => p_validation_level,
2344: p_module_code => G_MSG_MODULE_CODE_ACT,
2345: p_source_entity_id1 => p_repair_line_id,
2346: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_WIP,

Line 2359: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2355: end if;
2356:
2357: -- If we are unable to log messages then we
2358: -- throw an error.
2359: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2360: if (lc_proc_level >= lc_debug_level) then
2361: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2362: 'Unable to save messages using the generic logging utility.');
2363: end if;

Line 2367: RAISE FND_API.G_EXC_ERROR;

2363: end if;
2364: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_GENERIC_SAVE_FAILED');
2365: -- Unable to save messages using the generic logging utility.
2366: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
2367: RAISE FND_API.G_EXC_ERROR;
2368: END IF;
2369:
2370: END IF;
2371:

Line 2378: IF FND_API.To_Boolean( p_commit ) THEN

2374: -- End API Body
2375: --
2376:
2377: -- Standard check of p_commit.
2378: IF FND_API.To_Boolean( p_commit ) THEN
2379: COMMIT WORK;
2380: END IF;
2381:
2382: -- logging

Line 2397: WHEN FND_API.G_EXC_ERROR THEN

2393: p_data => x_msg_data );
2394: */
2395:
2396: EXCEPTION
2397: WHEN FND_API.G_EXC_ERROR THEN
2398: x_return_status := FND_API.G_RET_STS_ERROR;
2399: ROLLBACK TO Import_actuals_wip_sp;
2400: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2401: p_data => x_msg_data );

Line 2398: x_return_status := FND_API.G_RET_STS_ERROR;

2394: */
2395:
2396: EXCEPTION
2397: WHEN FND_API.G_EXC_ERROR THEN
2398: x_return_status := FND_API.G_RET_STS_ERROR;
2399: ROLLBACK TO Import_actuals_wip_sp;
2400: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2401: p_data => x_msg_data );
2402:

Line 2409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2405: FND_LOG.STRING(lc_excep_level, lc_mod_name,
2406: 'EXC_ERROR['||x_msg_data||']');
2407: END IF;
2408:
2409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2411: ROLLBACK TO Import_actuals_wip_sp;
2412: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2413: p_data => x_msg_data );

Line 2410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2406: 'EXC_ERROR['||x_msg_data||']');
2407: END IF;
2408:
2409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2411: ROLLBACK TO Import_actuals_wip_sp;
2412: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2413: p_data => x_msg_data );
2414:

Line 2423: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2419: END IF;
2420:
2421: WHEN GENERIC_MSG_SAVE_FAILED THEN
2422: ROLLBACK TO Import_actuals_wip_sp;
2423: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2424:
2425: -- save message in debug log
2426: IF (lc_excep_level >= lc_debug_level) THEN
2427: FND_LOG.STRING(lc_excep_level, lc_mod_name,

Line 2439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2435: FND_MSG_PUB.Count_And_Get( p_count => x_msg_count,
2436: p_data => x_msg_data );
2437:
2438: WHEN OTHERS THEN
2439: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2440: ROLLBACK TO Import_actuals_wip_sp;
2441: --DBMS_OUTPUT.put_line( ' SQLCODE = '
2442: -- || SQLCODE );
2443: --DBMS_OUTPUT.put_line( ' SQLERRM = '

Line 2608: IF NOT FND_API.Compatible_API_Call (lc_api_version,

2604: -- Standard start of API Savepoint
2605: Savepoint Import_Actuals_Estimate_sp;
2606:
2607: -- Standard call to check for call compatibility.
2608: IF NOT FND_API.Compatible_API_Call (lc_api_version,
2609: p_api_version,
2610: lc_api_name ,
2611: G_PKG_NAME )
2612: THEN

Line 2613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2609: p_api_version,
2610: lc_api_name ,
2611: G_PKG_NAME )
2612: THEN
2613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2614: END IF;
2615:
2616: -- Initialize message list if p_init_msg_list is set to TRUE.
2617: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2617: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2613: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2614: END IF;
2615:
2616: -- Initialize message list if p_init_msg_list is set to TRUE.
2617: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2618: FND_MSG_PUB.initialize;
2619: END IF;
2620:
2621: -- logging

Line 2643: x_return_status := FND_API.G_RET_STS_SUCCESS;

2639: 'p_repair_actual_id: ' || p_repair_actual_id);
2640: end if;
2641:
2642: -- Initialize API return status to success
2643: x_return_status := FND_API.G_RET_STS_SUCCESS;
2644:
2645: --
2646: -- Begin API Body
2647: --

Line 2650: x_warning_flag := FND_API.G_FALSE;

2646: -- Begin API Body
2647: --
2648:
2649: -- Initialzing the warning flag.
2650: x_warning_flag := FND_API.G_FALSE;
2651:
2652: -- Validate mandatory input parameters.
2653: if (lc_proc_level >= lc_debug_level) then
2654: FND_LOG.STRING(lc_proc_level, lc_mod_name,

Line 2676: -- p_commit => FND_API.G_TRUE,

2672: 'Calling CSD_GEN_ERRMSGS_PVT.purge_entity_msgs');
2673: end if;
2674: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs(
2675: p_api_version => 1.0,
2676: -- p_commit => FND_API.G_TRUE,
2677: -- p_init_msg_list => FND_API.G_FALSE,
2678: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2679: p_module_code => G_MSG_MODULE_CODE_ACT,
2680: p_source_entity_id1 => p_repair_line_id,

Line 2677: -- p_init_msg_list => FND_API.G_FALSE,

2673: end if;
2674: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs(
2675: p_api_version => 1.0,
2676: -- p_commit => FND_API.G_TRUE,
2677: -- p_init_msg_list => FND_API.G_FALSE,
2678: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2679: p_module_code => G_MSG_MODULE_CODE_ACT,
2680: p_source_entity_id1 => p_repair_line_id,
2681: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_ESTIMATE,

Line 2678: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2674: CSD_GEN_ERRMSGS_PVT.purge_entity_msgs(
2675: p_api_version => 1.0,
2676: -- p_commit => FND_API.G_TRUE,
2677: -- p_init_msg_list => FND_API.G_FALSE,
2678: -- p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2679: p_module_code => G_MSG_MODULE_CODE_ACT,
2680: p_source_entity_id1 => p_repair_line_id,
2681: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_ESTIMATE,
2682: p_source_entity_id2 => NULL, -- Since we want to delete all messages.

Line 2694: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN

2690: end if;
2691:
2692: -- Stall the process if we were unable to purge
2693: -- the older messages.
2694: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
2695: RAISE FND_API.G_EXC_ERROR;
2696: END IF;
2697:
2698: --bug#13627518 --bug#14014723

Line 2695: RAISE FND_API.G_EXC_ERROR;

2691:
2692: -- Stall the process if we were unable to purge
2693: -- the older messages.
2694: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
2695: RAISE FND_API.G_EXC_ERROR;
2696: END IF;
2697:
2698: --bug#13627518 --bug#14014723
2699: -- swai: bug 7119695

Line 2741: p_commit => FND_API.G_FALSE,

2737: end if;
2738: CS_Charge_Details_PUB.copy_estimate(
2739: p_api_version => 1.0,
2740: p_init_msg_list => p_init_msg_list,
2741: p_commit => FND_API.G_FALSE,
2742: p_transaction_control => FND_API.G_TRUE,
2743: p_estimate_detail_id => estimate_line_rec.estimate_detail_id,
2744: x_estimate_detail_id => l_estimate_detail_id,
2745: x_return_status => x_return_status,

Line 2742: p_transaction_control => FND_API.G_TRUE,

2738: CS_Charge_Details_PUB.copy_estimate(
2739: p_api_version => 1.0,
2740: p_init_msg_list => p_init_msg_list,
2741: p_commit => FND_API.G_FALSE,
2742: p_transaction_control => FND_API.G_TRUE,
2743: p_estimate_detail_id => estimate_line_rec.estimate_detail_id,
2744: x_estimate_detail_id => l_estimate_detail_id,
2745: x_return_status => x_return_status,
2746: x_msg_count => x_msg_count,

Line 2765: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN

2761: -- Throw an error if the API returned an error.
2762: -- We do not stall the process if we find an error in
2763: -- copying the charge line. We continue processing of
2764: -- other lines. We just skip the current row.
2765: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
2766: RAISE FND_API.G_EXC_ERROR;
2767: END IF;
2768:
2769: IF (l_estimate_detail_id IS NULL) THEN

Line 2766: RAISE FND_API.G_EXC_ERROR;

2762: -- We do not stall the process if we find an error in
2763: -- copying the charge line. We continue processing of
2764: -- other lines. We just skip the current row.
2765: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
2766: RAISE FND_API.G_EXC_ERROR;
2767: END IF;
2768:
2769: IF (l_estimate_detail_id IS NULL) THEN
2770: if (lc_proc_level >= lc_debug_level) then

Line 2776: RAISE FND_API.G_EXC_ERROR;

2772: 'Unable to copy the Estimate charge line into Actual charge line. Charges API returned NULL for the Estimate Detail identifier.');
2773: end if;
2774: FND_MESSAGE.SET_NAME('CSD', 'CSD_ACT_COPY_CHRG_LINE_FAIL');
2775: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
2776: RAISE FND_API.G_EXC_ERROR;
2777: END IF;
2778:
2779: EXCEPTION
2780: WHEN FND_API.G_EXC_ERROR THEN

Line 2780: WHEN FND_API.G_EXC_ERROR THEN

2776: RAISE FND_API.G_EXC_ERROR;
2777: END IF;
2778:
2779: EXCEPTION
2780: WHEN FND_API.G_EXC_ERROR THEN
2781: l_skip_curr_row := TRUE;
2782:
2783: WHEN OTHERS THEN
2784: l_skip_curr_row := TRUE;

Line 2905: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2901: -- Throw an error if the API returned an error.
2902: -- We do not stall the process if we find an error in
2903: -- copying the charge line. We continue processing of
2904: -- other lines. We just skip the current row.
2905: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2906: RAISE FND_API.G_EXC_ERROR;
2907: END IF;
2908:
2909: IF (l_curr_actual_line_rec.repair_actual_line_id IS NULL) THEN

Line 2906: RAISE FND_API.G_EXC_ERROR;

2902: -- We do not stall the process if we find an error in
2903: -- copying the charge line. We continue processing of
2904: -- other lines. We just skip the current row.
2905: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2906: RAISE FND_API.G_EXC_ERROR;
2907: END IF;
2908:
2909: IF (l_curr_actual_line_rec.repair_actual_line_id IS NULL) THEN
2910: if (lc_proc_level >= lc_debug_level) then

Line 2916: RAISE FND_API.G_EXC_ERROR;

2912: 'Unable to create a repair actual line. Create API returned NULL for the repair actual line identifier.');
2913: end if;
2914: FND_MESSAGE.SET_NAME('CSD', 'CSD_ACT_NULL_ACTUAL_ID');
2915: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
2916: RAISE FND_API.G_EXC_ERROR;
2917: END IF;
2918:
2919: EXCEPTION
2920: WHEN FND_API.G_EXC_ERROR THEN

Line 2920: WHEN FND_API.G_EXC_ERROR THEN

2916: RAISE FND_API.G_EXC_ERROR;
2917: END IF;
2918:
2919: EXCEPTION
2920: WHEN FND_API.G_EXC_ERROR THEN
2921: l_skip_curr_row := TRUE;
2922: if (lc_proc_level >= lc_debug_level) then
2923: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2924: 'Encountered an EXEC error while creating a repair actual line.');

Line 2960: x_warning_flag := FND_API.G_TRUE;

2956:
2957: -- we rollback any updates/inserts for the current
2958: -- record and set the warning flag to TRUE.
2959: ROLLBACK TO current_actual_line_sp;
2960: x_warning_flag := FND_API.G_TRUE;
2961:
2962: -- Increment the failed count.
2963: l_est_line_failed_count := l_est_line_failed_count + 1;
2964:

Line 2972: -- p_commit => FND_API.G_TRUE,

2968: 'Calling CSD_GEN_ERRMSGS_PVT.save_fnd_msgs');
2969: end if;
2970: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs(
2971: p_api_version => 1.0,
2972: -- p_commit => FND_API.G_TRUE,
2973: -- p_init_msg_list => FND_API.G_FALSE,
2974: -- p_validation_level => p_validation_level,
2975: p_module_code => G_MSG_MODULE_CODE_ACT,
2976: p_source_entity_id1 => p_repair_line_id,

Line 2973: -- p_init_msg_list => FND_API.G_FALSE,

2969: end if;
2970: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs(
2971: p_api_version => 1.0,
2972: -- p_commit => FND_API.G_TRUE,
2973: -- p_init_msg_list => FND_API.G_FALSE,
2974: -- p_validation_level => p_validation_level,
2975: p_module_code => G_MSG_MODULE_CODE_ACT,
2976: p_source_entity_id1 => p_repair_line_id,
2977: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_ESTIMATE,

Line 2988: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

2984: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2985: 'Returned from CSD_GEN_ERRMSGS_PVT.save_fnd_msgs');
2986: end if;
2987:
2988: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2989: if (lc_proc_level >= lc_debug_level) then
2990: FND_LOG.STRING(lc_proc_level, lc_mod_name,
2991: 'Unable to save messages using the generic logging utility.');
2992: end if;

Line 2995: RAISE FND_API.G_EXC_ERROR;

2991: 'Unable to save messages using the generic logging utility.');
2992: end if;
2993: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_GENERIC_SAVE_FAILED');
2994: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
2995: RAISE FND_API.G_EXC_ERROR;
2996: END IF;
2997:
2998: END IF;
2999:

Line 3002: x_warning_flag := FND_API.G_TRUE;

2998: END IF;
2999:
3000: END LOOP;
3001:
3002: x_warning_flag := FND_API.G_TRUE;
3003:
3004: -- If no eligible estimate lines found for import.
3005: IF( l_est_line_total_count <= 0 ) THEN
3006: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_ACT_EST_INELIGIBLE');

Line 3026: -- p_commit => FND_API.G_TRUE,

3022: end if;
3023:
3024: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs(
3025: p_api_version => 1.0,
3026: -- p_commit => FND_API.G_TRUE,
3027: -- p_init_msg_list => FND_API.G_FALSE,
3028: -- p_validation_level => p_validation_level,
3029: p_module_code => G_MSG_MODULE_CODE_ACT,
3030: p_source_entity_id1 => p_repair_line_id,

Line 3027: -- p_init_msg_list => FND_API.G_FALSE,

3023:
3024: CSD_GEN_ERRMSGS_PVT.save_fnd_msgs(
3025: p_api_version => 1.0,
3026: -- p_commit => FND_API.G_TRUE,
3027: -- p_init_msg_list => FND_API.G_FALSE,
3028: -- p_validation_level => p_validation_level,
3029: p_module_code => G_MSG_MODULE_CODE_ACT,
3030: p_source_entity_id1 => p_repair_line_id,
3031: p_source_entity_type_code => G_ACTUAL_MSG_ENTITY_ESTIMATE,

Line 3044: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

3040: end if;
3041:
3042: -- If we are unable to log messages then we
3043: -- throw an error.
3044: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3045: if (lc_proc_level >= lc_debug_level) then
3046: FND_LOG.STRING(lc_proc_level, lc_mod_name,
3047: 'Unable to save messages using the generic logging utility.');
3048: end if;

Line 3052: RAISE FND_API.G_EXC_ERROR;

3048: end if;
3049: FND_MESSAGE.SET_NAME( 'CSD', 'CSD_GENERIC_SAVE_FAILED');
3050: -- Unable to save messages using the generic logging utility.
3051: FND_MSG_PUB.add_detail(p_message_type => FND_MSG_PUB.G_ERROR_MSG);
3052: RAISE FND_API.G_EXC_ERROR;
3053: END IF;
3054:
3055: -- Standard check of p_commit.
3056: IF FND_API.To_Boolean( p_commit ) THEN

Line 3056: IF FND_API.To_Boolean( p_commit ) THEN

3052: RAISE FND_API.G_EXC_ERROR;
3053: END IF;
3054:
3055: -- Standard check of p_commit.
3056: IF FND_API.To_Boolean( p_commit ) THEN
3057: COMMIT WORK;
3058: END IF;
3059:
3060: -- logging

Line 3068: WHEN FND_API.G_EXC_ERROR THEN

3064: end if;
3065:
3066: EXCEPTION
3067:
3068: WHEN FND_API.G_EXC_ERROR THEN
3069: x_return_status := FND_API.G_RET_STS_ERROR ;
3070: ROLLBACK TO Import_Actuals_Estimate_sp;
3071: FND_MSG_PUB.Count_And_Get
3072: (p_count => x_msg_count,

Line 3069: x_return_status := FND_API.G_RET_STS_ERROR ;

3065:
3066: EXCEPTION
3067:
3068: WHEN FND_API.G_EXC_ERROR THEN
3069: x_return_status := FND_API.G_RET_STS_ERROR ;
3070: ROLLBACK TO Import_Actuals_Estimate_sp;
3071: FND_MSG_PUB.Count_And_Get
3072: (p_count => x_msg_count,
3073: p_data => x_msg_data );

Line 3080: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3076: IF (lc_excep_level >= lc_debug_level) THEN
3077: FND_LOG.STRING(lc_excep_level, lc_mod_name,
3078: 'EXC_ERROR['||x_msg_data||']');
3079: END IF;
3080: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3081: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3082: ROLLBACK TO Import_Actuals_Estimate_sp;
3083: FND_MSG_PUB.Count_And_Get
3084: ( p_count => x_msg_count,

Line 3081: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

3077: FND_LOG.STRING(lc_excep_level, lc_mod_name,
3078: 'EXC_ERROR['||x_msg_data||']');
3079: END IF;
3080: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3081: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3082: ROLLBACK TO Import_Actuals_Estimate_sp;
3083: FND_MSG_PUB.Count_And_Get
3084: ( p_count => x_msg_count,
3085: p_data => x_msg_data );

Line 3093: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

3089: 'EXC_UNEXPECTED_ERROR['||x_msg_data||']');
3090: END IF;
3091:
3092: WHEN OTHERS THEN
3093: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3094: ROLLBACK TO Import_Actuals_Estimate_sp;
3095: IF FND_MSG_PUB.Check_Msg_Level
3096: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3097: THEN