[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
9599: --END;
9600:
9601: --IF (l_wco_fm_op_network_start = 'S') OR (l_wco_to_op_network_end = 'E') THEN
9602: --l_stmt_num := 253.614;
9603: --UPDATE WIP_DISCRETE_JOBS
9604: --SET actual_start_date = decode(l_wco_fm_op_network_start,
9605: -- 'S', p_operation_start_date,
9606: -- actual_start_date),
9607: --Bug 4485174: Following update is commented out
9613: -- LAST_UPDATE_DATE = sysdate,
9614: -- LAST_UPDATED_BY = g_user_id
9615: --WHERE wip_entity_id = l_wip_entity_id;
9616: --END IF;
9617: UPDATE WIP_DISCRETE_JOBS wdj
9618: SET actual_start_date = p_operation_start_date,
9619: LAST_UPDATE_DATE = sysdate,
9620: LAST_UPDATED_BY = g_user_id
9621: WHERE wip_entity_id = l_wip_entity_id
9670: -- WHERE WO.wip_entity_id = l_wip_entity_id;
9671:
9672: --IF (l_job_to_op_seq_num = l_wo_min_op_seq_num) AND (l_to_intraoperation_step_type = 1) THEN
9673: --l_stmt_num := 253.614;
9674: -- UPDATE WIP_DISCRETE_JOBS wdj
9675: -- SET actual_start_date = null,
9676: -- LAST_UPDATE_DATE = sysdate,
9677: -- LAST_UPDATED_BY = g_user_id
9678: -- WHERE wip_entity_id = l_wip_entity_id
9887: l_start_qty NUMBER;
9888: BEGIN
9889: SELECT start_quantity
9890: INTO l_start_qty
9891: FROM WIP_DISCRETE_JOBS
9892: WHERE wip_entity_id = l_wip_entity_id;
9893:
9894: l_msg_tokens.delete;
9895: WSM_log_PVT.logMessage (
9974:
9975: END IF; --IF nvl(p_bonus_quantity, 0) > 0
9976:
9977: IF (l_put_job_on_hold = 1) THEN
9978: UPDATE WIP_DISCRETE_JOBS
9979: SET STATUS_TYPE = WIP_CONSTANTS.HOLD,
9980: LAST_UPDATE_DATE = sysdate,
9981: LAST_UPDATED_BY = g_user_id
9982: WHERE wip_entity_id = l_wip_entity_id;
10396: SELECT woy2.rowid
10397: FROM WIP_OPERATIONS wop2,
10398: WIP_OPERATION_YIELDS woy2,
10399: WSM_PARAMETERS wp, -- ESA
10400: WIP_DISCRETE_JOBS wdj, -- NSLBJ
10401: WIP_MOVE_TRANSACTIONS wmt,
10402: WSM_LOT_MOVE_TXN_INTERFACE wlmti
10403: --bug 3615826
10404: -- WHERE wmt.group_id = l_wmti_group_id
10484: SELECT woy2.rowid
10485: FROM WIP_OPERATIONS wop2,
10486: WIP_OPERATION_YIELDS woy2,
10487: WSM_PARAMETERS wp, -- ESA
10488: WIP_DISCRETE_JOBS wdj, -- NSLBJ
10489: WIP_MOVE_TRANSACTIONS wmt,
10490: WSM_LOT_MOVE_TXN_INTERFACE wlmti
10491: --bug 3615826
10492: -- WHERE wmt.group_id = l_wmti_group_id
10585: SELECT woy2.rowid
10586: FROM WIP_OPERATIONS wop2,
10587: WIP_OPERATION_YIELDS woy2,
10588: WSM_PARAMETERS wp, -- ESA
10589: WIP_DISCRETE_JOBS wdj, -- NSLBJ
10590: WIP_MOVE_TXN_INTERFACE wti
10591: WHERE wti.group_id = l_wmti_group_id
10592: AND wti.process_phase = g_move_proc
10593: AND wti.process_status = g_running
10713: undo_jump_from_queue,
10714: x_err_msg);
10715: -- ST : Serial Support Project --
10716: -- Add code here to clear the WDJ if serialization is ended...
10717: UPDATE wip_discrete_jobs wdj
10718: SET wdj.serialization_start_op = null
10719: where wdj.wip_entity_id = rec.wip_entity_id
10720: and wdj.wip_entity_id IN (select wlbj.wip_entity_id
10721: from wsm_lot_based_jobs wlbj
10723: and first_serial_txn_id IS NULL);
10724: -- ST : Serial Support Project --
10725: --Bug 5480482:Start of changes
10726: if nvl(rec.source_code,'interface') = 'undo oa page' then
10727: UPDATE WIP_DISCRETE_JOBS wdj
10728: SET actual_start_date = null,
10729: LAST_UPDATE_DATE = sysdate,
10730: LAST_UPDATED_BY = g_user_id
10731: WHERE wip_entity_id = rec.wip_entity_id
10851: x_err_msg);
10852:
10853: -- ST : Serial Support Project --
10854: -- Add code here to clear the WDJ if serialization is ended...
10855: UPDATE wip_discrete_jobs wdj
10856: SET wdj.serialization_start_op = null
10857: where wdj.wip_entity_id = rec.wip_entity_id
10858: and wdj.wip_entity_id IN (select wlbj.wip_entity_id
10859: from wsm_lot_based_jobs wlbj
10861: and first_serial_txn_id IS NULL);
10862: -- ST : Serial Support Project --
10863: --Bug 5480482:Start of changes
10864: if nvl(rec.source_code,'interface') = 'undo oa page' then
10865: UPDATE WIP_DISCRETE_JOBS wdj
10866: SET actual_start_date = null,
10867: LAST_UPDATE_DATE = sysdate,
10868: LAST_UPDATED_BY = g_user_id
10869: WHERE wip_entity_id = rec.wip_entity_id
10896: l_msg_data VARCHAR2(2000);
10897: begin
10898: select net_quantity,primary_item_id
10899: into l_net_quantity,l_primary_item_id
10900: from wip_discrete_jobs
10901: where wip_entity_id=rec.wip_entity_id
10902: and organization_id=rec.organization_id;
10903: l_stmt_num := 290.1;
10904: wsm_reservations_pvt.modify_reservations_move(