DBA Data[Home] [Help]

APPS.JG_ALLOCATE_JOURNALS_PKG dependencies on JG_UTILITY_PKG

Line 15: JG_UTILITY_PKG.log('> JG_ALLOCATE_JOURNALS_PKG.prepare_journal_select');

11: --------------------------------------------------------------------- */
12: PROCEDURE prepare_journal_select IS
13: l_fiscal_journal_qry VARCHAR2(10000) := NULL;
14: BEGIN
15: JG_UTILITY_PKG.log('> JG_ALLOCATE_JOURNALS_PKG.prepare_journal_select');
16: --
17: -- prepare the query variable
18: --
19: l_fiscal_journal_qry := JG_ALLOCATE_JOURNALS_PKG.get_dynamic_select_string;

Line 23: JG_UTILITY_PKG.debug('Initialize dynamic cursor: start');

19: l_fiscal_journal_qry := JG_ALLOCATE_JOURNALS_PKG.get_dynamic_select_string;
20: --
21: -- Prepare the main Dynamic SQL statement
22: --
23: JG_UTILITY_PKG.debug('Initialize dynamic cursor: start');
24: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,1,130));
25: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,
26: INSTR(l_fiscal_journal_qry,'FROM',1),
27: 100));

Line 24: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,1,130));

20: --
21: -- Prepare the main Dynamic SQL statement
22: --
23: JG_UTILITY_PKG.debug('Initialize dynamic cursor: start');
24: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,1,130));
25: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,
26: INSTR(l_fiscal_journal_qry,'FROM',1),
27: 100));
28: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,

Line 25: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,

21: -- Prepare the main Dynamic SQL statement
22: --
23: JG_UTILITY_PKG.debug('Initialize dynamic cursor: start');
24: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,1,130));
25: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,
26: INSTR(l_fiscal_journal_qry,'FROM',1),
27: 100));
28: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
29: INSTR(l_fiscal_journal_qry, 'WHERE', 1),

Line 28: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,

24: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,1,130));
25: JG_UTILITY_PKG.debug(SUBSTR(l_fiscal_journal_qry,
26: INSTR(l_fiscal_journal_qry,'FROM',1),
27: 100));
28: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
29: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
30: 400),1,100));
31: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
32: INSTR(l_fiscal_journal_qry, 'WHERE', 1),

Line 31: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,

27: 100));
28: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
29: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
30: 400),1,100));
31: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
32: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
33: 400),101,200));
34: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
35: INSTR(l_fiscal_journal_qry, 'WHERE', 1),

Line 34: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,

30: 400),1,100));
31: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
32: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
33: 400),101,200));
34: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
35: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
36: 400),201,300));
37: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
38: INSTR(l_fiscal_journal_qry, 'WHERE', 1),

Line 37: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,

33: 400),101,200));
34: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
35: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
36: 400),201,300));
37: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
38: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
39: 400),301,400));
40: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
41: INSTR(l_fiscal_journal_qry, 'WHERE', 1),

Line 40: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,

36: 400),201,300));
37: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
38: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
39: 400),301,400));
40: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
41: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
42: 400),401,500));
43: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
44: INSTR(l_fiscal_journal_qry, 'WHERE', 1),

Line 43: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,

39: 400),301,400));
40: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
41: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
42: 400),401,500));
43: JG_UTILITY_PKG.debug(SUBSTR(SUBSTR(l_fiscal_journal_qry,
44: INSTR(l_fiscal_journal_qry, 'WHERE', 1),
45: 400),501,600));
46: --
47: -- Open the main cursor

Line 244: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.prepare_journal_select');

240: DBMS_SQL.DEFINE_COLUMN(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c,94,
241: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cc_range_description, 240);
242: DBMS_SQL.DEFINE_COLUMN(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c,95,
243: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.rule_set_name, 100);
244: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.prepare_journal_select');
245: END prepare_journal_select;
246:
247: /* ---------------------------------------------------------------------
248: | PRIVATE FUNCTOIN |

Line 285: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.get_cc_acc_range_ids');

281: AND JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.account_number
282: BETWEEN acr.account_range_low (+) AND acr.account_range_high (+)
283: ORDER BY acr.offset_account;
284: BEGIN
285: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.get_cc_acc_range_ids');
286: OPEN c_range_ids;
287: FETCH c_range_ids INTO JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cc_range_id,
288: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.account_range_id,
289: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.offset_account,

Line 294: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_cc_acc_range_ids');

290: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cc_range_low,
291: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cc_range_high;
292: IF (JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.offset_account IS NOT NULL) THEN
293: CLOSE c_range_ids;
294: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_cc_acc_range_ids');
295: RETURN FALSE;
296: ELSE
297: CLOSE c_range_ids;
298: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_cc_acc_range_ids');

Line 298: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_cc_acc_range_ids');

294: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_cc_acc_range_ids');
295: RETURN FALSE;
296: ELSE
297: CLOSE c_range_ids;
298: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_cc_acc_range_ids');
299: RETURN TRUE;
300: END IF;
301: END get_cc_acc_range_ids;
302:

Line 321: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.write_report_titles');

317: l_output4 VARCHAR2(2000) := NULL;
318: l_output5 VARCHAR2(2000) := NULL;
319: l_output6 VARCHAR2(2000) := NULL;
320: BEGIN
321: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.write_report_titles');
322: IF (JG_JOURNAL_ALLOCATIONS_PKG.G_unalloc_request_id IS NULL) THEN
323: FND_MESSAGE.set_name(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_JGZZTAJA_REPORT_TITLE1');
324: FND_MESSAGE.set_token('SOB_NAME', RPAD(JG_JOURNAL_ALLOCATIONS_PKG.G_set_of_books_name, 67));
325: -- Bug 876171: The following line is too long for a row of length 180 characters

Line 354: JG_UTILITY_PKG.out(l_output1);

350: l_output5 := FND_MESSAGE.GET;
351: FND_MESSAGE.SET_NAME (JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name ,'JG_ZZ_JGZZTAJA_UNALLOC_HDING1');
352: l_output6 := FND_MESSAGE.GET;
353: END IF;
354: JG_UTILITY_PKG.out(l_output1);
355: JG_UTILITY_PKG.out(l_output2);
356: JG_UTILITY_PKG.out(l_output3);
357: JG_UTILITY_PKG.out(l_output310);
358: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);

Line 355: JG_UTILITY_PKG.out(l_output2);

351: FND_MESSAGE.SET_NAME (JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name ,'JG_ZZ_JGZZTAJA_UNALLOC_HDING1');
352: l_output6 := FND_MESSAGE.GET;
353: END IF;
354: JG_UTILITY_PKG.out(l_output1);
355: JG_UTILITY_PKG.out(l_output2);
356: JG_UTILITY_PKG.out(l_output3);
357: JG_UTILITY_PKG.out(l_output310);
358: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
359: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);

Line 356: JG_UTILITY_PKG.out(l_output3);

352: l_output6 := FND_MESSAGE.GET;
353: END IF;
354: JG_UTILITY_PKG.out(l_output1);
355: JG_UTILITY_PKG.out(l_output2);
356: JG_UTILITY_PKG.out(l_output3);
357: JG_UTILITY_PKG.out(l_output310);
358: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
359: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
360: JG_UTILITY_PKG.out(l_output4);

Line 357: JG_UTILITY_PKG.out(l_output310);

353: END IF;
354: JG_UTILITY_PKG.out(l_output1);
355: JG_UTILITY_PKG.out(l_output2);
356: JG_UTILITY_PKG.out(l_output3);
357: JG_UTILITY_PKG.out(l_output310);
358: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
359: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
360: JG_UTILITY_PKG.out(l_output4);
361: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);

Line 360: JG_UTILITY_PKG.out(l_output4);

356: JG_UTILITY_PKG.out(l_output3);
357: JG_UTILITY_PKG.out(l_output310);
358: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
359: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
360: JG_UTILITY_PKG.out(l_output4);
361: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
362: JG_UTILITY_PKG.out(l_output5);
363: JG_UTILITY_PKG.out(l_output6);
364: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.write_report_titles');

Line 362: JG_UTILITY_PKG.out(l_output5);

358: --FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
359: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
360: JG_UTILITY_PKG.out(l_output4);
361: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
362: JG_UTILITY_PKG.out(l_output5);
363: JG_UTILITY_PKG.out(l_output6);
364: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.write_report_titles');
365: END write_report_titles;
366:

Line 363: JG_UTILITY_PKG.out(l_output6);

359: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
360: JG_UTILITY_PKG.out(l_output4);
361: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
362: JG_UTILITY_PKG.out(l_output5);
363: JG_UTILITY_PKG.out(l_output6);
364: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.write_report_titles');
365: END write_report_titles;
366:
367: /* ---------------------------------------------------------------------

Line 364: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.write_report_titles');

360: JG_UTILITY_PKG.out(l_output4);
361: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
362: JG_UTILITY_PKG.out(l_output5);
363: JG_UTILITY_PKG.out(l_output6);
364: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.write_report_titles');
365: END write_report_titles;
366:
367: /* ---------------------------------------------------------------------
368: | PRIVATE PROCEDURE |

Line 380: JG_UTILITY_PKG.log('> JG_ALLOCATE_JOURNALS_PKG.write_report_headings');

376: l_line_output1 VARCHAR2(2000) := NULL;
377: l_line_output2 VARCHAR2(2000) := NULL;
378: l_line_output3 VARCHAR2(2000) := NULL;
379: BEGIN
380: JG_UTILITY_PKG.log('> JG_ALLOCATE_JOURNALS_PKG.write_report_headings');
381: FND_MESSAGE.SET_NAME (JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name ,'JG_ZZ_JGZZTAJA_HEADING1');
382: l_line_output1 := FND_MESSAGE.GET;
383: FND_MESSAGE.SET_NAME (JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name ,'JG_ZZ_JGZZTAJA_HEADING2');
384: l_line_output2 := FND_MESSAGE.GET;

Line 388: JG_UTILITY_PKG.out(l_line_output1);

384: l_line_output2 := FND_MESSAGE.GET;
385: FND_MESSAGE.SET_NAME (JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name ,'JG_ZZ_JGZZTAJA_HEADING3');
386: l_line_output3 := FND_MESSAGE.GET;
387: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 2);
388: JG_UTILITY_PKG.out(l_line_output1);
389: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
390: JG_UTILITY_PKG.out(l_line_output2);
391: JG_UTILITY_PKG.out(l_line_output3);
392: JG_UTILITY_PKG.log('< JG_ALLOCATE_JOURNALS_PKG.write_report_headings');

Line 390: JG_UTILITY_PKG.out(l_line_output2);

386: l_line_output3 := FND_MESSAGE.GET;
387: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 2);
388: JG_UTILITY_PKG.out(l_line_output1);
389: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
390: JG_UTILITY_PKG.out(l_line_output2);
391: JG_UTILITY_PKG.out(l_line_output3);
392: JG_UTILITY_PKG.log('< JG_ALLOCATE_JOURNALS_PKG.write_report_headings');
393: END Write_Report_Headings;
394:

Line 391: JG_UTILITY_PKG.out(l_line_output3);

387: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 2);
388: JG_UTILITY_PKG.out(l_line_output1);
389: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
390: JG_UTILITY_PKG.out(l_line_output2);
391: JG_UTILITY_PKG.out(l_line_output3);
392: JG_UTILITY_PKG.log('< JG_ALLOCATE_JOURNALS_PKG.write_report_headings');
393: END Write_Report_Headings;
394:
395: /* ---------------------------------------------------------------------

Line 392: JG_UTILITY_PKG.log('< JG_ALLOCATE_JOURNALS_PKG.write_report_headings');

388: JG_UTILITY_PKG.out(l_line_output1);
389: FND_FILE.NEW_LINE(FND_FILE.OUTPUT, 1);
390: JG_UTILITY_PKG.out(l_line_output2);
391: JG_UTILITY_PKG.out(l_line_output3);
392: JG_UTILITY_PKG.log('< JG_ALLOCATE_JOURNALS_PKG.write_report_headings');
393: END Write_Report_Headings;
394:
395: /* ---------------------------------------------------------------------
396: | PRIVATE PROCEDURE |

Line 419: JG_UTILITY_PKG.log('> JG_ALLOCATE_JOURNALS_PKG.write_allocated_lines_output');

415: -- Bug 876171: Add the variable
416: l_no_data_message VARCHAR2(50);
417: BEGIN
418:
419: JG_UTILITY_PKG.log('> JG_ALLOCATE_JOURNALS_PKG.write_allocated_lines_output');
420:
421: --
422: -- For each allocated row
423: --

Line 494: JG_UTILITY_PKG.out(RPAD(' ', 115)||l_cc_range_separator);

490: IF i <> 1 THEN
491: IF JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).cc_range_id <> JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i-1).cc_range_id THEN
492: FND_MESSAGE.set_name(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_JGZZTAJA_CCRNGE_SEPRATOR');
493: l_cc_range_separator := FND_MESSAGE.get;
494: JG_UTILITY_PKG.out(RPAD(' ', 115)||l_cc_range_separator);
495: END IF;
496: END IF;
497:
498: IF JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_batch_name = 'OFFSET FOR ACCOUNT RANGE' THEN

Line 499: JG_UTILITY_PKG.out(RPAD(' ', 115)||RPAD(SUBSTR(NVL(l_destn_acct_seg_string, ' '), 1, 34), 34)||' '||

495: END IF;
496: END IF;
497:
498: IF JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_batch_name = 'OFFSET FOR ACCOUNT RANGE' THEN
499: JG_UTILITY_PKG.out(RPAD(' ', 115)||RPAD(SUBSTR(NVL(l_destn_acct_seg_string, ' '), 1, 34), 34)||' '||
500: LPAD(SUBSTR(NVL(TO_CHAR(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).destn_accted_dr,
501: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||' '||
502: LPAD(SUBSTR(NVL(TO_CHAR(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).destn_accted_cr,
503: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||' '||JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).remarks);

Line 507: JG_UTILITY_PKG.out( RPAD(SUBSTR(NVL(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_batch_name, ' '), 1, 20), 20)||' '||

503: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||' '||JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).remarks);
504: ELSIF l_previous_rec_id <> JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_batch_name||
505: JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_header_name||
506: TO_CHAR(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_line_num) THEN
507: JG_UTILITY_PKG.out( RPAD(SUBSTR(NVL(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_batch_name, ' '), 1, 20), 20)||' '||
508: RPAD(SUBSTR(NVL(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_header_name, ' '), 1, 19), 19)||' '||
509: RPAD(SUBSTR(NVL(l_acct_seg_string, ' '), 1, 35), 35)||' '||
510: LPAD(SUBSTR(TO_CHAR(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).je_line_num), 1, 3), 3)||' '||
511: LPAD(SUBSTR(NVL(TO_CHAR(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).accounted_dr,

Line 521: JG_UTILITY_PKG.out(RPAD(' ', 115)|| RPAD(SUBSTR(NVL(l_destn_acct_seg_string, ' '), 1, 34), 34)||' '||

517: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||' '||
518: LPAD(SUBSTR(NVL(TO_CHAR(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).destn_accted_cr,
519: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||' '||JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).remarks);
520: ELSE
521: JG_UTILITY_PKG.out(RPAD(' ', 115)|| RPAD(SUBSTR(NVL(l_destn_acct_seg_string, ' '), 1, 34), 34)||' '||
522: LPAD(SUBSTR(NVL(TO_CHAR(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).destn_accted_dr, JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||' '||
523: LPAD(SUBSTR(NVL(TO_CHAR(JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).destn_accted_cr, JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||' '||JG_CREATE_JOURNALS_PKG.alloc_lines_arr(i).remarks);
524: END IF;
525:

Line 535: -- JG_UTILITY_PKG.out(FND_MESSAGE.GET);

531: -- Bug 876171: Add a new line before the no-data-found token
532: FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
533: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_NO_DATA_FOUND');
534: -- Bug 876171: Replace the following line with new lines
535: -- JG_UTILITY_PKG.out(FND_MESSAGE.GET);
536: l_no_data_message := FND_MESSAGE.GET;
537: JG_UTILITY_PKG.out(RPAD(' ', 75)||RPAD(l_no_data_message,30)||RPAD(' ', 75));
538: ELSE
539: --

Line 537: JG_UTILITY_PKG.out(RPAD(' ', 75)||RPAD(l_no_data_message,30)||RPAD(' ', 75));

533: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_NO_DATA_FOUND');
534: -- Bug 876171: Replace the following line with new lines
535: -- JG_UTILITY_PKG.out(FND_MESSAGE.GET);
536: l_no_data_message := FND_MESSAGE.GET;
537: JG_UTILITY_PKG.out(RPAD(' ', 75)||RPAD(l_no_data_message,30)||RPAD(' ', 75));
538: ELSE
539: --
540: -- Print totals
541: --

Line 544: JG_UTILITY_PKG.out(l_total_separator);

540: -- Print totals
541: --
542: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_JGZZTAJA_TOTAL_SEPARATOR');
543: l_total_separator := FND_MESSAGE.GET;
544: JG_UTILITY_PKG.out(l_total_separator);
545: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_JGZZTAJA_TOTAL');
546: l_total_message := FND_MESSAGE.GET;
547: JG_UTILITY_PKG.out(RPAD(' ', 41)||RPAD(l_total_message, 40)||
548: LPAD(SUBSTR(NVL(TO_CHAR(lp_total_fiscal_accted_dr_amt,

Line 547: JG_UTILITY_PKG.out(RPAD(' ', 41)||RPAD(l_total_message, 40)||

543: l_total_separator := FND_MESSAGE.GET;
544: JG_UTILITY_PKG.out(l_total_separator);
545: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_JGZZTAJA_TOTAL');
546: l_total_message := FND_MESSAGE.GET;
547: JG_UTILITY_PKG.out(RPAD(' ', 41)||RPAD(l_total_message, 40)||
548: LPAD(SUBSTR(NVL(TO_CHAR(lp_total_fiscal_accted_dr_amt,
549: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||' '||
550: LPAD(SUBSTR(NVL(TO_CHAR(lp_total_fiscal_accted_cr_amt,
551: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15)||

Line 556: JG_UTILITY_PKG.log('< JG_ALLOCATE_JOURNALS_PKG.write_allocated_lines_output');

552: LPAD(SUBSTR(NVL(TO_CHAR(JG_CREATE_JOURNALS_PKG.G_total_alloc_accted_dr_amt,
553: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 53)||' '||
554: LPAD(SUBSTR(NVL(TO_CHAR(JG_CREATE_JOURNALS_PKG.G_total_alloc_accted_cr_amt,
555: JG_JOURNAL_ALLOCATIONS_PKG.G_func_currency_format_mask), ' '), 1, 15), 15));
556: JG_UTILITY_PKG.log('< JG_ALLOCATE_JOURNALS_PKG.write_allocated_lines_output');
557: END IF;
558: END write_allocated_lines_output;
559:
560:

Line 589: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.get_dynamic_select_string');

585: l_rule_set_where VARCHAR2(200) := NULL;
586: l_account_type_where VARCHAR2(200) := NULL;
587: l_order_clause VARCHAR2(200) := NULL;
588: BEGIN
589: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.get_dynamic_select_string');
590: --
591: -- Allocation
592: --
593: IF (JG_JOURNAL_ALLOCATIONS_PKG.G_unalloc_request_id IS NULL) THEN

Line 598: JG_UTILITY_PKG.debug('l_sob_where = ' || l_sob_where);

594: --
595: -- Set of Books ID
596: -- GC Ledger Architecture change:
597: l_sob_where := 'AND jlv.ledger_id = '||TO_CHAR(JG_JOURNAL_ALLOCATIONS_PKG.G_set_of_books_id)||' ';
598: JG_UTILITY_PKG.debug('l_sob_where = ' || l_sob_where);
599: --
600: -- Period Name
601: --
602: IF JG_JOURNAL_ALLOCATIONS_PKG.G_period_name IS NOT NULL THEN

Line 604: JG_UTILITY_PKG.debug('l_period_name_where = ' || l_period_name_where);

600: -- Period Name
601: --
602: IF JG_JOURNAL_ALLOCATIONS_PKG.G_period_name IS NOT NULL THEN
603: l_period_name_where := 'AND jlv.period_name = '''||JG_JOURNAL_ALLOCATIONS_PKG.G_period_name||''' ';
604: JG_UTILITY_PKG.debug('l_period_name_where = ' || l_period_name_where);
605: END IF;
606: --
607: -- Currency Code
608: --

Line 611: JG_UTILITY_PKG.debug('l_currency_code_where = ' ||l_currency_code_where);

607: -- Currency Code
608: --
609: IF JG_JOURNAL_ALLOCATIONS_PKG.G_currency_code IS NOT NULL THEN
610: l_currency_code_where := 'AND jlv.currency_code = '''||JG_JOURNAL_ALLOCATIONS_PKG.G_currency_code||''' ';
611: JG_UTILITY_PKG.debug('l_currency_code_where = ' ||l_currency_code_where);
612: END IF;
613: --
614: -- Balancing Segment Where
615: --

Line 619: JG_UTILITY_PKG.debug('l_bal_seg_where = ' ||l_bal_seg_where);

615: --
616: IF (JG_JOURNAL_ALLOCATIONS_PKG.G_balance_segment_value IS NOT NULL) THEN
617: l_bal_seg_where := 'AND ' || JG_JOURNAL_ALLOCATIONS_PKG.G_acct_flex_segmt_arr(JG_JOURNAL_ALLOCATIONS_PKG.G_bal_segment_num).segment_col_name ||
618: ' = '''||JG_JOURNAL_ALLOCATIONS_PKG.G_balance_segment_value||'''';
619: JG_UTILITY_PKG.debug('l_bal_seg_where = ' ||l_bal_seg_where);
620: END IF;
621: --
622: -- Balance Type and budget version id OR encumbrance type id
623: --

Line 625: JG_UTILITY_PKG.debug('l_bal_type_where = ' || l_bal_type_where);

621: --
622: -- Balance Type and budget version id OR encumbrance type id
623: --
624: l_bal_type_where := ' AND jlv.actual_flag = '''||JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type||''' ';
625: JG_UTILITY_PKG.debug('l_bal_type_where = ' || l_bal_type_where);
626:
627: IF (JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type = 'B') THEN
628: l_budenc_where := ' AND jlv.budget_version_id = '|| TO_CHAR(JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type_id)||' ';
629: JG_UTILITY_PKG.debug('l_budenc_where = ' || l_budenc_where);

Line 629: JG_UTILITY_PKG.debug('l_budenc_where = ' || l_budenc_where);

625: JG_UTILITY_PKG.debug('l_bal_type_where = ' || l_bal_type_where);
626:
627: IF (JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type = 'B') THEN
628: l_budenc_where := ' AND jlv.budget_version_id = '|| TO_CHAR(JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type_id)||' ';
629: JG_UTILITY_PKG.debug('l_budenc_where = ' || l_budenc_where);
630: ELSIF (JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type = 'E') THEN
631: l_budenc_where := ' AND jlv.encumbrance_type_id = '||
632: TO_CHAR(JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type_id)||' ';
633: JG_UTILITY_PKG.debug('l_budenc_where = ' || l_budenc_where);

Line 633: JG_UTILITY_PKG.debug('l_budenc_where = ' || l_budenc_where);

629: JG_UTILITY_PKG.debug('l_budenc_where = ' || l_budenc_where);
630: ELSIF (JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type = 'E') THEN
631: l_budenc_where := ' AND jlv.encumbrance_type_id = '||
632: TO_CHAR(JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type_id)||' ';
633: JG_UTILITY_PKG.debug('l_budenc_where = ' || l_budenc_where);
634: END IF;
635: l_allocate_where := ' AND jlv.status||'''' = ''P'' AND jlv.request_id IS NULL ';
636: JG_UTILITY_PKG.debug('l_allocate_where = '|| l_allocate_where);
637:

Line 636: JG_UTILITY_PKG.debug('l_allocate_where = '|| l_allocate_where);

632: TO_CHAR(JG_JOURNAL_ALLOCATIONS_PKG.G_balance_type_id)||' ';
633: JG_UTILITY_PKG.debug('l_budenc_where = ' || l_budenc_where);
634: END IF;
635: l_allocate_where := ' AND jlv.status||'''' = ''P'' AND jlv.request_id IS NULL ';
636: JG_UTILITY_PKG.debug('l_allocate_where = '|| l_allocate_where);
637:
638: l_inline_view_clause := '(SELECT ccr.cc_range_id '||
639: ', ccr.cc_range_low '||
640: ', ccr.cc_range_high '||

Line 675: JG_UTILITY_PKG.debug('l_cc_range_where = '|| l_cc_range_where);

671: END IF;
672: ELSE
673: l_cc_range_where := '1 = 1 ';
674: END IF;
675: JG_UTILITY_PKG.debug('l_cc_range_where = '|| l_cc_range_where);
676:
677: IF JG_JOURNAL_ALLOCATIONS_PKG.G_acct_flex_segmt_arr(JG_JOURNAL_ALLOCATIONS_PKG.G_acct_segment_num).segment_vset_fmt_type <> 'N' THEN
678: l_acct_range_where := ' AND jlv.'||JG_JOURNAL_ALLOCATIONS_PKG.G_acct_flex_segmt_arr(JG_JOURNAL_ALLOCATIONS_PKG.G_acct_segment_num).segment_col_name||
679: ' BETWEEN ranges.account_range_low (+) AND ranges.account_range_high (+) ';

Line 702: JG_UTILITY_PKG.debug('l_allocate_where = '|| l_allocate_where);

698: ', NULL '||
699: ', NULL ';
700: l_hint_clause := '/*+ INDEX(jlv JG_ZZ_TA_ALLOCATED_LINES_N1) */';
701: l_allocate_where := ' AND jlv.request_id = '|| TO_CHAR(JG_JOURNAL_ALLOCATIONS_PKG.G_unalloc_request_id) || ' ';
702: JG_UTILITY_PKG.debug('l_allocate_where = '|| l_allocate_where);
703: END IF;
704: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_dynamic_select_string');
705: RETURN 'SELECT '||l_hint_clause||' jlv.je_batch_id '||
706: ', jlv.je_batch_name '||

Line 704: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_dynamic_select_string');

700: l_hint_clause := '/*+ INDEX(jlv JG_ZZ_TA_ALLOCATED_LINES_N1) */';
701: l_allocate_where := ' AND jlv.request_id = '|| TO_CHAR(JG_JOURNAL_ALLOCATIONS_PKG.G_unalloc_request_id) || ' ';
702: JG_UTILITY_PKG.debug('l_allocate_where = '|| l_allocate_where);
703: END IF;
704: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.get_dynamic_select_string');
705: RETURN 'SELECT '||l_hint_clause||' jlv.je_batch_id '||
706: ', jlv.je_batch_name '||
707: ', jlv.je_header_id '||
708: ', jlv.je_header_name '||

Line 824: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.record_locked');

820: --------------------------------------------------------------------- */
821: FUNCTION record_locked RETURN BOOLEAN IS
822: l_header_id gl_je_lines.je_header_id%TYPE;
823: BEGIN
824: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.record_locked');
825: JG_UTILITY_PKG.debug('rowid = '||CHARTOROWID(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.row_id));
826:
827: SELECT je_header_id
828: INTO l_header_id

Line 825: JG_UTILITY_PKG.debug('rowid = '||CHARTOROWID(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.row_id));

821: FUNCTION record_locked RETURN BOOLEAN IS
822: l_header_id gl_je_lines.je_header_id%TYPE;
823: BEGIN
824: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.record_locked');
825: JG_UTILITY_PKG.debug('rowid = '||CHARTOROWID(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.row_id));
826:
827: SELECT je_header_id
828: INTO l_header_id
829: FROM gl_je_lines

Line 833: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.record_locked');

829: FROM gl_je_lines
830: WHERE rowid = CHARTOROWID(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.row_id)
831: FOR UPDATE OF je_header_id NOWAIT;
832:
833: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.record_locked');
834: RETURN FALSE;
835: EXCEPTION
836: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
837: JG_UTILITY_PKG.debug( 'Record is Locked');

Line 837: JG_UTILITY_PKG.debug( 'Record is Locked');

833: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.record_locked');
834: RETURN FALSE;
835: EXCEPTION
836: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
837: JG_UTILITY_PKG.debug( 'Record is Locked');
838: RETURN TRUE;
839: WHEN OTHERS THEN
840: JG_UTILITY_PKG.debug( 'OTHERS Failure '||TO_CHAR(SQLCODE)||': '||SQLERRM);
841: RAISE;

Line 840: JG_UTILITY_PKG.debug( 'OTHERS Failure '||TO_CHAR(SQLCODE)||': '||SQLERRM);

836: WHEN APP_EXCEPTION.RECORD_LOCK_EXCEPTION THEN
837: JG_UTILITY_PKG.debug( 'Record is Locked');
838: RETURN TRUE;
839: WHEN OTHERS THEN
840: JG_UTILITY_PKG.debug( 'OTHERS Failure '||TO_CHAR(SQLCODE)||': '||SQLERRM);
841: RAISE;
842: END record_locked;
843:
844: /* ---------------------------------------------------------------------

Line 862: JG_UTILITY_PKG.debug('Record Locked Processing');

858:
859: BEGIN
860:
861: IF (JG_ALLOCATE_JOURNALS_PKG.Record_Locked) THEN
862: JG_UTILITY_PKG.debug('Record Locked Processing');
863: p_err_msg_code := 'JG_ZZ_RECORD_LOCKED';
864: RETURN FALSE;
865: --
866: -- Allocation mode

Line 952: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.allocate');

948: l_unal_ndf_flag NUMBER := 0;
949: l_no_data_found_message VARCHAR2(50);
950: l_eof_message VARCHAR2(50);
951: BEGIN
952: JG_UTILITY_PKG.log( '> JG_ALLOCATE_JOURNALS_PKG.allocate');
953: --
954: -- Prepare the execution report Title and Error Headings;
955: -- for unallocation, the same column headings are used with different titles.
956: --

Line 963: JG_UTILITY_PKG.debug( 'Execute Journal Select');

959: -- Prepare the main SQL statement, the dynamic parts
960: --
961: JG_ALLOCATE_JOURNALS_PKG.prepare_journal_select;
962:
963: JG_UTILITY_PKG.debug( 'Execute Journal Select');
964:
965: l_dummy_int := DBMS_SQL.EXECUTE(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c);
966:
967: JG_UTILITY_PKG.debug(TO_CHAR(SYSDATE, 'HH24:MI:SS'));

Line 967: JG_UTILITY_PKG.debug(TO_CHAR(SYSDATE, 'HH24:MI:SS'));

963: JG_UTILITY_PKG.debug( 'Execute Journal Select');
964:
965: l_dummy_int := DBMS_SQL.EXECUTE(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c);
966:
967: JG_UTILITY_PKG.debug(TO_CHAR(SYSDATE, 'HH24:MI:SS'));
968: -- Loop for each row
969: WHILE DBMS_SQL.FETCH_ROWS(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c) > 0 LOOP
970: DBMS_SQL.COLUMN_VALUE(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c, 1 ,
971: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.je_batch_id);

Line 1160: JG_UTILITY_PKG.debug('Dynamic cursor column assignments: finished');

1156: DBMS_SQL.COLUMN_VALUE(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c, 94,
1157: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cc_range_description);
1158: DBMS_SQL.COLUMN_VALUE(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c, 95,
1159: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.rule_set_name);
1160: JG_UTILITY_PKG.debug('Dynamic cursor column assignments: finished');
1161: JG_UTILITY_PKG.debug('cost_center = '||JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cost_center);
1162: JG_UTILITY_PKG.debug('cc_id = '||
1163: to_char(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.code_combination_id));
1164:

Line 1161: JG_UTILITY_PKG.debug('cost_center = '||JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cost_center);

1157: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cc_range_description);
1158: DBMS_SQL.COLUMN_VALUE(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c, 95,
1159: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.rule_set_name);
1160: JG_UTILITY_PKG.debug('Dynamic cursor column assignments: finished');
1161: JG_UTILITY_PKG.debug('cost_center = '||JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cost_center);
1162: JG_UTILITY_PKG.debug('cc_id = '||
1163: to_char(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.code_combination_id));
1164:
1165: --

Line 1162: JG_UTILITY_PKG.debug('cc_id = '||

1158: DBMS_SQL.COLUMN_VALUE(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c, 95,
1159: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.rule_set_name);
1160: JG_UTILITY_PKG.debug('Dynamic cursor column assignments: finished');
1161: JG_UTILITY_PKG.debug('cost_center = '||JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.cost_center);
1162: JG_UTILITY_PKG.debug('cc_id = '||
1163: to_char(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.code_combination_id));
1164:
1165: --
1166: -- Get Entered Currency Format Mask and the currency's precision for reporting and calculating any rounding errors

Line 1171: JG_UTILITY_PKG.debug( 'curr format mask = '||JG_ALLOCATE_JOURNALS_PKG.G_currency_format_mask);

1167: --
1168: -- Bug 2638803, changed format mask length from 15 to 18
1169: JG_ALLOCATE_JOURNALS_PKG.G_currency_format_mask :=
1170: FND_CURRENCY.GET_FORMAT_MASK(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.currency_code,18);
1171: JG_UTILITY_PKG.debug( 'curr format mask = '||JG_ALLOCATE_JOURNALS_PKG.G_currency_format_mask);
1172: FND_CURRENCY.GET_INFO(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.currency_code,
1173: JG_ALLOCATE_JOURNALS_PKG.G_currency_precision,
1174: l_ext_precision,
1175: l_min_acct_unit);

Line 1176: JG_UTILITY_PKG.debug( 'curr precision = '||JG_ALLOCATE_JOURNALS_PKG.G_currency_precision);

1172: FND_CURRENCY.GET_INFO(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.currency_code,
1173: JG_ALLOCATE_JOURNALS_PKG.G_currency_precision,
1174: l_ext_precision,
1175: l_min_acct_unit);
1176: JG_UTILITY_PKG.debug( 'curr precision = '||JG_ALLOCATE_JOURNALS_PKG.G_currency_precision);
1177:
1178:
1179: -- ********************* VALIDATION ***************************************
1180: -- In the validation, the following things are checked:

Line 1188: JG_UTILITY_PKG.debug('Invalid Journal Line found');

1184: l_is_valid_row := Valid_Journal(l_err_msg_code);
1185:
1186: IF NOT l_is_valid_row AND l_err_msg_code IS NOT NULL THEN
1187:
1188: JG_UTILITY_PKG.debug('Invalid Journal Line found');
1189: IF (JG_JOURNAL_ALLOCATIONS_PKG.G_Error_Handling <> 'I') THEN
1190: JG_JOURNAL_ALLOCATIONS_PKG.G_retcode := '1';
1191: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name,l_err_msg_code);
1192: JG_CREATE_JOURNALS_PKG.write_error_to_output;

Line 1217: JG_UTILITY_PKG.debug('First Valid Row Initialization');

1213: -- current record returned.
1214: -- Used in checking whether to create an offset account line first time round
1215: --
1216: IF l_first_valid_row THEN
1217: JG_UTILITY_PKG.debug('First Valid Row Initialization');
1218: JG_ALLOCATE_JOURNALS_PKG.G_last_journal_qry_rec.offset_account := NULL;
1219: JG_ALLOCATE_JOURNALS_PKG.G_last_journal_qry_rec.account_range_id :=
1220: JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.account_range_id;
1221: JG_ALLOCATE_JOURNALS_PKG.G_last_journal_qry_rec.l_je_lines_v_rec.currency_code :=

Line 1243: JG_UTILITY_PKG.debug('fiscal accted cr running total = '||to_char(l_total_fiscal_accted_cr_amt));

1239: NVL(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.accounted_cr, 0);
1240: l_total_fiscal_accted_dr_amt := l_total_fiscal_accted_dr_amt +
1241: NVL(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.accounted_dr, 0);
1242:
1243: JG_UTILITY_PKG.debug('fiscal accted cr running total = '||to_char(l_total_fiscal_accted_cr_amt));
1244: JG_UTILITY_PKG.debug('fiscal accted dr running total = '||to_char(l_total_fiscal_accted_dr_amt));
1245:
1246: --
1247: -- Insert line to show the journal has been allocated

Line 1244: JG_UTILITY_PKG.debug('fiscal accted dr running total = '||to_char(l_total_fiscal_accted_dr_amt));

1240: l_total_fiscal_accted_dr_amt := l_total_fiscal_accted_dr_amt +
1241: NVL(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.accounted_dr, 0);
1242:
1243: JG_UTILITY_PKG.debug('fiscal accted cr running total = '||to_char(l_total_fiscal_accted_cr_amt));
1244: JG_UTILITY_PKG.debug('fiscal accted dr running total = '||to_char(l_total_fiscal_accted_dr_amt));
1245:
1246: --
1247: -- Insert line to show the journal has been allocated
1248: --

Line 1269: JG_UTILITY_PKG.log('> JG_ZZ_TA_ALLOCATED_LINES_PKG.delete_row');

1265: --
1266: -- Unallocation Mode
1267: --
1268: ELSE
1269: JG_UTILITY_PKG.log('> JG_ZZ_TA_ALLOCATED_LINES_PKG.delete_row');
1270: JG_ZZ_TA_ALLOCATED_LINES_PKG.delete_row(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.alloc_row_id);
1271: JG_UTILITY_PKG.log('< JG_ZZ_TA_ALLOCATED_LINES_PKG.delete_row');
1272: --
1273: -- Write Unallocated Fiscal Journal Line to the Output File

Line 1271: JG_UTILITY_PKG.log('< JG_ZZ_TA_ALLOCATED_LINES_PKG.delete_row');

1267: --
1268: ELSE
1269: JG_UTILITY_PKG.log('> JG_ZZ_TA_ALLOCATED_LINES_PKG.delete_row');
1270: JG_ZZ_TA_ALLOCATED_LINES_PKG.delete_row(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec.l_je_lines_v_rec.alloc_row_id);
1271: JG_UTILITY_PKG.log('< JG_ZZ_TA_ALLOCATED_LINES_PKG.delete_row');
1272: --
1273: -- Write Unallocated Fiscal Journal Line to the Output File
1274: --
1275: JG_CREATE_JOURNALS_PKG.write_error_to_output;

Line 1288: JG_UTILITY_PKG.debug('End of Journal Lines Loop');

1284: JG_ALLOCATE_JOURNALS_PKG.G_last_journal_qry_rec := JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_rec;
1285: END IF; -- Valid Journal?
1286: END LOOP; -- Journals
1287:
1288: JG_UTILITY_PKG.debug('End of Journal Lines Loop');
1289: JG_UTILITY_PKG.debug(TO_CHAR(SYSDATE, 'HH24:MI:SS'));
1290:
1291: DBMS_SQL.CLOSE_CURSOR(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c);
1292:

Line 1289: JG_UTILITY_PKG.debug(TO_CHAR(SYSDATE, 'HH24:MI:SS'));

1285: END IF; -- Valid Journal?
1286: END LOOP; -- Journals
1287:
1288: JG_UTILITY_PKG.debug('End of Journal Lines Loop');
1289: JG_UTILITY_PKG.debug(TO_CHAR(SYSDATE, 'HH24:MI:SS'));
1290:
1291: DBMS_SQL.CLOSE_CURSOR(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c);
1292:
1293: -- Bug 876171: Add new lines to print no-data-found token

Line 1299: JG_UTILITY_PKG.out(RPAD(' ',75)||RPAD(l_no_data_found_message,30)||RPAD(' ',75));

1295: IF l_fail_ndf_flag = 0 THEN
1296: FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
1297: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_NO_DATA_FOUND');
1298: l_no_data_found_message := FND_MESSAGE.GET;
1299: JG_UTILITY_PKG.out(RPAD(' ',75)||RPAD(l_no_data_found_message,30)||RPAD(' ',75));
1300: END IF;
1301: ELSE
1302: IF l_unal_ndf_flag = 0 THEN
1303: FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);

Line 1306: JG_UTILITY_PKG.out(RPAD(' ',45)||RPAD(l_no_data_found_message,30)||RPAD(' ',105));

1302: IF l_unal_ndf_flag = 0 THEN
1303: FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
1304: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_NO_DATA_FOUND');
1305: l_no_data_found_message := FND_MESSAGE.GET;
1306: JG_UTILITY_PKG.out(RPAD(' ',45)||RPAD(l_no_data_found_message,30)||RPAD(' ',105));
1307: END IF;
1308: END IF;
1309:
1310: IF (JG_JOURNAL_ALLOCATIONS_PKG.G_unalloc_request_id IS NULL) THEN

Line 1315: JG_UTILITY_PKG.debug('Last offset account was '||JG_ALLOCATE_JOURNALS_PKG.G_last_journal_qry_rec.offset_account);

1311: --
1312: -- If the last row returned had an offset account at the account range level, we need
1313: -- to create its corresponding offset line.
1314: --
1315: JG_UTILITY_PKG.debug('Last offset account was '||JG_ALLOCATE_JOURNALS_PKG.G_last_journal_qry_rec.offset_account);
1316: IF JG_ALLOCATE_JOURNALS_PKG.G_last_journal_qry_rec.offset_account IS NOT NULL THEN
1317: JG_CREATE_JOURNALS_PKG.Create_Offset_For_Acct_Range;
1318: END IF;
1319:

Line 1324: JG_UTILITY_PKG.debug('Write Rep Headings: End');

1320: --
1321: -- For Allocation, after allocating, the allocated lines are printed to the report
1322: --
1323: JG_ALLOCATE_JOURNALS_PKG.Write_Report_Headings;
1324: JG_UTILITY_PKG.debug('Write Rep Headings: End');
1325: JG_ALLOCATE_JOURNALS_PKG.write_allocated_lines_output(l_total_fiscal_accted_cr_amt,
1326: l_total_fiscal_accted_dr_amt);
1327: END IF;
1328:

Line 1335: JG_UTILITY_PKG.out(RPAD(' ',75)||RPAD(l_eof_message,30)||RPAD(' ', 75));

1331: IF JG_CREATE_JOURNALS_PKG.i > 0 OR l_fail_ndf_flag > 0 THEN
1332: FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
1333: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_END_OF_REPORT');
1334: l_eof_message := FND_MESSAGE.GET;
1335: JG_UTILITY_PKG.out(RPAD(' ',75)||RPAD(l_eof_message,30)||RPAD(' ', 75));
1336: END IF;
1337: ELSE
1338: IF l_unal_ndf_flag > 0 THEN
1339: FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);

Line 1342: JG_UTILITY_PKG.out(RPAD(' ',45)||RPAD(l_eof_message,30)||RPAD(' ', 105));

1338: IF l_unal_ndf_flag > 0 THEN
1339: FND_FILE.NEW_LINE(FND_FILE.OUTPUT,1);
1340: FND_MESSAGE.SET_NAME(JG_JOURNAL_ALLOCATIONS_PKG.G_JG_appln_short_name, 'JG_ZZ_END_OF_REPORT');
1341: l_eof_message := FND_MESSAGE.GET;
1342: JG_UTILITY_PKG.out(RPAD(' ',45)||RPAD(l_eof_message,30)||RPAD(' ', 105));
1343: END IF;
1344: END IF;
1345:
1346: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.allocate');

Line 1346: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.allocate');

1342: JG_UTILITY_PKG.out(RPAD(' ',45)||RPAD(l_eof_message,30)||RPAD(' ', 105));
1343: END IF;
1344: END IF;
1345:
1346: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.allocate');
1347: EXCEPTION
1348: WHEN OTHERS THEN
1349: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.allocate');
1350: IF (DBMS_SQL.IS_OPEN(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c)) THEN

Line 1349: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.allocate');

1345:
1346: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.allocate');
1347: EXCEPTION
1348: WHEN OTHERS THEN
1349: JG_UTILITY_PKG.log( '< JG_ALLOCATE_JOURNALS_PKG.allocate');
1350: IF (DBMS_SQL.IS_OPEN(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c)) THEN
1351: DBMS_SQL.CLOSE_CURSOR(JG_ALLOCATE_JOURNALS_PKG.G_journal_qry_c);
1352: END IF;
1353: RAISE;