[Home] [Help]
580:
581: update hr_s_formula_types
582: set formula_type_id = formula_type_id - 50000000;
583:
584: update hr_s_formulas_f
585: set formula_type_id = formula_type_id - 50000000;
586:
587: update hr_s_ftype_context_usages
588: set formula_type_id = formula_type_id - 50000000;
659: set key_value = to_char(l_new_surrogate_key)
660: where key_value = to_char(stu_rec.c_surrogate_key)
661: and key_name = 'FORMULA_TYPE_ID';
662:
663: update hr_s_formulas_f
664: set formula_type_id = l_new_surrogate_key
665: where formula_type_id = stu_rec.c_surrogate_key;
666:
667: update hr_s_ftype_context_usages
1040: , formula_id c_surrogate_key
1041: , formula_type_id
1042: , formula_name c_true_key
1043: , legislation_code
1044: from hr_s_formulas_f
1045: group by formula_id
1046: , formula_type_id
1047: , formula_name
1048: , legislation_code;
1054: -- This cursor accepts the primary key as a parameter and selects all
1055: -- date effective rows for it.
1056:
1057: select *
1058: from hr_s_formulas_f
1059: where formula_id = pc_formula_id;
1060:
1061: -- These records are defined here so all sub procedures may use the
1062: -- values selected. This saves the need for all sub procedures to have
1098:
1099: BEGIN
1100:
1101:
1102: delete from hr_s_formulas_f
1103: where formula_id = v_id;
1104:
1105: END remove;
1106:
1139: into l_null_return
1140: from ff_formulas_f a
1141: where exists
1142: (select null
1143: from hr_s_formulas_f b
1144: where a.formula_id = b.formula_id
1145: );
1146:
1147: --conflict may exist
1146:
1147: --conflict may exist
1148: --update all formula_id's to remove conflict
1149:
1150: update /*+NO_INDEX*/ hr_s_formulas_f
1151: set formula_id = formula_id - 50000000;
1152:
1153: update /*+NO_INDEX*/ hr_s_qp_reports
1154: set formula_id = formula_id - 50000000;
1191: select min(formula_id) - (count(*) *3)
1192: , max(formula_id) + (count(*) *3)
1193: into v_min_delivered
1194: , v_max_delivered
1195: from hr_s_formulas_f;
1196:
1197: select ff_formulas_s.nextval
1198: into v_sequence_number
1199: from dual;
1254: hr_legislation.hrrunprc_trace_off;
1255: raise;
1256: END;
1257:
1258: update hr_s_formulas_f
1259: set formula_id = l_new_formula_id
1260: where formula_id = r_distinct.c_surrogate_key;
1261:
1262: update hr_s_application_ownerships
1600:
1601: function formula_changed(form_id in number) return boolean is
1602: cursor all_rows(f_id in number) is
1603: select effective_start_date
1604: from hr_s_formulas_f
1605: where formula_id = f_id;
1606: begin
1607: -- First check on existence
1608:
1620: loop
1621: BEGIN
1622: select formula_text
1623: into v_formula_text
1624: from hr_s_formulas_f
1625: where formula_id = form_id
1626: and effective_start_date = r_all_rows.effective_start_date;
1627:
1628: select formula_text
1656: ((
1657: select effective_start_date,
1658: effective_end_date,
1659: description
1660: from hr_s_formulas_f
1661: where formula_id = form_id
1662: and formula_type_id = r_distinct.formula_type_id
1663: MINUS
1664: select effective_start_date,
1679: MINUS
1680: select effective_start_date,
1681: effective_end_date,
1682: description
1683: from hr_s_formulas_f
1684: where formula_id = form_id
1685: and formula_type_id = r_distinct.formula_type_id
1686: ));
1687: -- if we get a row and not the exception then identical
4055: -- Checking the delivery account
4056:
4057: select distinct null
4058: into l_null_return
4059: from hr_s_formulas_f
4060: where formula_id = stu_rec.formula_id;
4061:
4062: crt_exc('Parent formula remains in delivery tables');
4063: