DBA Data[Home] [Help]

APPS.FA_RETIREMENTS_PKG dependencies on FA_RETIREMENTS

Line 1: PACKAGE BODY FA_RETIREMENTS_PKG as

1: PACKAGE BODY FA_RETIREMENTS_PKG as
2: /* $Header: faxirtb.pls 120.6 2005/07/25 10:00:50 yyoon ship $ */
3: PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
4: X_Retirement_Id IN OUT NOCOPY NUMBER,
5: X_Book_Type_Code VARCHAR2,

Line 63: CURSOR C_ret IS SELECT rowid FROM fa_retirements

59: X_Recapture_Amount NUMBER DEFAULT NULL,
60: X_mrc_sob_type_code VARCHAR2 DEFAULT 'P',
61: X_Calling_Fn VARCHAR2,
62: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
63: CURSOR C_ret IS SELECT rowid FROM fa_retirements
64: WHERE retirement_id = X_Retirement_Id;
65: CURSOR C_ret_mc IS SELECT rowid FROM fa_retirements_mrc_v
66: WHERE retirement_id = X_Retirement_Id;
67:

Line 65: CURSOR C_ret_mc IS SELECT rowid FROM fa_retirements_mrc_v

61: X_Calling_Fn VARCHAR2,
62: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
63: CURSOR C_ret IS SELECT rowid FROM fa_retirements
64: WHERE retirement_id = X_Retirement_Id;
65: CURSOR C_ret_mc IS SELECT rowid FROM fa_retirements_mrc_v
66: WHERE retirement_id = X_Retirement_Id;
67:
68: CURSOR C2 IS SELECT fa_retirements_s.nextval FROM sys.dual;
69:

Line 68: CURSOR C2 IS SELECT fa_retirements_s.nextval FROM sys.dual;

64: WHERE retirement_id = X_Retirement_Id;
65: CURSOR C_ret_mc IS SELECT rowid FROM fa_retirements_mrc_v
66: WHERE retirement_id = X_Retirement_Id;
67:
68: CURSOR C2 IS SELECT fa_retirements_s.nextval FROM sys.dual;
69:
70: BEGIN
71:
72: if (X_mrc_sob_type_code = 'R') then

Line 74: INSERT INTO fa_retirements_mrc_v(

70: BEGIN
71:
72: if (X_mrc_sob_type_code = 'R') then
73:
74: INSERT INTO fa_retirements_mrc_v(
75: retirement_id,
76: book_type_code,
77: asset_id,
78: transaction_header_id_in,

Line 206: INSERT INTO fa_retirements(

202: FETCH C2 INTO X_Retirement_Id;
203: CLOSE C2;
204: end if;
205:
206: INSERT INTO fa_retirements(
207: retirement_id,
208: book_type_code,
209: asset_id,
210: transaction_header_id_in,

Line 335: CALLING_FN => 'FA_RETIREMENTS_PKG.insert_row'

331:
332: EXCEPTION
333: WHEN Others THEN
334: fa_srvr_msg.add_sql_error(
335: CALLING_FN => 'FA_RETIREMENTS_PKG.insert_row'
336: ,p_log_level_rec => p_log_level_rec);
337: raise;
338: END Insert_Row;
339:

Line 452: FROM fa_retirements

448: reserve_retired,
449: eofy_reserve,
450: reduction_rate,
451: recapture_amount
452: FROM fa_retirements
453: WHERE rowid = X_Rowid
454: FOR UPDATE of Retirement_Id NOWAIT;
455: Recinfo C%ROWTYPE;
456: BEGIN

Line 688: from fa_retirements_mrc_v

684:
685: if (X_Rowid is null) then
686: select rowid
687: into l_rowid
688: from fa_retirements_mrc_v
689: where retirement_id = X_Retirement_Id;
690: else
691: l_rowid := X_Rowid;
692: end if;

Line 694: UPDATE fa_retirements_mrc_v

690: else
691: l_rowid := X_Rowid;
692: end if;
693:
694: UPDATE fa_retirements_mrc_v
695: SET
696: retirement_id = decode(X_Retirement_Id,
697: FND_API.G_MISS_NUM, NULL,
698: NULL, retirement_id,

Line 918: from fa_retirements

914:
915: if (X_Rowid is null) then
916: select rowid
917: into l_rowid
918: from fa_retirements
919: where retirement_id = X_Retirement_Id;
920: else
921: l_rowid := X_Rowid;
922: end if;

Line 924: UPDATE fa_retirements

920: else
921: l_rowid := X_Rowid;
922: end if;
923:
924: UPDATE fa_retirements
925: SET
926: retirement_id = decode(X_Retirement_Id,
927: FND_API.G_MISS_NUM, NULL,
928: NULL, retirement_id,

Line 1152: CALLING_FN => 'FA_RETIREMENTS_PKG.UPDATE_ROW'

1148: end if;
1149: EXCEPTION
1150: WHEN Others THEN
1151: fa_srvr_msg.add_sql_error(
1152: CALLING_FN => 'FA_RETIREMENTS_PKG.UPDATE_ROW'
1153: ,p_log_level_rec => p_log_level_rec);
1154: raise;
1155: END Update_Row;
1156:

Line 1167: DELETE FROM fa_retirements_mrc_v

1163:
1164: BEGIN
1165:
1166: if (X_mrc_sob_type_code = 'R') then
1167: DELETE FROM fa_retirements_mrc_v
1168: WHERE rowid = X_Rowid;
1169: else
1170: DELETE FROM fa_retirements
1171: WHERE rowid = X_Rowid;

Line 1170: DELETE FROM fa_retirements

1166: if (X_mrc_sob_type_code = 'R') then
1167: DELETE FROM fa_retirements_mrc_v
1168: WHERE rowid = X_Rowid;
1169: else
1170: DELETE FROM fa_retirements
1171: WHERE rowid = X_Rowid;
1172: end if;
1173:
1174: if (SQL%NOTFOUND) then

Line 1180: CALLING_FN => 'FA_RETIREMENTS_PKG.DELETE_ROW'

1176: end if;
1177: EXCEPTION
1178: WHEN Others THEN
1179: fa_srvr_msg.add_sql_error(
1180: CALLING_FN => 'FA_RETIREMENTS_PKG.DELETE_ROW'
1181: ,p_log_level_rec => p_log_level_rec);
1182: raise;
1183: END Delete_Row;
1184: --

Line 1185: END FA_RETIREMENTS_PKG;

1181: ,p_log_level_rec => p_log_level_rec);
1182: raise;
1183: END Delete_Row;
1184: --
1185: END FA_RETIREMENTS_PKG;