[Home] [Help]
212:
213: BEGIN
214:
215: -- Initialize message stacks.
216: FA_SRVR_MSG.Init_Server_Message;
217: FA_DEBUG_PKG.Initialize;
218:
219: /* Bug 8402286 removing LARGE ROLLBACK SEGMENT
220: -- Set large rollback segment.
330: end if;
331:
332: IF (h_review_status_d <> h_current_status_d) THEN
333: -- Re-using message for mass changes program.
334: FA_SRVR_MSG.Add_Message(
335: CALLING_FN => 'FARX_RR.Review_Change',
336: NAME => 'FA_MASSRCL_WRONG_STATUS',
337: TOKEN1 => 'CURRENT',
338: VALUE1 => h_current_status_d,
555:
556: FND_MSG_PUB.Count_And_Get(
557: p_count => h_msg_count,
558: p_data => h_msg_data);
559: FA_SRVR_MSG.Write_Msg_Log(
560: msg_count => h_msg_count,
561: msg_data => h_msg_data);
562: IF (h_debug_flag = 'YES') THEN
563: FA_DEBUG_PKG.Write_Debug_Log;
586: IF (X_RX_Flag = 'YES') THEN
587: FND_MSG_PUB.Count_And_Get(
588: p_count => h_msg_count,
589: p_data => h_msg_data);
590: FA_SRVR_MSG.Write_Msg_Log(
591: msg_count => h_msg_count,
592: msg_data => h_msg_data);
593: IF (h_debug_flag = 'YES') THEN
594: FA_DEBUG_PKG.Write_Debug_Log;
596: END IF;
597: WHEN OTHERS THEN
598: retcode := 2; -- Completed with error.
599: IF SQLCODE <> 0 THEN
600: FA_SRVR_MSG.Add_SQL_Error(CALLING_FN => 'FARX_RP.Review_Change');
601: END IF;
602:
603: -- Reset global variable values.
604: a_tbl.delete;
616: IF (X_RX_Flag = 'YES') THEN
617: FND_MSG_PUB.Count_And_Get(
618: p_count => h_msg_count,
619: p_data => h_msg_data);
620: FA_SRVR_MSG.Write_Msg_Log(
621: msg_count => h_msg_count,
622: msg_data => h_msg_data);
623: IF (h_debug_flag = 'YES') THEN
624: FA_DEBUG_PKG.Write_Debug_Log;