228:
229: l_return NUMBER;
230:
231: l_progress VARCHAR2(10);
232: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
233: BEGIN
234: --14274513
235: x_quantity := 0;
236: x_secondary_quantity := 0;
3002: l_return_status VARCHAR2(1);
3003:
3004: BEGIN
3005: x_return_status := FND_API.G_RET_STS_SUCCESS;
3006: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3007:
3008: IF p_source_id = 1 THEN
3009: -- Inbound
3010: query_inbound_material(