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.PA_CAP_INT_PVT dependencies on PA_DEBUG

Line 146: pa_debug.write_file('LOG','Inside release_capint_txns_exists['||l_exists||']');

142: WHERE run_id = p_run_id);
143: End If;
144:
145: IF g_debug_mode = 'Y' THEN
146: pa_debug.write_file('LOG','Inside release_capint_txns_exists['||l_exists||']');
147: End If;
148: RETURN l_exists;
149:
150: EXCEPTION

Line 153: pa_debug.write_file('LOG','Inside release_capint_txns_exists['||l_exists||']');

149:
150: EXCEPTION
151: WHEN NO_DATA_FOUND THEN
152: IF g_debug_mode = 'Y' THEN
153: pa_debug.write_file('LOG','Inside release_capint_txns_exists['||l_exists||']');
154: End If;
155: RETURN l_exists;
156:
157: WHEN OTHERS THEN

Line 244: PA_DEBUG.write_file('LOG','Inside get_bdgt_entry level Type['

240: IF p_threshold_amt_type = 'BUDGET' Then
241: OPEN threshold_type;
242: FETCH threshold_type INTO cur_thres_type;
243: IF g_debug_mode = 'Y' THEN
244: PA_DEBUG.write_file('LOG','Inside get_bdgt_entry level Type['
245: ||cur_thres_type.threshold_Type||
246: ']entry method code['||cur_thres_type.budget_entry_method_code||
247: ']Bdgt Version['||cur_thres_type.budget_version_id||
248: ']');

Line 271: pa_debug.write_file('LOG','Budget Entry level code['||l_entry_method||']');

267: CLOSE threshold_type;
268:
269: END IF;
270: IF g_debug_mode = 'Y' THEN
271: pa_debug.write_file('LOG','Budget Entry level code['||l_entry_method||']');
272: END IF;
273:
274: Return l_entry_method;
275:

Line 729: pa_debug.write_file('LOG','Inside Check Thresholds: Budget Type['||p_budget_type||

725: r_task cur_non_cap_tasks%ROWTYPE;
726: **/
727: BEGIN
728: IF g_debug_mode = 'Y' THEN
729: pa_debug.write_file('LOG','Inside Check Thresholds: Budget Type['||p_budget_type||
730: ']Finplan type['||p_fin_plan_type_id||']Amt Type['||p_threshold_amt_type||
731: ']Cost Type['||p_cip_cost_type||']Duration['||x_duration_threshold||
732: ']Threshold Amt['||x_amt_threshold||']p_start_date['||p_start_date||']');
733: END IF;

Line 753: pa_debug.write_file('LOG','Threshold amt from Client Extn:Amt['||x_amt_threshold||

749: ,x_return_status
750: ,x_error_msg_count
751: ,x_error_msg_code);
752: IF g_debug_mode = 'Y' THEN
753: pa_debug.write_file('LOG','Threshold amt from Client Extn:Amt['||x_amt_threshold||
754: ']Duration['||x_duration_threshold||']x_return_status['||x_return_status||
755: ']g_bdgt_entry_level_code['||g_bdgt_entry_level_code||']');
756: End If;
757:

Line 797: pa_debug.write_file('LOG','Budget/Plan amt from Finplanutils API['||ln_amount||']');

793: ,p_amount_type => p_cip_cost_type)
794: ,0);
795:
796: IF g_debug_mode = 'Y' THEN
797: pa_debug.write_file('LOG','Budget/Plan amt from Finplanutils API['||ln_amount||']');
798: End If;
799:
800: /** This check is not required as the setup of budget should be ensured that
801: ** the budget is only for Capitalized projects and Tasks

Line 1138: pa_debug.write_file('LOG','Inside remove_run mode = EXCEPTION');

1134: /* Bug fix:3051131 if there is any un-expected error encounters and If there are no trxn or exceptions
1135: * created then delete the run created in the exception portion
1136: */
1137: IF g_debug_mode = 'Y' THEN
1138: pa_debug.write_file('LOG','Inside remove_run mode = EXCEPTION');
1139: End If;
1140: IF p_run_id is NOT NULL then
1141:
1142: SELECT 'Y'

Line 1171: pa_debug.write_file('LOG',' No Trxn found, Removing the run');

1167:
1168: EXCEPTION
1169: WHEN NO_DATA_FOUND THEN
1170: IF g_debug_mode = 'Y' THEN
1171: pa_debug.write_file('LOG',' No Trxn found, Removing the run');
1172: End If;
1173: IF l_exists = 'N' Then
1174: Delete from pa_alloc_runs_all
1175: where run_id = p_run_id;

Line 1557: pa_debug.init_err_stack ('PA_CAP_INT_PVT.GENERATE_CAP_INTEREST');

1553: x_error_msg_code := NULL;
1554: l_init_run_id := x_run_id; -- store passed in value for when others.
1555:
1556: -- Initialize the error stack
1557: pa_debug.init_err_stack ('PA_CAP_INT_PVT.GENERATE_CAP_INTEREST');
1558:
1559: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);
1560: g_debug_mode := NVL(g_debug_mode, 'N');
1561:

Line 1559: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);

1555:
1556: -- Initialize the error stack
1557: pa_debug.init_err_stack ('PA_CAP_INT_PVT.GENERATE_CAP_INTEREST');
1558:
1559: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);
1560: g_debug_mode := NVL(g_debug_mode, 'N');
1561:
1562: pa_debug.set_process
1563: (x_process => 'PLSQL'

Line 1562: pa_debug.set_process

1558:
1559: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);
1560: g_debug_mode := NVL(g_debug_mode, 'N');
1561:
1562: pa_debug.set_process
1563: (x_process => 'PLSQL'
1564: ,x_write_file => 'LOG'
1565: ,x_debug_mode => g_debug_mode);
1566:

Line 1572: pa_debug.write_file('LOG',substr('INSIDE Generate Capint API IN PARAMS: p_from_project_num ['

1568: -- Clear the message stack
1569: fnd_msg_pub.initialize;
1570:
1571: If g_debug_mode = 'Y' Then
1572: pa_debug.write_file('LOG',substr('INSIDE Generate Capint API IN PARAMS: p_from_project_num ['
1573: ||p_from_project_num||']p_to_project_num['||p_to_project_num||
1574: ']p_gl_period['||p_gl_period||']p_exp_item_date['||p_exp_item_date||
1575: ']p_source_details['||p_source_details||']p_autorelease['||p_autorelease||
1576: ']p_mode['||p_mode||']x_run_id['||x_run_id||']',1,250) );

Line 1591: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||' Start program');

1587: -- Execution section if this is run in 'Generate' mode
1588: IF p_mode = 'G' THEN
1589:
1590: IF g_debug_mode = 'Y' THEN
1591: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||' Start program');
1592: END IF;
1593:
1594:
1595: -- Get the start and end dates for the parameter GL period

Line 1608: pa_debug.g_err_stage := 'Get_Period_Dates for Period '||p_gl_period||

1604: ,x_error_msg_count
1605: ,x_error_msg_code);
1606:
1607: IF x_return_status = 'U' THEN
1608: pa_debug.g_err_stage := 'Get_Period_Dates for Period '||p_gl_period||
1609: ']x-errmsg['||x_error_msg_code||']';
1610: RAISE process_error;
1611: END IF;
1612:

Line 1628: pa_debug.write_file('LOG','Global Var:Currency['||lv_currency_code||']Org['||ln_org_id||

1624: -- Set global variable for Exp Item Date
1625: g_exp_item_date := NVL(p_exp_item_date,g_period_end_date);
1626:
1627: IF g_debug_mode = 'Y' THEN
1628: pa_debug.write_file('LOG','Global Var:Currency['||lv_currency_code||']Org['||ln_org_id||
1629: ']g_gl_period['||g_gl_period||']g_period_start_date['||g_period_start_date||
1630: ']g_period_end_date['||g_period_end_date||']g_exp_item_date['||g_exp_item_date||
1631: ']');
1632: END IF;

Line 1640: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

1636: --------------------------------------
1637: FOR r_rate IN cur_rates LOOP
1638:
1639: IF g_debug_mode = 'Y' THEN
1640: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
1641: ' Rate ['||r_rate.rate_name||']');
1642: END IF;
1643:
1644: -- Initialize rate process variables

Line 1667: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

1663: ln_curr_period_mult := 0;
1664: END IF;
1665:
1666: IF g_debug_mode = 'Y' THEN
1667: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
1668: ' Current Period Multiplier['||TO_CHAR(ln_curr_period_mult)||']');
1669: END IF;
1670:
1671:

Line 1680: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

1676: ln_period_mult := 1/num_of_periods(ln_fiscal_year);
1677: END IF;
1678:
1679: IF g_debug_mode = 'Y' THEN
1680: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
1681: ' Period Rate Multiplier['||SUBSTR(TO_CHAR(ln_period_mult),1,6)||']');
1682: END IF;
1683:
1684:

Line 1704: pa_debug.g_err_stage := 'Write_Run for Rate['||g_rate_name||

1700: ,x_error_msg_count
1701: ,x_error_msg_code);
1702:
1703: IF x_return_status = 'U' THEN
1704: pa_debug.g_err_stage := 'Write_Run for Rate['||g_rate_name||
1705: 'Error-msg['||x_error_msg_code;
1706: pa_debug.write_file('LOG',substr(pa_debug.g_err_stage,1,250));
1707: RAISE process_error;
1708: END IF;

Line 1706: pa_debug.write_file('LOG',substr(pa_debug.g_err_stage,1,250));

1702:
1703: IF x_return_status = 'U' THEN
1704: pa_debug.g_err_stage := 'Write_Run for Rate['||g_rate_name||
1705: 'Error-msg['||x_error_msg_code;
1706: pa_debug.write_file('LOG',substr(pa_debug.g_err_stage,1,250));
1707: RAISE process_error;
1708: END IF;
1709:
1710: COMMIT;

Line 1713: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

1709:
1710: COMMIT;
1711:
1712: IF g_debug_mode = 'Y' THEN
1713: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
1714: ' Run ID ['||TO_CHAR(ln_run_id)||']');
1715: END IF;
1716:
1717:

Line 1726: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

1722:
1723: IF R_RATE.INTEREST_SCH_ID = R_PROJECT.INTEREST_SCH_ID THEN /* Added for Bug 6757697 */
1724:
1725: IF g_debug_mode = 'Y' THEN
1726: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
1727: ' Project Number ['||r_project.project_num||']' ||
1728: ' ID ['||TO_CHAR(r_project.project_id)||']');
1729: END IF;
1730:

Line 1733: IF pa_debug.acquire_user_lock('PA_CAP_INT_'||to_char(r_project.project_id))<>0 THEN

1729: END IF;
1730:
1731:
1732: -- Acquire a lock on the project info
1733: IF pa_debug.acquire_user_lock('PA_CAP_INT_'||to_char(r_project.project_id))<>0 THEN
1734: IF g_debug_mode = 'Y' THEN
1735: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
1736: ' Could not lock the project '||r_project.project_num);
1737: END IF;

Line 1735: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

1731:
1732: -- Acquire a lock on the project info
1733: IF pa_debug.acquire_user_lock('PA_CAP_INT_'||to_char(r_project.project_id))<>0 THEN
1734: IF g_debug_mode = 'Y' THEN
1735: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
1736: ' Could not lock the project '||r_project.project_num);
1737: END IF;
1738:
1739: lv_bypass_project := 'Y';

Line 1740: pa_debug.g_err_stage := 'Lock for Project '||r_project.project_num;

1736: ' Could not lock the project '||r_project.project_num);
1737: END IF;
1738:
1739: lv_bypass_project := 'Y';
1740: pa_debug.g_err_stage := 'Lock for Project '||r_project.project_num;
1741: lv_exception_code := c_proj_lock;
1742: lv_exception_type := 'E';
1743: END IF;
1744:

Line 1769: pa_debug.write_file('LOG','Check Project batch exists for the period');

1765:
1766: -- Check whether the project exists in current batches
1767: IF lv_bypass_project = 'N' AND x_return_status = 'S' THEN
1768: IF g_debug_mode = 'Y' THEN
1769: pa_debug.write_file('LOG','Check Project batch exists for the period');
1770: END IF;
1771: check_project_batches
1772: (g_project_id
1773: ,g_cap_int_rule_id

Line 1783: pa_debug.g_err_stage := 'Check_Project_Batches for Project '||

1779: ,x_return_status
1780: ,x_error_msg_count
1781: ,x_error_msg_code);
1782:
1783: pa_debug.g_err_stage := 'Check_Project_Batches for Project '||
1784: r_project.project_num;
1785: IF g_debug_mode = 'Y' THEN
1786: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||
1787: ']x_return_status['||x_return_status||

Line 1786: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||

1782:
1783: pa_debug.g_err_stage := 'Check_Project_Batches for Project '||
1784: r_project.project_num;
1785: IF g_debug_mode = 'Y' THEN
1786: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||
1787: ']x_return_status['||x_return_status||
1788: ']x-errmsg['||x_error_msg_code||']' );
1789: END IF;
1790:

Line 1805: pa_debug.write_file('LOG','Check Project Schedule exists for the period');

1801:
1802: -- Check whether the project has a compiled Cap Interest schedule for the exp item date
1803: IF lv_bypass_project = 'N' AND x_return_status = 'S' THEN
1804: IF g_debug_mode = 'Y' THEN
1805: pa_debug.write_file('LOG','Check Project Schedule exists for the period');
1806: END IF;
1807: check_project_schedule
1808: (r_project.interest_sch_id
1809: ,g_period_end_date

Line 1816: pa_debug.g_err_stage := 'Check_Project_Schedule for Project '||

1812: ,x_return_status
1813: ,x_error_msg_count
1814: ,x_error_msg_code);
1815:
1816: pa_debug.g_err_stage := 'Check_Project_Schedule for Project '||
1817: r_project.project_num;
1818:
1819: IF g_debug_mode = 'Y' THEN
1820: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||

Line 1820: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||

1816: pa_debug.g_err_stage := 'Check_Project_Schedule for Project '||
1817: r_project.project_num;
1818:
1819: IF g_debug_mode = 'Y' THEN
1820: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||
1821: ']x_return_status['||x_return_status||
1822: ']x-errmsg['||x_error_msg_code||']' );
1823: END IF;
1824:

Line 1839: pa_debug.write_file('LOG','Check Schedule has Ratename ');

1835: /* Bug fix: 3227816 Starts here */
1836: --Check if the rate name is used for this schedule
1837: IF lv_bypass_project = 'N' AND x_return_status = 'S' THEN
1838: IF g_debug_mode = 'Y' THEN
1839: pa_debug.write_file('LOG','Check Schedule has Ratename ');
1840: END IF;
1841: check_schedule_has_ratename
1842: (p_sch_id => r_project.interest_sch_id
1843: ,p_sch_rev_date => g_period_end_date

Line 1852: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||

1848: ,x_error_msg_count => x_error_msg_count
1849: ,x_error_msg_code => x_error_msg_code );
1850:
1851: IF g_debug_mode = 'Y' THEN
1852: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||
1853: ']x_return_status['||x_return_status||
1854: ']x-errmsg['||x_error_msg_code||']' );
1855: END IF;
1856:

Line 1872: pa_debug.write_file('LOG','Check Project Thresholds');

1868:
1869: -- Check whether the project has met the threshold values
1870: IF lv_bypass_project = 'N' AND x_return_status = 'S' Then
1871: IF g_debug_mode = 'Y' THEN
1872: pa_debug.write_file('LOG','Check Project Thresholds');
1873: END IF;
1874:
1875: /* Bug fix:2972865 Set the Budget entry level code */
1876: g_bdgt_entry_level_code := Get_Bdgt_entry_level_code

Line 1901: pa_debug.g_err_stage := 'Check_Thresholds for Project '||r_project.project_num;

1897: ,x_return_status
1898: ,x_error_msg_count
1899: ,x_error_msg_code);
1900:
1901: pa_debug.g_err_stage := 'Check_Thresholds for Project '||r_project.project_num;
1902: IF g_debug_mode = 'Y' THEN
1903: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||
1904: ']x_return_status['||x_return_status||
1905: ']x-errmsg['||x_error_msg_code||']');

Line 1903: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||

1899: ,x_error_msg_code);
1900:
1901: pa_debug.g_err_stage := 'Check_Thresholds for Project '||r_project.project_num;
1902: IF g_debug_mode = 'Y' THEN
1903: pa_debug.write_file('LOG','lv_bypass_project['||lv_bypass_project||
1904: ']x_return_status['||x_return_status||
1905: ']x-errmsg['||x_error_msg_code||']');
1906: END IF;
1907: IF x_return_status = 'U' THEN

Line 1954: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

1950: lt_process_task_flag.DELETE;
1951:
1952:
1953: IF g_debug_mode = 'Y' THEN
1954: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
1955: ' Load the CDL cursor rows');
1956: END IF;
1957:
1958:

Line 1992: pa_debug.write_file('LOG', 'After Load the CDL cursor Number of rows['||

1988: ,lt_attribute10;
1989: CLOSE cur_cdls;
1990:
1991: IF g_debug_mode = 'Y' THEN
1992: pa_debug.write_file('LOG', 'After Load the CDL cursor Number of rows['||
1993: lt_process_task_flag.count||']');
1994: END IF;
1995:
1996:

Line 2003: pa_debug.g_err_stage := 'No CDLs for Project '||r_project.project_num;

1999:
2000: lv_bypass_project := 'Y';
2001: lv_exception_code := c_proj_no_txns;
2002: lv_exception_type := 'W';
2003: pa_debug.g_err_stage := 'No CDLs for Project '||r_project.project_num;
2004:
2005:
2006: -- Otherwise, process the cdl rows for this project
2007: ELSE

Line 2044: pa_debug.g_err_stage := 'Check CIP Thresholds for Project '||

2040: lv_bypass_project := 'Y';
2041: lv_exception_code := c_proj_threshold;
2042: lv_exception_type := 'W';
2043:
2044: pa_debug.g_err_stage := 'Check CIP Thresholds for Project '||
2045: r_project.project_num;
2046: END IF;
2047: END IF;
2048:

Line 2058: pa_debug.write_file('LOG','Loop index['||i||']lv_first_exp_flag['||

2054: -- Loop through every row and accumulate the amounts
2055: FOR i IN lt_task_id.FIRST..lt_task_id.LAST LOOP
2056:
2057: IF g_debug_mode = 'Y' THEN
2058: pa_debug.write_file('LOG','Loop index['||i||']lv_first_exp_flag['||
2059: lv_first_exp_flag||']lt_task_id['||
2060: lt_task_id(i)||']lv_bypass_task['||lv_bypass_task||']ln_curr_task_id['||
2061: ln_curr_task_id||']ln_task_tot_amt['||ln_task_tot_amt||
2062: ']lv_threshold_amt_type['||lv_threshold_amt_type||']' );

Line 2103: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

2099: ,x_error_msg_count
2100: ,x_error_msg_code);
2101:
2102: IF g_debug_mode = 'Y' THEN
2103: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2104: ||' Task '||lv_curr_task_num
2105: ||' bypassed by Actual Task Threshold');
2106: END IF;
2107:

Line 2109: pa_debug.g_err_stage := 'Write_Exception for Task '

2105: ||' bypassed by Actual Task Threshold');
2106: END IF;
2107:
2108: IF x_return_status = 'U' THEN
2109: pa_debug.g_err_stage := 'Write_Exception for Task '
2110: ||lv_curr_task_num||' in Project '
2111: ||r_project.project_num||
2112: ']x-errmsg['||x_error_msg_code||']';
2113: RAISE process_error;

Line 2121: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

2117: END IF;
2118:
2119:
2120: IF g_debug_mode = 'Y' THEN
2121: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
2122: ' Task Number ['||lt_task_num(i)||']' ||
2123: ' ID ['||TO_CHAR(lt_task_id(i))||']');
2124: END IF;
2125:

Line 2144: pa_debug.write_file('LOG','Check Task Thresholds');

2140: -- Check whether the task has met the duration and
2141: -- budget threshold values
2142: IF lv_bypass_task = 'N' AND x_return_status = 'S' THEN
2143: IF g_debug_mode = 'Y' THEN
2144: pa_debug.write_file('LOG','Check Task Thresholds');
2145: End If;
2146: check_thresholds
2147: (g_project_id
2148: ,ln_curr_task_id

Line 2164: pa_debug.g_err_stage := 'Check_Thresholds for Task '

2160: ,x_return_status
2161: ,x_error_msg_count
2162: ,x_error_msg_code);
2163:
2164: pa_debug.g_err_stage := 'Check_Thresholds for Task '
2165: ||lv_curr_task_num||' in Project '||r_project.project_num;
2166: IF g_debug_mode = 'Y' THEN
2167: pa_debug.write_file('LOG','lv_bypass_task['
2168: ||lv_bypass_task||']x_return_status['

Line 2167: pa_debug.write_file('LOG','lv_bypass_task['

2163:
2164: pa_debug.g_err_stage := 'Check_Thresholds for Task '
2165: ||lv_curr_task_num||' in Project '||r_project.project_num;
2166: IF g_debug_mode = 'Y' THEN
2167: pa_debug.write_file('LOG','lv_bypass_task['
2168: ||lv_bypass_task||']x_return_status['
2169: ||x_return_status||
2170: ']x-errmsg['||x_error_msg_code||']');
2171: END IF;

Line 2188: pa_debug.write_file('LOG','get target Task');

2184:
2185: -- Get the target task
2186: IF lv_bypass_task = 'N' AND x_return_status = 'S' THEN
2187: IF g_debug_mode = 'Y' THEN
2188: pa_debug.write_file('LOG','get target Task');
2189: End If;
2190: pa_client_extn_cap_int.get_target_task
2191: (ln_curr_task_id
2192: ,lv_curr_task_num

Line 2200: pa_debug.g_err_stage := 'Get_Target_Task for Task '

2196: ,x_return_status
2197: ,x_error_msg_count
2198: ,x_error_msg_code);
2199:
2200: pa_debug.g_err_stage := 'Get_Target_Task for Task '
2201: ||lv_curr_task_num||' in Project '||r_project.project_num
2202: ||']x-errmsg['||x_error_msg_code||']';
2203:
2204: IF x_return_status = 'U' THEN

Line 2220: pa_debug.write_file('LOG','Validate Target Task');

2216:
2217: -- Revalidate the target task
2218: IF lv_bypass_task = 'N' AND x_return_status = 'S' THEN
2219: IF g_debug_mode = 'Y' THEN
2220: pa_debug.write_file('LOG','Validate Target Task');
2221: End If;
2222: validate_task
2223: (g_project_id
2224: ,ln_target_task_id

Line 2232: pa_debug.g_err_stage := 'Validate_Target_Task for Task '

2228: ,x_return_status
2229: ,x_error_msg_count
2230: ,x_error_msg_code);
2231:
2232: pa_debug.g_err_stage := 'Validate_Target_Task for Task '
2233: ||lv_target_task_num||' in Project '||r_project.project_num;
2234:
2235: IF g_debug_mode = 'Y' THEN
2236: pa_debug.write_file('LOG','lv_bypass_task['

Line 2236: pa_debug.write_file('LOG','lv_bypass_task['

2232: pa_debug.g_err_stage := 'Validate_Target_Task for Task '
2233: ||lv_target_task_num||' in Project '||r_project.project_num;
2234:
2235: IF g_debug_mode = 'Y' THEN
2236: pa_debug.write_file('LOG','lv_bypass_task['
2237: ||lv_bypass_task||']x_return_status['
2238: ||x_return_status||
2239: ']x-errmsg['||x_error_msg_code||']');
2240: END IF;

Line 2257: pa_debug.write_file('LOG','Calling get_rate_multiplier');

2253:
2254: -- Get the rate multiplier if source specified is task owning org
2255: IF lv_bypass_task = 'N' AND x_return_status = 'S' THEN
2256: IF g_debug_mode = 'Y' THEN
2257: pa_debug.write_file('LOG','Calling get_rate_multiplier');
2258: End If;
2259: get_rate_multiplier
2260: (g_rate_name
2261: ,ln_sched_version_id

Line 2269: pa_debug.g_err_stage := 'Get_Rate_Multiplier for Rate '

2265: ,x_return_status
2266: ,x_error_msg_count
2267: ,x_error_msg_code);
2268:
2269: pa_debug.g_err_stage := 'Get_Rate_Multiplier for Rate '
2270: ||g_rate_name||' and Task '||lv_curr_task_num
2271: ||' in Project['||r_project.project_num
2272: ||']x-errmsg['||x_error_msg_code||']';
2273:

Line 2291: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

2287:
2288: IF lv_bypass_task = 'Y' THEN
2289:
2290: IF g_debug_mode = 'Y' THEN
2291: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
2292: ' Task bypassed by '||pa_debug.g_err_stage);
2293: END IF;
2294:
2295: -- Write the exception for the task if appropriate

Line 2292: ' Task bypassed by '||pa_debug.g_err_stage);

2288: IF lv_bypass_task = 'Y' THEN
2289:
2290: IF g_debug_mode = 'Y' THEN
2291: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
2292: ' Task bypassed by '||pa_debug.g_err_stage);
2293: END IF;
2294:
2295: -- Write the exception for the task if appropriate
2296: write_exception

Line 2308: pa_debug.g_err_stage := 'Write_Exception for Task '

2304: ,x_error_msg_count
2305: ,x_error_msg_code);
2306:
2307: IF x_return_status = 'U' THEN
2308: pa_debug.g_err_stage := 'Write_Exception for Task '
2309: ||lv_curr_task_num||' in Project['
2310: ||r_project.project_num
2311: ||']x-errmsg['||x_error_msg_code||']';
2312: RAISE process_error;

Line 2374: pa_debug.write_file('LOG','Calling Client Extn calculate_capInt');

2370: ,2);
2371:
2372: -- Perform a custom calculation if desired
2373: IF g_debug_mode = 'Y' THEN
2374: pa_debug.write_file('LOG','Calling Client Extn calculate_capInt');
2375: End if;
2376: pa_client_extn_cap_int.calculate_cap_interest
2377: (g_gl_period
2378: ,g_rate_name

Line 2397: pa_debug.g_err_stage := 'Calculate_Cap_Interest client extension x-errmsg['||x_error_msg_code||']';

2393: ,x_error_msg_code);
2394:
2395: -- Check the results of the custom calculation
2396: IF x_return_status = 'U' THEN
2397: pa_debug.g_err_stage := 'Calculate_Cap_Interest client extension x-errmsg['||x_error_msg_code||']';
2398: RAISE process_error;
2399: END IF;
2400:
2401:

Line 2433: pa_debug.g_err_stage :=

2429:
2430:
2431: -- Check the results of the attribute retrieval
2432: IF x_return_status = 'U' THEN
2433: pa_debug.g_err_stage :=
2434: 'Get_Txn_Attributes client extension'||
2435: ']x-errmsg['||x_error_msg_code||']';
2436: RAISE process_error;
2437: END IF;

Line 2453: pa_debug.g_err_stage := 'Get Alloc Txn ID'||

2449: WHEN OTHERS THEN
2450: x_return_status := 'U';
2451: x_error_msg_count := 1;
2452: x_error_msg_code := SQLERRM;
2453: pa_debug.g_err_stage := 'Get Alloc Txn ID'||
2454: ']x-errmsg['||x_error_msg_code||']';
2455: RAISE process_error;
2456: END;
2457:

Line 2492: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

2488: - lt_curr_period_amt(j);
2489: END LOOP;
2490:
2491: IF g_debug_mode = 'Y' THEN
2492: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2493: ||' Task '||lv_curr_task_num
2494: ||' bypassed by Actual Task Threshold');
2495: END IF;
2496:

Line 2510: pa_debug.g_err_stage := 'Write_Exception for Task '

2506: ,x_error_msg_count
2507: ,x_error_msg_code);
2508:
2509: IF x_return_status = 'U' THEN
2510: pa_debug.g_err_stage := 'Write_Exception for Task '
2511: ||lv_curr_task_num||' in Project '||r_project.project_num||
2512: ']x-errmsg['||x_error_msg_code||']';
2513: RAISE process_error;
2514: END IF;

Line 2532: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

2528: -- Bulk load the appropriate interest transactions from the current project
2529: ---------------------------------------------------------------------------
2530: IF ln_proj_trans_count > 0 THEN
2531: IF g_debug_mode = 'Y' THEN
2532: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
2533: ' Create the Interest Transactions');
2534: END IF;
2535:
2536: BEGIN

Line 2538: pa_debug.write_file('LOG','Insert pa_alloc_txn_details');

2534: END IF;
2535:
2536: BEGIN
2537: IF g_debug_mode = 'Y' THEN
2538: pa_debug.write_file('LOG','Insert pa_alloc_txn_details');
2539: pa_debug.write_file('LOG','Task_count'||lt_task_id.count||
2540: ']alloctxnid_count ['||lt_alloc_txn_id.count||
2541: ']target_task_count['||lt_target_task_id.count||
2542: ']capintamtcount[' ||lt_cap_int_amt.count||

Line 2539: pa_debug.write_file('LOG','Task_count'||lt_task_id.count||

2535:
2536: BEGIN
2537: IF g_debug_mode = 'Y' THEN
2538: pa_debug.write_file('LOG','Insert pa_alloc_txn_details');
2539: pa_debug.write_file('LOG','Task_count'||lt_task_id.count||
2540: ']alloctxnid_count ['||lt_alloc_txn_id.count||
2541: ']target_task_count['||lt_target_task_id.count||
2542: ']capintamtcount[' ||lt_cap_int_amt.count||
2543: ']lt taskid count[' ||lt_task_id.count||

Line 2645: pa_debug.g_err_stage :=

2641: WHEN OTHERS THEN
2642: x_return_status := 'U';
2643: x_error_msg_count := 1;
2644: x_error_msg_code := SQLERRM;
2645: pa_debug.g_err_stage :=
2646: 'Insert Interest Transactions for Project '
2647: ||r_project.project_num||']x-errMsg['||x_error_msg_code
2648: ||']' ;
2649: RAISE process_error;

Line 2658: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||

2654: -- Bulk load the associated source detail if requested
2655: ------------------------------------------------------
2656: IF p_source_details = 'Y' THEN
2657: IF g_debug_mode = 'Y' THEN
2658: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||
2659: ' Create the Source Details');
2660: END IF;
2661:
2662: BEGIN

Line 2727: pa_debug.g_err_stage :=

2723: WHEN OTHERS THEN
2724: x_return_status := 'U';
2725: x_error_msg_count := 1;
2726: x_error_msg_code := SQLERRM;
2727: pa_debug.g_err_stage :=
2728: 'Insert Source Details for Project'||r_project.project_num||
2729: ']x-errMsg['||x_error_msg_code||']';
2730: RAISE process_error;
2731: END;

Line 2758: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

2754: ,x_error_msg_count
2755: ,x_error_msg_code);
2756:
2757: IF g_debug_mode = 'Y' THEN
2758: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2759: ||' Project bypassed by '||pa_debug.g_err_stage);
2760: END IF;
2761:
2762: IF x_return_status = 'U' THEN

Line 2759: ||' Project bypassed by '||pa_debug.g_err_stage);

2755: ,x_error_msg_code);
2756:
2757: IF g_debug_mode = 'Y' THEN
2758: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2759: ||' Project bypassed by '||pa_debug.g_err_stage);
2760: END IF;
2761:
2762: IF x_return_status = 'U' THEN
2763: pa_debug.g_err_stage := 'Write_Exception for Project '||r_project.project_num

Line 2763: pa_debug.g_err_stage := 'Write_Exception for Project '||r_project.project_num

2759: ||' Project bypassed by '||pa_debug.g_err_stage);
2760: END IF;
2761:
2762: IF x_return_status = 'U' THEN
2763: pa_debug.g_err_stage := 'Write_Exception for Project '||r_project.project_num
2764: ||']x-errMsg['||x_error_msg_code||']';
2765: RAISE process_error;
2766: END IF;
2767:

Line 2783: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

2779: ln_warning_written := ln_warning_written + ln_proj_warning_count;
2780:
2781:
2782: IF g_debug_mode = 'Y' THEN
2783: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2784: ||' Num of Trans '||TO_CHAR(ln_proj_trans_count));
2785: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2786: ||' Num of Details is '||TO_CHAR(ln_proj_detail_count));
2787: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

Line 2785: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

2781:
2782: IF g_debug_mode = 'Y' THEN
2783: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2784: ||' Num of Trans '||TO_CHAR(ln_proj_trans_count));
2785: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2786: ||' Num of Details is '||TO_CHAR(ln_proj_detail_count));
2787: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2788: ||' Num of Errors '||TO_CHAR(ln_proj_error_count));
2789: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

Line 2787: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

2783: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2784: ||' Num of Trans '||TO_CHAR(ln_proj_trans_count));
2785: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2786: ||' Num of Details is '||TO_CHAR(ln_proj_detail_count));
2787: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2788: ||' Num of Errors '||TO_CHAR(ln_proj_error_count));
2789: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2790: ||' Num of Warnings '||TO_CHAR(ln_proj_warning_count));
2791: END IF;

Line 2789: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

2785: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2786: ||' Num of Details is '||TO_CHAR(ln_proj_detail_count));
2787: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2788: ||' Num of Errors '||TO_CHAR(ln_proj_error_count));
2789: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
2790: ||' Num of Warnings '||TO_CHAR(ln_proj_warning_count));
2791: END IF;
2792:
2793:

Line 2795: IF pa_debug.release_user_lock('PA_CAP_INT_'||to_char(r_project.project_id)) < 0 THEN

2791: END IF;
2792:
2793:
2794: -- Release the project lock
2795: IF pa_debug.release_user_lock('PA_CAP_INT_'||to_char(r_project.project_id)) < 0 THEN
2796: pa_debug.g_err_stage := 'Lock Release for Project '||r_project.project_num;
2797: x_return_status := 'U';
2798: x_error_msg_count := 1;
2799: x_error_msg_code := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),

Line 2796: pa_debug.g_err_stage := 'Lock Release for Project '||r_project.project_num;

2792:
2793:
2794: -- Release the project lock
2795: IF pa_debug.release_user_lock('PA_CAP_INT_'||to_char(r_project.project_id)) < 0 THEN
2796: pa_debug.g_err_stage := 'Lock Release for Project '||r_project.project_num;
2797: x_return_status := 'U';
2798: x_error_msg_count := 1;
2799: x_error_msg_code := NVL(fnd_message.get_string('PA', 'PA_CAP_CANNOT_RELS_LOCK'),
2800: 'PA_CAP_CANNOT_RELS_LOCK');

Line 2825: pa_debug.g_err_stage := 'Remove_Run for Rate '||g_rate_name||

2821: ,x_error_msg_count
2822: ,x_error_msg_code);
2823:
2824: IF x_return_status <> 'S' THEN
2825: pa_debug.g_err_stage := 'Remove_Run for Rate '||g_rate_name||
2826: ']x-errMsg['||x_error_msg_code||']';
2827: RAISE process_error;
2828: END IF;
2829:

Line 2857: pa_debug.g_err_stage := 'Updating Total Trans Amt for Rate '

2853: WHEN OTHERS THEN
2854: x_return_status := 'U';
2855: x_error_msg_count := 1;
2856: x_error_msg_code := SQLERRM;
2857: pa_debug.g_err_stage := 'Updating Total Trans Amt for Rate '
2858: ||g_rate_name||']x-errMsg['||x_error_msg_code||']';
2859: RAISE process_error;
2860: END;
2861:

Line 2869: pa_debug.write_file('LOG','Calling pa_alloc_run.release_capint_txns API');

2865: * no successful transactions exists in pa_alloc_txn_details table
2866: */
2867: IF release_capint_txns_exists(ln_run_id) = 'Y' THEN
2868: IF g_debug_mode = 'Y' THEN
2869: pa_debug.write_file('LOG','Calling pa_alloc_run.release_capint_txns API');
2870: End If;
2871:
2872: pa_alloc_run.release_capint_txns
2873: (ln_run_id

Line 2879: pa_debug.g_err_stage := 'Release_Alloc_Txns for Rate '||g_rate_name||

2875: ,x_error_msg_count
2876: ,x_error_msg_code);
2877:
2878: IF x_return_status = 'U' THEN
2879: pa_debug.g_err_stage := 'Release_Alloc_Txns for Rate '||g_rate_name||
2880: ']x-errMsg['||x_error_msg_code||']';
2881: RAISE process_error;
2882: END IF;
2883: END IF; -- End of txn_exists

Line 2889: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||' End program');

2885: END IF; -- end of successful run
2886: END LOOP; -- rate
2887:
2888: IF g_debug_mode = 'Y' THEN
2889: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||' End program');
2890: END IF;
2891:
2892: -- Execution section if called from the form button in 'Release' mode
2893: ELSE

Line 2900: pa_debug.write_file('LOG','Calling pa_alloc_run.release_capint_txns API');

2896: * no successful transactions exists in pa_alloc_txn_details table
2897: */
2898: IF release_capint_txns_exists(x_run_id) = 'Y' THEN
2899: IF g_debug_mode = 'Y' THEN
2900: pa_debug.write_file('LOG','Calling pa_alloc_run.release_capint_txns API');
2901: End If;
2902:
2903: pa_alloc_run.release_capint_txns
2904: (x_run_id

Line 2910: pa_debug.g_err_stage := 'Release_Alloc_Txns for Run ID '||TO_CHAR(x_run_id)||

2906: ,x_error_msg_count
2907: ,x_error_msg_code);
2908:
2909: IF x_return_status = 'U' THEN
2910: pa_debug.g_err_stage := 'Release_Alloc_Txns for Run ID '||TO_CHAR(x_run_id)||
2911: ']x-errMsg['||x_error_msg_code||']';
2912: RAISE process_error;
2913: END IF;
2914: END IF ; -- end of txns_exists

Line 2917: pa_debug.reset_err_stack;

2913: END IF;
2914: END IF ; -- end of txns_exists
2915: END IF;
2916:
2917: pa_debug.reset_err_stack;
2918: EXCEPTION
2919: WHEN process_error THEN
2920: pa_debug.write_file('LOG',substr('EXCEPTION:'||pa_debug.g_err_stage||'X-errMsg['||
2921: x_error_msg_code||']X-retStats['||x_return_status||']'||sqlcode||sqlerrm,1,500));

Line 2920: pa_debug.write_file('LOG',substr('EXCEPTION:'||pa_debug.g_err_stage||'X-errMsg['||

2916:
2917: pa_debug.reset_err_stack;
2918: EXCEPTION
2919: WHEN process_error THEN
2920: pa_debug.write_file('LOG',substr('EXCEPTION:'||pa_debug.g_err_stage||'X-errMsg['||
2921: x_error_msg_code||']X-retStats['||x_return_status||']'||sqlcode||sqlerrm,1,500));
2922: ROLLBACK; -- Added here as the releasing dbms lock always causes commit
2923: IF p_mode = 'G' and ln_run_id is NOT NULL Then
2924: remove_run

Line 2932: v_success_flag :=pa_debug.release_user_lock('PA_CAP_INT_'||to_char(g_project_id));

2928: ,x_error_msg_count
2929: ,x_error_msg_code);
2930: End If;
2931: IF p_mode = 'G' and g_project_id is not NULL then
2932: v_success_flag :=pa_debug.release_user_lock('PA_CAP_INT_'||to_char(g_project_id));
2933: End If;
2934:
2935: pa_debug.reset_err_stack;
2936: RAISE;

Line 2935: pa_debug.reset_err_stack;

2931: IF p_mode = 'G' and g_project_id is not NULL then
2932: v_success_flag :=pa_debug.release_user_lock('PA_CAP_INT_'||to_char(g_project_id));
2933: End If;
2934:
2935: pa_debug.reset_err_stack;
2936: RAISE;
2937: -- R12 NOCOPY mandate - adding when others for param x_run_id
2938: WHEN OTHERS THEN
2939: pa_debug.write_file('LOG',substr('EXCEPTION:' || sqlcode

Line 2939: pa_debug.write_file('LOG',substr('EXCEPTION:' || sqlcode

2935: pa_debug.reset_err_stack;
2936: RAISE;
2937: -- R12 NOCOPY mandate - adding when others for param x_run_id
2938: WHEN OTHERS THEN
2939: pa_debug.write_file('LOG',substr('EXCEPTION:' || sqlcode
2940: ||sqlerrm,1,500));
2941: ROLLBACK; -- Added here as the releasing dbms lock always causes commit
2942: x_return_status := 'U';
2943: x_error_msg_count := x_error_msg_count + 1;

Line 2989: pa_debug.init_err_stack ('PA_CAP_INT_PVT.GENERATE_CAP_INTEREST');

2985: x_error_msg_code := NULL;
2986:
2987:
2988: -- Initialize the error stack
2989: pa_debug.init_err_stack ('PA_CAP_INT_PVT.GENERATE_CAP_INTEREST');
2990:
2991: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);
2992: g_debug_mode := NVL(g_debug_mode, 'N');
2993:

Line 2991: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);

2987:
2988: -- Initialize the error stack
2989: pa_debug.init_err_stack ('PA_CAP_INT_PVT.GENERATE_CAP_INTEREST');
2990:
2991: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);
2992: g_debug_mode := NVL(g_debug_mode, 'N');
2993:
2994: pa_debug.set_process
2995: (x_process => 'PLSQL'

Line 2994: pa_debug.set_process

2990:
2991: fnd_profile.get('PA_DEBUG_MODE',g_debug_mode);
2992: g_debug_mode := NVL(g_debug_mode, 'N');
2993:
2994: pa_debug.set_process
2995: (x_process => 'PLSQL'
2996: ,x_write_file => 'LOG'
2997: ,x_debug_mode => g_debug_mode);
2998:

Line 3013: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||' Start program');

3009: g_request_id := fnd_global.conc_request_id;
3010:
3011:
3012: IF g_debug_mode = 'Y' THEN
3013: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:') ||' Start program');
3014: END IF;
3015:
3016:
3017: -- Get information for the parameter GL period

Line 3030: pa_debug.g_err_stage := 'Get_Period_Dates for Period '||p_gl_period;

3026: ,x_error_msg_count
3027: ,x_error_msg_code);
3028:
3029: IF x_return_status = 'U' THEN
3030: pa_debug.g_err_stage := 'Get_Period_Dates for Period '||p_gl_period;
3031: RAISE process_error;
3032: END IF;
3033:
3034:

Line 3054: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

3050:
3051: COMMIT;
3052:
3053: IF g_debug_mode = 'Y' THEN
3054: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
3055: ||' Rows deleted ['||TO_CHAR(ln_rows_deleted)||']');
3056: END IF;
3057: EXCEPTION
3058: WHEN NO_DATA_FOUND THEN

Line 3064: pa_debug.g_err_stage := 'Delete_Source_Detail x-errMsg['||x_error_msg_code||']';

3060: WHEN OTHERS THEN
3061: x_return_status := 'U';
3062: x_error_msg_count := 1;
3063: x_error_msg_code := SQLERRM;
3064: pa_debug.g_err_stage := 'Delete_Source_Detail x-errMsg['||x_error_msg_code||']';
3065: RAISE process_error;
3066: END;
3067:
3068:

Line 3079: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')

3075: END LOOP;
3076:
3077:
3078: IF g_debug_mode = 'Y' THEN
3079: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
3080: ||' Total Rows deleted ['||TO_CHAR(ln_tot_rows_deleted)||']');
3081: END IF;
3082:
3083: pa_debug.reset_err_stack;

Line 3083: pa_debug.reset_err_stack;

3079: pa_debug.write_file('LOG', TO_CHAR(SYSDATE,'HH24:MI:SS:')
3080: ||' Total Rows deleted ['||TO_CHAR(ln_tot_rows_deleted)||']');
3081: END IF;
3082:
3083: pa_debug.reset_err_stack;
3084: EXCEPTION
3085: WHEN process_error THEN
3086: pa_debug.write_file('LOG',substr('EXCEPTION IN PURGE_SOURCE_DETAIL:'||x_error_msg_code,1,500));
3087: pa_debug.reset_err_stack;

Line 3086: pa_debug.write_file('LOG',substr('EXCEPTION IN PURGE_SOURCE_DETAIL:'||x_error_msg_code,1,500));

3082:
3083: pa_debug.reset_err_stack;
3084: EXCEPTION
3085: WHEN process_error THEN
3086: pa_debug.write_file('LOG',substr('EXCEPTION IN PURGE_SOURCE_DETAIL:'||x_error_msg_code,1,500));
3087: pa_debug.reset_err_stack;
3088: RAISE;
3089: END;
3090:

Line 3087: pa_debug.reset_err_stack;

3083: pa_debug.reset_err_stack;
3084: EXCEPTION
3085: WHEN process_error THEN
3086: pa_debug.write_file('LOG',substr('EXCEPTION IN PURGE_SOURCE_DETAIL:'||x_error_msg_code,1,500));
3087: pa_debug.reset_err_stack;
3088: RAISE;
3089: END;
3090:
3091: