[Home] [Help]
6408: --2843738
6409: IF l_set_id IS NULL AND
6410: (p_x_line_rec.item_type_code = 'STANDARD' OR
6411: p_x_line_rec.top_model_line_id = p_x_line_rec.line_id) THEN
6412: IF NVL(FND_PROFILE.VALUE('ONT_SET_FOR_EACH_LINE'),'N') = 'Y' THEN
6413: OPEN C_profile;
6414: FETCH C_profile into l_set_id;
6415: close C_profile;
6416: ELSIF l_param = 'Y' AND l_cust_pref = 'SHIP' THEN
6505:
6506: IF l_set_id is null AND
6507: (p_x_line_rec.item_type_code = 'STANDARD' OR
6508: p_x_line_rec.top_model_line_id = p_x_line_rec.line_id) THEN
6509: IF NVL(FND_PROFILE.VALUE('ONT_SET_FOR_EACH_LINE'),'N') = 'N' AND NOT(l_param = 'Y' AND l_cust_pref='SHIP') THEN --2843738
6510: OPEN C1;
6511: FETCH C1 INTO lsettempname;
6512: CLOSE C1;
6513: END IF;
6511: FETCH C1 INTO lsettempname;
6512: CLOSE C1;
6513: END IF;
6514: IF lsettempname IS NULL THEN
6515: IF NVL(FND_PROFILE.VALUE('ONT_SET_FOR_EACH_LINE'),'N') = 'N' AND NOT(l_param = 'Y' AND l_cust_pref='SHIP') THEN -- 2843738
6516: lsettempname := 1;
6517: LOOP
6518: OPEN C3;
6519: FETCH C3 INTO tempname;
7018: /*Adding validation for ship_method also*/
7019:
7020: IF NVL(p_x_line_rec.shipping_method_code,-99) <> NVL(l_shipping_method_code,-99) THEN
7021:
7022: IF NVL(fnd_profile.value('ONT_SHIP_METHOD_FOR_SHIP_SET'),'N')='Y' THEN
7023:
7024: /* we are checking that the line is already part of a set, and we are trying to
7025: change the ship method on the set. Like if there are 4 lines already in set 1,
7026: with warehouse V1. If we change the warehouse on one line to M1, then if all the