[Home] [Help]
20: g_acct_segment_name VARCHAR2(25);
21: g_reimb_agree_seg_name VARCHAR2(25);
22: g_acc_value_set_id NUMBER;
23: g_adjustment_flag VARCHAR2(1);
24: g_coa_id Gl_Code_Combinations.chart_of_accounts_id%TYPE;
25: g_apps_id Fnd_Id_Flex_Structures.application_id%TYPE;
26: g_id_flex_code Fnd_Id_Flex_Structures.id_flex_code%TYPE;
27: g_currency_code Gl_Sets_Of_Books.currency_code%TYPE;
28: g_start_date Gl_Period_Statuses.start_date%TYPE;
1121: l_tr_dept_id_col || l_tr_main_acct_col ||
1122: ' FROM gl_je_batches gjb,
1123: gl_je_headers gjh,
1124: gl_je_lines gjl,
1125: gl_code_combinations glc,
1126: fv_treasury_symbols fts,
1127: fv_fund_parameters ffp
1128: WHERE gjl.code_combination_id = glc.code_combination_id
1129: AND gjl.ledger_id = :sob_id
1197: l_tr_dept_id_col || l_tr_main_acct_col ||
1198: ' FROM gl_je_batches gjb,
1199: gl_je_headers gjh,
1200: gl_je_lines gjl,
1201: gl_code_combinations glc,
1202: fv_treasury_symbols fts,
1203: fv_fund_parameters ffp,
1204: xla_ae_lines xal,
1205: xla_ae_headers xah,
4320:
4321: l_fund_select := 'SELECT ''X'', fts.fund_group_code, fts.department_id, ' ||
4322: 'fts.bureau_id, ' ||
4323: 'glc.' || g_bal_segment_name || ' ' ||
4324: 'FROM gl_code_combinations glc, fv_fund_parameters ffp, ' ||
4325: 'fv_treasury_symbols fts ' ||
4326: 'WHERE glc.code_combination_id = :ccid
4327: AND glc.chart_of_accounts_id = :coa_id
4328: AND ffp.treasury_symbol_id = fts.treasury_symbol_id
4374: --l_bal_fetch Integer;
4375: l_exec_ret Integer;
4376: BEGIN
4377: l_bal_select := 'SELECT glc.' || g_bal_segment_name || ' '
4378: ||'FROM gl_code_combinations glc '
4379: ||'WHERE glc.code_combination_id = ' || to_char(p_ccid);
4380: BEGIN
4381: EXECUTE IMMEDIATE l_bal_select INTO p_bal_segment;
4382: EXCEPTION
5365:
5366: -- If program segment name is found in the pl/sql table, then
5367: -- get the program segment value using the ccid
5368: vl_program_sel := 'SELECT gcc.'||vl_prg_seg_name||
5369: ' FROM gl_code_combinations gcc
5370: WHERE gcc.code_combination_id = '||p_ccid;
5371:
5372: EXECUTE IMMEDIATE vl_program_sel INTO vl_program_value;
5373: