1: PACKAGE BODY FA_ADJUSTMENTS_PKG as
2: /* $Header: faxiajb.pls 120.5 2009/04/15 15:21:55 bridgway ship $ */
3:
4: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
5: X_Transaction_Header_Id NUMBER,
70: X_Period_Counter_Created,
71: X_Asset_Invoice_Id
72: );
73: else
74: INSERT INTO fa_adjustments(
75: transaction_header_id,
76: source_type_code,
77: adjustment_type,
78: debit_credit_flag,
115:
116: EXCEPTION
117: when others then
118: fa_srvr_msg.add_sql_error(
119: calling_fn => 'FA_ADJUSTMENTS_PKG.Insert_Row', p_log_level_rec => p_log_level_rec);
120: raise;
121:
122: END Insert_Row;
123:
179: global_attribute18,
180: global_attribute19,
181: global_attribute20,
182: global_attribute_category
183: FROM fa_adjustments
184: WHERE rowid = X_Rowid
185: FOR UPDATE of transaction_header_id NOWAIT;
186: Recinfo C%ROWTYPE;
187:
279: period_counter_created = X_Period_Counter_Created,
280: asset_invoice_id = X_Asset_Invoice_Id
281: WHERE rowid = X_Rowid;
282: else
283: UPDATE fa_adjustments
284: SET
285: transaction_header_id = X_Transaction_Header_Id,
286: source_type_code = X_Source_Type_Code,
287: adjustment_type = X_Adjustment_Type,
309:
310: EXCEPTION
311: when others then
312: fa_srvr_msg.add_sql_error(
313: calling_fn => 'FA_ADJUSTMENTS_PKG.Update_Row', p_log_level_rec => p_log_level_rec);
314: raise;
315:
316: END Update_Row;
317:
334: AND set_of_books_id = X_set_of_books_id;
335: end if;
336: else
337: if X_Rowid is not null then
338: DELETE FROM fa_adjustments
339: WHERE rowid = X_Rowid;
340: elsif X_Asset_Id is not null then
341: DELETE FROM fa_adjustments
342: WHERE asset_id = X_Asset_id;
337: if X_Rowid is not null then
338: DELETE FROM fa_adjustments
339: WHERE rowid = X_Rowid;
340: elsif X_Asset_Id is not null then
341: DELETE FROM fa_adjustments
342: WHERE asset_id = X_Asset_id;
343: end if;
344: end if;
345:
351: when no_data_found then
352: null;
353: when others then
354: fa_srvr_msg.add_sql_error(
355: calling_fn => 'FA_ADJUSTMENTS_PKG.Delete_Row', p_log_level_rec => p_log_level_rec);
356: raise;
357:
358: END Delete_Row;
359:
356: raise;
357:
358: END Delete_Row;
359:
360: END FA_ADJUSTMENTS_PKG;