[Home] [Help]
15:
16: IS
17: l_return_status VARCHAR2(1);
18:
19: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
20: BEGIN
21: l_return_status:= FND_API.G_RET_STS_SUCCESS;
22:
23: UPDATE mtl_txn_request_lines
92: CURSOR wip_lpn_comp_lots_csr IS
93: SELECT lot_number
94: FROM wip_lpn_completions_lots
95: WHERE header_id = l_temp_header_id;
96: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
97: BEGIN
98: l_return_status:= FND_API.G_RET_STS_SUCCESS;
99: l_query_result := 0;
100: l_txn_ret:=0;
893:
894: IS
895: l_serial_temp_id NUMBER;
896:
897: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
898: BEGIN
899: --Insert into MSNT attributes from WIP tables
900:
901: IF p_serial_flag = 2 THEN
1133: v13 VARCHAR2(150);
1134: v14 VARCHAR2(240);
1135: v15 VARCHAR2(150);
1136: v16 VARCHAR2(30);
1137: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1138: BEGIN
1139:
1140: --Update MTLT attributes from WIP tables
1141:
1398: l_item_id NUMBER;
1399: l_return_status VARCHAR2(1);
1400: l_object_id NUMBER;
1401:
1402: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1403:
1404: BEGIN
1405:
1406: l_return_status := FND_API.G_RET_STS_SUCCESS;
1600: l_object_id NUMBER;
1601: l_status_rec inv_material_status_pub.mtl_status_update_rec_type; --bug4073725
1602: l_status_id NUMBER;--bug4073725
1603:
1604: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1605: BEGIN
1606:
1607: l_return_status := FND_API.G_RET_STS_SUCCESS;
1608:
1844: l_return_status VARCHAR2(1):= FND_API.G_RET_STS_SUCCESS;
1845: l_shelf_life_code NUMBER;
1846: l_expiration_date DATE;
1847:
1848: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1849: BEGIN
1850:
1851: l_return_status := FND_API.G_RET_STS_SUCCESS;
1852:
1980: l_errorcode NUMBER;
1981: l_padded_length NUMBER;
1982: l_length NUMBER;
1983:
1984: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1985: BEGIN
1986: IF (l_debug = 1) THEN
1987: mydebug('post_completion: procedure post_completion begins');
1988: END IF;
2088: )
2089: IS
2090:
2091:
2092: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2093: BEGIN
2094:
2095: IF (l_debug = 1) THEN
2096: mydebug('get_wip_job_info: get_wip_job_info begins');
2283: l_wip_entity_type NUMBER;
2284: l_org_id NUMBER;
2285: l_wip_entity_id NUMBER;
2286:
2287: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2288: BEGIN
2289:
2290: IF (l_debug = 1) THEN
2291: mydebug('get_wip_info_for_putaway: get_wip_info_for_putaway begins');
2502: l_return_status VARCHAR2(1);
2503: l_msg_data VARCHAR2(2500);
2504: l_msg_count NUMBER;
2505:
2506: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2507: BEGIN
2508:
2509: l_return_status := FND_API.G_RET_STS_SUCCESS;
2510:
2572: l_content_lpn_id NUMBER;
2573: l_lot_primary_qty NUMBER;
2574: l_primary_qty NUMBER;
2575: l_lpn_controlled_flag NUMBER;
2576: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2577: BEGIN
2578:
2579: IF (l_debug = 1) THEN
2580: mydebug('transfer_Reservation: transfer_Reservation API begins');
2697: PROCEDURE mydebug(msg in varchar2)
2698: IS
2699: l_msg VARCHAR2(5100);
2700: l_ts VARCHAR2(30);
2701: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2702: BEGIN
2703: -- select to_char(sysdate,'MM/DD/YYYY HH:MM:SS') INTO l_ts from dual;
2704: -- l_msg:=l_ts||' '||msg;
2705:
2727: l_repetitive_line_id NUMBER;
2728: l_department_id NUMBER;
2729: l_department_code bom_departments.department_code%TYPE;
2730:
2731: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2732: l_project_id NUMBER := NULL ; --Bug6604904
2733: l_task_id NUMBER := NULL ; --Bug6604904
2734:
2735: BEGIN
2948: p_business_flow_code IN NUMBER,
2949: x_return_status OUT NOCOPY VARCHAR2)
2950: IS
2951:
2952: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2953: l_errorMsg VARCHAR2(100);
2954: BEGIN
2955:
2956: IF (l_debug = 1) THEN