118:
119: BEGIN
120:
121: IF g_debug_stmt THEN
122: PO_DEBUG.debug_begin(l_log_head);
123: PO_DEBUG.debug_var(l_log_head,l_progress,'p_roll_logic', p_roll_logic);
124: PO_DEBUG.debug_var(l_log_head,l_progress,'p_set_of_books_id', p_set_of_books_id);
125: PO_DEBUG.debug_var(l_log_head,l_progress,'p_date_tbl', p_date_tbl);
126: END IF;
119: BEGIN
120:
121: IF g_debug_stmt THEN
122: PO_DEBUG.debug_begin(l_log_head);
123: PO_DEBUG.debug_var(l_log_head,l_progress,'p_roll_logic', p_roll_logic);
124: PO_DEBUG.debug_var(l_log_head,l_progress,'p_set_of_books_id', p_set_of_books_id);
125: PO_DEBUG.debug_var(l_log_head,l_progress,'p_date_tbl', p_date_tbl);
126: END IF;
127:
120:
121: IF g_debug_stmt THEN
122: PO_DEBUG.debug_begin(l_log_head);
123: PO_DEBUG.debug_var(l_log_head,l_progress,'p_roll_logic', p_roll_logic);
124: PO_DEBUG.debug_var(l_log_head,l_progress,'p_set_of_books_id', p_set_of_books_id);
125: PO_DEBUG.debug_var(l_log_head,l_progress,'p_date_tbl', p_date_tbl);
126: END IF;
127:
128: l_progress := '010';
121: IF g_debug_stmt THEN
122: PO_DEBUG.debug_begin(l_log_head);
123: PO_DEBUG.debug_var(l_log_head,l_progress,'p_roll_logic', p_roll_logic);
124: PO_DEBUG.debug_var(l_log_head,l_progress,'p_set_of_books_id', p_set_of_books_id);
125: PO_DEBUG.debug_var(l_log_head,l_progress,'p_date_tbl', p_date_tbl);
126: END IF;
127:
128: l_progress := '010';
129:
140: IF (p_set_of_books_id IS NULL) THEN
141:
142: l_progress := '020';
143: IF g_debug_stmt THEN
144: PO_DEBUG.debug_stmt(l_log_head,l_progress,'set of books is NULL');
145: END IF;
146:
147: SELECT FSP.set_of_books_id
148: INTO l_set_of_books_id
154: ELSE
155:
156: l_progress := '040';
157: IF g_debug_stmt THEN
158: PO_DEBUG.debug_stmt(l_log_head,l_progress,'set of books passed');
159: END IF;
160:
161: l_set_of_books_id := p_set_of_books_id;
162:
277: l_progress := '130';
278: END;
279:
280: IF g_debug_stmt THEN
281: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
282: END IF;
283:
284: l_progress := '900';
285:
283:
284: l_progress := '900';
285:
286: IF g_debug_stmt THEN
287: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
288: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
289: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
290: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
291: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
284: l_progress := '900';
285:
286: IF g_debug_stmt THEN
287: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
288: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
289: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
290: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
291: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
292: PO_DEBUG.debug_end(l_log_head);
285:
286: IF g_debug_stmt THEN
287: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
288: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
289: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
290: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
291: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
292: PO_DEBUG.debug_end(l_log_head);
293: END IF;
286: IF g_debug_stmt THEN
287: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
288: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
289: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
290: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
291: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
292: PO_DEBUG.debug_end(l_log_head);
293: END IF;
294:
287: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
288: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
289: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
290: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
291: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
292: PO_DEBUG.debug_end(l_log_head);
293: END IF;
294:
295: EXCEPTION
288: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
289: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
290: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
291: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
292: PO_DEBUG.debug_end(l_log_head);
293: END IF;
294:
295: EXCEPTION
296:
295: EXCEPTION
296:
297: WHEN l_no_dates_exc THEN
298: IF g_debug_stmt THEN
299: PO_DEBUG.debug_stmt(l_log_head,l_progress,'l_no_dates_exc: Empty date table.');
300: END IF;
301:
302: l_progress := '910';
303:
309:
310: l_progress := '912';
311:
312: IF g_debug_stmt THEN
313: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
314: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
315: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
316: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
317: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
310: l_progress := '912';
311:
312: IF g_debug_stmt THEN
313: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
314: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
315: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
316: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
317: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
318: PO_DEBUG.debug_end(l_log_head);
311:
312: IF g_debug_stmt THEN
313: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
314: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
315: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
316: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
317: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
318: PO_DEBUG.debug_end(l_log_head);
319: END IF;
312: IF g_debug_stmt THEN
313: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
314: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
315: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
316: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
317: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
318: PO_DEBUG.debug_end(l_log_head);
319: END IF;
320:
313: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_name_tbl', x_period_name_tbl);
314: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
315: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
316: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
317: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
318: PO_DEBUG.debug_end(l_log_head);
319: END IF;
320:
321: WHEN OTHERS THEN
314: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_year_tbl', x_period_year_tbl);
315: PO_DEBUG.debug_var(l_log_head,l_progress,'x_period_num_tbl', x_period_num_tbl);
316: PO_DEBUG.debug_var(l_log_head,l_progress,'x_quarter_num_tbl', x_quarter_num_tbl);
317: PO_DEBUG.debug_var(l_log_head,l_progress,'x_invalid_period_flag',x_invalid_period_flag);
318: PO_DEBUG.debug_end(l_log_head);
319: END IF;
320:
321: WHEN OTHERS THEN
322: IF g_debug_unexp THEN
319: END IF;
320:
321: WHEN OTHERS THEN
322: IF g_debug_unexp THEN
323: PO_DEBUG.debug_exc(l_log_head,l_progress);
324: END IF;
325: RAISE;
326:
327: END get_period_info;
376:
377: BEGIN
378:
379: IF g_debug_stmt THEN
380: PO_DEBUG.debug_begin(l_log_head);
381: PO_DEBUG.debug_var(l_log_head,l_progress,'x_sob_id',x_sob_id);
382: PO_DEBUG.debug_var(l_log_head,l_progress,'x_gl_date',x_gl_date);
383: END IF;
384:
377: BEGIN
378:
379: IF g_debug_stmt THEN
380: PO_DEBUG.debug_begin(l_log_head);
381: PO_DEBUG.debug_var(l_log_head,l_progress,'x_sob_id',x_sob_id);
382: PO_DEBUG.debug_var(l_log_head,l_progress,'x_gl_date',x_gl_date);
383: END IF;
384:
385: l_progress := '010';
378:
379: IF g_debug_stmt THEN
380: PO_DEBUG.debug_begin(l_log_head);
381: PO_DEBUG.debug_var(l_log_head,l_progress,'x_sob_id',x_sob_id);
382: PO_DEBUG.debug_var(l_log_head,l_progress,'x_gl_date',x_gl_date);
383: END IF;
384:
385: l_progress := '010';
386:
399:
400: x_gl_period := l_period_name_tbl(1);
401:
402: IF g_debug_stmt THEN
403: PO_DEBUG.debug_var(l_log_head,l_progress,'x_gl_period',x_gl_period);
404: PO_DEBUG.debug_end(l_log_head);
405: END IF;
406:
407: EXCEPTION
400: x_gl_period := l_period_name_tbl(1);
401:
402: IF g_debug_stmt THEN
403: PO_DEBUG.debug_var(l_log_head,l_progress,'x_gl_period',x_gl_period);
404: PO_DEBUG.debug_end(l_log_head);
405: END IF;
406:
407: EXCEPTION
408: WHEN OTHERS THEN
406:
407: EXCEPTION
408: WHEN OTHERS THEN
409: IF g_debug_unexp THEN
410: PO_DEBUG.debug_exc(l_log_head,l_progress);
411: END IF;
412: RAISE;
413:
414: END get_period_name;
421: -----------------------------------------------------------------------------
422:
423: BEGIN
424:
425: g_debug_stmt := PO_DEBUG.is_debug_stmt_on;
426: g_debug_unexp := PO_DEBUG.is_debug_unexp_on;
427:
428:
429: END PO_PERIODS_SV;
422:
423: BEGIN
424:
425: g_debug_stmt := PO_DEBUG.is_debug_stmt_on;
426: g_debug_unexp := PO_DEBUG.is_debug_unexp_on;
427:
428:
429: END PO_PERIODS_SV;