[Home] [Help]
587: l_stmt_num := 35;
588: --***VJ Added for Performance Upgrade***--
589: SELECT status_type, primary_item_id
590: INTO l_status_type, l_primary_item_id
591: FROM wip_discrete_jobs
592: WHERE wip_entity_id = l_wip_entity_id
593: AND organization_id = p_org_id;
594: --***VJ End Additions***--
595:
688:
689: -- BA: CZH.I_OED-1, get job routing revision date after l_wip_entity_id is available
690: SELECT nvl(routing_revision_date, SYSDATE)
691: INTO l_rtg_revision_date
692: FROM wip_discrete_jobs
693: WHERE wip_entity_id = l_wip_entity_id;
694: -- EA: CZH.I_OED-1
695: --mes added source_code
696: --move enh added l_scrap_at_operation_flag, l_scrap_qty
1151: msi.serial_number_control_code
1152: INTO l_primary_uom,
1153: l_serial_ctrl_code
1154: FROM mtl_system_items msi,
1155: wip_discrete_jobs wdj
1156: WHERE wdj.wip_entity_id = l_wip_entity_id
1157: AND wdj.primary_item_id = msi.inventory_item_id
1158: AND msi.organization_id = wdj.organization_id;
1159:
1599:
1600: l_stmt_num := 185;
1601: SELECT nvl(common_routing_sequence_id, routing_reference_id)
1602: INTO l_routing_seq_id
1603: FROM wip_discrete_jobs
1604: WHERE wip_entity_id = l_wip_entity_id;
1605:
1606: l_stmt_num := 190;
1607: l_op_seq_id := NULL;
3150: END IF;
3151:
3152: select job_type
3153: into l_job_type
3154: from wip_discrete_jobs
3155: where wip_entity_id = l_wip_entity_id;
3156:
3157: if l_est_scrap_acc = 1 and l_job_type = 1 then
3158:
3298: END IF;
3299:
3300: select job_type
3301: into l_job_type
3302: from wip_discrete_jobs
3303: where wip_entity_id = l_wip_entity_id;
3304:
3305: if l_est_scrap_acc = 1 and l_job_type = 1 then
3306: IF (g_aps_wps_profile='Y') THEN
3657: -- completion transaction should not be allowed.
3658:
3659: select completion_subinventory
3660: into l_cmp_subinv
3661: from wip_discrete_jobs
3662: where wip_entity_id = l_wip_entity_id
3663: and organization_id = p_org_id;
3664:
3665: l_stmt_num := 345;
4066: l_class_code,
4067: l_job_type,
4068: l_kanban_card_id,
4069: l_qty_completed -- Fix for bug #2095267
4070: from wip_discrete_jobs
4071: where organization_id = p_org_id
4072: and wip_entity_id = l_wip_entity_id;
4073:
4074: l_stmt_num := 400;
4264: return(x_return_code);
4265: end if;
4266: end if;
4267:
4268: update wip_discrete_jobs wdj
4269: set wdj.est_scrap_account = nvl(p_est_scrap_account, wdj.est_scrap_account),
4270: wdj.est_scrap_var_account = nvl(p_est_scrap_var_account, wdj.est_scrap_var_account)
4271: where wip_entity_id = l_wip_entity_id;
4272:
4917: END IF;
4918:
4919: select job_type
4920: into l_job_type
4921: from wip_discrete_jobs
4922: where wip_entity_id = l_wip_entity_id;
4923:
4924: if l_est_scrap_acc = 2 or l_job_type = 3 then
4925: if l_wmt_scrap_acct_id = -1 then
5339: --abb H Non Std Jobs
5340: IF (g_aps_wps_profile='N') THEN
5341: select job_type
5342: into l_job_type
5343: from wip_discrete_jobs
5344: where wip_entity_id = l_wip_entity_id;
5345:
5346: select bom_reference_id,
5347: bom_revision_date,
5348: alternate_bom_designator
5349: into l_bom_reference_id,
5350: l_bom_revision_date,
5351: l_alt_bom_desig
5352: from wip_discrete_jobs
5353: where organization_id = p_org_id
5354: and wip_entity_id = l_wip_entity_id;
5355:
5356: if l_job_type = 3 then
5487: select nvl(COMMON_ROUTING_SEQUENCE_ID, ROUTING_REFERENCE_ID),
5488: PRIMARY_ITEM_ID
5489: into l_current_rtg_seq_id,
5490: l_current_pri_item_id
5491: from wip_discrete_jobs
5492: where organization_id = p_org_id
5493: and wip_entity_id = p_wip_entity_id;
5494:
5495:
7696: primary_item_id
7697: INTO l_routing_seq_id,
7698: l_rtg_revision_date, /* ADD: CZH.I_OED-1 */
7699: l_primary_item_id
7700: FROM wip_discrete_jobs
7701: WHERE wip_entity_id = l_wip_entity_id;
7702: -- ST : Serial Project --
7703:
7704: l_stmt_num := 130.2;
7903: l_stmt_num := 150;
7904:
7905: SELECT completion_subinventory
7906: INTO l_subinventory
7907: FROM wip_discrete_jobs
7908: WHERE wip_entity_id = l_wip_entity_id;
7909:
7910: /* Call for Assy completion as well as Assy returns */
7911: IF (l_debug = 'Y') THEN
8034: l_stmt_num := 150;
8035:
8036: SELECT completion_subinventory
8037: INTO l_subinventory
8038: FROM wip_discrete_jobs
8039: WHERE wip_entity_id = l_wip_entity_id;
8040:
8041: /* Call for Assy completion as well as Assy returns */
8042: IF (l_debug = 'Y') THEN
8710: l_stmt_num := 230.1;
8711:
8712: select net_quantity,primary_item_id
8713: into l_net_quantity,l_primary_item_id
8714: from wip_discrete_jobs
8715: where wip_entity_id=l_wip_entity_id
8716: and organization_id=l_organization_id;
8717:
8718: if l_transaction_type = 2 then
9601: --END;
9602:
9603: --IF (l_wco_fm_op_network_start = 'S') OR (l_wco_to_op_network_end = 'E') THEN
9604: --l_stmt_num := 253.614;
9605: --UPDATE WIP_DISCRETE_JOBS
9606: --SET actual_start_date = decode(l_wco_fm_op_network_start,
9607: -- 'S', p_operation_start_date,
9608: -- actual_start_date),
9609: --Bug 4485174: Following update is commented out
9615: -- LAST_UPDATE_DATE = sysdate,
9616: -- LAST_UPDATED_BY = g_user_id
9617: --WHERE wip_entity_id = l_wip_entity_id;
9618: --END IF;
9619: UPDATE WIP_DISCRETE_JOBS wdj
9620: SET actual_start_date = p_operation_start_date,
9621: LAST_UPDATE_DATE = sysdate,
9622: LAST_UPDATED_BY = g_user_id
9623: WHERE wip_entity_id = l_wip_entity_id
9672: -- WHERE WO.wip_entity_id = l_wip_entity_id;
9673:
9674: --IF (l_job_to_op_seq_num = l_wo_min_op_seq_num) AND (l_to_intraoperation_step_type = 1) THEN
9675: --l_stmt_num := 253.614;
9676: -- UPDATE WIP_DISCRETE_JOBS wdj
9677: -- SET actual_start_date = null,
9678: -- LAST_UPDATE_DATE = sysdate,
9679: -- LAST_UPDATED_BY = g_user_id
9680: -- WHERE wip_entity_id = l_wip_entity_id
9889: l_start_qty NUMBER;
9890: BEGIN
9891: SELECT start_quantity
9892: INTO l_start_qty
9893: FROM WIP_DISCRETE_JOBS
9894: WHERE wip_entity_id = l_wip_entity_id;
9895:
9896: l_msg_tokens.delete;
9897: WSM_log_PVT.logMessage (
9976:
9977: END IF; --IF nvl(p_bonus_quantity, 0) > 0
9978:
9979: IF (l_put_job_on_hold = 1) THEN
9980: UPDATE WIP_DISCRETE_JOBS
9981: SET STATUS_TYPE = WIP_CONSTANTS.HOLD,
9982: LAST_UPDATE_DATE = sysdate,
9983: LAST_UPDATED_BY = g_user_id
9984: WHERE wip_entity_id = l_wip_entity_id;
10398: SELECT woy2.rowid
10399: FROM WIP_OPERATIONS wop2,
10400: WIP_OPERATION_YIELDS woy2,
10401: WSM_PARAMETERS wp, -- ESA
10402: WIP_DISCRETE_JOBS wdj, -- NSLBJ
10403: WIP_MOVE_TRANSACTIONS wmt,
10404: WSM_LOT_MOVE_TXN_INTERFACE wlmti
10405: --bug 3615826
10406: -- WHERE wmt.group_id = l_wmti_group_id
10486: SELECT woy2.rowid
10487: FROM WIP_OPERATIONS wop2,
10488: WIP_OPERATION_YIELDS woy2,
10489: WSM_PARAMETERS wp, -- ESA
10490: WIP_DISCRETE_JOBS wdj, -- NSLBJ
10491: WIP_MOVE_TRANSACTIONS wmt,
10492: WSM_LOT_MOVE_TXN_INTERFACE wlmti
10493: --bug 3615826
10494: -- WHERE wmt.group_id = l_wmti_group_id
10587: SELECT woy2.rowid
10588: FROM WIP_OPERATIONS wop2,
10589: WIP_OPERATION_YIELDS woy2,
10590: WSM_PARAMETERS wp, -- ESA
10591: WIP_DISCRETE_JOBS wdj, -- NSLBJ
10592: WIP_MOVE_TXN_INTERFACE wti
10593: WHERE wti.group_id = l_wmti_group_id
10594: AND wti.process_phase = g_move_proc
10595: AND wti.process_status = g_running
10715: undo_jump_from_queue,
10716: x_err_msg);
10717: -- ST : Serial Support Project --
10718: -- Add code here to clear the WDJ if serialization is ended...
10719: UPDATE wip_discrete_jobs wdj
10720: SET wdj.serialization_start_op = null
10721: where wdj.wip_entity_id = rec.wip_entity_id
10722: and wdj.wip_entity_id IN (select wlbj.wip_entity_id
10723: from wsm_lot_based_jobs wlbj
10725: and first_serial_txn_id IS NULL);
10726: -- ST : Serial Support Project --
10727: --Bug 5480482:Start of changes
10728: if nvl(rec.source_code,'interface') = 'undo oa page' then
10729: UPDATE WIP_DISCRETE_JOBS wdj
10730: SET actual_start_date = null,
10731: LAST_UPDATE_DATE = sysdate,
10732: LAST_UPDATED_BY = g_user_id
10733: WHERE wip_entity_id = rec.wip_entity_id
10853: x_err_msg);
10854:
10855: -- ST : Serial Support Project --
10856: -- Add code here to clear the WDJ if serialization is ended...
10857: UPDATE wip_discrete_jobs wdj
10858: SET wdj.serialization_start_op = null
10859: where wdj.wip_entity_id = rec.wip_entity_id
10860: and wdj.wip_entity_id IN (select wlbj.wip_entity_id
10861: from wsm_lot_based_jobs wlbj
10863: and first_serial_txn_id IS NULL);
10864: -- ST : Serial Support Project --
10865: --Bug 5480482:Start of changes
10866: if nvl(rec.source_code,'interface') = 'undo oa page' then
10867: UPDATE WIP_DISCRETE_JOBS wdj
10868: SET actual_start_date = null,
10869: LAST_UPDATE_DATE = sysdate,
10870: LAST_UPDATED_BY = g_user_id
10871: WHERE wip_entity_id = rec.wip_entity_id
10898: l_msg_data VARCHAR2(2000);
10899: begin
10900: select net_quantity,primary_item_id
10901: into l_net_quantity,l_primary_item_id
10902: from wip_discrete_jobs
10903: where wip_entity_id=rec.wip_entity_id
10904: and organization_id=rec.organization_id;
10905: l_stmt_num := 290.1;
10906: wsm_reservations_pvt.modify_reservations_move(