[Home] [Help]
939: SELECT gs.currency_code
940: FROM gl_sets_of_books gs
941: , ozf_sys_parameters org
942: WHERE org.set_of_books_id = gs.set_of_books_id
943: AND org.org_id = MO_GLOBAL.GET_CURRENT_ORG_ID();
944:
945: l_function_currency VARCHAR2(15);
946:
947: BEGIN
1951: SELECT gs.currency_code
1952: FROM gl_sets_of_books gs
1953: , ozf_sys_parameters org
1954: WHERE org.set_of_books_id = gs.set_of_books_id
1955: AND org.org_id = MO_GLOBAL.GET_CURRENT_ORG_ID();
1956:
1957: CURSOR csr_custom_status_id(p_claim_id IN NUMBER, p_status_code IN VARCHAR2) IS
1958: SELECT close_status_id
1959: FROM ozf_claims_all oc,
5124: --Multiorg Changes
5125: CURSOR operating_unit_csr IS
5126: SELECT ou.organization_id org_id
5127: FROM hr_operating_units ou
5128: WHERE mo_global.check_access(ou.organization_id) = 'Y';
5129:
5130: m NUMBER := 0;
5131: l_org_id OZF_UTILITY_PVT.operating_units_tbl;
5132:
5134: SAVEPOINT Populate_Settlement_Data;
5135:
5136:
5137: --Multiorg Changes
5138: MO_GLOBAL.init('OZF');
5139:
5140: IF p_org_id IS NULL THEN
5141: MO_GLOBAL.set_policy_context('M',null);
5142: OPEN operating_unit_csr;
5137: --Multiorg Changes
5138: MO_GLOBAL.init('OZF');
5139:
5140: IF p_org_id IS NULL THEN
5141: MO_GLOBAL.set_policy_context('M',null);
5142: OPEN operating_unit_csr;
5143: LOOP
5144: FETCH operating_unit_csr into l_org_id(m);
5145: m := m + 1;
5152:
5153: --Multiorg Changes
5154: IF (l_org_id.COUNT > 0) THEN
5155: FOR m IN l_org_id.FIRST..l_org_id.LAST LOOP
5156: MO_GLOBAL.set_policy_context('S',l_org_id(m));
5157: -- Write OU info to OUT file
5158: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Operating Unit: ' || MO_GLOBAL.get_ou_name(l_org_id(m)));
5159: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '-----------------------------------------------------');
5160: -- Write OU info to LOG file
5154: IF (l_org_id.COUNT > 0) THEN
5155: FOR m IN l_org_id.FIRST..l_org_id.LAST LOOP
5156: MO_GLOBAL.set_policy_context('S',l_org_id(m));
5157: -- Write OU info to OUT file
5158: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Operating Unit: ' || MO_GLOBAL.get_ou_name(l_org_id(m)));
5159: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '-----------------------------------------------------');
5160: -- Write OU info to LOG file
5161: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Operating Unit: ' || MO_GLOBAL.get_ou_name(l_org_id(m)));
5162: FND_FILE.PUT_LINE(FND_FILE.LOG, '-----------------------------------------------------');
5157: -- Write OU info to OUT file
5158: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, 'Operating Unit: ' || MO_GLOBAL.get_ou_name(l_org_id(m)));
5159: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '-----------------------------------------------------');
5160: -- Write OU info to LOG file
5161: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Operating Unit: ' || MO_GLOBAL.get_ou_name(l_org_id(m)));
5162: FND_FILE.PUT_LINE(FND_FILE.LOG, '-----------------------------------------------------');
5163:
5164: IF p_claim_class IS NOT NULL THEN
5165: OPEN csr_claim_class_name(p_claim_class);