[Home] [Help]
406: l_cond_id FEM_OBJECT_CATALOG_B.object_id%TYPE;
407: BEGIN
408: select sub_object_id
409: into l_cond_id
410: from fem_alloc_br_formula
411: where object_definition_id = p_obj_def_id
412: and function_seq = p_func_seq;
413: RETURN l_cond_id;
414: EXCEPTION
574: -- DeleteFormulaRecs
575: --
576: -- DESCRIPTION
577: -- Deletes Mapping Rule Definition Formulas by performing deletes on records
578: -- in the FEM_ALLOC_BR_FORMULA table.
579: --
580: -- IN
581: -- p_obj_def_id - Object Definition ID.
582: --
588: IS
589: CURSOR c_local_cond_id (p_rule_def_id NUMBER)
590: IS
591: select sub_object_id
592: from fem_alloc_br_formula formula
593: where formula.object_definition_id = p_rule_def_id
594: and exists (select 1
595: from fem_object_catalog_b obj
596: where obj.object_id = formula.sub_object_id
666: ,p_module => G_BLOCK||'.'||l_api_name
667: ,p_msg_text => 'END1 '
668: );
669:
670: delete from fem_alloc_br_formula
671: where object_definition_id = p_obj_def_id;
672:
673: FEM_ENGINES_PKG.Tech_Message (
674: p_severity => G_LOG_LEVEL_3
815: -- CopyFormulaRecs
816: --
817: -- DESCRIPTION
818: -- Creates a new Mapping Rule Definition Formula by copying records in the
819: -- FEM_ALLOC_BR_FORMULA table.
820: --
821: -- IN
822: -- p_source_obj_def_id - Source Object Definition ID.
823: -- p_target_obj_def_id - Target Object Definition ID.
857: ,FND_GLOBAL.user_id last_updated_by
858: ,sysdate last_update_date
859: ,FND_GLOBAL.login_id LAST_UPDATE_LOGIN
860: ,object_version_number
861: from fem_alloc_br_formula formula
862: where formula.object_definition_id = p_obj_def_id
863: and exists (select 1
864: from fem_object_catalog_b obj
865: where obj.object_id = formula.sub_object_id
884:
885: BEGIN
886:
887:
888: insert into fem_alloc_br_formula (
889: object_definition_id
890: ,function_seq
891: ,function_cd
892: ,sub_object_id
928: ,FND_GLOBAL.user_id
929: ,sysdate
930: ,FND_GLOBAL.login_id
931: ,f.object_version_number
932: from fem_alloc_br_formula f
933: where f.object_definition_id = p_source_obj_def_id
934: and (f.sub_object_id is NULL
935: or NOT EXISTS (select 1
936: from fem_object_catalog_b o
936: from fem_object_catalog_b o
937: where o.object_id = f.sub_object_id
938: and o.object_type_code = 'CONDITION_MAPPING'));
939:
940: -- cursor to select all records from fem_alloc_br_formula and join
941: -- with fem_object_catalog_b to only return records that have
942: -- object_type_code = 'CONDITION_MAPPING'.
943: FOR l_formula_rec IN c_allc_br_formula (p_source_obj_def_id)
944: LOOP
1031: raise FND_API.G_EXC_ERROR;
1032: elsif (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) then
1033: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1034: end if;
1035: insert into fem_alloc_br_formula (
1036: object_definition_id
1037: ,function_seq
1038: ,function_cd
1039: ,sub_object_id
1215:
1216: CURSOR c_alloc_br_formula
1217: IS
1218: select function_seq, function_cd, table_name, nvl (post_to_ledger_flg, 'N') as post_to_ledger_flg
1219: from FEM_ALLOC_BR_FORMULA
1220: where object_definition_id = p_obj_def_id
1221: and function_cd in ('FILTER', 'DEBIT', 'CREDIT',
1222: 'TABLE_ACCESS', 'PCT_DISTRB', 'LEAFFUNC')
1223: order by function_seq asc;
1320: else
1321: l_col_name := L_DEFAULT_COL_NAME;
1322: end if;
1323:
1324: update FEM_ALLOC_BR_FORMULA set table_name = L_DEFAULT_TABLE,
1325: column_name = l_col_name, sub_object_id = null
1326: where object_definition_id = p_obj_def_id
1327: and function_seq = l_formula_rec.function_seq;
1328:
1612:
1613: delete_map_rule_content
1614: This procedure deletes the data from the 3 tables that store
1615: the mapping rule content viz. FEM_ALLOC_BUSINESS_RULE,
1616: FEM_ALLOC_BR_FORMULA and FEM_ALLOC_BR_DIMENSIONS.
1617:
1618: *************************************************************************/
1619:
1620: PROCEDURE delete_map_rule_content(p_object_definition_id IN NUMBER)