[Home] [Help]
2268: , p_item_rec minmax_items_rectype) RETURN VARCHAR2 IS
2269:
2270: v_make_buy_flag NUMBER;
2271: l_error_message VARCHAR2(100);
2272: l_ret_stat VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2273: need_by_date DATE;
2274: reorder_qty NUMBER;
2275: move_ord_qty NUMBER;
2276: counter INTEGER;
2386: , x_ret_stat => l_ret_stat
2387: , x_ret_mesg => l_error_message
2388: );
2389:
2390: IF l_ret_stat <> FND_API.G_RET_STS_SUCCESS
2391: THEN
2392: print_debug('do_restock returned message: ' || l_error_message
2393: , 'get_reord_stat'
2394: , 9);
2453: move_ord_exc EXCEPTION;
2454: l_ret_stat VARCHAR2(1);
2455:
2456: BEGIN
2457: x_ret_stat := FND_API.G_RET_STS_SUCCESS;
2458: x_ret_mesg := '';
2459:
2460: --
2461: -- Query debug settings, set global variables.
2566: , p_src_subinv => p_src_subinv
2567: , p_subinv => p_subinv
2568: );
2569:
2570: IF l_ret_value <> FND_API.G_RET_STS_SUCCESS
2571: THEN
2572: RAISE move_ord_exc;
2573: END IF;
2574:
2669: FROM mfg_lookups
2670: WHERE lookup_type = 'INV_MMX_RPT_MSGS'
2671: AND lookup_code = 5;
2672:
2673: x_ret_stat := FND_API.G_RET_STS_ERROR;
2674:
2675: WHEN others THEN
2676: print_debug(sqlcode || ', ' || sqlerrm, 'do_restock', 1);
2677: RAISE;
2895: p_budget_acct,
2896: 'P',
2897: p_po_org_id);
2898:
2899: x_ret_stat := FND_API.G_RET_STS_SUCCESS;
2900: x_ret_mesg := '';
2901:
2902: EXCEPTION
2903: WHEN OTHERS THEN
2908: FROM mfg_lookups
2909: WHERE lookup_type = 'INV_MMX_RPT_MSGS'
2910: AND lookup_code = 1;
2911:
2912: x_ret_stat := FND_API.G_RET_STS_ERROR;
2913: END re_po;
2914:
2915:
2916:
2982: p_qty,
2983: DECODE(p_approval,1,1,2,3));
2984: END IF;
2985:
2986: x_ret_stat := FND_API.G_RET_STS_SUCCESS;
2987: x_ret_mesg := '';
2988:
2989: EXCEPTION
2990: WHEN OTHERS THEN
2995: FROM mfg_lookups
2996: WHERE lookup_type = 'INV_MMX_RPT_MSGS'
2997: AND lookup_code = 2;
2998:
2999: x_ret_stat := FND_API.G_RET_STS_ERROR;
3000: END re_wip;
3001: --
3002: END CSP_Minmax_PVT;