49: PROCEDURE SET_OPM_SCHEDULING_METHOD
50: IS
51: BEGIN
52:
53: UPDATE wip_job_schedule_interface i
54: SET i.scheduling_method=2
55: WHERE
56: i.group_id = G_OPM_WIP_GROUP_ID
57: AND i.load_type in(1,3);
55: WHERE
56: i.group_id = G_OPM_WIP_GROUP_ID
57: AND i.load_type in(1,3);
58:
59: UPDATE wip_job_schedule_interface i
60: SET i.scheduling_method=1
61: WHERE
62: EXISTS(SELECT 1
63: FROM WIP_JOB_DTLS_INTERFACE jdi
113: l_resp_id NUMBER;
114: lv_log_msg varchar2(500);
115: BEGIN
116:
117: SELECT wip_job_schedule_interface_s.nextval,
118: mrp_workbench_query_s.nextval,
119: -- TO_NUMBER( FND_PROFILE.VALUE('MSC_RESOURCE_TYPE')),
120: TO_NUMBER( FND_PROFILE.VALUE('MSC_ALT_RES_PRIORITY')),
121: TO_NUMBER( FND_PROFILE.VALUE('MSC_SIMUL_RES_SEQ')),
127: PV_SIM_RES_SEQ,
128: PV_REL_REQUEST_DATE
129: FROM DUAL;
130:
131: SELECT wip_job_schedule_interface_s.nextval
132: INTO G_OPM_WIP_GROUP_ID
133: FROM DUAL;
134:
135: p_wip_group_id := G_WIP_GROUP_ID;
1933: ||' HEADER_ID, '
1934: -- dsr added 2 new columns
1935: ||' Schedule_priority,'
1936: ||' Requested_completion_date '
1937: ||' FROM MSC_WIP_JOB_SCHEDULE_INTERFACE'||lv_dblink
1938: ||' WHERE SR_INSTANCE_ID= :lv_instance_id'
1939: ||' AND GROUP_ID = :G_WIP_GROUP_ID'
1940: ||' AND nvl(CFM_ROUTING_FLAG,0) = 3' ;
1941:
2114: END LD_LOT_JOB_SCHEDULE_INTERFACE;
2115:
2116:
2117:
2118: PROCEDURE LD_WIP_JOB_SCHEDULE_INTERFACE
2119: ( o_request_id OUT NOCOPY NUMBER)
2120: IS
2121: lv_sqlstmt VARCHAR2(4000);
2122: lv_instance_id NUMBER;
2140: and nvl(a2m_dblink,NULL_DBLINK) = nvl(v_dblink,NULL_DBLINK)
2141: and ALLOW_RELEASE_FLAG=1;
2142:
2143: lv_sqlstmt:=
2144: 'INSERT INTO WIP_JOB_SCHEDULE_INTERFACE'
2145: ||' ( LAST_UPDATE_DATE,'
2146: ||' LAST_UPDATED_BY,'
2147: ||' CREATION_DATE,'
2148: ||' CREATED_BY,'
2231: ||' BILL_RTG_EXPLOSION_FLAG,'
2232: ||' HEADER_ID,'
2233: ||' schedule_priority, ' -- dsr
2234: ||' requested_completion_date' -- need to check in ds code it is requested_completion_date
2235: ||' FROM MSC_WIP_JOB_SCHEDULE_INTERFACE'||lv_dblink
2236: ||' WHERE SR_INSTANCE_ID= :lv_instance_id'
2237: ||' AND GROUP_ID = :G_WIP_GROUP_ID'
2238: ||' AND nvl(CFM_ROUTING_FLAG,0) <> 3 '
2239: ||' AND load_type <> 21 ' -- dsr: exclude oem: EAM_RESCHEDULE_WORK_RODER
2409: -- Submit 'WIP Mass Load' Request --
2410: BEGIN
2411: SELECT 1
2412: INTO lv_dummy
2413: FROM WIP_JOB_SCHEDULE_INTERFACE
2414: WHERE GROUP_ID= G_WIP_GROUP_ID
2415: AND ROWNUM=1;
2416:
2417: MODIFY_COMPONENT_REQUIREMENT;
2441: -- Submit 'OPM's WIP Mass Load' Request --
2442: BEGIN
2443: SELECT 1
2444: INTO lv_dummy
2445: FROM WIP_JOB_SCHEDULE_INTERFACE
2446: WHERE GROUP_ID= G_OPM_WIP_GROUP_ID
2447: AND ROWNUM=1;
2448:
2449: SET_OPM_SCHEDULING_METHOD;
2465: WHEN OTHERS THEN RAISE;
2466: END;
2467:
2468:
2469: END LD_WIP_JOB_SCHEDULE_INTERFACE;
2470:
2471:
2472: PROCEDURE LD_PO_REQUISITIONS_INTERFACE
2473: ( p_po_group_by_name IN VARCHAR2,
2890:
2891:
2892: Cursor C1 is
2893: Select a.header_id,min(bos.operation_seq_num) new_op_seq
2894: from wip_job_schedule_interface a,
2895: wip_job_dtls_interface b,
2896: bom_operation_Sequences bos,
2897: bom_operational_routings bor
2898: where a.group_id = b.group_id
2918: b.parent_header_id,
2919: b.INVENTORY_ITEM_ID_OLD,
2920: b.ORGANIZATION_ID,
2921: b.OPERATION_SEQ_NUM
2922: from wip_job_schedule_interface a,
2923: wip_job_dtls_interface b
2924: where a.source_code = 'MSC'
2925: and a.group_id = G_WIP_GROUP_ID
2926: and a.group_id = b.group_id
2936: b.OPERATION_SEQ_NUM;
2937:
2938: Cursor C3 is
2939: select b.rowid
2940: from wip_job_schedule_interface a,
2941: wip_job_dtls_interface b
2942: where a.source_code = 'MSC'
2943: and a.group_id = G_WIP_GROUP_ID
2944: and a.group_id = b.group_id
3011: cursor cres_upd is select jdi.rowid,jdi.operation_seq_num,
3012: jdi.parent_header_id,rtng.common_routing_Sequence_id
3013: FROM BOM_OPERATIONAL_ROUTINGS rtng,
3014: wip_job_dtls_interface jdi,
3015: wip_job_schedule_interface jsi
3016: where rtng.assembly_item_id (+) = jsi.primary_item_id -- dsr
3017: and jsi.group_id = G_WIP_GROUP_ID
3018: AND rtng.organization_id (+) = jsi.organization_id -- dsr
3019: AND NVL(rtng.alternate_routing_designator,' ')=
3173: lv_routing_seq_id,
3174: lv_job_schedule_type,
3175: lv_wip_entity_id
3176: FROM BOM_OPERATIONAL_ROUTINGS rtng,
3177: wip_job_schedule_interface jsi
3178: WHERE jsi.group_id = G_WIP_GROUP_ID
3179: AND jsi.load_type in(1,3) /* create standard job */
3180: AND rtng.assembly_item_id(+)= jsi.primary_item_id
3181: AND rtng.organization_id(+)= jsi.organization_id
3230: END;
3231:
3232: IF nvl(lv_res_req_count,0) = 0 THEN
3233:
3234: UPDATE wip_job_schedule_interface
3235: SET first_unit_start_date=NULL,
3236: scheduling_method= WIP_CONSTANTS.ROUTING
3237: WHERE ROWID= lv_jsi_rowid(n);
3238:
3239: GOTO next_c_std_job;
3240: ELSE
3241:
3242:
3243: UPDATE wip_job_schedule_interface
3244: set scheduling_method= WIP_CONSTANTS.ML_MANUAL
3245: WHERE ROWID= lv_jsi_rowid(n);
3246:
3247: END IF;
3289: AND not exists(select jdi.operation_seq_num
3290: FROM BOM_OPERATIONAL_ROUTINGS rtng,
3291: BOM_OPERATION_SEQUEnCES seqs,
3292: wip_job_dtls_interface jdi,
3293: wip_job_schedule_interface jsi
3294: where rtng.assembly_item_id= jsi.primary_item_id
3295: AND rtng.organization_id= jsi.organization_id
3296: and nvl(rtng.common_routing_sequence_id,rtng.routing_sequence_id) = os.routing_Sequence_id
3297: AND nvl(rtng.common_routing_sequence_id,rtng.routing_Sequence_id) = seqs.routing_sequence_id
3342: AND not exists(select jdi.resource_id_new
3343: FROM BOM_OPERATIONAL_ROUTINGS rtng,
3344: BOM_OPERATION_SEQUENCES seqs,
3345: wip_job_dtls_interface jdi,
3346: wip_job_schedule_interface jsi
3347: where rtng.assembly_item_id= jsi.primary_item_id
3348: AND rtng.organization_id= jsi.organization_id
3349: AND nvl(rtng.common_routing_sequence_id,rtng.routing_sequence_id) = seqs.routing_sequence_id
3350: AND NVL(rtng.alternate_routing_designator,' ')=
4315: ||' alternate_routing_designator, '
4316: ||' end_item_unit_number, '
4317: ||' schedule_group_id, '
4318: ||' build_sequence '
4319: ||' FROM MSC_WIP_JOB_SCHEDULE_INTERFACE'||lv_dblink
4320: ||' WHERE SR_INSTANCE_ID= :lv_instance_id'
4321: ||' AND GROUP_ID = :G_WIP_GROUP_ID'
4322: ||' AND nvl(CFM_ROUTING_FLAG,0) <> 3 '
4323: ||' AND load_type = 21 ' -- EAM_RESCHEDULE_WORK_RODER
4605: -- Submit EAM RESCHEDULE Request --
4606: BEGIN
4607: SELECT 1
4608: INTO lv_dummy
4609: FROM WIP_JOB_SCHEDULE_INTERFACE
4610: WHERE GROUP_ID= G_WIP_GROUP_ID
4611: AND ROWNUM=1;
4612:
4613: MODIFY_EAM_COMP_REQUIREMENT;
4644: IS
4645:
4646: Cursor C1 is
4647: Select a.header_id,min(bos.operation_seq_num) new_op_seq
4648: from eam_work_order_import a, -- wip_job_schedule_interface a,
4649: eam_material_import b, -- wip_job_dtls_interface b,
4650: bom_operation_Sequences bos,
4651: bom_operational_routings bor
4652: where a.group_id = b.group_id
4672: b.wip_entity_id, -- b.parent_header_id,
4673: b.INVENTORY_ITEM_ID, -- b.INVENTORY_ITEM_ID_OLD,
4674: b.ORGANIZATION_ID,
4675: b.OPERATION_SEQ_NUM
4676: from eam_work_order_import a, -- wip_job_schedule_interface a,
4677: eam_material_import b -- wip_job_dtls_interface b
4678: where a.source_code = 'MSC'
4679: and a.group_id = G_WIP_GROUP_ID
4680: and a.group_id = b.group_id
4691: b.OPERATION_SEQ_NUM;
4692:
4693: Cursor C3 is
4694: select b.rowid
4695: from eam_work_order_import a, -- wip_job_schedule_interface a,
4696: eam_material_import b -- wip_job_dtls_interface b
4697: where a.source_code = 'MSC'
4698: and a.group_id = G_WIP_GROUP_ID
4699: and a.group_id = b.group_id