22: -----------------------------------------------------
23: -- trace
24: -----------------------------------------------------
25: PROCEDURE trace(p_msg IN VARCHAR2) IS
26: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
27: BEGIN
28: inv_trx_util_pub.trace(p_msg, 'WMS_DEVICE_CONFIRMATION_PUB', 9);
29: END trace;
30:
57: AND task_id = p_txn_temp_id
58: AND business_event_id IN (wms_device_integration_pvt.wms_be_task_confirm,wms_device_integration_pvt.wms_be_load_confirm)
59: AND task_summary = 'N';
60:
61: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
62:
63: BEGIN
64: IF (l_debug = 1) THEN
65: trace('Inside validate_child_record');
244: FROM wms_device_requests
245: WHERE business_event_id IN (wms_device_integration_pvt.wms_be_load_confirm,wms_device_integration_pvt.wms_be_task_confirm)
246: ORDER BY relation_id ASC,task_id ASC, task_summary desc;
247:
248: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
249: BEGIN
250:
251: SELECT wms_device_requests_s.nextval INTO l_request_id FROM dual;
252: IF (l_debug = 1) THEN
378: x_msg_count OUT NOCOPY NUMBER,
379: x_msg_data OUT NOCOPY VARCHAR2 ) IS
380:
381: l_new_txn_temp_id NUMBER := 0;
382: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
383:
384: BEGIN
385:
386: x_return_status := FND_API.G_RET_STS_SUCCESS ;
891: ---------------------------------------------------------
892: FUNCTION GET_MSG_STACK RETURN VARCHAR2 IS
893: l_msg_count number;
894: l_msg_data varchar2(240);
895: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
896: BEGIN
897: fnd_msg_pub.count_And_get(
898: p_count => l_msg_count,
899: p_data => l_msg_data,
918: PROCEDURE update_wdr_for_error_rec(p_task_id IN NUMBER
919: ,p_relation_id IN NUMBER) IS
920: l_status_msg VARCHAR2(240);
921:
922: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
923: BEGIN
924: l_status_msg := get_msg_stack;--only last message
925: --IN the stack
926: UPDATE wms_device_requests
1083: FROM
1084: mtl_transaction_lots_temp mtlt
1085: WHERE mtlt.transaction_temp_id = p_temp_id;
1086:
1087: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1088: BEGIN
1089:
1090: IF (l_debug = 1) THEN
1091: trace('lpn_match: In lpn Match');
3187: l_pr_qty_diff NUMBER := 0;
3188: l_new_txn_temp_id NUMBER ; -- 14028129
3189:
3190:
3191: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3192: BEGIN
3193: x_successful_row_cnt := 0;
3194: x_return_status:=FND_API.G_RET_STS_SUCCESS;
3195: