42: x_msg_data => l_msg_data,
43: p_ialo_tbl => lp_ialo_tbl);
44:
45:
46: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
47: RAISE FND_API.G_EXC_ERROR;
48: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
49: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
50: END IF;
43: p_ialo_tbl => lp_ialo_tbl);
44:
45:
46: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
47: RAISE FND_API.G_EXC_ERROR;
48: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
49: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
50: END IF;
51:
44:
45:
46: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
47: RAISE FND_API.G_EXC_ERROR;
48: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
49: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
50: END IF;
51:
52:
45:
46: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
47: RAISE FND_API.G_EXC_ERROR;
48: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
49: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
50: END IF;
51:
52:
53:
60: x_msg_data := l_msg_data ;
61:
62: EXCEPTION
63:
64: WHEN FND_API.G_EXC_ERROR THEN
65: ROLLBACK TO relocate_installed_item;
66: x_return_status := FND_API.G_RET_STS_ERROR;
67: x_msg_count := l_msg_count ;
68: x_msg_data := l_msg_data ;
62: EXCEPTION
63:
64: WHEN FND_API.G_EXC_ERROR THEN
65: ROLLBACK TO relocate_installed_item;
66: x_return_status := FND_API.G_RET_STS_ERROR;
67: x_msg_count := l_msg_count ;
68: x_msg_data := l_msg_data ;
69: FND_MSG_PUB.count_and_get(
70: p_count => x_msg_count
68: x_msg_data := l_msg_data ;
69: FND_MSG_PUB.count_and_get(
70: p_count => x_msg_count
71: ,p_data => x_msg_data);
72: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
73: ROLLBACK TO relocate_installed_item;
74: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
75: x_msg_count := l_msg_count ;
76: x_msg_data := l_msg_data ;
70: p_count => x_msg_count
71: ,p_data => x_msg_data);
72: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
73: ROLLBACK TO relocate_installed_item;
74: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
75: x_msg_count := l_msg_count ;
76: x_msg_data := l_msg_data ;
77: FND_MSG_PUB.count_and_get(
78: p_count => x_msg_count
78: p_count => x_msg_count
79: ,p_data => x_msg_data);
80: WHEN OTHERS THEN
81: ROLLBACK TO relocate_installed_item;
82: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
83: x_msg_count := l_msg_count ;
84: x_msg_data := l_msg_data ;
85: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_ASSET_RELOCATION_PUB','Relocate_Installed_Item');
86: FND_MSG_PUB.count_and_get(
130: x_msg_data => l_msg_data,
131: p_falo_tbl => lp_falo_tbl);
132:
133:
134: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
135: RAISE FND_API.G_EXC_ERROR;
136: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
138: END IF;
131: p_falo_tbl => lp_falo_tbl);
132:
133:
134: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
135: RAISE FND_API.G_EXC_ERROR;
136: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
138: END IF;
139:
132:
133:
134: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
135: RAISE FND_API.G_EXC_ERROR;
136: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
138: END IF;
139:
140:
133:
134: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
135: RAISE FND_API.G_EXC_ERROR;
136: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
137: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
138: END IF;
139:
140:
141:
148: x_msg_data := l_msg_data ;
149:
150: EXCEPTION
151:
152: WHEN FND_API.G_EXC_ERROR THEN
153: ROLLBACK TO relocate_fixed_asset;
154: x_return_status := FND_API.G_RET_STS_ERROR;
155: x_msg_count := l_msg_count ;
156: x_msg_data := l_msg_data ;
150: EXCEPTION
151:
152: WHEN FND_API.G_EXC_ERROR THEN
153: ROLLBACK TO relocate_fixed_asset;
154: x_return_status := FND_API.G_RET_STS_ERROR;
155: x_msg_count := l_msg_count ;
156: x_msg_data := l_msg_data ;
157: FND_MSG_PUB.count_and_get(
158: p_count => x_msg_count
156: x_msg_data := l_msg_data ;
157: FND_MSG_PUB.count_and_get(
158: p_count => x_msg_count
159: ,p_data => x_msg_data);
160: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
161: ROLLBACK TO relocate_fixed_asset;
162: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
163: x_msg_count := l_msg_count ;
164: x_msg_data := l_msg_data ;
158: p_count => x_msg_count
159: ,p_data => x_msg_data);
160: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
161: ROLLBACK TO relocate_fixed_asset;
162: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
163: x_msg_count := l_msg_count ;
164: x_msg_data := l_msg_data ;
165: FND_MSG_PUB.count_and_get(
166: p_count => x_msg_count
166: p_count => x_msg_count
167: ,p_data => x_msg_data);
168: WHEN OTHERS THEN
169: ROLLBACK TO relocate_fixed_asset;
170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
171: x_msg_count := l_msg_count ;
172: x_msg_data := l_msg_data ;
173: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_ASSET_RELOCATION_PUB','Relocate_Fixed_Asset');
174: FND_MSG_PUB.count_and_get(
218: x_msg_data => l_msg_data,
219: p_assets_tbl => lp_assets_tbl);
220:
221:
222: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
223: RAISE FND_API.G_EXC_ERROR;
224: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
226: END IF;
219: p_assets_tbl => lp_assets_tbl);
220:
221:
222: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
223: RAISE FND_API.G_EXC_ERROR;
224: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
226: END IF;
227:
220:
221:
222: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
223: RAISE FND_API.G_EXC_ERROR;
224: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
226: END IF;
227:
228:
221:
222: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
223: RAISE FND_API.G_EXC_ERROR;
224: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
226: END IF;
227:
228:
229:
236: x_msg_data := l_msg_data ;
237:
238: EXCEPTION
239:
240: WHEN FND_API.G_EXC_ERROR THEN
241: ROLLBACK TO trx_relocate_asset;
242: x_return_status := FND_API.G_RET_STS_ERROR;
243: x_msg_count := l_msg_count ;
244: x_msg_data := l_msg_data ;
238: EXCEPTION
239:
240: WHEN FND_API.G_EXC_ERROR THEN
241: ROLLBACK TO trx_relocate_asset;
242: x_return_status := FND_API.G_RET_STS_ERROR;
243: x_msg_count := l_msg_count ;
244: x_msg_data := l_msg_data ;
245: FND_MSG_PUB.count_and_get(
246: p_count => x_msg_count
244: x_msg_data := l_msg_data ;
245: FND_MSG_PUB.count_and_get(
246: p_count => x_msg_count
247: ,p_data => x_msg_data);
248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
249: ROLLBACK TO trx_relocate_asset;
250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
251: x_msg_count := l_msg_count ;
252: x_msg_data := l_msg_data ;
246: p_count => x_msg_count
247: ,p_data => x_msg_data);
248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
249: ROLLBACK TO trx_relocate_asset;
250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
251: x_msg_count := l_msg_count ;
252: x_msg_data := l_msg_data ;
253: FND_MSG_PUB.count_and_get(
254: p_count => x_msg_count
254: p_count => x_msg_count
255: ,p_data => x_msg_data);
256: WHEN OTHERS THEN
257: ROLLBACK TO trx_relocate_asset;
258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
259: x_msg_count := l_msg_count ;
260: x_msg_data := l_msg_data ;
261: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_ASSET_RELOCATION_PUB','Change_FA_Location ');
262: FND_MSG_PUB.count_and_get(
316: p_location_id => lp_location_id,
317: p_install_location_id => lp_install_location_id);
318:
319:
320: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
321: RAISE FND_API.G_EXC_ERROR;
322: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
323: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
324: END IF;
317: p_install_location_id => lp_install_location_id);
318:
319:
320: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
321: RAISE FND_API.G_EXC_ERROR;
322: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
323: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
324: END IF;
325:
318:
319:
320: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
321: RAISE FND_API.G_EXC_ERROR;
322: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
323: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
324: END IF;
325:
326:
319:
320: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
321: RAISE FND_API.G_EXC_ERROR;
322: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
323: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
324: END IF;
325:
326:
327:
334: x_msg_data := l_msg_data ;
335:
336: EXCEPTION
337:
338: WHEN FND_API.G_EXC_ERROR THEN
339: ROLLBACK TO change_item_location;
340: x_return_status := FND_API.G_RET_STS_ERROR;
341: x_msg_count := l_msg_count ;
342: x_msg_data := l_msg_data ;
336: EXCEPTION
337:
338: WHEN FND_API.G_EXC_ERROR THEN
339: ROLLBACK TO change_item_location;
340: x_return_status := FND_API.G_RET_STS_ERROR;
341: x_msg_count := l_msg_count ;
342: x_msg_data := l_msg_data ;
343: FND_MSG_PUB.count_and_get(
344: p_count => x_msg_count
342: x_msg_data := l_msg_data ;
343: FND_MSG_PUB.count_and_get(
344: p_count => x_msg_count
345: ,p_data => x_msg_data);
346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
347: ROLLBACK TO change_item_location;
348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
349: x_msg_count := l_msg_count ;
350: x_msg_data := l_msg_data ;
344: p_count => x_msg_count
345: ,p_data => x_msg_data);
346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
347: ROLLBACK TO change_item_location;
348: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
349: x_msg_count := l_msg_count ;
350: x_msg_data := l_msg_data ;
351: FND_MSG_PUB.count_and_get(
352: p_count => x_msg_count
352: p_count => x_msg_count
353: ,p_data => x_msg_data);
354: WHEN OTHERS THEN
355: ROLLBACK TO change_item_location;
356: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
357: x_msg_count := l_msg_count ;
358: x_msg_data := l_msg_data ;
359: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_ASSET_RELOCATION_PUB','Change_Item_Location');
360: FND_MSG_PUB.count_and_get(