[Home] [Help]
2408: x_loss_id OUT NOCOPY NUMBER,
2409: x_return_code OUT NOCOPY VARCHAR2,
2410: x_error_msg OUT NOCOPY VARCHAR2) IS
2411: CURSOR Cur_loss_id IS
2412: SELECT gmd_recipe_process_loss_id_s.NEXTVAL
2413: FROM SYS.DUAL;
2414:
2415: l_loss_tbl GMD_RECIPE_DETAIL.recipe_dtl;
2416: l_status VARCHAR2(30);
2571:
2572: --- This statement should be replaced by an API when it is available ...
2573:
2574: DELETE
2575: gmd_recipe_process_loss
2576: WHERE
2577: recipe_process_loss_id = p_loss_id AND
2578: last_update_date = p_last_update_date;
2579:
2632:
2633: CURSOR Get_Loss IS
2634: SELECT 1
2635: FROM
2636: gmd_recipe_process_loss
2637: WHERE
2638: recipe_process_loss_id = p_recipe_loss_id AND
2639: last_update_date = p_last_update_date_orig;
2640:
3251: WHERE recipe_id = p_copy_from_recipe_id;
3252:
3253: CURSOR Cur_get_rcp_loss IS
3254: SELECT *
3255: FROM gmd_recipe_process_loss
3256: WHERE recipe_id = p_copy_from_recipe_id;
3257:
3258: CURSOR Cur_get_stp_mtl IS
3259: SELECT *
3299: SELECT gmd_recipe_id_s.NEXTVAL
3300: FROM FND_DUAL;
3301:
3302: CURSOR Cur_loss_id IS
3303: SELECT gmd_recipe_process_loss_id_s.NEXTVAL
3304: FROM FND_DUAL;
3305:
3306: CURSOR Cur_vr_id IS
3307: SELECT gmd_recipe_validity_id_s.NEXTVAL
4699: ---
4700: l_txt_ind := 1;
4701:
4702: IF NOT l_copy_recipe THEN
4703: DELETE gmd_recipe_process_loss WHERE recipe_id = p_copy_from_recipe_id;
4704: END IF;
4705:
4706: FOR i IN 1..l_rcp_loss_tbl.count LOOP
4707:
4727: l_text_code := l_rcp_loss_tbl(i).text_code;
4728: DELETE fm_text_tbl WHERE text_code = l_text_code;
4729: END IF;
4730:
4731: l_table_lnk := 'gmd_recipe_process_loss' || '|' ||
4732: x_recipe_id ||
4733: '|' || l_loss_id;
4734:
4735: WHILE (l_txt_ind <= l_rcp_loss_text_tbl.COUNT AND