[Home] [Help]
51: l_temp_status_code VARCHAR2(80);
52: TYPE status_count_table IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
53: l_status_count_table status_count_table;
54: l_loop_index NUMBER;
55: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
56: BEGIN
57: -- Get all of the lookup values for the status code
58: -- There are 7, 1-Pending, 2-Queued, 3-Dispatched, 4-Loaded , 5 -errored, 6-Completed, 7-Hold
59: i := 1;
216: l_temp_task_type VARCHAR2(80);
217: TYPE task_count_table IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
218: l_task_count_table task_count_table;
219:
220: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
221: BEGIN
222: -- Get all of the lookup values for the task type description
223: -- There should be only 6, 1-Pick, 2-Putaway, 3-Cycle Count, 4-Replenish 5-MOXfer 6-MOIssue
224: l_loop_index := 1;
370: , p_to_status IN NUMBER ) RETURN VARCHAR2 IS
371:
372: l_is_valid VARCHAR2(2);
373:
374: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
375: BEGIN
376: l_is_valid := 'N';
377:
378: IF p_from_status = 1 THEN
456: recinfo_mcce C_mcce%ROWTYPE; --kkoothan
457: recinfo_mmtt C_mmtt%ROWTYPE;
458: recinfo_wdt C_wdt%ROWTYPE;
459:
460: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
461: BEGIN
462: IF p_transaction_source_type_id = 9 THEN -- kkoothan
463: -- cycle count Task
464:
565: FOR UPDATE OF entry_status_code, task_priority NOWAIT;
566:
567: recinfo_mcce C_mcce%ROWTYPE; --kkoothan
568:
569: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
570: BEGIN
571: IF (l_debug = 1) THEN
572: mydebug('Inside lock_row p_transaction_temp_id:'||p_transaction_temp_id);
573: END IF;
642: ,p_user_task_type IN NUMBER
643: ,p_last_update_date IN DATE /* Bug 2372652 */
644: ) IS
645:
646: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
647: BEGIN
648:
649: UPDATE MTL_CYCLE_COUNT_ENTRIES
650: SET
673: ,p_user_task_type IN NUMBER
674: ,p_task_type IN NUMBER
675: ) IS
676:
677: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
678: BEGIN
679: --dbms_output.put_line('in update_mmtt '|| p_transaction_temp_id || ':' || p_priority || ':' ||p_from_status || ':' ||p_to_status);
680:
681: UPDATE mtl_material_transactions_temp
709: ,p_updated_by IN NUMBER
710: ,p_user_task_type IN NUMBER
711: ,p_task_type IN NUMBER
712: ) IS
713: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
714: BEGIN
715: --dbms_output.put_line('in update wdt');
716: UPDATE wms_dispatched_tasks
717: SET
750: l_next_task_id NUMBER;
751: l_operation_plan_id NUMBER;
752: l_move_order_line_id NUMBER;
753:
754: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
755: BEGIN
756:
757: --Get value from sequence for next task id
758: SELECT wms_dispatched_tasks_s.NEXTVAL
820: /************************************
821: ************************************/
822: PROCEDURE delete_from_wdt(
823: p_transaction_temp_id IN NUMBER , p_task_id IN NUMBER) IS
824: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
825: BEGIN
826: DELETE FROM wms_dispatched_tasks
827: WHERE transaction_temp_id = p_transaction_temp_id
828: AND task_id = nvl(p_task_id, task_id);
870: from_status_code VARCHAR2(10) ;
871: to_status_code VARCHAR2(10) ;
872:
873:
874: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
875: BEGIN
876: x_return_status := fnd_api.g_ret_sts_success;
877: x_task_id := p_task_id;
878:
1152: PROCEDURE mydebug(msg in varchar2)
1153: IS
1154: l_msg VARCHAR2(5100);
1155: l_ts VARCHAR2(30);
1156: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1157: BEGIN
1158: -- select to_char(sysdate,'MM/DD/YYYY HH:MM:SS') INTO l_ts from dual;
1159: -- l_msg:=l_ts||' '||msg;
1160: