DBA Data[Home] [Help]

APPS.PON_VALIDATE_SHIPMENTS_INT dependencies on FND_LOG

Line 50: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN

46: l_interface_type := 'NEGSHIPMTUPLOAD';
47: p_request_id := 0;
48:
49:
50: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
51: print_debug_log(l_module,'Before insert all valiations of validate_creation for p_batch_id = '||p_batch_id);
52: END IF;
53:
54: SELECT doctype_id INTO l_doctype_id FROM pon_auction_headers_all WHERE auction_Header_id = p_auction_header_id;

Line 208: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN

204: BEGIN
205:
206: x_result := 'S';
207:
208: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
209: print_debug_log(l_module,'COPY_SHIPMENTS_FROM_INT_TO_TXN START p_batch_id = '||p_batch_id);
210: END IF;
211:
212: update_shipment_number(p_batch_id, p_auction_header_id);

Line 306: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN

302: fnd_global.user_id ,
303: fnd_global.login_id
304: ) ;
305:
306: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
307: l_progress := 'Merge into pon_auction_shipments is successful for batch_id = '||p_batch_id;
308: END if;
309:
310:

Line 324: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN

320: -- Clear the interface tables
321: delete from pon_auc_price_breaks_interface where batch_id = p_batch_id;
322:
323:
324: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
325: l_progress := 'delete from pon_auc_shipments_interface completed for p_batch_id = '||p_batch_id;
326: END if;
327:
328: EXCEPTION

Line 333: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN

329: WHEN OTHERS THEN
330: x_result := 'E';
331: x_error_code := SQLCODE;
332: x_error_message := SUBSTR(SQLERRM, 1, 100);
333: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
334: print_error_log(l_module, 'EXCEPTION - l_progress='||l_progress||' x_result=' || x_result || ' x_error_code=' || x_error_code || ' x_error_message=' || x_error_message || ' SQLERRM=' || SQLERRM);
335: END if;
336: END copy_shipments_from_int_to_txn;
337:

Line 368: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN

364: l_interface_type := 'NEGSHIPMTUPLOAD';
365: p_request_id := 0;
366:
367:
368: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
369: print_debug_log(l_module,'Validating price breaks for p_batch_id = '||p_batch_id);
370: END IF;
371:
372: SELECT price_tiers_indicator INTO l_price_tiers_indicator

Line 1316: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN

1312: l_interface_type := 'NEGSHIPMTUPLOAD';
1313: p_request_id := 0;
1314:
1315:
1316: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1317: print_debug_log(l_module,'Validating quantity based price tiers for p_batch_id = '||p_batch_id);
1318: END IF;
1319:
1320:

Line 1704: error messages into FND logs

1700: /*======================================================================
1701: PROCEDURE: PRINT_ERROR_LOG PRIVATE
1702: PARAMETERS:
1703: COMMENT : This procedure is used to print unexpected exceptions or
1704: error messages into FND logs
1705: ======================================================================*/
1706:
1707: PROCEDURE print_error_log(p_module IN VARCHAR2,
1708: p_message IN VARCHAR2)

Line 1712: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN

1708: p_message IN VARCHAR2)
1709: IS
1710: BEGIN
1711:
1712: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1713: FND_LOG.string(log_level => FND_LOG.level_procedure,
1714: module => g_module_prefix || p_module,
1715: message => p_message);
1716: END if;

Line 1713: FND_LOG.string(log_level => FND_LOG.level_procedure,

1709: IS
1710: BEGIN
1711:
1712: IF (g_fnd_debug = 'Y' and FND_LOG.level_procedure >= FND_LOG.g_current_runtime_level) THEN
1713: FND_LOG.string(log_level => FND_LOG.level_procedure,
1714: module => g_module_prefix || p_module,
1715: message => p_message);
1716: END if;
1717:

Line 1724: FND logs

1720: /*======================================================================
1721: PROCEDURE: PRINT_DEBUG_LOG PRIVATE
1722: PARAMETERS:
1723: COMMENT : This procedure is used to print debug messages into
1724: FND logs
1725: ======================================================================*/
1726: PROCEDURE print_debug_log(p_module IN VARCHAR2,
1727: p_message IN VARCHAR2)
1728: IS

Line 1732: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN

1728: IS
1729:
1730: BEGIN
1731:
1732: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1733: FND_LOG.string(log_level => FND_LOG.level_statement,
1734: module => g_module_prefix || p_module,
1735: message => p_message);
1736: END if;

Line 1733: FND_LOG.string(log_level => FND_LOG.level_statement,

1729:
1730: BEGIN
1731:
1732: IF (g_fnd_debug = 'Y' and FND_LOG.level_statement >= FND_LOG.g_current_runtime_level) THEN
1733: FND_LOG.string(log_level => FND_LOG.level_statement,
1734: module => g_module_prefix || p_module,
1735: message => p_message);
1736: END if;
1737: END;