139: l_sequence_num NUMBER;
140: l_rec_fnd_user_id NUMBER;
141: l_user_id NUMBER := fnd_global.user_id;
142: l_conc_login_id NUMBER := fnd_global.conc_login_id;
143: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
144: l_state_level number := FND_LOG.LEVEL_STATEMENT;
145: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
146: l_event_level number := FND_LOG.LEVEL_EVENT;
147: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
140: l_rec_fnd_user_id NUMBER;
141: l_user_id NUMBER := fnd_global.user_id;
142: l_conc_login_id NUMBER := fnd_global.conc_login_id;
143: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
144: l_state_level number := FND_LOG.LEVEL_STATEMENT;
145: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
146: l_event_level number := FND_LOG.LEVEL_EVENT;
147: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
148: l_error_level number := FND_LOG.LEVEL_ERROR;
141: l_user_id NUMBER := fnd_global.user_id;
142: l_conc_login_id NUMBER := fnd_global.conc_login_id;
143: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
144: l_state_level number := FND_LOG.LEVEL_STATEMENT;
145: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
146: l_event_level number := FND_LOG.LEVEL_EVENT;
147: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
148: l_error_level number := FND_LOG.LEVEL_ERROR;
149: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
142: l_conc_login_id NUMBER := fnd_global.conc_login_id;
143: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
144: l_state_level number := FND_LOG.LEVEL_STATEMENT;
145: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
146: l_event_level number := FND_LOG.LEVEL_EVENT;
147: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
148: l_error_level number := FND_LOG.LEVEL_ERROR;
149: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
150:
143: l_debug_level number := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
144: l_state_level number := FND_LOG.LEVEL_STATEMENT;
145: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
146: l_event_level number := FND_LOG.LEVEL_EVENT;
147: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
148: l_error_level number := FND_LOG.LEVEL_ERROR;
149: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
150:
151:
144: l_state_level number := FND_LOG.LEVEL_STATEMENT;
145: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
146: l_event_level number := FND_LOG.LEVEL_EVENT;
147: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
148: l_error_level number := FND_LOG.LEVEL_ERROR;
149: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
150:
151:
152:
145: l_proc_level number := FND_LOG.LEVEL_PROCEDURE;
146: l_event_level number := FND_LOG.LEVEL_EVENT;
147: l_excep_level number := FND_LOG.LEVEL_EXCEPTION;
148: l_error_level number := FND_LOG.LEVEL_ERROR;
149: l_unexp_level number := FND_LOG.LEVEL_UNEXPECTED;
150:
151:
152:
153: BEGIN
165: CLOSE c_is_workflow_enabled;
166:
167: IF l_workflow_enabled = 'Y' THEN
168: IF (l_state_level >= l_debug_level ) THEN
169: FND_LOG.STRING( l_state_level,'igi.plsql.igiitrxb.IGI_ITR_TIMEOUT_PKG.find_services','Workflow is enabled for the set of books ');
170: END IF;
171:
172: return;
173: END IF;
184: END IF;
185: CLOSE c_get_timeout_days;
186:
187: IF (l_state_level >= l_debug_level ) THEN
188: FND_LOG.STRING( l_state_level,'igi.plsql.igiitrxb.IGI_ITR_TIMEOUT_PKG.find_services','Service lines will be auto approved if waiting for '||l_timeout_days );
189: END IF;
190:
191: /*shsaxena for bug no 2782312*/
192: OPEN c_header_id (p_set_of_books_id ,l_timeout_days);
193: LOOP
194: FETCH c_header_id INTO l_it_header_id;
195: IF c_header_id%NOTFOUND THEN
196: IF (l_state_level >= l_debug_level ) THEN
197: FND_LOG.STRING( l_state_level,'igi.plsql.igiitrxb.IGI_ITR_TIMEOUT_PKG.find_services','There are no more service lines awaiting approval for set of books '||p_set_of_books_id );
198: END IF;
199: EXIT;
200: END IF;
201:
214: ,last_update_date = sysdate
215: WHERE it_service_line_id = l_it_service_line_id;
216:
217: IF (l_state_level >= l_debug_level ) THEN
218: FND_LOG.STRING( l_state_level,'igi.plsql.igiitrxb.IGI_ITR_TIMEOUT_PKG.find_services','Service line id '||l_it_service_line_id||' has been auto approved');
219: END IF;
220: /* Now need to update the action history table with information
221: ** indicating that the service line has been auto-approved.
222: ** So start by fetching all the information needed for insertion
258: ,X_Last_Updated_By => l_user_id
259: );
260:
261: IF (l_state_level >= l_debug_level ) THEN
262: FND_LOG.STRING( l_state_level,'igi.plsql.igiitrxb.IGI_ITR_TIMEOUT_PKG.find_services','Action History table has been updated for service line id '||l_it_service_line_id );
263: END IF;
264:
265:
266: END LOOP;
277: IF ( l_unexp_level >= l_debug_level) THEN
278: FND_MESSAGE.SET_NAME('IGI','IGI_LOGGING_UNEXP_ERROR');
279: FND_MESSAGE.SET_TOKEN('CODE',SQLCODE);
280: FND_MESSAGE.SET_TOKEN('MSG', SQLERRM);
281: FND_LOG.MESSAGE (l_unexp_level,'igi.plsql.igiitrwb.IGI_ITR_TIMEOUT_TEST_PKG.find_services',TRUE);
282: END IF;
283: raise_application_error
284: (-20001,'IGI_ITR_TIMEOUT_TEST_PKG.find_services'||SQLERRM);
285: