DBA Data[Home] [Help]

APPS.GMI_AUTO_ALLOCATE_PUB dependencies on FND_API

Line 41: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE

37: +==========================================================================+
38: */
39: PROCEDURE ALLOCATE_INVENTORY
40: ( p_api_version IN NUMBER
41: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
42: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
43: , p_validation_level IN VARCHAR2 DEFAULT FND_API.G_VALID_LEVEL_FULL
44: , p_allocation_rec IN gmi_allocation_rec
45: , x_reservation_id OUT NOCOPY NUMBER

Line 42: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

38: */
39: PROCEDURE ALLOCATE_INVENTORY
40: ( p_api_version IN NUMBER
41: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
42: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
43: , p_validation_level IN VARCHAR2 DEFAULT FND_API.G_VALID_LEVEL_FULL
44: , p_allocation_rec IN gmi_allocation_rec
45: , x_reservation_id OUT NOCOPY NUMBER
46: , x_allocated_qty1 OUT NOCOPY NUMBER

Line 43: , p_validation_level IN VARCHAR2 DEFAULT FND_API.G_VALID_LEVEL_FULL

39: PROCEDURE ALLOCATE_INVENTORY
40: ( p_api_version IN NUMBER
41: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
42: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
43: , p_validation_level IN VARCHAR2 DEFAULT FND_API.G_VALID_LEVEL_FULL
44: , p_allocation_rec IN gmi_allocation_rec
45: , x_reservation_id OUT NOCOPY NUMBER
46: , x_allocated_qty1 OUT NOCOPY NUMBER
47: , x_allocated_qty2 OUT NOCOPY NUMBER

Line 86: IF NOT FND_API.Compatible_API_CALL ( l_api_version

82: oe_debug_pub.add('OPM allocation engine start',1);
83:
84: /*Standard call to check for call compatibility.
85: ==============================================*/
86: IF NOT FND_API.Compatible_API_CALL ( l_api_version
87: , p_api_version
88: , l_api_name
89: , G_PKG_NAME
90: )

Line 92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

88: , l_api_name
89: , G_PKG_NAME
90: )
91: THEN
92: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
93: END IF;
94:
95: /*Initialize message list if p_int_msg_list is set TRUE.
96: ======================================================*/

Line 97: IF FND_API.to_boolean(p_init_msg_list)

93: END IF;
94:
95: /*Initialize message list if p_int_msg_list is set TRUE.
96: ======================================================*/
97: IF FND_API.to_boolean(p_init_msg_list)
98: THEN
99: FND_MSG_PUB.Initialize;
100: END IF;
101:

Line 104: x_return_status := FND_API.G_RET_STS_SUCCESS;

100: END IF;
101:
102: /*Initialize API return status to sucess
103: =======================================*/
104: x_return_status := FND_API.G_RET_STS_SUCCESS;
105:
106: /*Move allocation record to local variable
107: ========================================*/
108: l_allocation_rec := p_allocation_rec;

Line 125: IF l_return_status = FND_API.G_RET_STS_ERROR

121: x_msg_data => l_msg_data);
122:
123: /*Return if validation failures detected
124: =======================================*/
125: IF l_return_status = FND_API.G_RET_STS_ERROR
126: THEN
127: RAISE FND_API.G_EXC_ERROR;
128: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
129: THEN

Line 127: RAISE FND_API.G_EXC_ERROR;

123: /*Return if validation failures detected
124: =======================================*/
125: IF l_return_status = FND_API.G_RET_STS_ERROR
126: THEN
127: RAISE FND_API.G_EXC_ERROR;
128: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
129: THEN
130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
131: END IF;

Line 128: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

124: =======================================*/
125: IF l_return_status = FND_API.G_RET_STS_ERROR
126: THEN
127: RAISE FND_API.G_EXC_ERROR;
128: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
129: THEN
130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
131: END IF;
132:

Line 130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

126: THEN
127: RAISE FND_API.G_EXC_ERROR;
128: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
129: THEN
130: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
131: END IF;
132:
133: /* Check for existing allocations.
134: Auto Allocation cannot proceed where specific allocations already exist

Line 149: RAISE FND_API.G_EXC_ERROR;

145: oe_debug_pub.add('OPM allocation exit because allocations exist',1);
146: FND_MESSAGE.SET_NAME('GML','GML_CANNOT_AUTO_ALLOC');
147: FND_MESSAGE.SET_TOKEN('ITEM_NO', l_ic_item_mst_rec.item_no);
148: FND_MSG_PUB.Add;
149: RAISE FND_API.G_EXC_ERROR;
150: END IF;*/
151:
152: /* Retrieve allocation rules defined for this item/customer
153: ==========================================================*/

Line 170: If (l_return_status = FND_API.G_RET_STS_ERROR)

166:
167: /* if no allocation rules found, then Raise Exception and return
168: ===============================================================*/
169: --B1655007 Update exception handling
170: If (l_return_status = FND_API.G_RET_STS_ERROR)
171: THEN
172: FND_MESSAGE.SET_NAME('GML','GML_NO_ALLOCATION_PARMS'); /* NEW */
173: FND_MESSAGE.SET_TOKEN('ALLOC_CLASS', l_ic_item_mst_rec.alloc_class);
174: FND_MSG_PUB.Add;

Line 175: RAISE FND_API.G_EXC_ERROR;

171: THEN
172: FND_MESSAGE.SET_NAME('GML','GML_NO_ALLOCATION_PARMS'); /* NEW */
173: FND_MESSAGE.SET_TOKEN('ALLOC_CLASS', l_ic_item_mst_rec.alloc_class);
174: FND_MSG_PUB.Add;
175: RAISE FND_API.G_EXC_ERROR;
176: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
177: THEN
178: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
179: END IF;

Line 176: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

172: FND_MESSAGE.SET_NAME('GML','GML_NO_ALLOCATION_PARMS'); /* NEW */
173: FND_MESSAGE.SET_TOKEN('ALLOC_CLASS', l_ic_item_mst_rec.alloc_class);
174: FND_MSG_PUB.Add;
175: RAISE FND_API.G_EXC_ERROR;
176: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
177: THEN
178: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
179: END IF;
180:

Line 178: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

174: FND_MSG_PUB.Add;
175: RAISE FND_API.G_EXC_ERROR;
176: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
177: THEN
178: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
179: END IF;
180:
181: /* B1731567 - identify co_code associated with whse and orgn_code
182: it may differ from that associated with the cust_no

Line 196: RAISE FND_API.G_EXC_ERROR;

192: CLOSE sy_orgn_mst_c1;
193: FND_MESSAGE.SET_NAME('GMI','IC_API_INVALID_ORGN_CODE');
194: FND_MESSAGE.SET_TOKEN('ORGN_CODE',l_ic_whse_mst_rec.orgn_code);
195: FND_MSG_PUB.Add;
196: RAISE FND_API.G_EXC_ERROR;
197: ELSE
198: CLOSE sy_orgn_mst_c1;
199: END IF;
200:

Line 217: If (l_return_status = FND_API.G_RET_STS_ERROR)

213: x_msg_count => l_msg_count,
214: x_msg_data => l_msg_data
215: );
216:
217: If (l_return_status = FND_API.G_RET_STS_ERROR)
218: THEN
219: RAISE FND_API.G_EXC_ERROR;
220: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
221: THEN

Line 219: RAISE FND_API.G_EXC_ERROR;

215: );
216:
217: If (l_return_status = FND_API.G_RET_STS_ERROR)
218: THEN
219: RAISE FND_API.G_EXC_ERROR;
220: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
221: THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: END IF;

Line 220: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR

216:
217: If (l_return_status = FND_API.G_RET_STS_ERROR)
218: THEN
219: RAISE FND_API.G_EXC_ERROR;
220: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
221: THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: END IF;
224:

Line 222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

218: THEN
219: RAISE FND_API.G_EXC_ERROR;
220: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR
221: THEN
222: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
223: END IF;
224:
225: oe_debug_pub.add('OPM allocation engine - final primary allocation is '|| l_allocated_qty1);
226: x_allocated_qty1 := l_allocated_qty1;

Line 233: WHEN FND_API.G_EXC_ERROR THEN

229: /* EXCEPTION HANDLING
230: ====================*/
231:
232: EXCEPTION
233: WHEN FND_API.G_EXC_ERROR THEN
234: ROLLBACK TO allocate_inventory;
235: /* dbms_output.put_line('ERROR - rollback'); */
236: x_return_status := FND_API.G_RET_STS_ERROR;
237: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE

Line 236: x_return_status := FND_API.G_RET_STS_ERROR;

232: EXCEPTION
233: WHEN FND_API.G_EXC_ERROR THEN
234: ROLLBACK TO allocate_inventory;
235: /* dbms_output.put_line('ERROR - rollback'); */
236: x_return_status := FND_API.G_RET_STS_ERROR;
237: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
238: , p_count => x_msg_count
239: , p_data => x_msg_data
240: );

Line 237: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE

233: WHEN FND_API.G_EXC_ERROR THEN
234: ROLLBACK TO allocate_inventory;
235: /* dbms_output.put_line('ERROR - rollback'); */
236: x_return_status := FND_API.G_RET_STS_ERROR;
237: FND_MSG_PUB.Count_AND_GET ( p_encoded => FND_API.G_FALSE
238: , p_count => x_msg_count
239: , p_data => x_msg_data
240: );
241:

Line 242: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

238: , p_count => x_msg_count
239: , p_data => x_msg_data
240: );
241:
242: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
243: ROLLBACK TO allocate_inventory;
244: /* dbms_output.put_line('UNEXPECTED ERROR - rollback'); */
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
246: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE

Line 245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

241:
242: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
243: ROLLBACK TO allocate_inventory;
244: /* dbms_output.put_line('UNEXPECTED ERROR - rollback'); */
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
246: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
247: , p_count => x_msg_count
248: , p_data => x_msg_data
249: );

Line 246: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE

242: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
243: ROLLBACK TO allocate_inventory;
244: /* dbms_output.put_line('UNEXPECTED ERROR - rollback'); */
245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
246: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
247: , p_count => x_msg_count
248: , p_data => x_msg_data
249: );
250: WHEN OTHERS THEN

Line 253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

249: );
250: WHEN OTHERS THEN
251: ROLLBACK TO allocate_inventory;
252: /* dbms_output.put_line('UNTRAPPED ERROR - rollback'); */
253: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
254:
255: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
256: , l_api_name
257: );

Line 259: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE

255: FND_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME
256: , l_api_name
257: );
258:
259: FND_MSG_PUB.Count_AND_GET ( p_encoded=> FND_API.G_FALSE
260: , p_count => x_msg_count
261: , p_data => x_msg_data
262: );
263: