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.GL_MC_INFO dependencies on GL_MC_INFO

Line 1: PACKAGE BODY gl_mc_info AS

1: PACKAGE BODY gl_mc_info AS
2: /* $Header: glmcinfb.pls 120.29.12010000.3 2009/01/05 12:02:14 paragond ship $ */
3:
4: -- Procedure
5: -- get_ledger_currency

Line 93: gl_mc_info.get_alc_ledger_type(n_sob_id, l_alc_ledger_type);

89: n_sob_type OUT NOCOPY VARCHAR2) IS
90: l_alc_ledger_type VARCHAR2(30);
91: BEGIN
92:
93: gl_mc_info.get_alc_ledger_type(n_sob_id, l_alc_ledger_type);
94:
95: IF l_alc_ledger_type = 'SOURCE'
96: THEN
97: n_sob_type := 'P';

Line 172: l_ledger_category := gl_mc_info.get_ledger_category(n_ledger_id);

168: n_fa_book_code IN VARCHAR2) RETURN NUMBER IS
169: l_src_ledger_id gl_ledgers.ledger_id%TYPE;
170: l_ledger_category gl_ledgers.ledger_category_code%TYPE;
171: BEGIN
172: l_ledger_category := gl_mc_info.get_ledger_category(n_ledger_id);
173:
174: IF (l_ledger_category = 'PRIMARY')
175: THEN
176: l_src_ledger_id := n_ledger_id;

Line 245: l_ledger_category := gl_mc_info.get_ledger_category(n_ledger_id);

241: FUNCTION get_source_ledger_id (n_ledger_id IN NUMBER) RETURN NUMBER IS
242: l_src_ledger_id gl_ledgers.ledger_id%TYPE;
243: l_ledger_category gl_ledgers.ledger_category_code%TYPE;
244: BEGIN
245: l_ledger_category := gl_mc_info.get_ledger_category(n_ledger_id);
246:
247: IF (l_ledger_category = 'PRIMARY')
248: THEN
249: l_src_ledger_id := n_ledger_id;

Line 304: RETURN gl_mc_info.get_source_ledger_id (n_rsob_id);

300: -- 31-JAN-01 MGOWDA Created
301: -- 25-FEB-03 LPOON R11i.X changes
302: FUNCTION get_primary_set_of_books_id (n_rsob_id IN NUMBER) RETURN NUMBER IS
303: BEGIN
304: RETURN gl_mc_info.get_source_ledger_id (n_rsob_id);
305: END;
306:
307: -- Function
308: -- get_primary_ledger_id

Line 320: l_ledger_category := gl_mc_info.get_ledger_category(n_ledger_id);

316: n_org_id IN NUMBER) RETURN NUMBER IS
317: l_pri_ledger_id gl_ledgers.ledger_id%TYPE;
318: l_ledger_category gl_ledgers.ledger_category_code%TYPE;
319: BEGIN
320: l_ledger_category := gl_mc_info.get_ledger_category(n_ledger_id);
321:
322: IF (l_ledger_category = 'PRIMARY')
323: THEN
324: l_pri_ledger_id := n_ledger_id;

Line 380: l_ledger_category := gl_mc_info.get_ledger_category(n_ledger_id);

376: FUNCTION get_primary_ledger_id (n_ledger_id IN NUMBER) RETURN NUMBER IS
377: l_pri_ledger_id gl_ledgers.ledger_id%TYPE;
378: l_ledger_category gl_ledgers.ledger_category_code%TYPE;
379: BEGIN
380: l_ledger_category := gl_mc_info.get_ledger_category(n_ledger_id);
381:
382: IF (l_ledger_category = 'PRIMARY')
383: THEN
384: l_pri_ledger_id := n_ledger_id;

Line 850: l_ret_value := GL_MC_INFO.init_ledger_le_bsv_gt(p_ledger_id);

846: IF l_bal_seg_opt = 'A'
847: THEN
848: l_ret_value := 'S'; -- Just assigning success status
849: ELSE
850: l_ret_value := GL_MC_INFO.init_ledger_le_bsv_gt(p_ledger_id);
851: END IF;
852:
853: IF (l_ret_value = 'S')
854: THEN

Line 946: RETURN GL_MC_INFO.get_legal_entities(p_ledger_id, x_le_list);

942:
943: -- CASE 4: All BSV option and BSV is not passed (*Also for CASE 3)
944: -- We can call another API to get LEs assigned this ledger from
945: -- GL_LEDGER_LE_V
946: RETURN GL_MC_INFO.get_legal_entities(p_ledger_id, x_le_list);
947:
948: ELSE
949: -- Invalid BSV option code
950: RETURN FALSE;

Line 1017: l_ret_value := GL_MC_INFO.init_ledger_le_bsv_gt(l_ledger_id);

1013: FROM GL_LEDGERS
1014: WHERE ledger_id = l_ledger_id;
1015:
1016: -- Initialize GL_LEGDER_LE_BSV_GT before getting its assigned BSV
1017: l_ret_value := GL_MC_INFO.init_ledger_le_bsv_gt(l_ledger_id);
1018:
1019: IF (l_ret_value = 'S')
1020: THEN
1021: -- Sucessful initialization, so select BSV from the global table

Line 1121: RETURN GL_MC_INFO.get_bal_seg_values (p_ledger_id,

1117: p_bsv_eff_date IN DATE,
1118: x_allow_all_bsv_flag OUT NOCOPY VARCHAR2,
1119: x_bsv_list IN OUT NOCOPY le_bsv_tbl_type) RETURN BOOLEAN IS
1120: BEGIN
1121: RETURN GL_MC_INFO.get_bal_seg_values (p_ledger_id,
1122: NULL,
1123: p_bsv_eff_date,
1124: x_allow_all_bsv_flag,
1125: x_bsv_list);

Line 1178: gl_mc_info.get_alc_ledger_type(n_sob_id, l_alc_ledger_type);

1174: PROCEDURE set_rsob (n_sob_id IN NUMBER) IS
1175: l_alc_ledger_type VARCHAR2(30);
1176: BEGIN
1177: /* Get the ALC ledger type */
1178: gl_mc_info.get_alc_ledger_type(n_sob_id, l_alc_ledger_type);
1179:
1180: IF l_alc_ledger_type = 'TARGET' THEN
1181: /* Set client info if it is a ALC Target ledger */
1182: gl_mc_info.set_ledger(n_sob_id);

Line 1182: gl_mc_info.set_ledger(n_sob_id);

1178: gl_mc_info.get_alc_ledger_type(n_sob_id, l_alc_ledger_type);
1179:
1180: IF l_alc_ledger_type = 'TARGET' THEN
1181: /* Set client info if it is a ALC Target ledger */
1182: gl_mc_info.set_ledger(n_sob_id);
1183: END IF;
1184: END;
1185:
1186: -- Procedure

Line 1219: gl_mc_info.get_alc_ledger_type(n_ledger_id, l_alc_ledger_type);

1215: l_count NUMBER;
1216:
1217: BEGIN
1218: /* Get the type of set of books for the particular SOB_ID */
1219: gl_mc_info.get_alc_ledger_type(n_ledger_id, l_alc_ledger_type);
1220:
1221: IF l_alc_ledger_type = 'SOURCE' THEN
1222: BEGIN
1223: /* It is ALC Source (i.e. ALC_LEDGER_TYPE_CODE = SOURCE) */

Line 1306: gl_mc_info.alc_enabled( n_ledger_id

1302: n_org_id IN NUMBER,
1303: n_fa_book_code IN VARCHAR2) RETURN BOOLEAN IS
1304: l_alc_enabled VARCHAR2(1);
1305: BEGIN
1306: gl_mc_info.alc_enabled( n_ledger_id
1307: , n_appl_id
1308: , n_org_id
1309: , n_fa_book_code
1310: , l_alc_enabled);

Line 1360: gl_mc_info.alc_enabled( n_sob_id

1356: n_org_id IN NUMBER,
1357: n_fa_book_code IN VARCHAR2,
1358: n_mrc_enabled OUT NOCOPY VARCHAR2) IS
1359: BEGIN
1360: gl_mc_info.alc_enabled( n_sob_id
1361: , n_appl_id
1362: , n_org_id
1363: , n_fa_book_code
1364: , n_mrc_enabled);

Line 1414: gl_mc_info.get_alc_ledger_id(n_psob_id, l_rsob_id_list);

1410:
1411: l_rsob_id_list id_arr;
1412: i number := 1;
1413: BEGIN
1414: gl_mc_info.get_alc_ledger_id(n_psob_id, l_rsob_id_list);
1415:
1416: n_rsob_id1 := -1;
1417: n_rsob_id2 := -1;
1418: n_rsob_id3 := -1;

Line 1480: gl_mc_info.get_alc_ledger_type(n_ledger_id, l_alc_ledger_type);

1476: i NUMBER;
1477: BEGIN
1478:
1479: /* Get the ALC ledger type of the passed ledger ID */
1480: gl_mc_info.get_alc_ledger_type(n_ledger_id, l_alc_ledger_type);
1481:
1482: IF l_alc_ledger_type = 'NONE' THEN
1483: /* If its ALC ledger type is 'NONE', return the ledger list as NULL */
1484: n_ledger_list.extend;

Line 1487: gl_mc_info.alc_enabled( n_ledger_id

1483: /* If its ALC ledger type is 'NONE', return the ledger list as NULL */
1484: n_ledger_list.extend;
1485: ELSE
1486: /* Otherwise, check if ALC is enabled for the passed application/OU/Ledger */
1487: gl_mc_info.alc_enabled( n_ledger_id
1488: , n_appl_id
1489: , n_org_id
1490: , n_fa_book_code
1491: , l_alc_enabled);

Line 1507: l_src_ledger_id := gl_mc_info.get_source_ledger_id( n_ledger_id

1503: IF l_alc_ledger_type = 'SOURCE' THEN
1504: l_src_ledger_id := n_ledger_id;
1505: ELSIF l_alc_ledger_type = 'TARGET' THEN
1506: /* Get source ledger ID of the passed ALC target ledger/application/OU */
1507: l_src_ledger_id := gl_mc_info.get_source_ledger_id( n_ledger_id
1508: , n_appl_id
1509: , n_org_id
1510: , n_fa_book_code);
1511: END IF; -- IF l_alc_ledger_type = 'SOURCE' THEN

Line 1631: gl_mc_info.get_alc_associated_ledgers( n_sob_id

1627: n_sob_list IN OUT NOCOPY r_sob_list) IS
1628: BEGIN
1629: -- This procedure used to include primary SOB, so we put 'Y' to include
1630: -- ALC source ledger
1631: gl_mc_info.get_alc_associated_ledgers( n_sob_id
1632: , n_appl_id
1633: , n_org_id
1634: , n_fa_book_code
1635: , 'Y'

Line 1706: l_ledger_list gl_mc_info.r_sob_list := gl_mc_info.r_sob_list();

1702: n_ledger_currency_8 OUT NOCOPY VARCHAR2,
1703: n_ledger_category_8 OUT NOCOPY VARCHAR2,
1704: n_ledger_short_name_8 OUT NOCOPY VARCHAR2,
1705: n_acct_method_code_8 OUT NOCOPY VARCHAR2) IS
1706: l_ledger_list gl_mc_info.r_sob_list := gl_mc_info.r_sob_list();
1707: l_ledger_list_count NUMBER;
1708: BEGIN
1709: gl_mc_info.get_alc_associated_ledgers( n_ledger_id
1710: , n_appl_id

Line 1709: gl_mc_info.get_alc_associated_ledgers( n_ledger_id

1705: n_acct_method_code_8 OUT NOCOPY VARCHAR2) IS
1706: l_ledger_list gl_mc_info.r_sob_list := gl_mc_info.r_sob_list();
1707: l_ledger_list_count NUMBER;
1708: BEGIN
1709: gl_mc_info.get_alc_associated_ledgers( n_ledger_id
1710: , n_appl_id
1711: , n_org_id
1712: , n_fa_book_code
1713: , 'Y' -- Include ALC source ledger

Line 1861: l_sob_list gl_mc_info.r_sob_list := gl_mc_info.r_sob_list();

1857: p_sob_type_8 OUT NOCOPY VARCHAR2,
1858: p_sob_curr_8 OUT NOCOPY VARCHAR2,
1859: p_sob_user_type_8 OUT NOCOPY VARCHAR2,
1860: p_sob_short_name_8 OUT NOCOPY VARCHAR2) IS
1861: l_sob_list gl_mc_info.r_sob_list := gl_mc_info.r_sob_list();
1862: l_sob_list_count NUMBER;
1863: BEGIN
1864: -- This procedure used to include primary SOB, so we put 'Y' to include
1865: -- ALC source ledger

Line 1866: gl_mc_info.get_alc_associated_ledgers( p_sob_id

1862: l_sob_list_count NUMBER;
1863: BEGIN
1864: -- This procedure used to include primary SOB, so we put 'Y' to include
1865: -- ALC source ledger
1866: gl_mc_info.get_alc_associated_ledgers( p_sob_id
1867: , p_appl_id
1868: , p_org_id
1869: , p_fa_book_code
1870: , 'Y'

Line 1969: gl_mc_info.get_ledger_category(n_ledger_id, l_ledger_category);

1965: i NUMBER;
1966: BEGIN
1967:
1968: -- Get the ledger category of the passed ledger ID
1969: gl_mc_info.get_ledger_category(n_ledger_id, l_ledger_category);
1970:
1971: IF l_ledger_category = 'ALC' OR l_ledger_category = 'NONE' THEN
1972: -- If it is ALC or NONE ledger, return the ledger list as NULL
1973: n_ledger_list.extend;

Line 1979: l_pri_ledger_id := gl_mc_info.get_primary_ledger_id( n_ledger_id

1975: IF l_ledger_category = 'PRIMARY' THEN
1976: l_pri_ledger_id := n_ledger_id;
1977: ELSIF l_ledger_category = 'SECONDARY' THEN
1978: -- Get primary ledger ID of the passed secondary ledger/applciation/OU
1979: l_pri_ledger_id := gl_mc_info.get_primary_ledger_id( n_ledger_id
1980: , n_appl_id
1981: , n_org_id);
1982: END IF; -- IF l_ledger_category = 'PRIMARY' THEN
1983:

Line 2094: l_aa gl_mc_info.t_ael_sob_info;

2090: -- 22-MAY-00 LPOON Set encumb_flag = 'N' for RSOBs only
2091: -- 25-FEB-03 LPOON R11i.X Changes
2092: PROCEDURE ap_ael_sobs (ael_sob_info IN OUT NOCOPY t_ael_sob_info) IS
2093:
2094: l_aa gl_mc_info.t_ael_sob_info;
2095: l_sob_list gl_mc_info.r_sob_list := gl_mc_info.r_sob_list();
2096: l_cnt NUMBER := 0;
2097: i NUMBER := 0;
2098: j NUMBER := 0;

Line 2095: l_sob_list gl_mc_info.r_sob_list := gl_mc_info.r_sob_list();

2091: -- 25-FEB-03 LPOON R11i.X Changes
2092: PROCEDURE ap_ael_sobs (ael_sob_info IN OUT NOCOPY t_ael_sob_info) IS
2093:
2094: l_aa gl_mc_info.t_ael_sob_info;
2095: l_sob_list gl_mc_info.r_sob_list := gl_mc_info.r_sob_list();
2096: l_cnt NUMBER := 0;
2097: i NUMBER := 0;
2098: j NUMBER := 0;
2099: l_client_info VARCHAR2(64);

Line 2146: gl_mc_info.get_sec_associated_ledgers( l_aa(l_cnt).sob_id

2142:
2143: -- Get all the associated reporting secondary SOBs which are
2144: -- converted to secondary ledgers with currency different with
2145: -- primary currency (*exclude primary and will get it later)
2146: gl_mc_info.get_sec_associated_ledgers( l_aa(l_cnt).sob_id
2147: , 200 -- AP
2148: , l_org_id
2149: , 'N' -- Exclude primary ledger
2150: , l_sob_list);

Line 2190: gl_mc_info.get_alc_associated_ledgers( l_aa(l_cnt).sob_id

2186: i := 0;
2187: l_sob_list.delete;
2188:
2189: -- Get all the associated ALC target ledgers (i.e. reporting SOBs)
2190: gl_mc_info.get_alc_associated_ledgers( l_aa(l_cnt).sob_id
2191: , 200 -- AP
2192: , l_org_id
2193: , NULL
2194: , 'N' -- Exclude ALC source ledger

Line 2404: END gl_mc_info;

2400: END IF;
2401: END;
2402:
2403:
2404: END gl_mc_info;