DBA Data[Home] [Help]

APPS.PO_SHARED_PROC_PVT dependencies on PO_DEBUG

Line 5: g_debug_stmt CONSTANT BOOLEAN := PO_DEBUG.is_debug_stmt_on;

1: PACKAGE BODY PO_SHARED_PROC_PVT AS
2: /* $Header: POXVSPSB.pls 120.0 2005/06/01 16:45:49 appldev noship $ */
3:
4: -- Debugging booleans used to bypass logging when turned off
5: g_debug_stmt CONSTANT BOOLEAN := PO_DEBUG.is_debug_stmt_on;
6: g_debug_unexp CONSTANT BOOLEAN := PO_DEBUG.is_debug_unexp_on;
7:
8: g_pkg_name CONSTANT VARCHAR2(20) := 'PO_SHARED_PROC_PVT';
9: g_module_prefix CONSTANT VARCHAR2(30) := 'po.plsql.' || g_pkg_name || '.';

Line 6: g_debug_unexp CONSTANT BOOLEAN := PO_DEBUG.is_debug_unexp_on;

2: /* $Header: POXVSPSB.pls 120.0 2005/06/01 16:45:49 appldev noship $ */
3:
4: -- Debugging booleans used to bypass logging when turned off
5: g_debug_stmt CONSTANT BOOLEAN := PO_DEBUG.is_debug_stmt_on;
6: g_debug_unexp CONSTANT BOOLEAN := PO_DEBUG.is_debug_unexp_on;
7:
8: g_pkg_name CONSTANT VARCHAR2(20) := 'PO_SHARED_PROC_PVT';
9: g_module_prefix CONSTANT VARCHAR2(30) := 'po.plsql.' || g_pkg_name || '.';
10:

Line 92: PO_DEBUG.debug_stmt

88:
89: l_progress := '010';
90:
91: IF g_debug_stmt THEN
92: PO_DEBUG.debug_stmt
93: (p_log_head => g_module_prefix||'check_transaction_flow',
94: p_token => 'invoked',
95: p_message => 'startou ID: '||p_start_ou_id||' endou ID: '||
96: p_end_ou_id||' shipto org: '||p_ship_to_org_id||

Line 106: PO_DEBUG.debug_stmt

102: IF (NOT g_is_txn_flow_supported) THEN
103: -- Transaction flows not supported, so return immediately
104: x_transaction_flow_header_id := NULL;
105: IF g_debug_stmt THEN
106: PO_DEBUG.debug_stmt
107: (p_log_head => g_module_prefix||'check_transaction_flow',
108: p_token => l_progress,
109: p_message => 'Transaction flows not supported');
110: END IF;

Line 132: PO_DEBUG.debug_stmt

128: -- Never use a transaction flow if the start and end OU's are equal
129: IF (p_start_ou_id = l_end_ou_id) THEN
130: x_transaction_flow_header_id := NULL;
131: IF g_debug_stmt THEN
132: PO_DEBUG.debug_stmt
133: (p_log_head => g_module_prefix||'check_transaction_flow',
134: p_token => l_progress,
135: p_message => 'Start OU and End OU same, so just return');
136: END IF;

Line 183: PO_DEBUG.debug_stmt

179: x_transaction_flow_header_id := NULL;
180: END IF;
181:
182: IF g_debug_stmt THEN
183: PO_DEBUG.debug_stmt
184: (p_log_head => g_module_prefix||'check_transaction_flow',
185: p_token => l_progress,
186: p_message => 'transaction flow = '||x_transaction_flow_header_id);
187: END IF;

Line 194: PO_DEBUG.debug_stmt

190: WHEN FND_API.g_exc_error THEN
191: x_return_status := FND_API.g_ret_sts_error;
192: x_transaction_flow_header_id := NULL;
193: IF g_debug_stmt THEN
194: PO_DEBUG.debug_stmt
195: (p_log_head => g_module_prefix||'check_transaction_flow',
196: p_token => l_progress,
197: p_message => 'Expected error occurred.');
198: END IF;

Line 203: PO_DEBUG.debug_exc

199: WHEN FND_API.g_exc_unexpected_error THEN
200: x_return_status := FND_API.g_ret_sts_unexp_error;
201: x_transaction_flow_header_id := NULL;
202: IF g_debug_unexp THEN
203: PO_DEBUG.debug_exc
204: (p_log_head => g_module_prefix||'check_transaction_flow',
205: p_progress => l_progress);
206: END IF;
207: WHEN OTHERS THEN

Line 215: PO_DEBUG.debug_exc

211: p_procedure_name => 'check_transaction_flow',
212: p_error_text => 'Progress: '||l_progress||
213: ' Error: '||SUBSTRB(SQLERRM,1,215));
214: IF g_debug_unexp THEN
215: PO_DEBUG.debug_exc
216: (p_log_head => g_module_prefix||'check_transaction_flow',
217: p_progress => l_progress);
218: END IF;
219: END check_transaction_flow;

Line 271: PO_DEBUG.debug_exc ( p_log_head => g_module_prefix || 'get_coa_from_inv_org'

267: return -1; -- may be raised as an exception in the calling program
268: WHEN OTHERS THEN
269: IF ( g_debug_unexp )
270: THEN
271: PO_DEBUG.debug_exc ( p_log_head => g_module_prefix || 'get_coa_from_inv_org'
272: , p_progress => '000' );
273: END IF;
274: RAISE;
275: END get_coa_from_inv_org;

Line 339: PO_DEBUG.debug_exc ( p_log_head => g_module_prefix || 'get_ou_and_coa_from_inv_org'

335: x_return_status := FND_API.g_ret_sts_error;
336: WHEN OTHERS THEN
337: IF ( g_debug_stmt )
338: THEN
339: PO_DEBUG.debug_exc ( p_log_head => g_module_prefix || 'get_ou_and_coa_from_inv_org'
340: , p_progress => '000' );
341: END IF;
342: x_return_status := FND_API.g_ret_sts_unexp_error;
343: END get_ou_and_coa_from_inv_org;

Line 1141: PO_DEBUG.debug_stmt

1137:
1138: l_progress := '010';
1139:
1140: IF g_debug_stmt THEN
1141: PO_DEBUG.debug_stmt
1142: (p_log_head => g_module_prefix||'check_item_in_inventory_org',
1143: p_token => 'invoked',
1144: p_message => 'item ID: '||p_item_id||' item rev: '||
1145: p_item_revision||' invorg ID: '||p_inv_org_id);

Line 1196: PO_DEBUG.debug_var

1192:
1193: END IF; --< if item_id not null >
1194:
1195: IF g_debug_stmt THEN
1196: PO_DEBUG.debug_var
1197: (p_log_head => g_module_prefix||'check_item_in_inventory_org',
1198: p_progress => l_progress,
1199: p_name => 'x_in_inv_org',
1200: p_value => x_in_inv_org);

Line 1213: PO_DEBUG.debug_exc

1209: p_procedure_name => 'check_item_in_inventory_org',
1210: p_error_text => 'Progress: '||l_progress||' Error: '||
1211: SUBSTRB(SQLERRM,1,215));
1212: IF g_debug_unexp THEN
1213: PO_DEBUG.debug_exc
1214: (p_log_head => g_module_prefix||'check_item_in_inventory_org',
1215: p_progress => l_progress);
1216: END IF;
1217: END check_item_in_inventory_org;

Line 1309: PO_DEBUG.debug_stmt

1305:
1306: l_progress := '010';
1307:
1308: IF g_debug_stmt THEN
1309: PO_DEBUG.debug_stmt
1310: (p_log_head => g_module_prefix||'validate_ship_to_org',
1311: p_token => 'invoked',
1312: p_message => 'shipto org ID: '||p_ship_to_org_id||
1313: ' item cat ID: '||p_item_category_id);

Line 1446: PO_DEBUG.debug_var

1442:
1443: END IF; --< if check txn flow >
1444:
1445: IF g_debug_stmt THEN
1446: PO_DEBUG.debug_var
1447: (p_log_head => g_module_prefix||'validate_ship_to_org',
1448: p_progress => l_progress,
1449: p_name => 'x_in_current_sob',
1450: p_value => x_in_current_sob);

Line 1451: PO_DEBUG.debug_var

1447: (p_log_head => g_module_prefix||'validate_ship_to_org',
1448: p_progress => l_progress,
1449: p_name => 'x_in_current_sob',
1450: p_value => x_in_current_sob);
1451: PO_DEBUG.debug_var
1452: (p_log_head => g_module_prefix||'validate_ship_to_org',
1453: p_progress => l_progress,
1454: p_name => 'x_check_txn_flow',
1455: p_value => x_check_txn_flow);

Line 1456: PO_DEBUG.debug_var

1452: (p_log_head => g_module_prefix||'validate_ship_to_org',
1453: p_progress => l_progress,
1454: p_name => 'x_check_txn_flow',
1455: p_value => x_check_txn_flow);
1456: PO_DEBUG.debug_var
1457: (p_log_head => g_module_prefix||'validate_ship_to_org',
1458: p_progress => l_progress,
1459: p_name => 'x_is_valid',
1460: p_value => x_is_valid);

Line 1469: PO_DEBUG.debug_stmt

1465: -- There should be an error message appended to the API message list
1466: x_return_status := FND_API.g_ret_sts_error;
1467: x_is_valid := FALSE;
1468: IF g_debug_stmt THEN
1469: PO_DEBUG.debug_stmt
1470: (p_log_head => g_module_prefix||'validate_ship_to_org',
1471: p_token => l_progress,
1472: p_message => 'Expected error occurred.');
1473: END IF;

Line 1479: PO_DEBUG.debug_exc

1475: -- There should be an error message appended to the API message list
1476: x_return_status := FND_API.g_ret_sts_unexp_error;
1477: x_is_valid := FALSE;
1478: IF g_debug_unexp THEN
1479: PO_DEBUG.debug_exc
1480: (p_log_head => g_module_prefix||'validate_ship_to_org',
1481: p_progress => l_progress);
1482: END IF;
1483: WHEN OTHERS THEN

Line 1491: PO_DEBUG.debug_exc

1487: p_procedure_name => 'validate_ship_to_org',
1488: p_error_text => 'Progress: '||l_progress||
1489: ' Error: '||SUBSTRB(SQLERRM,1,215));
1490: IF g_debug_unexp THEN
1491: PO_DEBUG.debug_exc
1492: (p_log_head => g_module_prefix||'validate_ship_to_org',
1493: p_progress => l_progress);
1494: END IF;
1495: END validate_ship_to_org;

Line 1616: PO_DEBUG.debug_exc

1612: FND_MSG_PUB.add_exc_msg(p_pkg_name => g_pkg_name,
1613: p_procedure_name => 'do_item_validity_checks',
1614: p_error_text => NULL);
1615: IF g_debug_unexp THEN
1616: PO_DEBUG.debug_exc
1617: (p_log_head => g_module_prefix||'do_item_validity_checks',
1618: p_progress => '500');
1619: END IF;
1620: END do_item_validity_checks;

Line 1704: PO_DEBUG.debug_exc ( p_log_head => g_module_prefix || 'get_po_setup_parameters'

1700: EXCEPTION
1701: when others then
1702: IF ( g_debug_stmt )
1703: THEN
1704: PO_DEBUG.debug_exc ( p_log_head => g_module_prefix || 'get_po_setup_parameters'
1705: , p_progress => '000' );
1706: END IF;
1707: RAISE;
1708: END;

Line 1757: PO_DEBUG.debug_stmt(p_log_head => l_log_head,

1753: BEGIN
1754: l_progress := '010';
1755:
1756: IF g_debug_stmt THEN
1757: PO_DEBUG.debug_stmt(p_log_head => l_log_head,
1758: p_token => l_progress,
1759: p_message => 'Transaction flow header id: '
1760: || p_transaction_flow_header_id
1761: || 'Item id: ' || p_item_id);

Line 1779: PO_DEBUG.debug_stmt(p_log_head => l_log_head,

1775: l_logical_inv_org_id := get_logical_inv_org_id
1776: (p_transaction_flow_header_id => p_transaction_flow_header_id);
1777:
1778: IF g_debug_stmt THEN
1779: PO_DEBUG.debug_stmt(p_log_head => l_log_head,
1780: p_token => l_progress,
1781: p_message => 'POUs logical inventory org id: '
1782: || l_logical_inv_org_id);
1783: END IF;

Line 1816: PO_DEBUG.debug_exc(p_log_head => l_log_head,

1812: WHEN OTHERS THEN
1813: x_return_status := FND_API.g_ret_sts_unexp_error;
1814: x_item_in_linv_pou := 'N';
1815: IF g_debug_unexp THEN
1816: PO_DEBUG.debug_exc(p_log_head => l_log_head,
1817: p_progress => l_progress);
1818: END IF;
1819: END check_item_in_linv_pou;
1820: