DBA Data[Home] [Help]

APPS.INV_VALIDATE_TROLIN dependencies on FND_MSG_PUB

Line 19: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

15: l_dummy VARCHAR2(10);
16: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
17: BEGIN
18: IF p_line_id IS NULL OR p_line_id = FND_API.G_MISS_NUM THEN
19: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
20: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
21: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_LINE_ID'),FALSE); -- ND
22: FND_MSG_PUB.Add;
23: END IF;

Line 22: FND_MSG_PUB.Add;

18: IF p_line_id IS NULL OR p_line_id = FND_API.G_MISS_NUM THEN
19: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
20: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
21: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_LINE_ID'),FALSE); -- ND
22: FND_MSG_PUB.Add;
23: END IF;
24: RETURN F;
25: END IF;
26: RETURN T;

Line 40: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

36: l_request_number VARCHAR2(30);
37: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
38: BEGIN
39: IF p_line_number IS NULL OR p_line_number = FND_API.G_MISS_NUM THEN
40: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
41: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
42: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_LINE_NUMBER'),FALSE); -- ND
43: FND_MSG_PUB.Add;
44: END IF;

Line 43: FND_MSG_PUB.Add;

39: IF p_line_number IS NULL OR p_line_number = FND_API.G_MISS_NUM THEN
40: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
41: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
42: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_LINE_NUMBER'),FALSE); -- ND
43: FND_MSG_PUB.Add;
44: END IF;
45: RETURN F;
46: END IF;
47: l_return_value :=INV_Transfer_Order_PVT.Unique_Line(

Line 58: FND_MSG_PUB.Add;

54: --Bug #4347016
55: --If the line number is not unique display an error message
56: FND_MESSAGE.SET_NAME('INV','INV_ALREADY_EXISTS');
57: FND_MESSAGE.SET_TOKEN('ENTITY',FND_MESSAGE.GET_STRING('INV','INV_LINE_NUMBER'),FALSE);
58: FND_MSG_PUB.Add;
59: RETURN F;
60: END IF;
61:
62: EXCEPTION

Line 65: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

61:
62: EXCEPTION
63: WHEN NO_DATA_FOUND THEN
64: --inv_debug.message('in when no_data_found');
65: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
66: FND_MESSAGE.SET_NAME('INV','INV_INVALID_ATTRIBUTE');
67: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','LINE_NUMBER'),FALSE);
68: FND_MSG_PUB.Add;
69: END IF;

Line 68: FND_MSG_PUB.Add;

64: --inv_debug.message('in when no_data_found');
65: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
66: FND_MESSAGE.SET_NAME('INV','INV_INVALID_ATTRIBUTE');
67: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','LINE_NUMBER'),FALSE);
68: FND_MSG_PUB.Add;
69: END IF;
70: RETURN F;
71: WHEN OTHERS THEN
72: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 72: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

68: FND_MSG_PUB.Add;
69: END IF;
70: RETURN F;
71: WHEN OTHERS THEN
72: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
73: FND_MSG_PUB.Add_Exc_Msg
74: ( G_PKG_NAME
75: , 'Line_Number'
76: );

Line 73: FND_MSG_PUB.Add_Exc_Msg

69: END IF;
70: RETURN F;
71: WHEN OTHERS THEN
72: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
73: FND_MSG_PUB.Add_Exc_Msg
74: ( G_PKG_NAME
75: , 'Line_Number'
76: );
77: END IF;

Line 90: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

86: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
87: BEGIN
88:
89: IF p_line_status IS NULL OR p_line_status = FND_API.G_MISS_NUM THEN
90: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
91: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
92: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_LINE_STATUS'),FALSE); -- ND
93: FND_MSG_PUB.Add;
94: END IF;

Line 93: FND_MSG_PUB.Add;

89: IF p_line_status IS NULL OR p_line_status = FND_API.G_MISS_NUM THEN
90: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
91: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
92: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_LINE_STATUS'),FALSE); -- ND
93: FND_MSG_PUB.Add;
94: END IF;
95: RETURN F;
96: END IF;
97:

Line 110: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

106:
107: EXCEPTION
108:
109: WHEN NO_DATA_FOUND THEN
110: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
111: FND_MESSAGE.SET_NAME('INV','INV_INVALID_ATTRIBUTE');
112: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_LINE_STATUS'),FALSE);
113: FND_MSG_PUB.Add;
114: END IF;

Line 113: FND_MSG_PUB.Add;

109: WHEN NO_DATA_FOUND THEN
110: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
111: FND_MESSAGE.SET_NAME('INV','INV_INVALID_ATTRIBUTE');
112: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_LINE_STATUS'),FALSE);
113: FND_MSG_PUB.Add;
114: END IF;
115: RETURN F;
116:
117: WHEN OTHERS THEN

Line 118: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

114: END IF;
115: RETURN F;
116:
117: WHEN OTHERS THEN
118: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
119: FND_MSG_PUB.Add_Exc_Msg
120: ( G_PKG_NAME
121: , 'Line_Status'
122: );

Line 119: FND_MSG_PUB.Add_Exc_Msg

115: RETURN F;
116:
117: WHEN OTHERS THEN
118: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
119: FND_MSG_PUB.Add_Exc_Msg
120: ( G_PKG_NAME
121: , 'Line_Status'
122: );
123: END IF;

Line 221: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

217:
218: -- Check required attributes.
219: IF p_trolin_rec.line_id IS NULL THEN
220: l_return_status := FND_API.G_RET_STS_ERROR;
221: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
222: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
223: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','line_id');
224: FND_MSG_PUB.Add;
225: END IF;

Line 224: FND_MSG_PUB.Add;

220: l_return_status := FND_API.G_RET_STS_ERROR;
221: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
222: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
223: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','line_id');
224: FND_MSG_PUB.Add;
225: END IF;
226: END IF;
227:
228: IF p_trolin_rec.header_id IS NULL THEN

Line 230: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

226: END IF;
227:
228: IF p_trolin_rec.header_id IS NULL THEN
229: l_return_status := FND_API.G_RET_STS_ERROR;
230: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
231: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
232: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Header_Id');
233: FND_MSG_PUB.Add;
234: END IF;

Line 233: FND_MSG_PUB.Add;

229: l_return_status := FND_API.G_RET_STS_ERROR;
230: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
231: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
232: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Header_Id');
233: FND_MSG_PUB.Add;
234: END IF;
235: END IF;
236: --
237: -- Check rest of required attributes here.

Line 244: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

240: IF p_trolin_rec.inventory_item_id IS NULL THEN
241: if( p_move_order_type <> INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY ) then
242: l_return_status := FND_API.G_RET_STS_ERROR;
243:
244: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
245: FND_MESSAGE.SET_NAME('INV','INV_ENTER_ITEM');
246: FND_MSG_PUB.Add;
247: END IF;
248: elsif( p_move_order_type = INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY AND p_trolin_rec.lpn_id is NULL) then

Line 246: FND_MSG_PUB.Add;

242: l_return_status := FND_API.G_RET_STS_ERROR;
243:
244: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
245: FND_MESSAGE.SET_NAME('INV','INV_ENTER_ITEM');
246: FND_MSG_PUB.Add;
247: END IF;
248: elsif( p_move_order_type = INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY AND p_trolin_rec.lpn_id is NULL) then
249: l_return_status := FND_API.G_RET_STS_ERROR;
250: if( FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) then

Line 250: if( FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) then

246: FND_MSG_PUB.Add;
247: END IF;
248: elsif( p_move_order_type = INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY AND p_trolin_rec.lpn_id is NULL) then
249: l_return_status := FND_API.G_RET_STS_ERROR;
250: if( FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) then
251: FND_MESSAGE.SET_NAME('INV', 'INV_ENTER_ITEM_LPN');
252: FND_MSG_PUB.Add;
253: end if;
254: end if;

Line 252: FND_MSG_PUB.Add;

248: elsif( p_move_order_type = INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY AND p_trolin_rec.lpn_id is NULL) then
249: l_return_status := FND_API.G_RET_STS_ERROR;
250: if( FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)) then
251: FND_MESSAGE.SET_NAME('INV', 'INV_ENTER_ITEM_LPN');
252: FND_MSG_PUB.Add;
253: end if;
254: end if;
255: END IF;
256:

Line 260: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

256:
257: IF p_trolin_rec.date_required IS NULL THEN
258: l_return_status := FND_API.G_RET_STS_ERROR;
259:
260: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
261: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
262: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_DATE_REQUIRED'),FALSE);
263: FND_MSG_PUB.Add;
264: END IF;

Line 263: FND_MSG_PUB.Add;

259:
260: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
261: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
262: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','INV_DATE_REQUIRED'),FALSE);
263: FND_MSG_PUB.Add;
264: END IF;
265: END IF;
266:
267: IF p_trolin_rec.quantity IS NULL THEN

Line 271: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

267: IF p_trolin_rec.quantity IS NULL THEN
268: if( p_move_order_type <> INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY ) then
269: l_return_status := FND_API.G_RET_STS_ERROR;
270:
271: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
272: FND_MESSAGE.SET_NAME('INV','INV_INT_QTYCODE');
273: FND_MSG_PUB.Add;
274: END IF;
275: end if;

Line 273: FND_MSG_PUB.Add;

269: l_return_status := FND_API.G_RET_STS_ERROR;
270:
271: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
272: FND_MESSAGE.SET_NAME('INV','INV_INT_QTYCODE');
273: FND_MSG_PUB.Add;
274: END IF;
275: end if;
276: END IF;
277:

Line 281: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

277:
278: IF p_trolin_rec.uom_code IS NULL THEN
279: if( p_trolin_rec.inventory_item_id is not null and p_move_order_type <> INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY ) then
280: l_return_status := FND_API.G_RET_STS_ERROR;
281: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
282: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
283: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','UOM'),FALSE);
284: FND_MSG_PUB.Add;
285: END IF;

Line 284: FND_MSG_PUB.Add;

280: l_return_status := FND_API.G_RET_STS_ERROR;
281: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
282: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
283: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',FND_MESSAGE.GET_STRING('INV','UOM'),FALSE);
284: FND_MSG_PUB.Add;
285: END IF;
286: end if;
287: END IF;
288:

Line 291: if( fnd_msg_pub.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)) then

287: END IF;
288:
289: IF p_trolin_rec.lpn_id IS NULL THEN
290: if p_move_order_type = INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY and p_trolin_rec.inventory_item_id is null then
291: if( fnd_msg_pub.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)) then
292: FND_MESSAGE.SET_NAME('INV', 'INV_ENTER_ITEM_LPN');
293: FND_MSG_PUB.Add;
294: end if;
295: end if;

Line 293: FND_MSG_PUB.Add;

289: IF p_trolin_rec.lpn_id IS NULL THEN
290: if p_move_order_type = INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY and p_trolin_rec.inventory_item_id is null then
291: if( fnd_msg_pub.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)) then
292: FND_MESSAGE.SET_NAME('INV', 'INV_ENTER_ITEM_LPN');
293: FND_MSG_PUB.Add;
294: end if;
295: end if;
296: END IF;
297:

Line 305: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

301: AND g_item.inventory_asset_flag = 'Y' THEN
302: -- Added the last condition for bug 2519579
303: l_return_status := FND_API.G_RET_STS_ERROR;
304:
305: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
306: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
307: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Account');
308: FND_MSG_PUB.Add;
309: END IF;

Line 308: FND_MSG_PUB.Add;

304:
305: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
306: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
307: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Account');
308: FND_MSG_PUB.Add;
309: END IF;
310: END IF;
311:
312: ELSIF g_transaction_l.transaction_action_id in (2,28) THEN

Line 331: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

327: IF (p_move_order_type NOT IN
328: (INV_GLOBALS.G_MOVE_ORDER_PUT_AWAY, INV_GLOBALS.G_MOVE_ORDER_SYSTEM)) THEN
329: l_return_status := FND_API.G_RET_STS_ERROR;
330:
331: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
332: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
333: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','To Subinventory');
334: FND_MSG_PUB.Add;
335: END IF; --END IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

Line 334: FND_MSG_PUB.Add;

330:
331: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
332: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
333: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','To Subinventory');
334: FND_MSG_PUB.Add;
335: END IF; --END IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
336: END IF; --END IF MO type not in Putaway, System)
337: END IF; --END IF sub code is NULL
338: END IF;

Line 335: END IF; --END IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)

331: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
332: FND_MESSAGE.SET_NAME('INV','INV_ATTRIBUTE_REQUIRED');
333: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','To Subinventory');
334: FND_MSG_PUB.Add;
335: END IF; --END IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR)
336: END IF; --END IF MO type not in Putaway, System)
337: END IF; --END IF sub code is NULL
338: END IF;
339:

Line 358: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

354:
355: if (l_org_loc_control = 1) then
356: l_return_status := FND_API.G_RET_STS_ERROR;
357:
358: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
359: FND_MESSAGE.SET_NAME('INV','INV_SUB_RESTRICT');
360: FND_MSG_PUB.Add;
361: END IF;
362: else

Line 360: FND_MSG_PUB.Add;

356: l_return_status := FND_API.G_RET_STS_ERROR;
357:
358: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
359: FND_MESSAGE.SET_NAME('INV','INV_SUB_RESTRICT');
360: FND_MSG_PUB.Add;
361: END IF;
362: else
363: if (l_org_loc_control = 4) then
364: select nvl(locator_type,3)

Line 374: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

370: if (l_sub_loc_control = 1) THEN
371:
372: l_return_status := FND_API.G_RET_STS_ERROR;
373:
374: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
375: FND_MESSAGE.SET_NAME('INV','INV_SUB_RESTRICT');
376: FND_MSG_PUB.Add;
377: END IF;
378: elsif (l_sub_loc_control = 5) THEN

Line 376: FND_MSG_PUB.Add;

372: l_return_status := FND_API.G_RET_STS_ERROR;
373:
374: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
375: FND_MESSAGE.SET_NAME('INV','INV_SUB_RESTRICT');
376: FND_MSG_PUB.Add;
377: END IF;
378: elsif (l_sub_loc_control = 5) THEN
379: select nvl(location_control_code,1)
380: into l_item_loc_control

Line 388: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

384:
385: if (l_item_loc_control = 1) THEN
386: l_return_status := FND_API.G_RET_STS_ERROR;
387:
388: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
389: FND_MESSAGE.SET_NAME('INV','INV_SUB_RESTRICT');
390: FND_MSG_PUB.Add;
391: END IF;
392: end if;

Line 390: FND_MSG_PUB.Add;

386: l_return_status := FND_API.G_RET_STS_ERROR;
387:
388: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
389: FND_MESSAGE.SET_NAME('INV','INV_SUB_RESTRICT');
390: FND_MSG_PUB.Add;
391: END IF;
392: end if;
393: end if;
394: end if;

Line 431: fnd_msg_pub.ADD;

427: fnd_message.set_name('INV', 'INV_SUB_RESERVABLE');
428: fnd_message.set_token('JOB', l_wip_entity_name);
429: fnd_message.set_token('SUB', p_trolin_rec.to_subinventory_code);
430: fnd_message.set_token('ITEM', l_item_number);
431: fnd_msg_pub.ADD;
432: l_return_status := FND_API.G_RET_STS_ERROR;
433: END IF;
434:
435: IF g_wms_org_flag

Line 455: fnd_msg_pub.ADD;

451: fnd_message.set_token('JOB', l_wip_entity_name);
452: fnd_message.set_token('SUB', p_trolin_rec.to_subinventory_code);
453: fnd_message.set_token('ITEM', l_item_number);
454:
455: fnd_msg_pub.ADD;
456: l_return_status := FND_API.G_RET_STS_ERROR;
457: END IF;
458: END IF; -- end if source type is g_sourcetype_inventory
459: END IF;

Line 485: FND_MSG_PUB.ADD;

481: where unit_number = p_trolin_rec.unit_number;
482: exception
483: when no_data_found then
484: FND_MESSAGE.SET_NAME('INV', 'INV_INT_UNITNUMBER');
485: FND_MSG_PUB.ADD;
486: raise FND_API.G_EXC_ERROR;
487: end;
488: end if;
489: end if;

Line 532: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

528:
529: WHEN OTHERS THEN
530: -- inv_debug.message('TRO U: ' || SQLERRM);
531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
532: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
533: FND_MSG_PUB.Add_Exc_Msg
534: ( G_PKG_NAME
535: , 'Entity'
536: );

Line 533: FND_MSG_PUB.Add_Exc_Msg

529: WHEN OTHERS THEN
530: -- inv_debug.message('TRO U: ' || SQLERRM);
531: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
532: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
533: FND_MSG_PUB.Add_Exc_Msg
534: ( G_PKG_NAME
535: , 'Entity'
536: );
537: END IF;

Line 713: fnd_msg_pub.add;

709: EXCEPTION
710: WHEN NO_DATA_FOUND THEN
711: --inv_debug.message('ssia', 'invalid from sub');
712: fnd_message.set_name('INV','INVALID_SUB');
713: fnd_msg_pub.add;
714: RAISE fnd_api.g_exc_error;
715: END ;
716: ELSIF g_item.restrict_subinventories_code = 2 THEN
717: -- item is not restricted to specific subs

Line 729: fnd_msg_pub.add;

725: EXCEPTION
726: WHEN NO_DATA_FOUND THEN
727: --inv_debug.message('ssia', 'invalid from sub');
728: fnd_message.SET_NAME('INV','INVALID_SUB');
729: fnd_msg_pub.add;
730: RAISE fnd_api.g_exc_error;
731: END ;
732: END IF;
733: --inv_debug.message('ssia', 'TRO: from_subinventory_code: ' || x_return_status);

Line 1294: fnd_msg_pub.add;

1290: EXCEPTION
1291: WHEN NO_DATA_FOUND THEN
1292: --inv_debug.message('ssia', 'invalid to sub');
1293: fnd_message.set_name('INV','INVALID_SUB');
1294: fnd_msg_pub.add;
1295: RAISE fnd_api.g_exc_error;
1296: END ;
1297: ELSIF g_item.restrict_subinventories_code = 2 THEN
1298: -- item is not restricted to specific subs

Line 1311: fnd_msg_pub.add;

1307: EXCEPTION
1308: WHEN NO_DATA_FOUND THEN
1309: --inv_debug.message('ssia', 'invalid to sub');
1310: fnd_message.SET_NAME('INV','INVALID_SUB');
1311: fnd_msg_pub.add;
1312: RAISE fnd_api.g_exc_error;
1313: END ;
1314: END IF;
1315: END IF;

Line 1604: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1600:
1601: WHEN OTHERS THEN
1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1603:
1604: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1605: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, 'Attributes');
1606: END IF;
1607: END Attributes;
1608:

Line 1605: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, 'Attributes');

1601: WHEN OTHERS THEN
1602: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1603:
1604: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1605: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME, 'Attributes');
1606: END IF;
1607: END Attributes;
1608:
1609: -- Procedure Entity_Delete

Line 1637: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1633:
1634: WHEN OTHERS THEN
1635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1636:
1637: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1638: THEN
1639: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Entity_Delete');
1640: END IF;
1641:

Line 1639: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Entity_Delete');

1635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1636:
1637: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1638: THEN
1639: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, 'Entity_Delete');
1640: END IF;
1641:
1642: END Entity_Delete;
1643: