[Home] [Help]
1702:
1703: -- Lists all orgs for GCS
1704: CURSOR all_orgs IS
1705: SELECT DISTINCT company_cost_center_org_id org_id
1706: FROM gcs_entry_lines
1707: WHERE entry_id = p_entry_id;
1708:
1709: org_id NUMBER;
1710: sec_dim_val_id NUMBER;
1819: ' ))' || g_nl ||
1820: ' ) func,' || g_nl ||
1821: ' (SELECT nvl(sum(nvl(el.ytd_debit_balance_e, 0)), 0) ytd_debit, ' ||
1822: 'nvl(sum(nvl(el.ytd_credit_balance_e, 0)), 0) ytd_credit' || g_nl ||
1823: ' FROM GCS_ENTRY_LINES el,' || g_nl ||
1824: ' FEM_LN_ITEMS_ATTR lia,' || g_nl ||
1825: ' FEM_EXT_ACCT_TYPES_ATTR xata' || g_nl ||
1826: ' WHERE el.entry_id = ' || p_entry_id || g_nl ||
1827: ' AND lia.line_item_id = el.line_item_id' || g_nl ||
1861:
1862: IF p_sec_dim_col IS NOT NULL AND p_org_track_flag = 'Y' THEN
1863: dims_cv_text :=
1864: 'SELECT DISTINCT ' || p_sec_dim_col ||
1865: ', COMPANY_COST_CENTER_ORG_ID FROM gcs_entry_lines where entry_id = ' || p_entry_id;
1866:
1867: write_to_log(module, FND_LOG.LEVEL_STATEMENT, dims_cv_text);
1868:
1869: OPEN dims_cv FOR dims_cv_text;
1924: END LOOP;
1925: CLOSE dims_cv;
1926: ELSIF p_sec_dim_col IS NOT NULL THEN
1927: dims_cv_text := 'SELECT DISTINCT ' || p_sec_dim_col ||
1928: ' FROM gcs_entry_lines WHERE entry_id = ' || p_entry_id;
1929:
1930: write_to_log(module, FND_LOG.LEVEL_STATEMENT, dims_cv_text);
1931:
1932: OPEN dims_cv FOR dims_cv_text;
1965: END LOOP;
1966: CLOSE dims_cv;
1967: ELSIF p_org_track_flag = 'Y' THEN
1968: write_to_log(module, FND_LOG.LEVEL_STATEMENT,
1969: 'SELECT DISTINCT company_cost_center_org_id org_id FROM gcs_entry_lines WHERE entry_id = ' || p_entry_id);
1970:
1971: FOR org IN all_orgs LOOP
1972: org_id := org.org_id;
1973: