185: where property_name = 'DEFAULT_EDITION';
186:
187: select edition_name
188: into edname
189: from fnd_concurrent_requests
190: where request_id = rid;
191:
192: -- If the request's edition does not match the manager's it will not run
193: if edname <> default_edition then
290:
291: begin
292: select status_code
293: into dummy
294: from fnd_concurrent_requests
295: where request_id = rid
296: and has_sub_request = 'Y'
297: and status_code = 'W'
298: for update of status_code;
310: uid in number)
311: return boolean is
312:
313: begin
314: update fnd_concurrent_requests
315: set status_code = 'I',
316: last_update_date = sysdate,
317: last_updated_by = uid
318: where request_id = prid
318: where request_id = prid
319: and has_sub_request = 'Y'
320: and status_code = 'W'
321: and not exists (select null
322: from fnd_concurrent_requests
323: where parent_request_id = prid
324: and request_id <> rid
325: and is_sub_request = 'Y'
326: and status_code between 'I' and 'T');
332: procedure delete_children (rid in number,
333: uid in number) is
334:
335: begin
336: update fnd_concurrent_requests
337: set phase_code = decode (status_code,
338: 'R', 'R',
339: 'C'),
340: status_code = decode (phase_code,
344: 'D'),
345: last_update_date = sysdate,
346: last_updated_by = uid
347: where request_id in (select request_id
348: from fnd_concurrent_requests
349: where phase_code <> 'C' and status_code <> 'T'
350: connect by prior request_id = parent_request_id
351: start with request_id = rid);
352: end delete_children;