214: RETURN NUMBER
215: is
216: l_log_module VARCHAR2(240);
217: temp number;
218: cursor c_xla_subledgers is
219: select application_id
220: from xla_subledgers
221: where application_id=p_application_id;
222: begin
216: l_log_module VARCHAR2(240);
217: temp number;
218: cursor c_xla_subledgers is
219: select application_id
220: from xla_subledgers
221: where application_id=p_application_id;
222: begin
223: IF g_log_enabled THEN
224: l_log_module := C_DEFAULT_MODULE||'.xla_supported';
234: ,p_module =>l_log_module);
235: END IF;
236:
237:
238: open c_xla_subledgers;
239: fetch c_xla_subledgers into temp;
240: if c_xla_subledgers%FOUND then
241: temp:=1;
242: else
235: END IF;
236:
237:
238: open c_xla_subledgers;
239: fetch c_xla_subledgers into temp;
240: if c_xla_subledgers%FOUND then
241: temp:=1;
242: else
243: temp:=0;
236:
237:
238: open c_xla_subledgers;
239: fetch c_xla_subledgers into temp;
240: if c_xla_subledgers%FOUND then
241: temp:=1;
242: else
243: temp:=0;
244: end if;
241: temp:=1;
242: else
243: temp:=0;
244: end if;
245: close c_xla_subledgers;
246:
247: IF (C_LEVEL_PROCEDURE >= g_log_level) THEN
248: trace
249: (p_msg => 'return value. = '||TO_CHAR(temp)