DBA Data[Home] [Help]

APPS.GMI_LOTUPDATE_PUB dependencies on FND_API

Line 36: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE

32: G_PKG_NAME CONSTANT VARCHAR2(30):='GMIVDX';
33:
34: PROCEDURE update_lot_dff
35: ( p_api_version IN NUMBER
36: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
37: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
38: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
39: , x_return_status OUT NOCOPY VARCHAR2
40: , x_msg_count OUT NOCOPY NUMBER

Line 37: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

33:
34: PROCEDURE update_lot_dff
35: ( p_api_version IN NUMBER
36: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
37: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
38: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
39: , x_return_status OUT NOCOPY VARCHAR2
40: , x_msg_count OUT NOCOPY NUMBER
41: , x_msg_data OUT NOCOPY VARCHAR2

Line 38: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL

34: PROCEDURE update_lot_dff
35: ( p_api_version IN NUMBER
36: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
37: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
38: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
39: , x_return_status OUT NOCOPY VARCHAR2
40: , x_msg_count OUT NOCOPY NUMBER
41: , x_msg_data OUT NOCOPY VARCHAR2
42: , p_lot_rec IN ic_lots_mst%ROWTYPE

Line 48: IF FND_API.to_boolean(p_init_msg_list) THEN

44: l_api_name CONSTANT VARCHAR2(30) := 'update_lot_dff' ;
45: l_api_version CONSTANT NUMBER := 1.0 ;
46: l_count NUMBER;
47: BEGIN
48: IF FND_API.to_boolean(p_init_msg_list) THEN
49: FND_MSG_PUB.Initialize;
50: END IF;
51:
52: -- Standard call to check for call compatibility.

Line 53: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

49: FND_MSG_PUB.Initialize;
50: END IF;
51:
52: -- Standard call to check for call compatibility.
53: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
54: p_api_version ,
55: l_api_name ,
56: G_PKG_NAME ) THEN
57: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 57: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

53: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
54: p_api_version ,
55: l_api_name ,
56: G_PKG_NAME ) THEN
57: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
58: END IF;
59: x_return_status :=FND_API.G_RET_STS_SUCCESS;
60:
61: /* Transactions are not allowed for the default lots */

Line 59: x_return_status :=FND_API.G_RET_STS_SUCCESS;

55: l_api_name ,
56: G_PKG_NAME ) THEN
57: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
58: END IF;
59: x_return_status :=FND_API.G_RET_STS_SUCCESS;
60:
61: /* Transactions are not allowed for the default lots */
62: IF (p_lot_rec.lot_id = 0) THEN
63: FND_MESSAGE.SET_NAME ( 'GMI', 'IC_DEFAULTLOTERR');

Line 65: RAISE FND_API.G_EXC_ERROR;

61: /* Transactions are not allowed for the default lots */
62: IF (p_lot_rec.lot_id = 0) THEN
63: FND_MESSAGE.SET_NAME ( 'GMI', 'IC_DEFAULTLOTERR');
64: FND_MSG_PUB.Add;
65: RAISE FND_API.G_EXC_ERROR;
66: END IF;
67:
68: /* Validate Item */
69: l_count := 0;

Line 77: RAISE FND_API.G_EXC_ERROR;

73: WHERE item_id = p_lot_rec.item_id;
74: IF l_count = 0 THEN
75: FND_MESSAGE.SET_NAME ( 'GMI', 'IC_ITEMERR');
76: FND_MSG_PUB.Add;
77: RAISE FND_API.G_EXC_ERROR;
78: END IF;
79:
80: UPDATE ic_lots_mst
81: SET

Line 118: RAISE FND_API.G_EXC_ERROR;

114: lot_id = p_lot_rec.lot_id;
115: IF SQL%NOTFOUND THEN
116: FND_MESSAGE.SET_NAME ( 'GMI', 'IC_NO_REC_GIVEN_PARAM');
117: FND_MSG_PUB.Add;
118: RAISE FND_API.G_EXC_ERROR;
119: END IF;
120:
121: IF FND_API.To_Boolean(p_commit) THEN
122: COMMIT WORK;

Line 121: IF FND_API.To_Boolean(p_commit) THEN

117: FND_MSG_PUB.Add;
118: RAISE FND_API.G_EXC_ERROR;
119: END IF;
120:
121: IF FND_API.To_Boolean(p_commit) THEN
122: COMMIT WORK;
123: END IF;
124:
125: FND_MSG_PUB.Count_AND_GET

Line 129: WHEN FND_API.G_EXC_ERROR THEN

125: FND_MSG_PUB.Count_AND_GET
126: (p_count => x_msg_count, p_data => x_msg_data);
127:
128: EXCEPTION
129: WHEN FND_API.G_EXC_ERROR THEN
130: x_return_status := FND_API.G_RET_STS_ERROR;
131: FND_MSG_PUB.Count_AND_GET
132: (p_count => x_msg_count, p_data => x_msg_data);
133:

Line 130: x_return_status := FND_API.G_RET_STS_ERROR;

126: (p_count => x_msg_count, p_data => x_msg_data);
127:
128: EXCEPTION
129: WHEN FND_API.G_EXC_ERROR THEN
130: x_return_status := FND_API.G_RET_STS_ERROR;
131: FND_MSG_PUB.Count_AND_GET
132: (p_count => x_msg_count, p_data => x_msg_data);
133:
134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

130: x_return_status := FND_API.G_RET_STS_ERROR;
131: FND_MSG_PUB.Count_AND_GET
132: (p_count => x_msg_count, p_data => x_msg_data);
133:
134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
136: FND_MSG_PUB.Count_AND_GET
137: (p_count => x_msg_count, p_data => x_msg_data);
138:

Line 135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

131: FND_MSG_PUB.Count_AND_GET
132: (p_count => x_msg_count, p_data => x_msg_data);
133:
134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
136: FND_MSG_PUB.Count_AND_GET
137: (p_count => x_msg_count, p_data => x_msg_data);
138:
139: WHEN OTHERS THEN

Line 140: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

136: FND_MSG_PUB.Count_AND_GET
137: (p_count => x_msg_count, p_data => x_msg_data);
138:
139: WHEN OTHERS THEN
140: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
141: FND_MSG_PUB.Count_AND_GET
142: (p_count => x_msg_count, p_data => x_msg_data);
143: END;
144:

Line 165: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE

161: +==========================================================================+
162: */
163: PROCEDURE update_lot
164: ( p_api_version IN NUMBER
165: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
166: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
167: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
168: , x_return_status OUT NOCOPY VARCHAR2
169: , x_msg_count OUT NOCOPY NUMBER

Line 166: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE

162: */
163: PROCEDURE update_lot
164: ( p_api_version IN NUMBER
165: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
166: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
167: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
168: , x_return_status OUT NOCOPY VARCHAR2
169: , x_msg_count OUT NOCOPY NUMBER
170: , x_msg_data OUT NOCOPY VARCHAR2

Line 167: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL

163: PROCEDURE update_lot
164: ( p_api_version IN NUMBER
165: , p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE
166: , p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE
167: , p_validation_level IN NUMBER DEFAULT FND_API.G_VALID_LEVEL_FULL
168: , x_return_status OUT NOCOPY VARCHAR2
169: , x_msg_count OUT NOCOPY NUMBER
170: , x_msg_data OUT NOCOPY VARCHAR2
171: , p_lot_rec IN ic_lots_mst%ROWTYPE

Line 186: IF FND_API.to_boolean(p_init_msg_list) THEN

182:
183: l_old_rec cur_old_lot%ROWTYPE;
184:
185: BEGIN
186: IF FND_API.to_boolean(p_init_msg_list) THEN
187: FND_MSG_PUB.Initialize;
188: END IF;
189:
190: -- Standard call to check for call compatibility.

Line 191: IF NOT FND_API.Compatible_API_Call ( l_api_version ,

187: FND_MSG_PUB.Initialize;
188: END IF;
189:
190: -- Standard call to check for call compatibility.
191: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
192: p_api_version ,
193: l_api_name ,
194: G_PKG_NAME ) THEN
195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

191: IF NOT FND_API.Compatible_API_Call ( l_api_version ,
192: p_api_version ,
193: l_api_name ,
194: G_PKG_NAME ) THEN
195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
196: END IF;
197: x_return_status :=FND_API.G_RET_STS_SUCCESS;
198:
199: OPEN cur_old_lot;

Line 197: x_return_status :=FND_API.G_RET_STS_SUCCESS;

193: l_api_name ,
194: G_PKG_NAME ) THEN
195: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
196: END IF;
197: x_return_status :=FND_API.G_RET_STS_SUCCESS;
198:
199: OPEN cur_old_lot;
200: FETCH cur_old_lot INTO l_old_rec;
201: CLOSE cur_old_lot;

Line 207: RAISE FND_API.G_EXC_ERROR;

203: /* Transactions are not allowed for the default lots */
204: IF (l_old_rec.lot_id = 0) THEN
205: FND_MESSAGE.SET_NAME ( 'GMI', 'IC_DEFAULTLOTERR');
206: FND_MSG_PUB.Add;
207: RAISE FND_API.G_EXC_ERROR;
208: END IF;
209:
210: /* Validate Item */
211: l_count := 0;

Line 219: RAISE FND_API.G_EXC_ERROR;

215: WHERE item_id = l_old_rec.item_id;
216: IF l_count = 0 THEN
217: FND_MESSAGE.SET_NAME ( 'GMI', 'IC_ITEMERR');
218: FND_MSG_PUB.Add;
219: RAISE FND_API.G_EXC_ERROR;
220: END IF;
221:
222: /* Validate EXPIRE Date */
223: IF (NVL(p_lot_rec.expire_date, SYSDATE ) <> NVL(l_old_rec.expire_date, SYSDATE)) THEN

Line 227: RAISE FND_API.G_EXC_ERROR;

223: IF (NVL(p_lot_rec.expire_date, SYSDATE ) <> NVL(l_old_rec.expire_date, SYSDATE)) THEN
224: IF p_lot_rec.expire_date IS NOT NULL AND p_lot_rec.expire_date < NVL(p_lot_rec.lot_created, l_old_rec.lot_created) THEN
225: FND_MESSAGE.SET_NAME('GMI','IC_PAST_EXPIRE_DATE');
226: FND_MSG_PUB.Add;
227: RAISE FND_API.G_EXC_ERROR;
228: END IF;
229: END IF;
230:
231: UPDATE ic_lots_mst

Line 273: RAISE FND_API.G_EXC_ERROR;

269:
270: IF SQL%NOTFOUND THEN
271: FND_MESSAGE.SET_NAME ( 'GMI', 'IC_NO_REC_GIVEN_PARAM');
272: FND_MSG_PUB.Add;
273: RAISE FND_API.G_EXC_ERROR;
274: END IF;
275:
276: IF FND_API.To_Boolean(p_commit) THEN
277: COMMIT WORK;

Line 276: IF FND_API.To_Boolean(p_commit) THEN

272: FND_MSG_PUB.Add;
273: RAISE FND_API.G_EXC_ERROR;
274: END IF;
275:
276: IF FND_API.To_Boolean(p_commit) THEN
277: COMMIT WORK;
278: END IF;
279:
280: FND_MSG_PUB.Count_AND_GET

Line 284: WHEN FND_API.G_EXC_ERROR THEN

280: FND_MSG_PUB.Count_AND_GET
281: (p_count => x_msg_count, p_data => x_msg_data);
282:
283: EXCEPTION
284: WHEN FND_API.G_EXC_ERROR THEN
285: x_return_status := FND_API.G_RET_STS_ERROR;
286: FND_MSG_PUB.Count_AND_GET
287: (p_count => x_msg_count, p_data => x_msg_data);
288:

Line 285: x_return_status := FND_API.G_RET_STS_ERROR;

281: (p_count => x_msg_count, p_data => x_msg_data);
282:
283: EXCEPTION
284: WHEN FND_API.G_EXC_ERROR THEN
285: x_return_status := FND_API.G_RET_STS_ERROR;
286: FND_MSG_PUB.Count_AND_GET
287: (p_count => x_msg_count, p_data => x_msg_data);
288:
289: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 289: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

285: x_return_status := FND_API.G_RET_STS_ERROR;
286: FND_MSG_PUB.Count_AND_GET
287: (p_count => x_msg_count, p_data => x_msg_data);
288:
289: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
291: FND_MSG_PUB.Count_AND_GET
292: (p_count => x_msg_count, p_data => x_msg_data);
293:

Line 290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

286: FND_MSG_PUB.Count_AND_GET
287: (p_count => x_msg_count, p_data => x_msg_data);
288:
289: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
290: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
291: FND_MSG_PUB.Count_AND_GET
292: (p_count => x_msg_count, p_data => x_msg_data);
293:
294: WHEN OTHERS THEN

Line 295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

291: FND_MSG_PUB.Count_AND_GET
292: (p_count => x_msg_count, p_data => x_msg_data);
293:
294: WHEN OTHERS THEN
295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
296: FND_MSG_PUB.Count_AND_GET
297: (p_count => x_msg_count, p_data => x_msg_data);
298: END;
299: