[Home] [Help]
100: l_err_stage:= 'Initialize message list if p_init_msg_list is set to TRUE.';
101: -- dbms_output.put_line(l_err_stage);
102: IF FND_API.To_Boolean(p_init_msg_list) THEN
103: -- Initialize error message stack.
104: FA_SRVR_MSG.Init_Server_Message;
105: -- Initialize debug message stack.
106: FA_DEBUG_PKG.Initialize;
107: END IF;
108:
116: l_err_stage := 'validate required parameters';
117: -- -- dbms_output.put_line(l_err_stage);
118: if ( px_asset_hdr_rec.asset_id is null or
119: px_asset_cat_rec_new.category_id is null) then
120: fa_srvr_msg.add_message(
121: calling_fn => l_calling_fn,
122: name => 'FA_SHARED_ITEM_NULL'
123: ,p_log_level_rec => g_log_level_rec);
124: raise FND_API.G_EXC_ERROR;
132: from fa_books b
133: where asset_id = px_asset_hdr_rec.asset_id
134: and date_ineffective is null;
135: if l_num_dummy = 0 then
136: fa_srvr_msg.add_message(
137: calling_fn => l_calling_fn,
138: name => 'FA_INVALID_ASSET'
139: ,p_log_level_rec => g_log_level_rec);
140: raise FND_API.G_EXC_ERROR;
145: open c_corp_book( px_asset_hdr_rec.asset_id );
146: fetch c_corp_book into l_corp_book;
147: if l_corp_book is null then
148: close c_corp_book;
149: FA_SRVR_MSG.Add_Message(
150: calling_fn => l_calling_fn
151: ,p_log_level_rec => g_log_level_rec);
152: raise FND_API.G_EXC_ERROR;
153: end if;
183: X_trx_type =>'RECLASS',
184: X_trx_date =>px_trans_rec.transaction_date_entered,
185: X_init_message_flag=>'NO',
186: p_log_level_rec => g_log_level_rec) then
187: FA_SRVR_MSG.Add_Message(
188: Calling_FN => l_calling_fn
189: ,p_log_level_rec => g_log_level_rec);
190: raise FND_API.G_EXC_ERROR;
191: end if;
225: if not fa_util_pvt.get_asset_desc_rec(
226: p_asset_hdr_rec => px_asset_hdr_rec ,
227: px_asset_desc_rec => l_asset_desc_rec,
228: p_log_level_rec => g_log_level_rec) then
229: fa_srvr_msg.add_message(
230: calling_fn => l_calling_fn,
231: name => 'FA_PROJ_GET_ASSET_INFO'
232: ,p_log_level_rec => g_log_level_rec);
233: raise FND_API.G_EXC_ERROR;
239: p_asset_hdr_rec => px_asset_hdr_rec,
240: px_asset_type_rec => l_asset_type_rec,
241: p_date_effective => null,
242: p_log_level_rec => g_log_level_rec) then
243: fa_srvr_msg.add_message(
244: calling_fn => l_calling_fn
245: ,p_log_level_rec => g_log_level_rec);
246: raise FND_API.G_EXC_ERROR;
247: end if;
253: p_asset_hdr_rec => px_asset_hdr_rec,
254: px_asset_cat_rec => l_asset_cat_rec_old,
255: p_date_effective => null,
256: p_log_level_rec => g_log_level_rec) then
257: fa_srvr_msg.add_message(
258: calling_fn => l_calling_fn
259: ,p_log_level_rec => g_log_level_rec);
260: raise FND_API.G_EXC_ERROR;
261: end if;
282: p_attribute_name => 'CATEGORY',
283: p_book_type_code => px_asset_hdr_rec.book_type_code,
284: p_asset_id => px_asset_hdr_rec.asset_id,
285: x_override_flag => l_override_flag)) then
286: fa_srvr_msg.add_message(
287: calling_fn => l_calling_fn
288: ,p_log_level_rec => g_log_level_rec);
289: raise FND_API.G_EXC_ERROR;
290: end if;
288: ,p_log_level_rec => g_log_level_rec);
289: raise FND_API.G_EXC_ERROR;
290: end if;
291: if l_override_flag = 'N' then
292: fa_srvr_msg.add_message(
293: calling_fn => l_calling_fn,
294: name => 'FA_OVERRIDE_NOT_ALLOWED',
295: token1 => 'CATEGORY'
296: ,p_log_level_rec => g_log_level_rec);
383:
384: EXCEPTION
385: when FND_API.G_EXC_ERROR then
386: rollback to Reclass_Asset_Begin;
387: FA_SRVR_MSG.Add_Message(
388: calling_fn => l_calling_fn,
389: p_log_level_rec => g_log_level_rec);
390: FND_MSG_PUB.Count_And_Get(
391: p_count => x_msg_count,
393: x_return_status := FND_API.G_RET_STS_ERROR;
394:
395: when others then
396: rollback to Reclass_Asset_Begin;
397: fa_srvr_msg.add_sql_error(
398: calling_fn => l_calling_fn
399: ,p_log_level_rec => g_log_level_rec);
400: FND_MSG_PUB.Count_And_Get(
401: p_count => x_msg_count,