[Home] [Help]
440:
441: p_job_name := get_wip_job_prefix(p_inst_id)||
442: msc_rel_wf.get_job_seq_from_source(p_inst_id);
443:
444: update msc_supplies mr
445: set implement_wip_class_code =
446: nvl(p_wip_class_code, p_item_wip_class),
447: implement_status_code =
448: nvl(implement_status_code, p_def_job_status),
463:
464: p_load_type := msc_get_name.load_type(
465: p_plan_type,
466: p_plan_id,
467: 'MSC_SUPPLIES',
468: p_transaction_id,
469: p_org_id,
470: p_inst_id,
471: p_order_type,
477: null);
478:
479: IF p_order_type in (1, 2, 3, 5, 51, 53,76,77,78) THEN
480: --pabram.srp.changes added 76,77,78
481: update msc_supplies mr
482: SET implement_date = nvl(mr.implement_date,
483: decode(trunc(GREATEST(NVL(mr.firm_date,mr.new_schedule_date),
484: TRUNC(SYSDATE))),
485: trunc(mr.new_schedule_date),
543: and plan_id = p_plan_id;
544:
545: if p_order_type in (5,51,53, 76,77,78) then
546: --pabram.srp.changes added 76,77,78
547: update msc_supplies mr
548: set quantity_in_process =
549: DECODE(mr.number1,
550: -9999, mr.quantity_in_process,
551: GREATEST(0,
575: where transaction_id = p_transaction_id
576: and plan_id = p_plan_id;
577: end if; -- if p_order_type in (5,51) then
578: ELSE -- p_order_type = 13
579: update msc_supplies msrs
580: SET implement_date = nvl(msrs.implement_date,
581: msrs.last_unit_completion_date),
582: implement_daily_rate = nvl(msrs.implement_daily_rate, msrs.daily_rate),
583: implement_quantity = nvl(msrs.implement_daily_rate, msrs.daily_rate),
607: END update_success_supplies;
608:
609: Procedure update_sup_rel_error IS
610: BEGIN
611: update msc_supplies
612: SET implement_as = NULL,
613: implement_quantity = NULL,
614: implement_date = NULL,
615: release_status = 2,
731: ' null ' || -- dest_org_id in DRP plan
732: ' from '||msc_get_name.get_order_view(p_plan_type, p_plan_id) ||
733: ' where ' || p_where_clause ||
734: ' and order_type IN (1, 2, 3, 5, 13, 51, 53, 76,77,78)'||
735: ' and source_table = ''MSC_SUPPLIES''' ||
736: ' and nvl(release_time_fence_code,-1) <> 7 ' ||
737: p_plan_id_str ||
738: -- Shikyu items should not be processed
739: ' and nvl(release_status,2) = 2';
770: ' dest_org_id '||
771: ' from MSC_ORDERS_DRP_V'||
772: ' where ' || p_where_clause ||
773: ' and ( (order_type IN (1, 2, 3, 5, 13, 51, 53, 76,77,78)'||
774: ' and source_table = ''MSC_SUPPLIES'' ) ' ||
775: ' OR (order_type = 53 and source_table = ''MSC_DEMANDS'') ) ' ||
776: ' and nvl(release_time_fence_code,-1) <> 7 ' ||
777: p_plan_id_str ||
778: ' and nvl(release_status,2) = 2';
886: CURSOR child_supply_c is
887: SELECT 1
888: from msc_full_pegging mfp1,
889: msc_full_pegging mfp2,
890: msc_supplies ms
891: where mfp1.plan_id = p_plan_id
892: and mfp1.transaction_id = p_transaction_id
893: and mfp2.plan_id = mfp1.plan_id
894: and mfp2.prev_pegging_id = mfp1.pegging_id