21: IS PRAGMA AUTONOMOUS_TRANSACTION;
22:
23: BEGIN
24:
25: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
26: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INSERT_ROW', '<
27: END IF;
28:
29:
22:
23: BEGIN
24:
25: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
26: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INSERT_ROW', '<
28:
29:
30: INSERT INTO gcs_cons_eng_run_dtls
72: FND_GLOBAL.LOGIN_ID
73: )
74: RETURNING run_detail_id INTO p_run_detail_id;
75:
76: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
77: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INSERT_ROW', '<
78: END IF;
79:
80:
73: )
74: RETURNING run_detail_id INTO p_run_detail_id;
75:
76: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
77: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.INSERT_ROW', '<
79:
80:
81: COMMIT;
93: IS
94:
95: BEGIN
96:
97: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
98: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_ENTRY_HEADERS', '<
99: END IF;
100:
101: UPDATE gcs_cons_eng_run_dtls
94:
95: BEGIN
96:
97: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
98: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_ENTRY_HEADERS', '<
100:
101: UPDATE gcs_cons_eng_run_dtls
102: SET entry_id = NVL(p_entry_id, entry_id),
108: last_update_date = sysdate,
109: last_updated_by = FND_GLOBAL.user_id
110: WHERE run_detail_id = p_run_detail_id;
111:
112: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_ENTRY_HEADERS', '<
114: END IF;
115:
116:
109: last_updated_by = FND_GLOBAL.user_id
110: WHERE run_detail_id = p_run_detail_id;
111:
112: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
113: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_ENTRY_HEADERS', '<
115:
116:
117: END;
126: )
127: IS PRAGMA AUTONOMOUS_TRANSACTION;
128:
129: BEGIN
130: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
131: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_ENTRY_HEADERS_ASYNC', '<
132: END IF;
133:
134: UPDATE gcs_cons_eng_run_dtls
127: IS PRAGMA AUTONOMOUS_TRANSACTION;
128:
129: BEGIN
130: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
131: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_ENTRY_HEADERS_ASYNC', '<
133:
134: UPDATE gcs_cons_eng_run_dtls
135: SET entry_id = NVL(p_entry_id, entry_id),
141: last_update_date = sysdate,
142: last_updated_by = FND_GLOBAL.USER_ID
143: WHERE run_detail_id = p_run_detail_id;
144:
145: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
146: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_ENTRY_HEADERS_ASYNC', '<
147: END IF;
148:
149:
142: last_updated_by = FND_GLOBAL.USER_ID
143: WHERE run_detail_id = p_run_detail_id;
144:
145: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
146: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_ENTRY_HEADERS_ASYNC', '<
148:
149:
150: COMMIT;
160: l_status_code VARCHAR2(30);
161:
162: BEGIN
163:
164: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
165: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE.begin', '<
166: END IF;
167:
168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
161:
162: BEGIN
163:
164: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
165: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE.begin', '<
167:
168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
169: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Consolidation Entity Id : ' || p_consolidation_entity_id);
164: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
165: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE.begin', '<
166: END IF;
167:
168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
169: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Consolidation Entity Id : ' || p_consolidation_entity_id);
170: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Run Name : ' || p_run_name);
171: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Category Code : ' || p_category_code);
172: END IF;
165: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE.begin', '<
166: END IF;
167:
168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
169: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Consolidation Entity Id : ' || p_consolidation_entity_id);
170: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Run Name : ' || p_run_name);
171: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Category Code : ' || p_category_code);
172: END IF;
173:
166: END IF;
167:
168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
169: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Consolidation Entity Id : ' || p_consolidation_entity_id);
170: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Run Name : ' || p_run_name);
171: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Category Code : ' || p_category_code);
172: END IF;
173:
174: SELECT count(request_error_code)
167:
168: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
169: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Consolidation Entity Id : ' || p_consolidation_entity_id);
170: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Run Name : ' || p_run_name);
171: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE', 'Category Code : ' || p_category_code);
172: END IF;
173:
174: SELECT count(request_error_code)
175: INTO l_row_count
178: AND consolidation_entity_id = p_consolidation_entity_id
179: AND child_entity_id IS NOT NULL
180: AND category_code = p_category_code;
181:
182: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
183: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_CATEGORY_STATUS', 'Number of rows : ' || l_row_count);
184: END IF;
185:
186: IF (l_row_count = 0) THEN
179: AND child_entity_id IS NOT NULL
180: AND category_code = p_category_code;
181:
182: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
183: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_CATEGORY_STATUS', 'Number of rows : ' || l_row_count);
184: END IF;
185:
186: IF (l_row_count = 0) THEN
187: l_status_code := 'NOT_APPLICABLE';
194: AND child_entity_id IS NOT NULL
195: AND category_code = p_category_code
196: AND NVL(request_error_code,'X') NOT IN ('COMPLETED','NOT_APPLICABLE');
197:
198: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
199: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Warning Row Count : ' || l_warning_row_count);
200: END IF;
201:
202: IF (l_warning_row_count <> 0) THEN
195: AND category_code = p_category_code
196: AND NVL(request_error_code,'X') NOT IN ('COMPLETED','NOT_APPLICABLE');
197:
198: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
199: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Warning Row Count : ' || l_warning_row_count);
200: END IF;
201:
202: IF (l_warning_row_count <> 0) THEN
203: l_status_code := 'WARNING';
205: l_status_code := 'COMPLETED';
206: END IF;
207: END IF;
208:
209: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
210: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status Code : ' || l_status_code);
211: END IF;
212: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
213: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE.end', '<
206: END IF;
207: END IF;
208:
209: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
210: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status Code : ' || l_status_code);
211: END IF;
212: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
213: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE.end', '<
214: END IF;
208:
209: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
210: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status Code : ' || l_status_code);
211: END IF;
212: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
213: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE.end', '<
214: END IF;
215: return(l_status_code);
216:
209: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
210: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status Code : ' || l_status_code);
211: END IF;
212: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
213: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.RETRIEVE_STATUS_CODE.end', '<
215: return(l_status_code);
216:
217: END;
229: l_category_count NUMBER(15);
230: l_category_code VARCHAR2(30);
231:
232: BEGIN
233: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
234: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_CATEGORY_STATUS', '<
235: END IF;
236:
237: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
230: l_category_code VARCHAR2(30);
231:
232: BEGIN
233: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
234: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_CATEGORY_STATUS', '<
236:
237: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
238: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Run Name : ' || p_run_name);
233: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
234: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_CATEGORY_STATUS', '<
235: END IF;
236:
237: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
238: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Run Name : ' || p_run_name);
239: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Consolidation Entity : ' || p_consolidation_entity_id);
240: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Category Code : ' || p_category_code);
241: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status : ' || p_status);
234: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_CATEGORY_STATUS', '<
235: END IF;
236:
237: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
238: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Run Name : ' || p_run_name);
239: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Consolidation Entity : ' || p_consolidation_entity_id);
240: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Category Code : ' || p_category_code);
241: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status : ' || p_status);
242: END IF;
235: END IF;
236:
237: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
238: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Run Name : ' || p_run_name);
239: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Consolidation Entity : ' || p_consolidation_entity_id);
240: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Category Code : ' || p_category_code);
241: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status : ' || p_status);
242: END IF;
243:
236:
237: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
238: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Run Name : ' || p_run_name);
239: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Consolidation Entity : ' || p_consolidation_entity_id);
240: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Category Code : ' || p_category_code);
241: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status : ' || p_status);
242: END IF;
243:
244: IF (p_category_code = 'DATAPREPARATION') THEN
237: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_STATEMENT) THEN
238: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Run Name : ' || p_run_name);
239: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Consolidation Entity : ' || p_consolidation_entity_id);
240: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Category Code : ' || p_category_code);
241: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT, g_api || '.UPDATE_CATEGORY_STATUS', 'Status : ' || p_status);
242: END IF;
243:
244: IF (p_category_code = 'DATAPREPARATION') THEN
245: FOR l_category_count IN -1..gcs_categories_pkg.g_oper_category_info.COUNT LOOP
283: AND child_entity_id IS NULL;
284: END IF;
285: COMMIT;
286:
287: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_CATEGORY_STATUS', '<
289: END IF;
290:
291: END;
284: END IF;
285: COMMIT;
286:
287: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
288: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_CATEGORY_STATUS', '<
290:
291: END;
292:
297: IS
298:
299: BEGIN
300:
301: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
302: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_DETAIL_REQUESTS', '<
303: END IF;
304:
305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
298:
299: BEGIN
300:
301: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
302: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_DETAIL_REQUESTS', '<
304:
305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
306: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_DETAIL_REQUESTS', '<
301: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
302: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_DETAIL_REQUESTS', '<
303: END IF;
304:
305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
306: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_DETAIL_REQUESTS', '<
307: END IF;
308:
309: END;
302: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_DETAIL_REQUESTS', '<
303: END IF;
304:
305: IF (FND_LOG.G_CURRENT_RUNTIME_LEVEL <= FND_LOG.LEVEL_PROCEDURE) THEN
306: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE, g_api || '.UPDATE_DETAIL_REQUESTS', '<
308:
309: END;
310: