[Home] [Help]
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:
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,
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;
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,
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;