[Home] [Help]
2728:
2729: l_stmt_no := 10;
2730: select wdj.organization_id, wdj.job_type
2731: into l_organization_id, l_job_type
2732: from wip_discrete_jobs wdj, wip_entities we
2733: where wdj.wip_entity_id = p_wip_entity_id
2734: and wdj.wip_entity_id = we.wip_entity_id
2735: and we.entity_type = 5;
2736:
2791:
2792: begin
2793: select 1
2794: into ret_val1
2795: from wip_discrete_jobs wdj, wip_entities we
2796: where wdj.organization_id = p_org_id
2797: and wdj.wip_entity_id = we.wip_entity_id
2798: and we.entity_type = 5
2799: and wdj.status_type = 6
2813: select 1
2814: into ret_val1
2815: from dual
2816: where exists (select 1
2817: from wip_discrete_jobs wdj, wip_entities we
2818: where wdj.organization_id = p_org_id
2819: and wdj.wip_entity_id = we.wip_entity_id
2820: and we.entity_type = 5
2821: and wdj.status_type not in (1,7,12,6)
3076: select common_routing_sequence_id,
3077: routing_revision_date
3078: into l_rtg_seq_id,
3079: l_rtg_rev_date
3080: from wip_discrete_jobs
3081: where wip_entity_id = p_wip_entity_id;
3082:
3083: WSMPUTIL.find_routing_end (
3084: p_routing_sequence_id => l_rtg_seq_id,
3109: select common_routing_sequence_id,
3110: routing_revision_date
3111: into l_rtg_seq_id,
3112: l_rtg_rev_date
3113: from wip_discrete_jobs
3114: where wip_entity_id = p_wip_entity_id;
3115: END IF;
3116:
3117: SELECT 1
3201: **/
3202: --begin fix
3203: select nvl(routing_revision_date, sysdate)
3204: into l_rtg_rev_date
3205: from wip_discrete_jobs
3206: where wip_entity_id = p_wip_entity_id;
3207:
3208: select count(*)
3209: into l_count
3382: and wro.operation_seq_num = 0-p_op_seq_num -- -ve op seq num for exploded components.
3383: and wro.wip_supply_type = 6 -- Phantom components exploded
3384: and wro.required_quantity <> 0
3385: and NOT EXISTS (select 1
3386: from bom_inventory_components bic, wip_discrete_jobs wdj
3387: where bic.bill_sequence_id = NVL(wdj.common_bom_sequence_id, -999)
3388: and bic.component_item_id = wro.inventory_item_id
3389: and (bic.operation_seq_num = l_rtg_op_seq_num -- NOTE:use of BOS opseq Num
3390: or
3442: SELECT common_routing_sequence_id,
3443: routing_revision_date
3444: INTO l_rtg_seq_id,
3445: l_rtg_rev_dt
3446: FROM wip_discrete_jobs
3447: WHERE wip_entity_id = p_wip_entity_id
3448: AND organization_id = p_organization_id;
3449:
3450: l_stmt_num := 60;
3504: AND wro.operation_seq_num = p_op_seq_num
3505: AND wro.required_quantity <> 0
3506: AND NOT EXISTS (
3507: select 1
3508: from bom_inventory_components bic, wip_discrete_jobs wdj
3509: where bic.bill_sequence_id = NVL(wdj.common_bom_sequence_id, -999)
3510: and bic.component_item_id = wro.inventory_item_id
3511: --and bic.operation_seq_num in (1, l_rtg_op_seq_num) -- NOTE:use of BOS opseq Num
3512: and (bic.operation_seq_num = l_rtg_op_seq_num -- NOTE:use of BOS opseq Num
3526: AND wro.operation_seq_num = p_op_seq_num
3527: AND wro.required_quantity <> 0
3528: AND NOT EXISTS (
3529: select 1
3530: from bom_inventory_components bic, wip_discrete_jobs wdj
3531: where bic.bill_sequence_id = NVL(wdj.common_bom_sequence_id, -999)
3532: and bic.component_item_id = wro.inventory_item_id
3533: and bic.operation_seq_num = l_rtg_op_seq_num -- NOTE:use of BOS opseq Num
3534: and wdj.wip_entity_id = wro.wip_entity_id
4000: -- Using these parameters, the API would identify all the lot based jobs in
4001: -- the table WIP_DJ_CLOSE_TEMP and validate these records.
4002: -- All jobs that fail in validation process would be printed and the value of
4003: -- column STATUS_TYPE in wip_dj_close_temp would be updated to 99.
4004: -- In the end, the status of these jobs in wip_discrete_jobs will be updated to 15 (Failed Close)
4005: -- and records in wip_dj_close_temp with status 99 will be deleted.
4006: --
4007: -- x_err_code will be set to 0 if there are any unprocessed/uncosted txn.
4008: -- Otherwise, x_err_code will have a value of 1.
4103: end if;
4104:
4105:
4106: -- Update the WDJ status type to 15
4107: update wip_discrete_jobs
4108: set status_type = 15 -- Failed Close.
4109: where wip_entity_id in
4110: (select wt.wip_entity_id
4111: from wip_dj_close_temp wt, wip_entities we
5544:
5545: Select 1 into l_count
5546: From dual
5547: Where Exists ( Select 'Jobs with Qty At this Operation Exists'
5548: from wip_discrete_jobs wdj
5549: , wip_operations wo
5550: Where wdj.wip_entity_id = wo.wip_entity_id
5551: and NVL(wo.operation_sequence_id, -99999) =
5552: WSMPUTIL.replacement_op_seq_id (p_operation_sequence_id
5606: From dual
5607: Where Exists (
5608: Select 'Jobs with Qty At this Operation Exists'
5609: from bom_operation_sequences bos
5610: , wip_discrete_jobs wdj
5611: , wip_operations wo
5612: Where wdj.common_routing_sequence_id = p_routing_sequence_id
5613: and wdj.status_type = WIP_CONSTANTS.RELEASED
5614: and bos.routing_sequence_id = wdj.common_routing_sequence_id
5919: INTO l_common_bom_seq_id,
5920: l_bom_item_id,
5921: l_alt_bom,
5922: l_org_id
5923: FROM wip_discrete_jobs wdj
5924: WHERE wdj.wip_entity_id = p_wip_entity_id;
5925:
5926: --if(l_common_bom_seq_id IS NULL) then -- bug 3453830
5927: if(l_common_bom_seq_id IS NULL or l_common_bom_seq_id = 0) then -- bug 3453830
6016: SAVEPOINT LOCK_WDJ;
6017:
6018: SELECT 1
6019: INTO l_dummy
6020: FROM wip_discrete_jobs
6021: WHERE wip_entity_id = p_wip_entity_id
6022: FOR UPDATE NOWAIT;
6023:
6024: -- bug 4932475 (base bug 4759095): Create a savepoint after locking wdj. We will rollback to this savepoint