[Home] [Help]
552: PRAGMA AUTONOMOUS_TRANSACTION;
553:
554: BEGIN
555:
556: INSERT INTO wip_txn_interface_errors
557: (transaction_id,
558: error_column,
559: error_message,
560: last_update_date,
584: END write_mtl_error;
585:
586: /*****************************************************************************
587: * This procedure will be used to record error messages from
588: * MTL_TRANSACTIONS_INTERFACE into WIP_TXN_INTERFACE_ERRORS
589: ****************************************************************************/
590: PROCEDURE write_mtl_errors(p_mtl_header_id IN NUMBER) IS
591:
592: CURSOR c_mtl_errors IS
1903: -- Get error from message stack
1904: wip_utilities.get_message_stack(p_msg =>l_msg);
1905: IF(l_msg IS NULL) THEN
1906: -- initialize message to something because we cannot insert
1907: -- null into WIP_TXN_INTERFACE_ERRORS
1908: fnd_message.set_name('WIP', 'WIP_SOME_RECORDS_ERROR');
1909: l_msg := fnd_message.get;
1910: END IF;
1911:
1908: fnd_message.set_name('WIP', 'WIP_SOME_RECORDS_ERROR');
1909: l_msg := fnd_message.get;
1910: END IF;
1911:
1912: INSERT INTO WIP_TXN_INTERFACE_ERRORS
1913: (transaction_id,
1914: error_column,
1915: error_message,
1916: last_update_date,
2589: -- Get error from message stack
2590: wip_utilities.get_message_stack(p_msg =>l_msg);
2591: IF(l_msg IS NULL) THEN
2592: -- initialize message to something because we cannot insert
2593: -- null into WIP_TXN_INTERFACE_ERRORS
2594: fnd_message.set_name('WIP', 'WIP_SOME_RECORDS_ERROR');
2595: l_msg := fnd_message.get;
2596: END IF;
2597:
2594: fnd_message.set_name('WIP', 'WIP_SOME_RECORDS_ERROR');
2595: l_msg := fnd_message.get;
2596: END IF;
2597:
2598: INSERT INTO WIP_TXN_INTERFACE_ERRORS
2599: (transaction_id,
2600: error_column,
2601: error_message,
2602: last_update_date,
9360: --FP bug 5752485 (base bug 4128207) Added the IF condition below since write_mtl_errors
9361: --is not applicable for ONLINE completions. Otherwise the fnd_msg_pub stack is initialized
9362: --inside write_mtl_errors which suppresses messages to be shown to the user in the UI
9363: IF (l_transaction_mode <> WIP_CONSTANTS.ONLINE) THEN
9364: -- write mtl error message into WIP_TXN_INTERFACE_ERRORS
9365: write_mtl_errors(p_mtl_header_id => p_gib.assy_header_id);
9366: END IF;
9367: l_errMsg := 'wip_mtlTempProc_priv.validateInterfaceTxns failed' ||
9368: ' (assembly records)' ;
10122: fnd_message.set_token('JOBNAME', l_job_name);
10123: l_errMsg := fnd_message.get;
10124: wip_logger.log(l_errMsg, l_returnStatus);
10125: /* insert error messages */
10126: INSERT INTO wip_txn_interface_errors
10127: (transaction_id,
10128: error_column,
10129: error_message,
10130: last_update_date,
10170: -- There is no return status from this routine. IF some record error out,
10171: -- just neglect it and continue validating other records. The error record
10172: -- will have process_status in WIP_MOVE_TXN_INTERFACE equal to (3) or
10173: -- WIP_CONSTANTS.ERROR, and those error records will not be picked up by
10174: -- move_txns. The error message also show up in WIP_TXN_INTERFACE_ERRORS
10175: END IF; -- Move Validation
10176:
10177: OPEN c_txn_date;
10178: LOOP
10541: ROLLBACK TO SAVEPOINT s_backflush_proc;
10542: wip_utilities.get_message_stack(p_msg =>l_errMsg);
10543: IF(l_errMsg IS NULL) THEN
10544: -- initialize message to something because we cannot
10545: -- insert null into WIP_TXN_INTERFACE_ERRORS
10546: fnd_message.set_name('WIP', 'WIP_SOME_RECORDS_ERROR');
10547: l_errMsg := fnd_message.get;
10548: END IF;
10549: IF(p_move_mode = WIP_CONSTANTS.BACKGROUND) THEN
10554: AND process_status = WIP_CONSTANTS.RUNNING
10555: AND transaction_id = l_backflush.txn_id;
10556:
10557: /* insert error messages */
10558: INSERT INTO wip_txn_interface_errors
10559: (transaction_id,
10560: error_column,
10561: error_message,
10562: last_update_date,
10613: p_rollbackOnErr => fnd_api.g_false,
10614: x_returnStatus => x_returnStatus);
10615:
10616: IF(x_returnStatus <> fnd_api.g_ret_sts_success) THEN
10617: -- write error into WIP_TXN_INTERFACE_ERRORS
10618: write_mtl_errors(p_mtl_header_id => l_gib.mtl_header_id);
10619: IF (l_logLevel <= wip_constants.full_logging) THEN
10620: l_errMsg := 'wip_mtlTempProc_priv.validateInterfaceTxns failed'||
10621: ' (component records)' ;
10706:
10707: wip_utilities.get_message_stack(p_msg =>l_errMsg);
10708: IF(l_errMsg IS NULL) THEN
10709: -- initialize message to something because we cannot insert null
10710: -- into WIP_TXN_INTERFACE_ERRORS
10711: fnd_message.set_name('WIP', 'WIP_SOME_RECORDS_ERROR');
10712: l_errMsg := fnd_message.get;
10713: END IF;
10714:
10712: l_errMsg := fnd_message.get;
10713: END IF;
10714:
10715: /* insert error messages */
10716: INSERT INTO wip_txn_interface_errors
10717: (transaction_id,
10718: error_column,
10719: error_message,
10720: last_update_date,
10742: FROM wip_move_txn_interface wmti
10743: WHERE wmti.group_id = p_group_id
10744: AND TRUNC(wmti.transaction_date) = TRUNC(l_gib.txn_date)
10745: AND NOT EXISTS (SELECT 1
10746: FROM wip_txn_interface_errors wtie
10747: WHERE wtie.transaction_id = wmti.transaction_id);
10748:
10749: ELSE -- move mode is online, write to log file
10750: IF(x_returnStatus = fnd_api.g_ret_sts_error) THEN
10780:
10781: l_errMsg := 'unexpected error: ' || SQLERRM;
10782:
10783: /* insert error messages */
10784: INSERT INTO wip_txn_interface_errors
10785: (transaction_id,
10786: error_column,
10787: error_message,
10788: last_update_date,
10810: FROM wip_move_txn_interface wmti
10811: WHERE wmti.group_id = p_group_id
10812: AND TRUNC(wmti.transaction_date) = TRUNC(l_gib.txn_date)
10813: AND NOT EXISTS (SELECT 1
10814: FROM wip_txn_interface_errors wtie
10815: WHERE wtie.transaction_id = wmti.transaction_id);
10816: ELSE -- move mode is online
10817: x_returnStatus := fnd_api.g_ret_sts_unexp_error;
10818: IF (l_logLevel <= wip_constants.trace_logging) THEN
11322:
11323: CURSOR c_errors IS
11324: SELECT wtie.error_column,
11325: wtie.error_message
11326: FROM wip_txn_interface_errors wtie,
11327: wip_move_txn_interface wmti
11328: WHERE wtie.transaction_id = wmti.transaction_id
11329: AND wmti.group_id = p_group_id;
11330: