[Home] [Help]
675: if (l_event_code is not null) then
676:
677: if (lc_proc_level >= lc_debug_level) then
678: FND_LOG.STRING(lc_proc_level, lc_mod_name,
679: 'Calling CSD_REPAIR_ESTIMATE_PVT.get_total_estimated_charge ');
680: end if;
681: -- get estimate_total sum of charge from csd_repair_estimates_v
682: CSD_REPAIR_ESTIMATE_PVT.get_total_estimated_charge (
683: p_repair_line_id => p_repair_line_id,
678: FND_LOG.STRING(lc_proc_level, lc_mod_name,
679: 'Calling CSD_REPAIR_ESTIMATE_PVT.get_total_estimated_charge ');
680: end if;
681: -- get estimate_total sum of charge from csd_repair_estimates_v
682: CSD_REPAIR_ESTIMATE_PVT.get_total_estimated_charge (
683: p_repair_line_id => p_repair_line_id,
684: x_estimated_charge => l_estimate_total,
685: x_return_status => l_return_status
686: );
690:
691:
692: if (lc_proc_level >= lc_debug_level) then
693: FND_LOG.STRING(lc_proc_level, lc_mod_name,
694: 'Returned from CSD_REPAIR_ESTIMATE_PVT.get_total_estimated_charge. l_estimate_total=' || l_estimate_total);
695: FND_LOG.STRING(lc_proc_level, lc_mod_name,
696: 'Calling CSD_TO_FORM_REPAIR_HISTORY.Validate_And_Write ');
697: end if;
698: CSD_TO_FORM_REPAIR_HISTORY.Validate_And_Write
1096: l_estimate_status VARCHAR2(30);
1097: l_event_code VARCHAR2(30);
1098:
1099: l_rep_ord_rec CSD_REPAIRS_PUB.REPLN_REC_TYPE;
1100: l_rep_est_rec CSD_REPAIR_ESTIMATE_PVT.REPAIR_ESTIMATE_REC;
1101: l_rep_group_rec CSD_REPAIR_GROUPS_PVT.REPAIR_ORDER_GROUP_REC;
1102:
1103: Cursor c_repairs_for_approval ( p_repair_group_id number) is
1104: Select rep.repair_line_id
1327: l_rep_est_rec.estimate_status := l_estimate_status;
1328: if (g_debug > 0) then
1329: csd_gen_utility_pvt.add('CSD_REPAIRS_GRP.Update_Group_Approval_Status Update RO estimate call');
1330: end if;
1331: csd_repair_estimate_pvt.update_repair_estimate
1332: (p_api_version => 1.0,
1333: p_commit => 'F',
1334: p_init_msg_list => 'T',
1335: p_validation_level => fnd_api.g_valid_level_full,
1342: end if;
1343: -- Check return status from the above procedure call
1344: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1345: if (g_debug > 0) then
1346: csd_gen_utility_pvt.ADD('csd_repair_estimate_pvt.update_repair_estimate failed ');
1347: end if;
1348: RAISE FND_API.G_EXC_ERROR;
1349: --ROLLBACK TO UPDATE_GRP_APPV_STATUS;
1350: --return;
1357:
1358: END LOOP;
1359: -- End of API body.
1360:
1361: -- update to group is done in the call csd_repair_estimate_pvt.update_repair_estimate
1362: -- repair group object version number is not returned in this case
1363:
1364: -------------------------------
1365: -- Standard check for p_commit
1444: l_estimate_status VARCHAR2(30);
1445: l_event_code VARCHAR2(30);
1446:
1447: l_rep_ord_rec CSD_REPAIRS_PUB.REPLN_REC_TYPE;
1448: l_rep_est_rec CSD_REPAIR_ESTIMATE_PVT.REPAIR_ESTIMATE_REC;
1449: l_rep_group_rec CSD_REPAIR_GROUPS_PVT.REPAIR_ORDER_GROUP_REC;
1450:
1451: Cursor c_repairs_for_Reject ( p_repair_group_id number) is
1452: Select rep.repair_line_id
1675: l_rep_est_rec.estimate_status := l_estimate_status;
1676: if (g_debug > 0) then
1677: csd_gen_utility_pvt.add('CSD_REPAIRS_GRP.Update_Group_Reject_Status Update RO estimate call');
1678: end if;
1679: csd_repair_estimate_pvt.update_repair_estimate
1680: (p_api_version => 1.0,
1681: p_commit => 'F',
1682: p_init_msg_list => 'T',
1683: p_validation_level => fnd_api.g_valid_level_full,
1690: end if;
1691: -- Check return status from the above procedure call
1692: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) then
1693: if (g_debug > 0) then
1694: csd_gen_utility_pvt.ADD('csd_repair_estimate_pvt.update_repair_estimate failed ');
1695: end if;
1696: RAISE FND_API.G_EXC_ERROR;
1697: --ROLLBACK TO UPDATE_GRP_REJT_STATUS;
1698: --return;
1705:
1706: END LOOP;
1707: -- End of API body.
1708:
1709: -- update to group is done in the call csd_repair_estimate_pvt.update_repair_estimate
1710: -- repair group object version number is not returned in this case
1711:
1712: -------------------------------
1713: -- Standard check for p_commit