eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.LNS_REP_UTILS dependencies on FND_LOG

Line 103: FND_LOG.STRING(p_msg_level, G_PKG_NAME, p_msg);

99: IS
100: BEGIN
101: if (p_msg_level >= G_MSG_LEVEL) then
102:
103: FND_LOG.STRING(p_msg_level, G_PKG_NAME, p_msg);
104:
105: end if;
106:
107: EXCEPTION

Line 109: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: ' || sqlerrm);

105: end if;
106:
107: EXCEPTION
108: WHEN OTHERS THEN
109: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'ERROR: ' || sqlerrm);
110: END;
111:
112:
113:

Line 134: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');

130: /*-----------------------------------------------------------------------+
131: | Cursor Declarations |
132: +-----------------------------------------------------------------------*/
133: BEGIN
134: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
135:
136: LOOP
137: l_end :=
138: DBMS_LOB.INSTR (lob_loc => lob_loc,

Line 159: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

155: --Fnd_File.PUT_line(Fnd_File.LOG,l_one_line);
156: Fnd_File.PUT_line(Fnd_File.OUTPUT,l_one_line);
157:
158: END LOOP;
159: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
160: END PRINT_CLOB;
161: PROCEDURE PROCESS_PORTFOLIO_REPORT(ERRBUF OUT NOCOPY VARCHAR2
162: ,RETCODE OUT NOCOPY VARCHAR2
163: ,LOAN_CLASS IN VARCHAR2

Line 304: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');

300: 'lh.loan_currency = :CURRENCY_CODE and ' ||
301: 'lh.org_id = :ORG_ID';
302: l_temp_where_clause VARCHAR2(200);
303: BEGIN
304: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
305: l_loan_type_id := loan_type_id;
306: l_legal_entity_id := legal_entity_id;
307: g_loan_start_date_from := trunc(fnd_date.canonical_to_date(loan_start_date_from));
308: g_loan_start_date_to := trunc(fnd_date.canonical_to_date(loan_start_date_to));

Line 524: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

520: END IF;
521:
522: dbms_lob.writeAppend(tempResult, length(l_close_tag), l_close_tag);
523: print_clob(lob_loc => tempResult);
524: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
525: EXCEPTION
526: WHEN OTHERS THEN
527: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name
528: || ' -');

Line 527: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name

523: print_clob(lob_loc => tempResult);
524: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
525: EXCEPTION
526: WHEN OTHERS THEN
527: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name
528: || ' -');
529: RAISE;
530: END PROCESS_PORTFOLIO_REPORT;
531: PROCEDURE PROCESS_RECON_REPORT(ERRBUF OUT NOCOPY VARCHAR2

Line 822: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');

818: ' trunc(am.DUE_DATE) between lns_rep_utils.get_bill_due_date_from() ' ||
819: ' and lns_rep_utils.get_bill_due_date_to())';
820: l_temp_where_clause VARCHAR2(200);
821: BEGIN
822: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
823: l_loan_type_id := loan_type_id;
824: l_legal_entity_id := legal_entity_id;
825: g_bill_due_date_from := trunc(fnd_date.canonical_to_date(bill_due_date_from));
826: g_bill_due_date_to := trunc(fnd_date.canonical_to_date(bill_due_date_to));

Line 981: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

977: END IF;
978:
979: dbms_lob.writeAppend(tempResult, length(l_close_tag), l_close_tag);
980: print_clob(lob_loc => tempResult);
981: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
982: EXCEPTION
983: WHEN OTHERS THEN
984: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name
985: || ' -');

Line 984: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name

980: print_clob(lob_loc => tempResult);
981: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
982: EXCEPTION
983: WHEN OTHERS THEN
984: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name
985: || ' -');
986: RAISE;
987: END PROCESS_RECON_REPORT;
988: PROCEDURE GEN_AGREEMENT_XML(p_AgreementXML OUT NOCOPY CLOB

Line 1598: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');

1594: terr.language = userenv('LANG') and
1595: lh.loan_id = X_Loan_Id and
1596: lh.org_id = X_Org_Id;
1597: BEGIN
1598: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1599: l_org_id := MO_GLOBAL.GET_CURRENT_ORG_ID();
1600: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'org_id = ' || l_org_id);
1601: lns_financials.runAmortization(p_api_version => 1.0
1602: ,p_init_msg_list => 'T'

Line 1600: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'org_id = ' || l_org_id);

1596: lh.org_id = X_Org_Id;
1597: BEGIN
1598: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1599: l_org_id := MO_GLOBAL.GET_CURRENT_ORG_ID();
1600: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'org_id = ' || l_org_id);
1601: lns_financials.runAmortization(p_api_version => 1.0
1602: ,p_init_msg_list => 'T'
1603: ,p_commit => 'F'
1604: ,p_loan_ID => p_loan_id

Line 1678: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Opening c_get_principal_balance');

1674: gl_sets_of_books gsb
1675: WHERE hou.organization_id = l_org_id
1676: AND gsb.set_of_books_id = hou.set_of_books_id;
1677:
1678: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Opening c_get_principal_balance');
1679: open c_get_principal_balance(p_loan_id);
1680: fetch c_get_principal_balance into l_total_principal_balance;
1681: close c_get_principal_balance;
1682: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Opening C_agreement');

Line 1682: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Opening C_agreement');

1678: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Opening c_get_principal_balance');
1679: open c_get_principal_balance(p_loan_id);
1680: fetch c_get_principal_balance into l_total_principal_balance;
1681: close c_get_principal_balance;
1682: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Opening C_agreement');
1683: OPEN C_agreement(X_Loan_Id => p_loan_id,
1684: X_Org_Id => l_org_id,
1685: pTotalPrincipalBalance => l_total_principal_balance);
1686: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Fetching C_agreement');

Line 1686: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Fetching C_agreement');

1682: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Opening C_agreement');
1683: OPEN C_agreement(X_Loan_Id => p_loan_id,
1684: X_Org_Id => l_org_id,
1685: pTotalPrincipalBalance => l_total_principal_balance);
1686: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Fetching C_agreement');
1687: FETCH C_agreement INTO l_result;
1688: IF C_agreement%ROWCOUNT <> 0
1689: THEN
1690: l_rows_processed := 1;

Line 1692: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'C_agreement%ROWCOUNT ' || C_agreement%ROWCOUNT);

1688: IF C_agreement%ROWCOUNT <> 0
1689: THEN
1690: l_rows_processed := 1;
1691: END IF;
1692: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'C_agreement%ROWCOUNT ' || C_agreement%ROWCOUNT);
1693: CLOSE C_agreement;
1694: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_rows_processed ' || l_rows_processed);
1695: -- We are adding the LNSAGREEMENT and PARAMETERS TAGs so we have
1696: -- to offset the first line.

Line 1694: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_rows_processed ' || l_rows_processed);

1690: l_rows_processed := 1;
1691: END IF;
1692: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'C_agreement%ROWCOUNT ' || C_agreement%ROWCOUNT);
1693: CLOSE C_agreement;
1694: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_rows_processed ' || l_rows_processed);
1695: -- We are adding the LNSAGREEMENT and PARAMETERS TAGs so we have
1696: -- to offset the first line.
1697: IF l_rows_processed <> 0 THEN
1698: l_resultOffset := DBMS_LOB.INSTR(l_result,'>');

Line 1702: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_resultOffset ' || l_resultOffset);

1698: l_resultOffset := DBMS_LOB.INSTR(l_result,'>');
1699: ELSE
1700: l_resultOffset := 0;
1701: END IF;
1702: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_resultOffset ' || l_resultOffset);
1703:
1704: l_new_line := '
1705: ';
1706: /* Prepare the tag for the report heading */

Line 1717: LogMessage(FND_LOG.LEVEL_PROCEDURE, ' l_xml_header_length ' || l_xml_header_length);

1713: l_xml_header := l_xml_header ||l_new_line||' ';
1714: l_close_tag := l_new_line||''||l_new_line;
1715: l_xml_header_length := length(l_xml_header);
1716: IF l_rows_processed <> 0 THEN
1717: LogMessage(FND_LOG.LEVEL_PROCEDURE, ' l_xml_header_length ' || l_xml_header_length);
1718: dbms_lob.createtemporary(tempResult,FALSE,DBMS_LOB.CALL);
1719: dbms_lob.open(tempResult,dbms_lob.lob_readwrite);
1720: dbms_lob.writeAppend(tempResult, length(l_xml_header), l_xml_header);
1721:

Line 1722: LogMessage(FND_LOG.LEVEL_PROCEDURE, ' before dbms_lob.copy ' );

1718: dbms_lob.createtemporary(tempResult,FALSE,DBMS_LOB.CALL);
1719: dbms_lob.open(tempResult,dbms_lob.lob_readwrite);
1720: dbms_lob.writeAppend(tempResult, length(l_xml_header), l_xml_header);
1721:
1722: LogMessage(FND_LOG.LEVEL_PROCEDURE, ' before dbms_lob.copy ' );
1723: dbms_lob.copy(tempResult,l_result
1724: ,dbms_lob.getlength(l_result)-l_resultOffset
1725: ,l_xml_header_length,l_resultOffset);
1726: ELSE

Line 1734: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

1730: END IF;
1731:
1732: dbms_lob.writeAppend(tempResult, length(l_close_tag), l_close_tag);
1733: p_AgreementXML := tempResult;
1734: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1735: EXCEPTION
1736: WHEN OTHERS THEN
1737: RAISE;
1738: END GEN_AGREEMENT_XML;

Line 1752: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');

1748: l_api_name CONSTANT VARCHAR2(30) := 'CLOB_TO_FILE';
1749:
1750: BEGIN
1751:
1752: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1753: -- get length of internal lob and open the dest. file.
1754: l_clob_size := dbms_lob.getlength(p_clob);
1755:
1756: IF (l_clob_size = 0) THEN

Line 1757: LogMessage(FND_LOG.LEVEL_PROCEDURE,'CLOB is empty');

1753: -- get length of internal lob and open the dest. file.
1754: l_clob_size := dbms_lob.getlength(p_clob);
1755:
1756: IF (l_clob_size = 0) THEN
1757: LogMessage(FND_LOG.LEVEL_PROCEDURE,'CLOB is empty');
1758: RETURN;
1759: END IF;
1760:
1761: l_offset := 1;

Line 1772: LogMessage(FND_LOG.LEVEL_PROCEDURE,'chunk limit size is '||l_chunk_limit_size);

1768: l_chunk_limit_size := l_chunk_limit_size + l_chunk_size;
1769: END LOOP;
1770: l_chunk_limit_size := l_chunk_limit_size - l_chunk_size;
1771:
1772: LogMessage(FND_LOG.LEVEL_PROCEDURE,'chunk limit size is '||l_chunk_limit_size);
1773:
1774: l_new_line := '
1775: ';
1776:

Line 1777: LogMessage(FND_LOG.LEVEL_PROCEDURE,'Unloading... ' || l_clob_size);

1773:
1774: l_new_line := '
1775: ';
1776:
1777: LogMessage(FND_LOG.LEVEL_PROCEDURE,'Unloading... ' || l_clob_size);
1778:
1779: WHILE (l_clob_size > 0) LOOP
1780:
1781: -- LogMessage(FND_LOG.LEVEL_PROCEDURE,'Off Set: ' || l_offset);

Line 1781: -- LogMessage(FND_LOG.LEVEL_PROCEDURE,'Off Set: ' || l_offset);

1777: LogMessage(FND_LOG.LEVEL_PROCEDURE,'Unloading... ' || l_clob_size);
1778:
1779: WHILE (l_clob_size > 0) LOOP
1780:
1781: -- LogMessage(FND_LOG.LEVEL_PROCEDURE,'Off Set: ' || l_offset);
1782:
1783: l_chunk := dbms_lob.substr (p_clob, l_chunk_size, l_offset);
1784:
1785: --LogMessage(FND_LOG.LEVEL_PROCEDURE,'Off Set: ' || l_offset);

Line 1785: --LogMessage(FND_LOG.LEVEL_PROCEDURE,'Off Set: ' || l_offset);

1781: -- LogMessage(FND_LOG.LEVEL_PROCEDURE,'Off Set: ' || l_offset);
1782:
1783: l_chunk := dbms_lob.substr (p_clob, l_chunk_size, l_offset);
1784:
1785: --LogMessage(FND_LOG.LEVEL_PROCEDURE,'Off Set: ' || l_offset);
1786: --LogMessage(FND_LOG.LEVEL_PROCEDURE,'l_chunk ' || l_chunk);
1787:
1788: -- There should be one new line character(chr(10)) for every 32k when
1789: -- writing into the file using 'utl_file' package.

Line 1786: --LogMessage(FND_LOG.LEVEL_PROCEDURE,'l_chunk ' || l_chunk);

1782:
1783: l_chunk := dbms_lob.substr (p_clob, l_chunk_size, l_offset);
1784:
1785: --LogMessage(FND_LOG.LEVEL_PROCEDURE,'Off Set: ' || l_offset);
1786: --LogMessage(FND_LOG.LEVEL_PROCEDURE,'l_chunk ' || l_chunk);
1787:
1788: -- There should be one new line character(chr(10)) for every 32k when
1789: -- writing into the file using 'utl_file' package.
1790:

Line 1792: LogMessage(FND_LOG.LEVEL_PROCEDURE,'Reached into the Limit Size');

1788: -- There should be one new line character(chr(10)) for every 32k when
1789: -- writing into the file using 'utl_file' package.
1790:
1791: if((mod(l_offset,l_chunk_limit_size) = 1) AND (l_offset <> 1)) then
1792: LogMessage(FND_LOG.LEVEL_PROCEDURE,'Reached into the Limit Size');
1793:
1794: -- Inserting new line character(chr(10)) after the first appearing
1795: -- closing XML tag
1796: l_res_offset := instr(l_chunk,'>');

Line 1798: LogMessage(FND_LOG.LEVEL_PROCEDURE,'result Offset is '||l_res_offset);

1794: -- Inserting new line character(chr(10)) after the first appearing
1795: -- closing XML tag
1796: l_res_offset := instr(l_chunk,'>');
1797:
1798: LogMessage(FND_LOG.LEVEL_PROCEDURE,'result Offset is '||l_res_offset);
1799:
1800: if(l_res_offset > 0) then
1801: l_chunk := substr(l_chunk,1,l_res_offset)||l_new_line||substr(l_chunk,(l_res_offset+1),length(l_chunk));
1802: end if;

Line 1815: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');

1811:
1812: END LOOP;
1813:
1814: fnd_file.new_line(fnd_file.output,1);
1815: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1816:
1817: EXCEPTION
1818: WHEN OTHERS THEN
1819: LogMessage(FND_LOG.LEVEL_PROCEDURE,'EXCEPTION: OTHERS clob_to_file');

Line 1819: LogMessage(FND_LOG.LEVEL_PROCEDURE,'EXCEPTION: OTHERS clob_to_file');

1815: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1816:
1817: EXCEPTION
1818: WHEN OTHERS THEN
1819: LogMessage(FND_LOG.LEVEL_PROCEDURE,'EXCEPTION: OTHERS clob_to_file');
1820: LogMessage(FND_LOG.LEVEL_PROCEDURE,sqlcode);
1821: LogMessage(FND_LOG.LEVEL_PROCEDURE,sqlerrm);
1822: RAISE;
1823:

Line 1820: LogMessage(FND_LOG.LEVEL_PROCEDURE,sqlcode);

1816:
1817: EXCEPTION
1818: WHEN OTHERS THEN
1819: LogMessage(FND_LOG.LEVEL_PROCEDURE,'EXCEPTION: OTHERS clob_to_file');
1820: LogMessage(FND_LOG.LEVEL_PROCEDURE,sqlcode);
1821: LogMessage(FND_LOG.LEVEL_PROCEDURE,sqlerrm);
1822: RAISE;
1823:
1824: END;

Line 1821: LogMessage(FND_LOG.LEVEL_PROCEDURE,sqlerrm);

1817: EXCEPTION
1818: WHEN OTHERS THEN
1819: LogMessage(FND_LOG.LEVEL_PROCEDURE,'EXCEPTION: OTHERS clob_to_file');
1820: LogMessage(FND_LOG.LEVEL_PROCEDURE,sqlcode);
1821: LogMessage(FND_LOG.LEVEL_PROCEDURE,sqlerrm);
1822: RAISE;
1823:
1824: END;
1825:

Line 1855: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');

1851: select loan_status
1852: from lns_loan_headers_all lh
1853: where lh.loan_id = l_loan_id;
1854: BEGIN
1855: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1856: l_loan_id := loan_id;
1857: OPEN csr_loan_agreement;
1858: FETCH csr_loan_agreement
1859: INTO l_document_id, l_result_xml, l_version;

Line 1861: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'P_GENERATE_AGREEMENT VALUE IS '||P_GENERATE_AGREEMENT);

1857: OPEN csr_loan_agreement;
1858: FETCH csr_loan_agreement
1859: INTO l_document_id, l_result_xml, l_version;
1860:
1861: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'P_GENERATE_AGREEMENT VALUE IS '||P_GENERATE_AGREEMENT);
1862: IF csr_loan_agreement%NOTFOUND THEN
1863: l_agreement_exist_flag := 'N';
1864: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Agreement not found in lns_loan_documents');
1865: END IF;

Line 1864: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Agreement not found in lns_loan_documents');

1860:
1861: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'P_GENERATE_AGREEMENT VALUE IS '||P_GENERATE_AGREEMENT);
1862: IF csr_loan_agreement%NOTFOUND THEN
1863: l_agreement_exist_flag := 'N';
1864: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Agreement not found in lns_loan_documents');
1865: END IF;
1866:
1867:
1868: IF ((P_GENERATE_AGREEMENT = 'Y') OR (l_agreement_exist_flag = 'N')) THEN

Line 1872: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_loan_id is ' || l_loan_id ||

1868: IF ((P_GENERATE_AGREEMENT = 'Y') OR (l_agreement_exist_flag = 'N')) THEN
1869: OPEN csr_loan_status;
1870: FETCH csr_loan_status into l_loan_status;
1871: CLOSE csr_loan_status;
1872: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_loan_id is ' || l_loan_id ||
1873: 'l_loan_status is ' || l_loan_status);
1874: GEN_AGREEMENT_XML(p_AgreementXML=> l_result_xml,
1875: p_loan_id => loan_id);
1876: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'After call to GEN_AGREEMENT_XML ');

Line 1876: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'After call to GEN_AGREEMENT_XML ');

1872: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_loan_id is ' || l_loan_id ||
1873: 'l_loan_status is ' || l_loan_status);
1874: GEN_AGREEMENT_XML(p_AgreementXML=> l_result_xml,
1875: p_loan_id => loan_id);
1876: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'After call to GEN_AGREEMENT_XML ');
1877: IF l_loan_status NOT IN ('INCOMPLETE','PENDING') THEN
1878: IF (l_agreement_exist_flag = 'N') THEN
1879: l_version := 1;
1880: ELSE

Line 1883: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Creating History for the Loan Agreement - PRE API');

1879: l_version := 1;
1880: ELSE
1881: l_version := l_version + 1;
1882: /*
1883: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Creating History for the Loan Agreement - PRE API');
1884: --Call to record history
1885: LNS_LOAN_HISTORY_PUB.log_record_pre(
1886: p_id => l_document_id,
1887: p_primary_key_name => 'DOCUMENT_ID',

Line 1893: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_version is ' || l_version);

1889: );
1890: */
1891: END IF;
1892:
1893: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_version is ' || l_version);
1894:
1895: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Inserting agreement in lns_loan_documents');
1896: LNS_LOAN_DOCUMENTS_PKG.Insert_Row(X_DOCUMENT_ID => l_document_id
1897: ,P_SOURCE_ID => loan_id

Line 1895: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Inserting agreement in lns_loan_documents');

1891: END IF;
1892:
1893: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'l_version is ' || l_version);
1894:
1895: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Inserting agreement in lns_loan_documents');
1896: LNS_LOAN_DOCUMENTS_PKG.Insert_Row(X_DOCUMENT_ID => l_document_id
1897: ,P_SOURCE_ID => loan_id
1898: ,P_SOURCE_TABLE =>'LNS_LOAN_HEADERS_ALL'
1899: ,P_DOCUMENT_TYPE => 'LOAN_AGREEMENT'

Line 1905: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Creating History for the Loan Agreement - POST API');

1901: ,P_DOCUMENT_XML => l_result_xml
1902: ,P_OBJECT_VERSION_NUMBER => 1);
1903: /*
1904: IF (l_agreement_exist_flag = 'Y') THEN
1905: LogMessage(FND_LOG.LEVEL_PROCEDURE, 'Creating History for the Loan Agreement - POST API');
1906: LNS_LOAN_HISTORY_PUB.log_record_post(
1907: p_id => l_document_id,
1908: p_primary_key_name => 'DOCUMENT_ID',
1909: p_table_name => 'LNS_LOAN_DOCUMENTS',

Line 1918: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

1914: END IF;
1915: END IF;
1916: CLOSE csr_loan_agreement;
1917: clob_to_file(l_result_xml);
1918: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1919: EXCEPTION
1920: WHEN OTHERS THEN
1921: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name
1922: || ' -');

Line 1921: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name

1917: clob_to_file(l_result_xml);
1918: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1919: EXCEPTION
1920: WHEN OTHERS THEN
1921: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name
1922: || ' -');
1923: RAISE;
1924: END PROCESS_AGREEMENT_REPORT;
1925: PROCEDURE STORE_LOAN_AGREEMENT (P_LOAN_ID IN NUMBER) IS

Line 1938: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');

1934: and source_id = p_loan_id
1935: and version = 1
1936: and document_type = 'LOAN_AGREEMENT';
1937: BEGIN
1938: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' +');
1939: OPEN csr_loan_agreement;
1940: FETCH csr_loan_agreement
1941: INTO l_result_xml;
1942: IF csr_loan_agreement%NOTFOUND THEN

Line 1955: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');

1951: ,P_OBJECT_VERSION_NUMBER => 1);
1952:
1953: END IF;
1954: CLOSE csr_loan_agreement;
1955: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1956: EXCEPTION
1957: WHEN OTHERS THEN
1958: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name
1959: || ' -');

Line 1958: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name

1954: CLOSE csr_loan_agreement;
1955: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name || ' -');
1956: EXCEPTION
1957: WHEN OTHERS THEN
1958: LogMessage(FND_LOG.LEVEL_PROCEDURE, G_PKG_NAME || '.' || l_api_name
1959: || ' -');
1960: RAISE;
1961: END STORE_LOAN_AGREEMENT;
1962: BEGIN

Line 1964: G_MSG_LEVEL := FND_LOG.LEVEL_UNEXPECTED;

1960: RAISE;
1961: END STORE_LOAN_AGREEMENT;
1962: BEGIN
1963: G_LOG_ENABLED := 'N';
1964: G_MSG_LEVEL := FND_LOG.LEVEL_UNEXPECTED;
1965:
1966: /* getting msg logging info */
1967: G_LOG_ENABLED := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
1968: if (G_LOG_ENABLED = 'N') then

Line 1969: G_MSG_LEVEL := FND_LOG.LEVEL_UNEXPECTED;

1965:
1966: /* getting msg logging info */
1967: G_LOG_ENABLED := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
1968: if (G_LOG_ENABLED = 'N') then
1969: G_MSG_LEVEL := FND_LOG.LEVEL_UNEXPECTED;
1970: else
1971: G_MSG_LEVEL := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
1972: end if;
1973:

Line 1971: G_MSG_LEVEL := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);

1967: G_LOG_ENABLED := NVL(FND_PROFILE.VALUE('AFLOG_ENABLED'), 'N');
1968: if (G_LOG_ENABLED = 'N') then
1969: G_MSG_LEVEL := FND_LOG.LEVEL_UNEXPECTED;
1970: else
1971: G_MSG_LEVEL := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
1972: end if;
1973:
1974: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_LOG_ENABLED: ' || G_LOG_ENABLED);
1975: END LNS_REP_UTILS;

Line 1974: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_LOG_ENABLED: ' || G_LOG_ENABLED);

1970: else
1971: G_MSG_LEVEL := NVL(to_number(FND_PROFILE.VALUE('AFLOG_LEVEL')), FND_LOG.LEVEL_UNEXPECTED);
1972: end if;
1973:
1974: LogMessage(FND_LOG.LEVEL_STATEMENT, 'G_LOG_ENABLED: ' || G_LOG_ENABLED);
1975: END LNS_REP_UTILS;