[Home] [Help]
39: * 05-Nov-1999 Rajesh Seshadri Bug 1039469 - Performance enhancement
40: * The gmf_gl_get_balances package is redesigned to fill a table with
41: * the code combinations and then select from this table. The queries
42: * were also rewritten to enhance their performance.
43: * Wrapped all calls to fnd_file inside a procedure and included
44: * trace messages throughout for easier debugging
45: * 30-Oct-2002 R.Sharath Kumar Bug# 2641405
46: * Added NOCOPY hint
47: * 24-SEP-2003 Venkat Chukkapalli Bug# 3150227
156: END IF;
157:
158: /**
159: * Uncomment the line below to wrote to a local file
160: * fnd_file.put_names( 'gmfaloc.log','gmfaloc.out','/tmp' );
161: */
162: alloc_log_msg( C_LOG_FILE, 'Starting Cost Allocation process' );
163: alloc_log_msg( C_LOG_FILE, 'Legal Entity Id: '|| g_legal_entity_id);
164: alloc_log_msg( C_LOG_FILE, 'Cost Calendar : '|| g_calendar_code);
1789: /*********************************************************************
1790: * PROCEDURE
1791: * alloc_log_msg
1792: * DESCRIPTION
1793: * Writes messages to FND_FILE.LOG or FND_FILE.OUTPUT
1794: *
1795: * INPUT PARAMETERS
1796: * pi_file : indicates LOG(=1) or OUTPUT(=2) file
1797: * pi_msg : message to be printed
1814:
1815: l_dt := TO_CHAR( SYSDATE, 'YYYY-MM-DD HH24:MI:SS' );
1816: IF( pi_file = C_OUT_FILE)
1817: THEN
1818: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, pi_msg || ' ' || l_dt );
1819: ELSE
1820: FND_FILE.PUT_LINE( FND_FILE.LOG, pi_msg || ' ' || l_dt );
1821: END IF;
1822: END alloc_log_msg;
1816: IF( pi_file = C_OUT_FILE)
1817: THEN
1818: FND_FILE.PUT_LINE( FND_FILE.OUTPUT, pi_msg || ' ' || l_dt );
1819: ELSE
1820: FND_FILE.PUT_LINE( FND_FILE.LOG, pi_msg || ' ' || l_dt );
1821: END IF;
1822: END alloc_log_msg;
1823: END GMF_ALLOC_PROC;