70: (ItemDetailsRec.loct_ctl * WhseDetailsRec.loct_ctl = 0) THEN
71: RAISE ITEM_WHSE_NOT_LOT_LOCT;
72: END IF;
73:
74: P_default_loct := FND_PROFILE.VALUE('IC$DEFAULT_LOCT');
75:
76: /* Check to see wether allocations exist */
77: OPEN Cur_check_alloc;
78: FETCH Cur_check_alloc INTO X_exists;
218: V_partial_ind,
219: V_prefqc_grade;
220: IF(Cur_qry_allocation% NOTFOUND) THEN
221: /* if all else fails use the default values */
222: V_alloc_method := FND_PROFILE.VALUE('IC$ALLOC_METHOD');
223: V_shelf_days := FND_PROFILE.VALUE('IC$SHELF_DAYS');
224: V_alloc_horizon := FND_PROFILE.VALUE('IC$ALLOC_HORIZON');
225: V_alloc_type := FND_PROFILE.VALUE('IC$ALLOC_TYPE');
226: V_lot_qty := FND_PROFILE.VALUE('IC$LOT_QTY');
219: V_prefqc_grade;
220: IF(Cur_qry_allocation% NOTFOUND) THEN
221: /* if all else fails use the default values */
222: V_alloc_method := FND_PROFILE.VALUE('IC$ALLOC_METHOD');
223: V_shelf_days := FND_PROFILE.VALUE('IC$SHELF_DAYS');
224: V_alloc_horizon := FND_PROFILE.VALUE('IC$ALLOC_HORIZON');
225: V_alloc_type := FND_PROFILE.VALUE('IC$ALLOC_TYPE');
226: V_lot_qty := FND_PROFILE.VALUE('IC$LOT_QTY');
227: V_partial_ind := NVL(FND_PROFILE.VALUE('IC$PARTIAL_IND'), 1);
220: IF(Cur_qry_allocation% NOTFOUND) THEN
221: /* if all else fails use the default values */
222: V_alloc_method := FND_PROFILE.VALUE('IC$ALLOC_METHOD');
223: V_shelf_days := FND_PROFILE.VALUE('IC$SHELF_DAYS');
224: V_alloc_horizon := FND_PROFILE.VALUE('IC$ALLOC_HORIZON');
225: V_alloc_type := FND_PROFILE.VALUE('IC$ALLOC_TYPE');
226: V_lot_qty := FND_PROFILE.VALUE('IC$LOT_QTY');
227: V_partial_ind := NVL(FND_PROFILE.VALUE('IC$PARTIAL_IND'), 1);
228: END IF;
221: /* if all else fails use the default values */
222: V_alloc_method := FND_PROFILE.VALUE('IC$ALLOC_METHOD');
223: V_shelf_days := FND_PROFILE.VALUE('IC$SHELF_DAYS');
224: V_alloc_horizon := FND_PROFILE.VALUE('IC$ALLOC_HORIZON');
225: V_alloc_type := FND_PROFILE.VALUE('IC$ALLOC_TYPE');
226: V_lot_qty := FND_PROFILE.VALUE('IC$LOT_QTY');
227: V_partial_ind := NVL(FND_PROFILE.VALUE('IC$PARTIAL_IND'), 1);
228: END IF;
229: END IF;
222: V_alloc_method := FND_PROFILE.VALUE('IC$ALLOC_METHOD');
223: V_shelf_days := FND_PROFILE.VALUE('IC$SHELF_DAYS');
224: V_alloc_horizon := FND_PROFILE.VALUE('IC$ALLOC_HORIZON');
225: V_alloc_type := FND_PROFILE.VALUE('IC$ALLOC_TYPE');
226: V_lot_qty := FND_PROFILE.VALUE('IC$LOT_QTY');
227: V_partial_ind := NVL(FND_PROFILE.VALUE('IC$PARTIAL_IND'), 1);
228: END IF;
229: END IF;
230: IF Cur_qry_allocation%ISOPEN THEN
223: V_shelf_days := FND_PROFILE.VALUE('IC$SHELF_DAYS');
224: V_alloc_horizon := FND_PROFILE.VALUE('IC$ALLOC_HORIZON');
225: V_alloc_type := FND_PROFILE.VALUE('IC$ALLOC_TYPE');
226: V_lot_qty := FND_PROFILE.VALUE('IC$LOT_QTY');
227: V_partial_ind := NVL(FND_PROFILE.VALUE('IC$PARTIAL_IND'), 1);
228: END IF;
229: END IF;
230: IF Cur_qry_allocation%ISOPEN THEN
231: CLOSE Cur_qry_allocation;