[Home] [Help]
95: x_req_assign_flag => l_req_assign_flag,
96: x_sort_option_code => l_sort_option_code);
97:
98: --
99: -- Create Sequencing Setup Records in FUN_SEQ_REQUESTS
100: --
101: IF l_seq_context_id IS NOT NULL THEN
102: --
103: -- Make Sequencing Setup pages display only
212: x_sort_option_code => l_sort_option_code);
213:
214: --
215: -- If a valid sequencing context is found,
216: -- insert a record into fun_seq_requests.
217: --
218: IF l_seq_context_id IS NOT NULL THEN
219: populate_seq_requests (
220: p_request_id => p_request_id,
267:
268: --
269: -- Procedure Name: Batch_Exit
270: -- Description:
271: -- Unlocks setup data by deleting records from fun_seq_requests
272: -- The exception in this program is not considered critical.
273: -- So, even if the caller receives 'FAILURE', they should not
274: -- raise an exception.
275: -- INPUT
909: --
910: fnd_file.put_line(fnd_file.log, 'Starting Release_Lock... ');
911: --
912: -- If p_request_id is null, delete all complete requests from
913: -- fun_seq_requests
914: --
915: delete_seq_requests(p_request_id => p_request_id);
916: --
917: -- Populate Return Values 'SUCCESS'
949: l_module CONSTANT VARCHAR2(100) DEFAULT
950: g_module || '.' || 'populate_seq_requests';
951: BEGIN
952: --
953: -- Populate Sequencing Context in Fun_Seq_Requests
954: --
955: Populate_Seq_Context (
956: p_request_id => p_request_id,
957: p_seq_context_id => p_seq_context_id);
956: p_request_id => p_request_id,
957: p_seq_context_id => p_seq_context_id);
958:
959: --
960: -- Populate Sequence Headers in Fun_Seq_Requests
961: --
962: Populate_Seq_Headers (
963: p_request_id => p_request_id,
964: p_Seq_Context_Id => p_seq_context_id);
993: BEGIN
994: l_user_id := fnd_global.user_id;
995: l_login_id := fnd_global.login_id;
996:
997: INSERT INTO fun_seq_requests (
998: request_id,
999: source_type,
1000: source_id,
1001: last_update_date,
1054: AND sa.use_status_code IN ('NEW','USED');
1055:
1056: IF l_seq_headers.COUNT > 0 THEN
1057: FORALL i IN l_seq_headers.FIRST .. l_seq_headers.LAST
1058: INSERT INTO fun_seq_requests(
1059: request_id,
1060: source_type,
1061: source_id,
1062: last_update_date,
1114: pragma exception_init(more_rows, -1422);
1115:
1116: BEGIN
1117: --
1118: -- Bulk collect request ids in fun_seq_requests
1119: --
1120: IF p_request_id IS NULL THEN
1121: SELECT request_id
1122: BULK COLLECT
1120: IF p_request_id IS NULL THEN
1121: SELECT request_id
1122: BULK COLLECT
1123: INTO l_req_id_tbl
1124: FROM fun_seq_requests;
1125:
1126: ELSE
1127:
1128: begin
1132: select distinct phase_code into l_phase_code from fnd_concurrent_requests
1133: where parent_request_id= p_request_id;
1134: -- all childs completed
1135: if l_phase_code ='C' then
1136: delete from fun_seq_requests where request_id=p_request_id;
1137: -- childs may be pending or paused ..
1138: else
1139: null; -- do not release the lock
1140: end if;
1140: end if;
1141: EXCEPTION
1142: -- this is not a parent request
1143: WHEN NO_DATA_FOUND THEN
1144: delete from fun_seq_requests where request_id=p_request_id;
1145: -- all child are not completed yet
1146: WHEN more_rows THEN
1147: null;
1148: end;
1176: --
1177: IF l_comp_req_id_tbl.COUNT > 0 THEN
1178: FORALL i IN INDICES OF l_comp_req_id_tbl
1179: DELETE
1180: FROM fun_seq_requests
1181: WHERE request_id = l_comp_req_id_tbl(i);
1182: END IF;
1183: END IF;
1184: