75: Sum(QUANTITY_RUNNING) +
76: Sum(QUANTITY_WAITING_TO_MOVE) +
77: Sum(QUANTITY_REJECTED) +
78: Sum(QUANTITY_SCRAPPED)), NULL, 'Y', 0, NULL, 'X') Result
79: FROM WIP_OPERATIONS
80: WHERE ORGANIZATION_ID = x_org_id
81: AND WIP_ENTITY_ID = x_wip_id) WHERE Result = 'X' ));
82:
83: cursor check_repetitive_charges is
136: AND TRANSACTION_SOURCE_TYPE_ID = 5
137: AND REPETITIVE_LINE_ID = x_line_id)
138: OR EXISTS
139: (SELECT 'X'
140: FROM WIP_OPERATIONS
141: WHERE WIP_ENTITY_ID = x_wip_id
142: AND ORGANIZATION_ID = x_org_id
143: AND REPETITIVE_SCHEDULE_ID = x_rep_id
144: AND QUANTITY_SCRAPPED <> 0)
151: AND APPLIED_RESOURCE_UNITS <> 0));
152: -- for bug fix 8977276 (FP 8946106)
153: CURSOR c_lock
154: IS select '1'
155: FROM WIP_OPERATIONS
156: WHERE WIP_ENTITY_ID = x_wip_id
157: AND ORGANIZATION_ID = x_org_id
158: for update nowait;
159:
183: fetch check_discrete_charges into charges_exist;
184:
185: IF (check_discrete_charges%NOTFOUND) THEN
186:
187: UPDATE WIP_OPERATIONS
188: SET QUANTITY_WAITING_TO_MOVE = 0,
189: QUANTITY_SCRAPPED = 0,
190: QUANTITY_REJECTED = 0,
191: QUANTITY_IN_QUEUE = 0,
209: open check_repetitive_charges;
210: fetch check_repetitive_charges into charges_exist;
211:
212: IF (check_repetitive_charges%NOTFOUND) THEN
213: UPDATE WIP_OPERATIONS
214: SET QUANTITY_WAITING_TO_MOVE = 0,
215: QUANTITY_SCRAPPED = 0,
216: QUANTITY_REJECTED = 0,
217: QUANTITY_IN_QUEUE = 0,