[Home] [Help]
1: PACKAGE BODY FARX_MCR AS
2: /* $Header: FARXMCRB.pls 120.5 2009/04/09 05:55:06 deemitta ship $ */
3:
4:
5: -- Mass change record from fa_mass_changes table.
6: mc_rec FA_MASS_CHG_UTILS_PKG.mass_change_rec_type;
7:
8: -- Table of asset records.
9: -- (Stores book_type_code as well, and thus one asset will appear multiple
102: mc.from_deprn_limit,
103: mc.to_deprn_limit,
104: mc.from_deprn_limit_amount,
105: mc.to_deprn_limit_amount
106: FROM fa_mass_changes mc,
107: fa_additions_b gad1,
108: fa_additions_b gad2
109: WHERE mass_change_id = X_Mass_Change_Id
110: AND mc.from_group_asset_id = gad1.asset_id(+)
232: g_asset_count := 0;
233:
234: -- Get concurrent request id for the mass change review request.
235: -- h_request_id is used when request_id is inserted into the interface
236: -- table, fa_mass_changes_itf.
237: -- Need to fetch request id from fnd_global package instead of fa_mass_changes
238: -- table, since fa_mass_changes table stores the latest request id for
239: -- the Preview or Run requests only.
240: h_request_id := fnd_global.conc_request_id;
233:
234: -- Get concurrent request id for the mass change review request.
235: -- h_request_id is used when request_id is inserted into the interface
236: -- table, fa_mass_changes_itf.
237: -- Need to fetch request id from fnd_global package instead of fa_mass_changes
238: -- table, since fa_mass_changes table stores the latest request id for
239: -- the Preview or Run requests only.
240: h_request_id := fnd_global.conc_request_id;
241:
234: -- Get concurrent request id for the mass change review request.
235: -- h_request_id is used when request_id is inserted into the interface
236: -- table, fa_mass_changes_itf.
237: -- Need to fetch request id from fnd_global package instead of fa_mass_changes
238: -- table, since fa_mass_changes table stores the latest request id for
239: -- the Preview or Run requests only.
240: h_request_id := fnd_global.conc_request_id;
241:
242: -- Fetch mass changes record information.
311: /*===========================================================================
312: Delete rows previously inserted into the interface table with the same
313: request id, if there is any.
314: ===========================================================================*/
315: DELETE FROM fa_mass_changes_itf
316: WHERE request_id = h_request_id;
317: COMMIT;
318:
319: /*===========================================================================
484: h_last_asset := a_tbl(a_index).asset_id;
485: g_asset_count := g_asset_count + 1;
486: END IF;
487:
488: /* Insert asset records into the interface table, FA_MASS_CHANGES_ITF,
489: at every 200 assets and re-initialize the counter and the asset table. */
490: -- If the 200th asset belongs to more than one book, only the information
491: -- for the first book of this asset will be inserted into the table.
492: -- The rest will be taken care of in the next insertion.
576: g_asset_count := 0;
577: /* A fatal error has occurred. Rollback transaction. */
578: ROLLBACK WORK;
579: /* Delete rows inserted into the interface table. */
580: DELETE FROM fa_mass_changes_itf
581: WHERE request_id = h_request_id;
582: /* Commit changes. */
583: COMMIT WORK;
584: /* Retrieve message log and write result to log and output. */
607: --g_total_assets := 0;
608: /* A fatal error has occurred. Rollback transaction. */
609: ROLLBACK WORK;
610: /* Delete rows inserted into the interface table. */
611: DELETE FROM fa_mass_changes_itf
612: WHERE request_id = h_request_id;
613: /* Commit changes. */
614: COMMIT WORK;
615: /* Retrieve message log and write result to log and output. */