[Home] [Help]
37:
38:
39: CURSOR Cur_formula_trans_exists (V_formula_id NUMBER) IS
40: select count(*)
41: FROM gmd_lab_formula_assoc
42: WHERE old_formula_id = v_formula_id;
43:
44: CURSOR Cur_get_max_vers(V_formula_no VARCHAR2) IS
45: SELECT max(formula_vers)
176: AND NOT EXISTS (SELECT NULL FROM FM_FORM_MST_TL T WHERE t.formula_id = xFormula_Id AND t.language = l.language_code);
177:
178:
179:
180: INSERT INTO GMD_LAB_FORMULA_ASSOC(old_formula_id,old_formula_no,old_formula_vers,
181: new_formula_id,new_formula_no,new_formula_vers
182: ,migrated)
183: VALUES(lab_rec.formula_id,lab_rec.formula_no,lab_rec.formula_vers,
184: xformula_id,lab_rec.formula_no,x_formula_vers,'YES');
367: FROM sys.dual;
368:
369: /* Step 3 : To insert data ino the fm_form_mst_b and fm_form_mst_vl
370: table */
371: INSERT INTO GMD_LAB_FORMULA_ASSOC(old_formula_id,old_formula_no,old_formula_vers,
372: new_formula_id,new_formula_no,new_formula_vers
373: ,migrated)
374: VALUES(lab_rec.formula_id,lab_rec.formula_no,lab_rec.formula_vers,
375: xformula_id,lab_rec.formula_no,x_formula_vers,'YES');
428: CLOSE Cur_get_tp_id;
429: ELSE
430: X_tp_formula_id := NULL;
431: END IF;
432: INSERT INTO GMD_LAB_FORMULA_ASSOC(old_formula_id,old_formula_no,old_formula_vers,
433: new_formula_id,new_formula_no,new_formula_vers
434: ,migrated,old_tp_formula_id,new_tp_formula_id)
435: VALUES(lab_rec.formula_id,lab_rec.formula_no,lab_rec.formula_vers,
436: xformula_id,lab_rec.formula_no,x_formula_vers,'YES',