[Home] [Help]
275: Begin
276: Open C_Dpis(p_upload_record.book_type_code, p_upload_record.asset_id);
277: Fetch C_Dpis into l_date_placed_in_service, l_life_in_months;
278: Close C_Dpis;
279: If igi_iac_common_utils.get_dpis_period_counter(
280: p_upload_record.book_type_code,
281: p_upload_record.asset_id,
282: l_dpis_period_counter) Then
283: l_end_date := add_months(l_date_placed_in_service, l_life_in_months);
290: If l_remaining_periods = 0 then
291: l_remaining_periods := 1;
292: End If;
293: p_upload_record.new_cost := ((p_upload_record.new_cost/l_remaining_periods)*l_total_periods) ;
294: If igi_iac_common_utils.Iac_Round(p_upload_record.new_cost,
295: p_upload_record.book_type_code) Then
296: Null;
297: End If;
298: End If;
335: Begin
336: Open C_Dpis(p_book_type_code, p_asset_id);
337: Fetch C_Dpis into l_date_placed_in_service, l_life_in_months;
338: Close C_Dpis;
339: If igi_iac_common_utils.get_dpis_period_counter(p_book_type_code,
340: p_asset_id,
341: l_dpis_period_counter) Then
342: l_end_date := add_months(l_date_placed_in_service, l_life_in_months);
343: If Last_Period_Counter(p_asset_id,
356: C_Dup_Asset_Info_Rec.gross_flag = 'Y' Then
357: C_Dup_Asset_Info_Rec.new_cost :=
358: ((C_Dup_Asset_Info_Rec.new_cost/l_total_periods) *
359: l_remaining_periods);
360: If igi_iac_common_utils.Iac_Round(
361: C_Dup_Asset_Info_Rec.new_cost,p_book_type_code) Then
362: null;
363: End If;
364: End If;
379: Procedure Check_Tolerances(p_upload_record IN OUT nocopy upload_record) Is
380: Begin
381: p_upload_record.percentage_diff := abs((p_upload_record.new_cost/ (p_upload_record.original_cost) -1)*100);
382: p_upload_record.amount_diff := abs(p_upload_record.new_cost - p_upload_record.original_cost);
383: If igi_iac_common_utils.Iac_Round(p_upload_record.percentage_diff,
384: p_upload_record.book_type_code) Then
385: Null;
386: End If;
387: If igi_iac_common_utils.Iac_Round(p_upload_record.amount_diff,
383: If igi_iac_common_utils.Iac_Round(p_upload_record.percentage_diff,
384: p_upload_record.book_type_code) Then
385: Null;
386: End If;
387: If igi_iac_common_utils.Iac_Round(p_upload_record.amount_diff,
388: p_upload_record.book_type_code) Then
389: Null;
390: End If;
391: p_upload_record.line_status_flag := 'A';
494: p_upload_record.exception_message || ' ' || Fnd_Message.Get);
495: End If;
496: -- Bug 3391784 End
497:
498: If igi_iac_common_utils.get_open_Period_Info(
499: p_upload_record.book_type_code, l_get_period_rec) Then
500: If p_upload_record.period_counter <> (l_get_period_rec.period_counter
501: - 1) Then
502: p_upload_record.line_status_flag := 'E';
519: p_upload_record.exception_message := ltrim(
520: p_upload_record.exception_message || ' ' || Fnd_Message.Get);
521: End If;
522:
523: If igi_iac_common_utils.Any_Txns_In_Open_Period(
524: p_upload_record.book_type_code, p_upload_record.asset_id) Then
525: p_upload_record.line_status_flag := 'E';
526: Fnd_Message.Set_Name('IGI', 'IGI_IAC_UPL_PENDING_TRX');
527: p_upload_record.exception_message := ltrim(
757: If not igi_gen.is_req_installed('IAC') Then
758: Raise E_Iac_Not_Enabled;
759: End If;
760:
761: If not igi_iac_common_utils.Is_IAC_Book(
762: l_upload_record.book_type_code) Then
763: Raise E_Non_Iac_Book;
764: End If;
765:
1303: Into l_reval_id
1304: From dual;
1305: -- mh end 4
1306:
1307: If igi_iac_common_utils.get_open_Period_Info(
1308: C_Upload_Hdr_Rec.book_type_code, l_get_period_rec) Then
1309: If C_Upload_Hdr_Rec.period_counter <>
1310: (l_get_period_rec.period_counter - 1) Then
1311: Raise E_Unavailable_Period;
1324: If l_max_period_counter > l_last_closed_period Then
1325: Raise E_Period_Not_Closed;
1326: End If;
1327:
1328: If igi_iac_common_utils.get_period_info_for_counter(
1329: C_Upload_Hdr_rec.book_type_code,
1330: C_Upload_Hdr_Rec.period_counter,
1331: l_get_period_rec) Then
1332: l_reval_date := l_get_period_rec.period_end_date;