DBA Data[Home] [Help]

APPS.FARX_RP dependencies on FARX_RP

Line 1: PACKAGE BODY FARX_RP AS

1: PACKAGE BODY FARX_RP AS
2: /* $Header: FARXRPB.pls 120.7 2005/10/05 15:23:02 bridgway ship $ */
3:
4: -- Mass reclass record from fa_mass_reclass table.
5: mr_rec FA_MASS_REC_UTILS_PKG.mass_reclass_rec;

Line 276: fa_debug_pkg.add('FARX_RP.Preview_Reclass',

272: h_debug_flag := 'YES';
273: END IF;
274:
275: if (g_print_debug) then
276: fa_debug_pkg.add('FARX_RP.Preview_Reclass',
277: 'Starting Preview',
278: '');
279: end if;
280:

Line 327: CALLING_FN => 'FARX_RP.Preview_Reclass',

323:
324: IF (h_preview_status_d <> h_current_status_d) THEN
325: -- Re-using message for mass reclass program.
326: FA_SRVR_MSG.Add_Message(
327: CALLING_FN => 'FARX_RP.Preview_Reclass',
328: NAME => 'FA_MASSRCL_WRONG_STATUS',
329: TOKEN1 => 'CURRENT',
330: VALUE1 => h_current_status_d,
331: TOKEN2 => 'RUNNING',

Line 407: fa_debug_pkg.add('FARX_RP.Preview_Reclass',

403: X_Asset_Id => a_tbl(a_index).asset_id,
404: X_Fully_Rsvd_Flag => mr_rec.fully_rsvd_flag) THEN
405:
406: if (g_print_debug) then
407: fa_debug_pkg.add('FARX_RP.Preview_Reclass',
408: 'Preview - after check_criteria',
409: a_tbl(a_index).asset_id );
410: end if;
411: IF (a_tbl(a_index).category_id = mr_rec.to_category_id) THEN

Line 439: fa_debug_pkg.add('FARX_RP.Preview_Reclass',

435: -- Increment the number of assets stored in a_tbl.
436: g_asset_count := g_asset_count + 1;
437: ELSE
438: if (g_print_debug) then
439: fa_debug_pkg.add('FARX_RP.Preview_Reclass',
440: 'Preview - validate_reclass_basic skipped asset',
441: a_tbl(a_index).asset_id );
442: end if;
443: -- Basic reclass validation failed. Reclass fails.

Line 449: fa_debug_pkg.add('FARX_RP.Preview_Reclass',

445: END IF; /* IF FA_REC_PVT_PKG1.Validate_Reclass_Basic */
446: END IF; /* IF (a_tbl(a_index).category_id = */
447: ELSE
448: if (g_print_debug) then
449: fa_debug_pkg.add('FARX_RP.Preview_Reclass',
450: 'Preview - check_criteria skipped asset ',
451: a_tbl(a_index).asset_id );
452: end if;
453: -- Invalid asset record.

Line 471: fa_debug_pkg.add('FARX_RP.Preview_Reclass',

467: -- and a_index to 0. Commit changes at every 200 assets as well.
468: IF (g_asset_count = h_commit_level) THEN
469: FOR i IN 1 .. a_index LOOP
470: if (g_print_debug) then
471: fa_debug_pkg.add('FARX_RP.Preview_Reclass',
472: 'Preview - inserting asset into itf-table',
473: a_tbl(a_index).asset_id );
474: end if;
475: FA_MASS_REC_UTILS_PKG.Insert_Itf(

Line 589: CALLING_FN => 'FARX_RP.Preview_Reclass');

585: WHEN OTHERS THEN
586: retcode := 2; -- Completed with error.
587: IF SQLCODE <> 0 THEN
588: FA_SRVR_MSG.Add_SQL_Error(
589: CALLING_FN => 'FARX_RP.Preview_Reclass');
590: END IF;
591:
592: -- Reset global variable values.
593: FA_LOAD_TBL_PKG.g_deprn_count := 0;

Line 776: CALLING_FN => 'FARX_RP.Store_Results',

772: p_date_placed_in_service => h_dpis,
773: x_pos => pos);
774: IF pos IS NULL THEN
775: FA_SRVR_MSG.Add_Message(
776: CALLING_FN => 'FARX_RP.Store_Results',
777: NAME => 'FA_REC_NO_CAT_DEFAULTS');
778: raise store_failure;
779: END IF;
780:

Line 978: CALLING_FN => 'FARX_RP.Store_Results');

974:
975: EXCEPTION
976: WHEN OTHERS THEN
977: FA_SRVR_MSG.Add_SQL_Error(
978: CALLING_FN => 'FARX_RP.Store_Results');
979: raise;
980: END Store_Results;
981:
982:

Line 1058: CALLING_FN => 'FARX_RP.Check_Trans_Date_Book');

1054: p_book_type_code => X_Book_Type_Code,
1055: p_trans_date => h_trans_date)
1056: THEN
1057: FA_SRVR_MSG.Add_Message(
1058: CALLING_FN => 'FARX_RP.Check_Trans_Date_Book');
1059: RETURN (FALSE);
1060: END IF;
1061:
1062: RETURN (TRUE);

Line 1067: CALLING_FN => 'FARX_RP.Check_Trans_Date_Book');

1063:
1064: EXCEPTION
1065: WHEN OTHERS THEN
1066: FA_SRVR_MSG.Add_SQL_Error(
1067: CALLING_FN => 'FARX_RP.Check_Trans_Date_Book');
1068: RETURN (FALSE);
1069: END Check_Trans_Date_Book;
1070:
1071:

Line 1072: END FARX_RP;

1068: RETURN (FALSE);
1069: END Check_Trans_Date_Book;
1070:
1071:
1072: END FARX_RP;