1405: ;
1406: CURSOR c_file_dir IS
1407: SELECT SUBSTR(value,1,DECODE(INSTR(value,','),0,LENGTH(value),INSTR(value,',')-1) )
1408: FROM v$parameter
1409: WHERE name = 'utl_file_dir';
1410: l_file utl_file.file_type;
1411: l_dirname VARCHAR2(1000);
1412: --
1413: begin
1406: CURSOR c_file_dir IS
1407: SELECT SUBSTR(value,1,DECODE(INSTR(value,','),0,LENGTH(value),INSTR(value,',')-1) )
1408: FROM v$parameter
1409: WHERE name = 'utl_file_dir';
1410: l_file utl_file.file_type;
1411: l_dirname VARCHAR2(1000);
1412: --
1413: begin
1414:
1414:
1415: OPEN c_file_dir;
1416: FETCH c_file_dir INTO l_dirname;
1417: CLOSE c_file_dir;
1418: l_file := utl_file.fopen(l_dirname,'xtraurec.log','w');
1419:
1420: --
1421: -- set parameteres
1422: --
1570: --dbms_output.put_line(' DDA_SUM_DATE date, amt, no-rec, net# '||l_s_date||' - '||l_sum_amt||' - '||l_num_recs||' - '||v_netoff_number);
1571:
1572: EXIT WHEN DDA_SUM_DATE%NOTFOUND;
1573: /***************/
1574: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1575: utl_file.put_line (l_file,'>>----net#, date, amt no-recs '||v_netoff_number||' - '||l_s_date||' - '||l_sum_amt||' - '||l_num_Recs);
1576: utl_file.put_line (l_file,'>>------------------------------');
1577: /***************/
1578:
1571:
1572: EXIT WHEN DDA_SUM_DATE%NOTFOUND;
1573: /***************/
1574: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1575: utl_file.put_line (l_file,'>>----net#, date, amt no-recs '||v_netoff_number||' - '||l_s_date||' - '||l_sum_amt||' - '||l_num_Recs);
1576: utl_file.put_line (l_file,'>>------------------------------');
1577: /***************/
1578:
1579: if nvl(rec_det.DEBIT_AMOUNT,0) <> 0 then
1572: EXIT WHEN DDA_SUM_DATE%NOTFOUND;
1573: /***************/
1574: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1575: utl_file.put_line (l_file,'>>----net#, date, amt no-recs '||v_netoff_number||' - '||l_s_date||' - '||l_sum_amt||' - '||l_num_Recs);
1576: utl_file.put_line (l_file,'>>------------------------------');
1577: /***************/
1578:
1579: if nvl(rec_det.DEBIT_AMOUNT,0) <> 0 then
1580: if ((((-1) * rec_det.DEBIT_AMOUNT) = l_sum_amt and l_amount =
1609:
1610:
1611: If v_netoff_number is null then
1612: /***************/
1613: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1614: utl_file.put_line (l_file,'>>---- inside IF ');
1615: utl_file.put_line (l_file,'>>------------------------------');
1616: /***************/
1617:
1610:
1611: If v_netoff_number is null then
1612: /***************/
1613: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1614: utl_file.put_line (l_file,'>>---- inside IF ');
1615: utl_file.put_line (l_file,'>>------------------------------');
1616: /***************/
1617:
1618: update XTR_DEAL_DATE_AMOUNTS
1611: If v_netoff_number is null then
1612: /***************/
1613: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1614: utl_file.put_line (l_file,'>>---- inside IF ');
1615: utl_file.put_line (l_file,'>>------------------------------');
1616: /***************/
1617:
1618: update XTR_DEAL_DATE_AMOUNTS
1619: set RECONCILED_REFERENCE = l_rec_nos,
1652: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
1653: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
1654: If SQL%FOUND then
1655: /***************/
1656: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1657: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
1658: utl_file.put_line (l_file,'>>------------------------------');
1659: /***************/
1660: For C2_Rec in C2(l_Rec_nos)
1653: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
1654: If SQL%FOUND then
1655: /***************/
1656: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1657: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
1658: utl_file.put_line (l_file,'>>------------------------------');
1659: /***************/
1660: For C2_Rec in C2(l_Rec_nos)
1661: Loop
1654: If SQL%FOUND then
1655: /***************/
1656: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1657: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
1658: utl_file.put_line (l_file,'>>------------------------------');
1659: /***************/
1660: For C2_Rec in C2(l_Rec_nos)
1661: Loop
1662: Update Xtr_Settlement_Summary
1662: Update Xtr_Settlement_Summary
1663: Set status = 'R'
1664: Where settlement_number = C2_Rec.settlement_number;
1665: /***************/
1666: utl_file.put_line(l_file, '>>----DDA_SUM_DATE ------');
1667: utl_file.put_line(l_file, '>>----UPD settlement_summary complete settle# '||C2_Rec.settlement_number);
1668: utl_file.put_line(l_file, '>>------------------------------------');
1669: /**************/
1670: End Loop;
1663: Set status = 'R'
1664: Where settlement_number = C2_Rec.settlement_number;
1665: /***************/
1666: utl_file.put_line(l_file, '>>----DDA_SUM_DATE ------');
1667: utl_file.put_line(l_file, '>>----UPD settlement_summary complete settle# '||C2_Rec.settlement_number);
1668: utl_file.put_line(l_file, '>>------------------------------------');
1669: /**************/
1670: End Loop;
1671: End if;
1664: Where settlement_number = C2_Rec.settlement_number;
1665: /***************/
1666: utl_file.put_line(l_file, '>>----DDA_SUM_DATE ------');
1667: utl_file.put_line(l_file, '>>----UPD settlement_summary complete settle# '||C2_Rec.settlement_number);
1668: utl_file.put_line(l_file, '>>------------------------------------');
1669: /**************/
1670: End Loop;
1671: End if;
1672: Else
1670: End Loop;
1671: End if;
1672: Else
1673: /***************/
1674: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1675: utl_file.put_line (l_file,'>>---- inside ELSE ');
1676: utl_file.put_line (l_file,'>>------------------------------');
1677: /***************/
1678:
1671: End if;
1672: Else
1673: /***************/
1674: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1675: utl_file.put_line (l_file,'>>---- inside ELSE ');
1676: utl_file.put_line (l_file,'>>------------------------------');
1677: /***************/
1678:
1679: update XTR_DEAL_DATE_AMOUNTS
1672: Else
1673: /***************/
1674: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1675: utl_file.put_line (l_file,'>>---- inside ELSE ');
1676: utl_file.put_line (l_file,'>>------------------------------');
1677: /***************/
1678:
1679: update XTR_DEAL_DATE_AMOUNTS
1680: set RECONCILED_REFERENCE = l_rec_nos,
1717: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
1718: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
1719: If SQL%FOUND then
1720: /***************/
1721: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1722: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
1723: utl_file.put_line (l_file,'>>------------------------------');
1724: /***************/
1725: For C1_Rec in C1(v_netoff_number)
1718: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
1719: If SQL%FOUND then
1720: /***************/
1721: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1722: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
1723: utl_file.put_line (l_file,'>>------------------------------');
1724: /***************/
1725: For C1_Rec in C1(v_netoff_number)
1726: Loop
1719: If SQL%FOUND then
1720: /***************/
1721: utl_file.put_line (l_file,'>>----DDA_SUM_DATE');
1722: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
1723: utl_file.put_line (l_file,'>>------------------------------');
1724: /***************/
1725: For C1_Rec in C1(v_netoff_number)
1726: Loop
1727: Update Xtr_Settlement_Summary
1727: Update Xtr_Settlement_Summary
1728: Set status = 'R'
1729: Where settlement_summary_id = C1_Rec.net_ID;
1730: /***************/
1731: utl_file.put_line(l_file, '>>----DDA ------');
1732: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
1733: utl_file.put_line(l_file, '>>------------------------------------');
1734: /**************/
1735: End Loop;
1728: Set status = 'R'
1729: Where settlement_summary_id = C1_Rec.net_ID;
1730: /***************/
1731: utl_file.put_line(l_file, '>>----DDA ------');
1732: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
1733: utl_file.put_line(l_file, '>>------------------------------------');
1734: /**************/
1735: End Loop;
1736: End if;
1729: Where settlement_summary_id = C1_Rec.net_ID;
1730: /***************/
1731: utl_file.put_line(l_file, '>>----DDA ------');
1732: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
1733: utl_file.put_line(l_file, '>>------------------------------------');
1734: /**************/
1735: End Loop;
1736: End if;
1737: End if;
1769:
1770: --dbms_output.put_line('bef UPD ');
1771: If v_netoff_number is null then
1772: /***************/
1773: utl_file.put_line (l_file,'>>----not known');
1774: utl_file.put_line (l_file,'>>---- inside IF '||v_netoff_number);
1775: utl_file.put_line (l_file,'>>------------------------------');
1776: /***************/
1777:
1770: --dbms_output.put_line('bef UPD ');
1771: If v_netoff_number is null then
1772: /***************/
1773: utl_file.put_line (l_file,'>>----not known');
1774: utl_file.put_line (l_file,'>>---- inside IF '||v_netoff_number);
1775: utl_file.put_line (l_file,'>>------------------------------');
1776: /***************/
1777:
1778: update XTR_DEAL_DATE_AMOUNTS
1771: If v_netoff_number is null then
1772: /***************/
1773: utl_file.put_line (l_file,'>>----not known');
1774: utl_file.put_line (l_file,'>>---- inside IF '||v_netoff_number);
1775: utl_file.put_line (l_file,'>>------------------------------');
1776: /***************/
1777:
1778: update XTR_DEAL_DATE_AMOUNTS
1779: set RECONCILED_REFERENCE = l_rec_nos,
1813: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
1814: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM,'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
1815: If SQL%FOUND then
1816: /***************/
1817: utl_file.put_line (l_file,'>>----not known');
1818: utl_file.put_line (l_file,'>>---- UPD complete ');
1819: utl_file.put_line (l_file,'>>------------------------------');
1820: /***************/
1821: For C2_Rec in C2(l_rec_nos)
1814: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM,'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
1815: If SQL%FOUND then
1816: /***************/
1817: utl_file.put_line (l_file,'>>----not known');
1818: utl_file.put_line (l_file,'>>---- UPD complete ');
1819: utl_file.put_line (l_file,'>>------------------------------');
1820: /***************/
1821: For C2_Rec in C2(l_rec_nos)
1822: Loop
1815: If SQL%FOUND then
1816: /***************/
1817: utl_file.put_line (l_file,'>>----not known');
1818: utl_file.put_line (l_file,'>>---- UPD complete ');
1819: utl_file.put_line (l_file,'>>------------------------------');
1820: /***************/
1821: For C2_Rec in C2(l_rec_nos)
1822: Loop
1823: Update Xtr_Settlement_Summary
1823: Update Xtr_Settlement_Summary
1824: Set status = 'R'
1825: Where settlement_number = C2_Rec.settlement_number;
1826: /***************/
1827: utl_file.put_line(l_file, '>>----DDA_SUM_DATE ------');
1828: utl_file.put_line(l_file, '>>----UPD settlement_summary complete settle# '||C2_Rec.settlement_number);
1829: utl_file.put_line(l_file, '>>------------------------------------');
1830: /**************/
1831: End Loop;
1824: Set status = 'R'
1825: Where settlement_number = C2_Rec.settlement_number;
1826: /***************/
1827: utl_file.put_line(l_file, '>>----DDA_SUM_DATE ------');
1828: utl_file.put_line(l_file, '>>----UPD settlement_summary complete settle# '||C2_Rec.settlement_number);
1829: utl_file.put_line(l_file, '>>------------------------------------');
1830: /**************/
1831: End Loop;
1832: End if;
1825: Where settlement_number = C2_Rec.settlement_number;
1826: /***************/
1827: utl_file.put_line(l_file, '>>----DDA_SUM_DATE ------');
1828: utl_file.put_line(l_file, '>>----UPD settlement_summary complete settle# '||C2_Rec.settlement_number);
1829: utl_file.put_line(l_file, '>>------------------------------------');
1830: /**************/
1831: End Loop;
1832: End if;
1833: Else
1831: End Loop;
1832: End if;
1833: Else
1834: /***************/
1835: utl_file.put_line (l_file,'>>----not known');
1836: utl_file.put_line (l_file,'>>---- inside ELSE ');
1837: utl_file.put_line (l_file,'>>------------------------------');
1838: /***************/
1839:
1832: End if;
1833: Else
1834: /***************/
1835: utl_file.put_line (l_file,'>>----not known');
1836: utl_file.put_line (l_file,'>>---- inside ELSE ');
1837: utl_file.put_line (l_file,'>>------------------------------');
1838: /***************/
1839:
1840: update XTR_DEAL_DATE_AMOUNTS
1833: Else
1834: /***************/
1835: utl_file.put_line (l_file,'>>----not known');
1836: utl_file.put_line (l_file,'>>---- inside ELSE ');
1837: utl_file.put_line (l_file,'>>------------------------------');
1838: /***************/
1839:
1840: update XTR_DEAL_DATE_AMOUNTS
1841: set RECONCILED_REFERENCE = l_rec_nos,
1879: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
1880: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM,'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
1881: If SQL%FOUND then
1882: /***************/
1883: utl_file.put_line (l_file,'>>----not known ---');
1884: utl_file.put_line (l_file,'>>----UPD complete ');
1885: utl_file.put_line (l_file,'>>------------------------------');
1886: /***************/
1887: For C1_Rec in C1(v_netoff_number)
1880: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM,'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
1881: If SQL%FOUND then
1882: /***************/
1883: utl_file.put_line (l_file,'>>----not known ---');
1884: utl_file.put_line (l_file,'>>----UPD complete ');
1885: utl_file.put_line (l_file,'>>------------------------------');
1886: /***************/
1887: For C1_Rec in C1(v_netoff_number)
1888: Loop
1881: If SQL%FOUND then
1882: /***************/
1883: utl_file.put_line (l_file,'>>----not known ---');
1884: utl_file.put_line (l_file,'>>----UPD complete ');
1885: utl_file.put_line (l_file,'>>------------------------------');
1886: /***************/
1887: For C1_Rec in C1(v_netoff_number)
1888: Loop
1889: Update Xtr_Settlement_Summary
1889: Update Xtr_Settlement_Summary
1890: Set status = 'R'
1891: Where settlement_summary_id = C1_Rec.net_ID;
1892: /***************/
1893: utl_file.put_line(l_file, '>>----DDA ------');
1894: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
1895: utl_file.put_line(l_file, '>>------------------------------------');
1896: /**************/
1897: End Loop;
1890: Set status = 'R'
1891: Where settlement_summary_id = C1_Rec.net_ID;
1892: /***************/
1893: utl_file.put_line(l_file, '>>----DDA ------');
1894: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
1895: utl_file.put_line(l_file, '>>------------------------------------');
1896: /**************/
1897: End Loop;
1898:
1891: Where settlement_summary_id = C1_Rec.net_ID;
1892: /***************/
1893: utl_file.put_line(l_file, '>>----DDA ------');
1894: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
1895: utl_file.put_line(l_file, '>>------------------------------------');
1896: /**************/
1897: End Loop;
1898:
1899: End if;
1924: --dbms_output.put_line('DDA_SUM_RANGE amt, no-recs, net# '||l_sum_amt||' - '||l_num_recs||' - '||v_netoff_number);
1925:
1926: EXIT WHEN DDA_SUM_RANGE%NOTFOUND;
1927: /***************/
1928: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
1929: utl_file.put_line (l_file,'>>----deal#, sumrange, acct, party, curr '||l_deal_no||' - '||l_sum_range||' - '||p_account_number||' - '||rec_det.party_name||' - '||p_currency);
1930: utl_file.put_line (l_file, '>>--- value-date, l-days '||rec_det.value_date||' - '||l_days);
1931: utl_file.put_line (l_file,'>>----net#, amt, no-rec '||v_netoff_number||' - '||l_sum_amt||' - '||l_num_recs);
1932: utl_file.put_line (l_file,'>>------------------------------');
1925:
1926: EXIT WHEN DDA_SUM_RANGE%NOTFOUND;
1927: /***************/
1928: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
1929: utl_file.put_line (l_file,'>>----deal#, sumrange, acct, party, curr '||l_deal_no||' - '||l_sum_range||' - '||p_account_number||' - '||rec_det.party_name||' - '||p_currency);
1930: utl_file.put_line (l_file, '>>--- value-date, l-days '||rec_det.value_date||' - '||l_days);
1931: utl_file.put_line (l_file,'>>----net#, amt, no-rec '||v_netoff_number||' - '||l_sum_amt||' - '||l_num_recs);
1932: utl_file.put_line (l_file,'>>------------------------------');
1933: /***************/
1926: EXIT WHEN DDA_SUM_RANGE%NOTFOUND;
1927: /***************/
1928: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
1929: utl_file.put_line (l_file,'>>----deal#, sumrange, acct, party, curr '||l_deal_no||' - '||l_sum_range||' - '||p_account_number||' - '||rec_det.party_name||' - '||p_currency);
1930: utl_file.put_line (l_file, '>>--- value-date, l-days '||rec_det.value_date||' - '||l_days);
1931: utl_file.put_line (l_file,'>>----net#, amt, no-rec '||v_netoff_number||' - '||l_sum_amt||' - '||l_num_recs);
1932: utl_file.put_line (l_file,'>>------------------------------');
1933: /***************/
1934:
1927: /***************/
1928: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
1929: utl_file.put_line (l_file,'>>----deal#, sumrange, acct, party, curr '||l_deal_no||' - '||l_sum_range||' - '||p_account_number||' - '||rec_det.party_name||' - '||p_currency);
1930: utl_file.put_line (l_file, '>>--- value-date, l-days '||rec_det.value_date||' - '||l_days);
1931: utl_file.put_line (l_file,'>>----net#, amt, no-rec '||v_netoff_number||' - '||l_sum_amt||' - '||l_num_recs);
1932: utl_file.put_line (l_file,'>>------------------------------');
1933: /***************/
1934:
1935: if nvl(rec_det.DEBIT_AMOUNT,0) <> 0 then
1928: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
1929: utl_file.put_line (l_file,'>>----deal#, sumrange, acct, party, curr '||l_deal_no||' - '||l_sum_range||' - '||p_account_number||' - '||rec_det.party_name||' - '||p_currency);
1930: utl_file.put_line (l_file, '>>--- value-date, l-days '||rec_det.value_date||' - '||l_days);
1931: utl_file.put_line (l_file,'>>----net#, amt, no-rec '||v_netoff_number||' - '||l_sum_amt||' - '||l_num_recs);
1932: utl_file.put_line (l_file,'>>------------------------------');
1933: /***************/
1934:
1935: if nvl(rec_det.DEBIT_AMOUNT,0) <> 0 then
1936: if ((((-1) * rec_det.DEBIT_AMOUNT) = l_sum_amt and l_amount =
1962:
1963: --dbms_output.put_line('bef UPD');
1964: If v_netoff_number is null then
1965: /***************/
1966: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
1967: utl_file.put_line (l_file,'>>---- inside IF ');
1968: utl_file.put_line (l_file,'>>------------------------------');
1969: /***************/
1970:
1963: --dbms_output.put_line('bef UPD');
1964: If v_netoff_number is null then
1965: /***************/
1966: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
1967: utl_file.put_line (l_file,'>>---- inside IF ');
1968: utl_file.put_line (l_file,'>>------------------------------');
1969: /***************/
1970:
1971: update XTR_DEAL_DATE_AMOUNTS
1964: If v_netoff_number is null then
1965: /***************/
1966: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
1967: utl_file.put_line (l_file,'>>---- inside IF ');
1968: utl_file.put_line (l_file,'>>------------------------------');
1969: /***************/
1970:
1971: update XTR_DEAL_DATE_AMOUNTS
1972: set RECONCILED_REFERENCE = l_rec_nos,
2007: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
2008: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2009: If SQL%FOUND then
2010: /***************/
2011: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2012: utl_file.put_line (l_file,'>>---- UPD complete rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2013: utl_file.put_line (l_file,'>>------------------------------');
2014: /***************/
2015: For C2_Rec in C2(l_rec_nos)
2008: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2009: If SQL%FOUND then
2010: /***************/
2011: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2012: utl_file.put_line (l_file,'>>---- UPD complete rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2013: utl_file.put_line (l_file,'>>------------------------------');
2014: /***************/
2015: For C2_Rec in C2(l_rec_nos)
2016: Loop
2009: If SQL%FOUND then
2010: /***************/
2011: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2012: utl_file.put_line (l_file,'>>---- UPD complete rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2013: utl_file.put_line (l_file,'>>------------------------------');
2014: /***************/
2015: For C2_Rec in C2(l_rec_nos)
2016: Loop
2017: Update Xtr_Settlement_Summary
2017: Update Xtr_Settlement_Summary
2018: Set status = 'R'
2019: Where settlement_number = C2_Rec.Settlement_Number;
2020: /***************/
2021: utl_file.put_line (l_file,'>>----DDA');
2022: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2023: utl_file.put_line (l_file,'>>------------------------------');
2024: /***************/
2025: End Loop;
2018: Set status = 'R'
2019: Where settlement_number = C2_Rec.Settlement_Number;
2020: /***************/
2021: utl_file.put_line (l_file,'>>----DDA');
2022: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2023: utl_file.put_line (l_file,'>>------------------------------');
2024: /***************/
2025: End Loop;
2026: End if;
2019: Where settlement_number = C2_Rec.Settlement_Number;
2020: /***************/
2021: utl_file.put_line (l_file,'>>----DDA');
2022: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2023: utl_file.put_line (l_file,'>>------------------------------');
2024: /***************/
2025: End Loop;
2026: End if;
2027: Else
2025: End Loop;
2026: End if;
2027: Else
2028: /***************/
2029: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2030: utl_file.put_line (l_file,'>>---- inside ELSE net# '||v_netoff_number);
2031: utl_file.put_line (l_file,'>>------------------------------');
2032: /***************/
2033:
2026: End if;
2027: Else
2028: /***************/
2029: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2030: utl_file.put_line (l_file,'>>---- inside ELSE net# '||v_netoff_number);
2031: utl_file.put_line (l_file,'>>------------------------------');
2032: /***************/
2033:
2034: update XTR_DEAL_DATE_AMOUNTS
2027: Else
2028: /***************/
2029: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2030: utl_file.put_line (l_file,'>>---- inside ELSE net# '||v_netoff_number);
2031: utl_file.put_line (l_file,'>>------------------------------');
2032: /***************/
2033:
2034: update XTR_DEAL_DATE_AMOUNTS
2035: set RECONCILED_REFERENCE = l_rec_nos,
2074: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
2075: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2076: If SQL%FOUND then
2077: /***************/
2078: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2079: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2080: utl_file.put_line (l_file,'>>------------------------------');
2081: /***************/
2082: For C1_Rec in C1(v_netoff_number)
2075: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2076: If SQL%FOUND then
2077: /***************/
2078: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2079: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2080: utl_file.put_line (l_file,'>>------------------------------');
2081: /***************/
2082: For C1_Rec in C1(v_netoff_number)
2083: Loop
2076: If SQL%FOUND then
2077: /***************/
2078: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2079: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2080: utl_file.put_line (l_file,'>>------------------------------');
2081: /***************/
2082: For C1_Rec in C1(v_netoff_number)
2083: Loop
2084: Update Xtr_Settlement_Summary
2084: Update Xtr_Settlement_Summary
2085: Set status = 'R'
2086: Where settlement_summary_id = C1_Rec.net_ID;
2087: /***************/
2088: utl_file.put_line(l_file, '>>----DDA ------');
2089: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2090: utl_file.put_line(l_file, '>>------------------------------------');
2091: /**************/
2092: End Loop;
2085: Set status = 'R'
2086: Where settlement_summary_id = C1_Rec.net_ID;
2087: /***************/
2088: utl_file.put_line(l_file, '>>----DDA ------');
2089: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2090: utl_file.put_line(l_file, '>>------------------------------------');
2091: /**************/
2092: End Loop;
2093: End if;
2086: Where settlement_summary_id = C1_Rec.net_ID;
2087: /***************/
2088: utl_file.put_line(l_file, '>>----DDA ------');
2089: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2090: utl_file.put_line(l_file, '>>------------------------------------');
2091: /**************/
2092: End Loop;
2093: End if;
2094: End if;
2128:
2129: --dbms_output.put_line('bef UPD ');
2130: If v_netoff_number is null then
2131: /***************/
2132: utl_file.put_line (l_file,'>>----2');
2133: utl_file.put_line (l_file,'>>----inside IF rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2134: utl_file.put_line (l_file,'>>------------------------------');
2135: /***************/
2136:
2129: --dbms_output.put_line('bef UPD ');
2130: If v_netoff_number is null then
2131: /***************/
2132: utl_file.put_line (l_file,'>>----2');
2133: utl_file.put_line (l_file,'>>----inside IF rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2134: utl_file.put_line (l_file,'>>------------------------------');
2135: /***************/
2136:
2137: update XTR_DEAL_DATE_AMOUNTS
2130: If v_netoff_number is null then
2131: /***************/
2132: utl_file.put_line (l_file,'>>----2');
2133: utl_file.put_line (l_file,'>>----inside IF rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2134: utl_file.put_line (l_file,'>>------------------------------');
2135: /***************/
2136:
2137: update XTR_DEAL_DATE_AMOUNTS
2138: set RECONCILED_REFERENCE = l_rec_nos,
2174: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
2175: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2176: If SQL%FOUND then
2177: /***************/
2178: utl_file.put_line (l_file,'>>----2');
2179: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2180: utl_file.put_line (l_file,'>>------------------------------');
2181: /***************/
2182: For C2_Rec in C2(l_rec_nos)
2175: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2176: If SQL%FOUND then
2177: /***************/
2178: utl_file.put_line (l_file,'>>----2');
2179: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2180: utl_file.put_line (l_file,'>>------------------------------');
2181: /***************/
2182: For C2_Rec in C2(l_rec_nos)
2183: Loop
2176: If SQL%FOUND then
2177: /***************/
2178: utl_file.put_line (l_file,'>>----2');
2179: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2180: utl_file.put_line (l_file,'>>------------------------------');
2181: /***************/
2182: For C2_Rec in C2(l_rec_nos)
2183: Loop
2184: Update Xtr_Settlement_Summary
2184: Update Xtr_Settlement_Summary
2185: Set status = 'R'
2186: Where settlement_number = C2_Rec.Settlement_Number;
2187: /***************/
2188: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2189: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2190: utl_file.put_line (l_file,'>>------------------------------');
2191: /***************/
2192: End Loop;
2185: Set status = 'R'
2186: Where settlement_number = C2_Rec.Settlement_Number;
2187: /***************/
2188: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2189: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2190: utl_file.put_line (l_file,'>>------------------------------');
2191: /***************/
2192: End Loop;
2193: End if;
2186: Where settlement_number = C2_Rec.Settlement_Number;
2187: /***************/
2188: utl_file.put_line (l_file,'>>----DDA_SUM_RANGE');
2189: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2190: utl_file.put_line (l_file,'>>------------------------------');
2191: /***************/
2192: End Loop;
2193: End if;
2194: Else
2192: End Loop;
2193: End if;
2194: Else
2195: /***************/
2196: utl_file.put_line (l_file,'>>----2');
2197: utl_file.put_line (l_file,'>>---- inside ELSE net#, rec#, rec-pass '||v_netoff_number||' - '||l_rec_nos||' - '||p_pass_code);
2198: utl_file.put_line (l_file,'>>------------------------------');
2199: /***************/
2200:
2193: End if;
2194: Else
2195: /***************/
2196: utl_file.put_line (l_file,'>>----2');
2197: utl_file.put_line (l_file,'>>---- inside ELSE net#, rec#, rec-pass '||v_netoff_number||' - '||l_rec_nos||' - '||p_pass_code);
2198: utl_file.put_line (l_file,'>>------------------------------');
2199: /***************/
2200:
2201: update XTR_DEAL_DATE_AMOUNTS
2194: Else
2195: /***************/
2196: utl_file.put_line (l_file,'>>----2');
2197: utl_file.put_line (l_file,'>>---- inside ELSE net#, rec#, rec-pass '||v_netoff_number||' - '||l_rec_nos||' - '||p_pass_code);
2198: utl_file.put_line (l_file,'>>------------------------------');
2199: /***************/
2200:
2201: update XTR_DEAL_DATE_AMOUNTS
2202: set RECONCILED_REFERENCE = l_rec_nos,
2240: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
2241: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2242: If SQL%FOUND then
2243: /***************/
2244: utl_file.put_line (l_file,'>>----2');
2245: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(Rec_det.particulars));
2246: utl_file.put_line (l_file,'>>------------------------------');
2247: /***************/
2248: For C1_Rec in C1(v_netoff_number)
2241: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2242: If SQL%FOUND then
2243: /***************/
2244: utl_file.put_line (l_file,'>>----2');
2245: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(Rec_det.particulars));
2246: utl_file.put_line (l_file,'>>------------------------------');
2247: /***************/
2248: For C1_Rec in C1(v_netoff_number)
2249: Loop
2242: If SQL%FOUND then
2243: /***************/
2244: utl_file.put_line (l_file,'>>----2');
2245: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(Rec_det.particulars));
2246: utl_file.put_line (l_file,'>>------------------------------');
2247: /***************/
2248: For C1_Rec in C1(v_netoff_number)
2249: Loop
2250: Update Xtr_Settlement_Summary
2250: Update Xtr_Settlement_Summary
2251: Set status = 'R'
2252: Where settlement_summary_id = C1_Rec.net_ID;
2253: /***************/
2254: utl_file.put_line(l_file, '>>----DDA ------');
2255: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2256: utl_file.put_line(l_file, '>>------------------------------------');
2257: /**************/
2258: End Loop;
2251: Set status = 'R'
2252: Where settlement_summary_id = C1_Rec.net_ID;
2253: /***************/
2254: utl_file.put_line(l_file, '>>----DDA ------');
2255: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2256: utl_file.put_line(l_file, '>>------------------------------------');
2257: /**************/
2258: End Loop;
2259: End if;
2252: Where settlement_summary_id = C1_Rec.net_ID;
2253: /***************/
2254: utl_file.put_line(l_file, '>>----DDA ------');
2255: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2256: utl_file.put_line(l_file, '>>------------------------------------');
2257: /**************/
2258: End Loop;
2259: End if;
2260: End if;
2283: END IF;
2284: fetch DDA INTO l_sum_amt,l_num_recs,l_one_date, v_netoff_number;
2285: --dbms_output.put_line('DDA amt, no-recs, date, net# '||l_sum_amt||' - '||l_num_recs||' - '||l_one_date||' - '||v_netoff_number);
2286: /***************/
2287: utl_file.put_line (l_file,'>>----DDA');
2288: utl_file.put_line (l_file,'>>----net#, date, amt, no-recs '||v_netoff_number||' - '||l_one_date||' - '||l_sum_amt||' - '||l_num_recs);
2289: utl_file.put_line (l_file,'>>------------------------------');
2290: /***************/
2291:
2284: fetch DDA INTO l_sum_amt,l_num_recs,l_one_date, v_netoff_number;
2285: --dbms_output.put_line('DDA amt, no-recs, date, net# '||l_sum_amt||' - '||l_num_recs||' - '||l_one_date||' - '||v_netoff_number);
2286: /***************/
2287: utl_file.put_line (l_file,'>>----DDA');
2288: utl_file.put_line (l_file,'>>----net#, date, amt, no-recs '||v_netoff_number||' - '||l_one_date||' - '||l_sum_amt||' - '||l_num_recs);
2289: utl_file.put_line (l_file,'>>------------------------------');
2290: /***************/
2291:
2292: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2285: --dbms_output.put_line('DDA amt, no-recs, date, net# '||l_sum_amt||' - '||l_num_recs||' - '||l_one_date||' - '||v_netoff_number);
2286: /***************/
2287: utl_file.put_line (l_file,'>>----DDA');
2288: utl_file.put_line (l_file,'>>----net#, date, amt, no-recs '||v_netoff_number||' - '||l_one_date||' - '||l_sum_amt||' - '||l_num_recs);
2289: utl_file.put_line (l_file,'>>------------------------------');
2290: /***************/
2291:
2292: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2293: xtr_debug_pkg.debug('P_RECONCILE: ' || 'value after fetch -----------------');
2336:
2337: --dbms_output.put_line('bef UPD ');
2338: If v_netoff_number is null then
2339: /***************/
2340: utl_file.put_line (l_file,'>>----DDA');
2341: utl_file.put_line (l_file,'>>---- inside IF , rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2342: utl_file.put_line (l_file,'>>------------------------------');
2343: /***************/
2344:
2337: --dbms_output.put_line('bef UPD ');
2338: If v_netoff_number is null then
2339: /***************/
2340: utl_file.put_line (l_file,'>>----DDA');
2341: utl_file.put_line (l_file,'>>---- inside IF , rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2342: utl_file.put_line (l_file,'>>------------------------------');
2343: /***************/
2344:
2345: update XTR_DEAL_DATE_AMOUNTS
2338: If v_netoff_number is null then
2339: /***************/
2340: utl_file.put_line (l_file,'>>----DDA');
2341: utl_file.put_line (l_file,'>>---- inside IF , rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2342: utl_file.put_line (l_file,'>>------------------------------');
2343: /***************/
2344:
2345: update XTR_DEAL_DATE_AMOUNTS
2346: set RECONCILED_REFERENCE = l_rec_nos,
2390: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y')
2391: and rownum < 2; -- bug 5353780
2392: If SQL%FOUND then
2393: /***************/
2394: utl_file.put_line (l_file,'>>----DDA');
2395: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2396: utl_file.put_line (l_file,'>>------------------------------');
2397: /***************/
2398: For C2_Rec in C2(l_rec_nos)
2391: and rownum < 2; -- bug 5353780
2392: If SQL%FOUND then
2393: /***************/
2394: utl_file.put_line (l_file,'>>----DDA');
2395: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2396: utl_file.put_line (l_file,'>>------------------------------');
2397: /***************/
2398: For C2_Rec in C2(l_rec_nos)
2399: Loop
2392: If SQL%FOUND then
2393: /***************/
2394: utl_file.put_line (l_file,'>>----DDA');
2395: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(rec_det.particulars));
2396: utl_file.put_line (l_file,'>>------------------------------');
2397: /***************/
2398: For C2_Rec in C2(l_rec_nos)
2399: Loop
2400: Update Xtr_Settlement_Summary
2400: Update Xtr_Settlement_Summary
2401: Set status = 'R'
2402: Where settlement_number = C2_Rec.Settlement_Number;
2403: /***************/
2404: utl_file.put_line (l_file,'>>----DDA');
2405: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2406: utl_file.put_line (l_file,'>>------------------------------');
2407: /***************/
2408: End Loop;
2401: Set status = 'R'
2402: Where settlement_number = C2_Rec.Settlement_Number;
2403: /***************/
2404: utl_file.put_line (l_file,'>>----DDA');
2405: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2406: utl_file.put_line (l_file,'>>------------------------------');
2407: /***************/
2408: End Loop;
2409: End if;
2402: Where settlement_number = C2_Rec.Settlement_Number;
2403: /***************/
2404: utl_file.put_line (l_file,'>>----DDA');
2405: utl_file.put_line (l_file,'>>---- UPD settlement_summary complete settle# '||c2_rec.settlement_number);
2406: utl_file.put_line (l_file,'>>------------------------------');
2407: /***************/
2408: End Loop;
2409: End if;
2410: Else
2408: End Loop;
2409: End if;
2410: Else
2411: /***************/
2412: utl_file.put_line (l_file,'>>----DDA');
2413: utl_file.put_line (l_file,'>>---- inside ELSE rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2414: utl_file.put_line (l_file,'>>------------------------------');
2415: /***************/
2416:
2409: End if;
2410: Else
2411: /***************/
2412: utl_file.put_line (l_file,'>>----DDA');
2413: utl_file.put_line (l_file,'>>---- inside ELSE rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2414: utl_file.put_line (l_file,'>>------------------------------');
2415: /***************/
2416:
2417: update XTR_DEAL_DATE_AMOUNTS
2410: Else
2411: /***************/
2412: utl_file.put_line (l_file,'>>----DDA');
2413: utl_file.put_line (l_file,'>>---- inside ELSE rec#, rec-pass '||l_rec_nos||' - '||p_pass_code);
2414: utl_file.put_line (l_file,'>>------------------------------');
2415: /***************/
2416:
2417: update XTR_DEAL_DATE_AMOUNTS
2418: set RECONCILED_REFERENCE = l_rec_nos,
2467: and PORTFOLIO_CODE like nvl(l_portfolio,'%')
2468: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2469: If SQL%FOUND then
2470: /***************/
2471: utl_file.put_line (l_file,'>>----DDA -----');
2472: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(Rec_det.particulars));
2473: utl_file.put_line (l_file,'>>------------------------------');
2474: /***************/
2475: For C1_Rec in C1(v_netoff_number)
2468: and ((date_type <>'FORCAST' and NVL(P_INCL_RTM, 'N')='N') or NVL(P_INCL_RTM, 'N')='Y');
2469: If SQL%FOUND then
2470: /***************/
2471: utl_file.put_line (l_file,'>>----DDA -----');
2472: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(Rec_det.particulars));
2473: utl_file.put_line (l_file,'>>------------------------------');
2474: /***************/
2475: For C1_Rec in C1(v_netoff_number)
2476: Loop
2469: If SQL%FOUND then
2470: /***************/
2471: utl_file.put_line (l_file,'>>----DDA -----');
2472: utl_file.put_line (l_file,'>>---- UPD complete deal# '||rtrim(Rec_det.particulars));
2473: utl_file.put_line (l_file,'>>------------------------------');
2474: /***************/
2475: For C1_Rec in C1(v_netoff_number)
2476: Loop
2477: Update Xtr_Settlement_Summary
2477: Update Xtr_Settlement_Summary
2478: Set status = 'R'
2479: Where settlement_summary_id = C1_Rec.net_ID;
2480: /***************/
2481: utl_file.put_line(l_file, '>>----DDA ------');
2482: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2483: utl_file.put_line(l_file, '>>------------------------------------');
2484: /**************/
2485: End Loop;
2478: Set status = 'R'
2479: Where settlement_summary_id = C1_Rec.net_ID;
2480: /***************/
2481: utl_file.put_line(l_file, '>>----DDA ------');
2482: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2483: utl_file.put_line(l_file, '>>------------------------------------');
2484: /**************/
2485: End Loop;
2486: End if;
2479: Where settlement_summary_id = C1_Rec.net_ID;
2480: /***************/
2481: utl_file.put_line(l_file, '>>----DDA ------');
2482: utl_file.put_line(l_file, '>>----UPD settlement_summary complete netID '||C1_Rec.net_id);
2483: utl_file.put_line(l_file, '>>------------------------------------');
2484: /**************/
2485: End Loop;
2486: End if;
2487: End if;
2519: IF xtr_debug_pkg.pg_sqlplus_enable_flag = 1 THEN
2520: xtr_debug_pkg.debug('END P_RECONCILE >>>>>>>>>>');
2521: END IF;
2522:
2523: utl_file.put_line (l_file,' ');
2524: utl_file.put_line (l_file,'>> Log file is located at '||l_dirname||'/xtraurec.log');
2525: utl_file.put_line (l_file,'>>----------------------------------------------------------------');
2526: utl_file.fclose(l_file);
2527:
2520: xtr_debug_pkg.debug('END P_RECONCILE >>>>>>>>>>');
2521: END IF;
2522:
2523: utl_file.put_line (l_file,' ');
2524: utl_file.put_line (l_file,'>> Log file is located at '||l_dirname||'/xtraurec.log');
2525: utl_file.put_line (l_file,'>>----------------------------------------------------------------');
2526: utl_file.fclose(l_file);
2527:
2528: end P_RECONCILE;
2521: END IF;
2522:
2523: utl_file.put_line (l_file,' ');
2524: utl_file.put_line (l_file,'>> Log file is located at '||l_dirname||'/xtraurec.log');
2525: utl_file.put_line (l_file,'>>----------------------------------------------------------------');
2526: utl_file.fclose(l_file);
2527:
2528: end P_RECONCILE;
2529:
2522:
2523: utl_file.put_line (l_file,' ');
2524: utl_file.put_line (l_file,'>> Log file is located at '||l_dirname||'/xtraurec.log');
2525: utl_file.put_line (l_file,'>>----------------------------------------------------------------');
2526: utl_file.fclose(l_file);
2527:
2528: end P_RECONCILE;
2529:
2530: END XTR_AUTO_RECONCILIATION;