eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.GMS_BUDGET_BALANCE dependencies on GMS_BUDGET_BALANCE

Line 1: PACKAGE BODY gms_budget_balance AS

1: PACKAGE BODY gms_budget_balance AS
2: -- $Header: gmsfcupb.pls 120.11 2007/06/01 06:21:20 jravisha ship $
3:
4: -- To check on, whether to print debug messages in log file or not
5: L_DEBUG varchar2(1) := NVL(FND_PROFILE.value('GMS_ENABLE_DEBUG_MODE'), 'N');

Line 41: g_error_program_name VARCHAR2 ( 30 ) := 'GMS_BUDGET_BALANCE';

37: x_base_bud_version_id number;
38: x_dummy number;
39:
40: -- Variables for error handling .
41: g_error_program_name VARCHAR2 ( 30 ) := 'GMS_BUDGET_BALANCE';
42: g_error_procedure_name VARCHAR2 ( 30 );
43: g_error_stage VARCHAR2 ( 30 );
44:
45: resource_busy exception;

Line 1947: gms_error_pkg.gms_debug('gms_budget_balance -1','C');

1943: select set_of_books_id into x_sob_id
1944: from pa_implementations;
1945: x_e_stage := '200';
1946: IF L_DEBUG = 'Y' THEN
1947: gms_error_pkg.gms_debug('gms_budget_balance -1','C');
1948: END IF;
1949: -- TO SELECT DRAFT_BUDGET_VERSION_ID FROM PA_BUDGET_VERSION TABLE.
1950: select max(budget_version_id) into x_budget_version_id
1951: from gms_budget_versions

Line 1957: gms_error_pkg.gms_debug('gms_budget_balance -2','C');

1953: and award_id = to_char(x_award_id)
1954: and ((budget_status_code ='W' and x_mode='S')
1955: or (budget_status_code = 'B' and x_mode = 'B'));
1956: IF L_DEBUG = 'Y' THEN
1957: gms_error_pkg.gms_debug('gms_budget_balance -2','C');
1958: END IF;
1959:
1960: /* -- Commented out NOCOPY for Bug: 1666853 - will be included in 11.5F
1961:

Line 2040: gms_error_pkg.gms_debug('gms_budget_balance -3','C');

2036: -- re-create GMS_BALANCES record
2037: x_e_stage := '300';
2038: open gms_bal_lock; -- lock gms_balances records for the budget version
2039: IF L_DEBUG = 'Y' THEN
2040: gms_error_pkg.gms_debug('gms_budget_balance -3','C');
2041: END IF;
2042: x_e_stage := '400';
2043: IF L_DEBUG = 'Y' THEN
2044: gms_error_pkg.gms_debug('gms_budget_balance -4','C');

Line 2044: gms_error_pkg.gms_debug('gms_budget_balance -4','C');

2040: gms_error_pkg.gms_debug('gms_budget_balance -3','C');
2041: END IF;
2042: x_e_stage := '400';
2043: IF L_DEBUG = 'Y' THEN
2044: gms_error_pkg.gms_debug('gms_budget_balance -4','C');
2045: END IF;
2046: create_gms_balance( x_budget_version_id, x_sob_id, x_project_id, x_award_id );
2047: -- Get a new packet id
2048: x_e_stage := '500';

Line 2050: gms_error_pkg.gms_debug('gms_budget_balance -5','C');

2046: create_gms_balance( x_budget_version_id, x_sob_id, x_project_id, x_award_id );
2047: -- Get a new packet id
2048: x_e_stage := '500';
2049: IF L_DEBUG = 'Y' THEN
2050: gms_error_pkg.gms_debug('gms_budget_balance -5','C');
2051: END IF;
2052: select gl_bc_packets_s.nextval into x_packet_id from dual;
2053: -- Create raw transactions in GMS_BC_PACKETS
2054: x_e_stage := '600';

Line 2056: gms_error_pkg.gms_debug('gms_budget_balance -6','C');

2052: select gl_bc_packets_s.nextval into x_packet_id from dual;
2053: -- Create raw transactions in GMS_BC_PACKETS
2054: x_e_stage := '600';
2055: IF L_DEBUG = 'Y' THEN
2056: gms_error_pkg.gms_debug('gms_budget_balance -6','C');
2057: END IF;
2058: create_direct_cost(x_packet_id ,
2059: x_sob_id ,
2060: x_project_id,

Line 2069: gms_error_pkg.gms_debug('gms_budget_balance -7','C');

2065: create_indirect_cost(x_packet_id);
2066: -------------------------------------------------------------
2067: Begin
2068: IF L_DEBUG = 'Y' THEN
2069: gms_error_pkg.gms_debug('gms_budget_balance -7','C');
2070: END IF;
2071: x_e_stage := '800';
2072: begin
2073: select count(packet_id) into x_run

Line 2083: gms_error_pkg.gms_debug('gms_budget_balance -8','C');

2079: null;
2080: end;
2081: x_e_stage := '900';
2082: IF L_DEBUG = 'Y' THEN
2083: gms_error_pkg.gms_debug('gms_budget_balance -8','C');
2084: END IF;
2085: if x_run > 0 then
2086: if x_mode in ('S','B') then
2087: if NOT GMS_FUNDS_CONTROL_PKG.GMS_FCK( x_sob_id,

Line 2110: gms_error_pkg.gms_debug('gms_budget_balance -9','C');

2106: else
2107: --Recreating gms_balances without going thro' FC
2108: x_e_stage := '910';
2109: IF L_DEBUG = 'Y' THEN
2110: gms_error_pkg.gms_debug('gms_budget_balance -9','C');
2111: END IF;
2112: -- Update resource list
2113: RETCODE := 'S';
2114: re_base_setup_rlmi(x_packet_id, x_budget_version_id,x_err_code,x_err_buff);

Line 2124: gms_error_pkg.gms_debug('gms_budget_balance -10','C');

2120:
2121: end if;
2122: x_e_stage := '920';
2123: IF L_DEBUG = 'Y' THEN
2124: gms_error_pkg.gms_debug('gms_budget_balance -10','C');
2125: END IF;
2126: update_bc_packet_status(x_packet_id);
2127: -- Update gms_balances using sweeper process
2128: end if;

Line 2135: gms_error_pkg.gms_debug('gms_budget_balance -11','C');

2131: RETCODE := 'S';
2132: end if;
2133: x_e_stage := '930';
2134: IF L_DEBUG = 'Y' THEN
2135: gms_error_pkg.gms_debug('gms_budget_balance -11','C');
2136: END IF;
2137:
2138: /* -- Commented out NOCOPY for Bug: 1666853 ...
2139: -- Sweeper is now being called from GMS_BUDGET_PUB.BASELINE_BUDGET()

Line 2161: gms_error_pkg.gms_debug('gms_budget_balance -12','C');

2157:
2158:
2159: gms_sweeper.upd_act_enc_bal(ERRBUF, x_e_code, x_packet_id,x_mode,x_project_id,x_award_id);
2160: IF L_DEBUG = 'Y' THEN
2161: gms_error_pkg.gms_debug('gms_budget_balance -12','C');
2162: END IF;
2163: end if;
2164:
2165:

Line 2194: gms_error_pkg.gms_debug('gms_budget_balance -14','C');

2190: Exception
2191: when OTHERS then
2192: RETCODE := 'H';
2193: IF L_DEBUG = 'Y' THEN
2194: gms_error_pkg.gms_debug('gms_budget_balance -14','C');
2195: END IF;
2196: ERRBUF := (X_E_STAGE||': '||SQLERRM);
2197: end update_gms_balance;
2198:

Line 2263: end gms_budget_balance;

2259: END IF;
2260:
2261: END get_po_qty_invoiced ;
2262:
2263: end gms_budget_balance;