DBA Data[Home] [Help]

APPS.CSI_SYSTEMS_PUB dependencies on FND_API

Line 49: IF NOT fnd_api.compatible_api_call ( l_api_version,

45: csi_utility_grp.check_ib_active;
46:
47:
48: -- standard call to check for call compatibility.
49: IF NOT fnd_api.compatible_api_call ( l_api_version,
50: p_api_version,
51: l_api_name,
52: g_pkg_name)
53: THEN

Line 54: RAISE fnd_api.g_exc_unexpected_error;

50: p_api_version,
51: l_api_name,
52: g_pkg_name)
53: THEN
54: RAISE fnd_api.g_exc_unexpected_error;
55: END IF;
56:
57:
58: -- initialize message list if p_init_msg_list is set to true.

Line 59: IF fnd_api.to_boolean( p_init_msg_list )

55: END IF;
56:
57:
58: -- initialize message list if p_init_msg_list is set to true.
59: IF fnd_api.to_boolean( p_init_msg_list )
60: THEN
61: fnd_msg_pub.initialize;
62: END IF;
63:

Line 67: x_return_status := fnd_api.g_ret_sts_success;

63:
64:
65:
66: -- initialize api return status to success
67: x_return_status := fnd_api.g_ret_sts_success;
68:
69: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
70: -- if debug_level = 1 then dump the procedure name
71: IF (l_debug_level > 0) THEN

Line 101: p_commit => fnd_api.g_false,

97: -- debug message
98:
99: csi_systems_pvt.get_systems(
100: p_api_version => p_api_version,
101: p_commit => fnd_api.g_false,
102: p_init_msg_list => p_init_msg_list,
103: p_validation_level => p_validation_level,
104: p_system_query_rec => p_system_query_rec,
105: p_time_stamp => p_time_stamp,

Line 117: IF x_return_status = fnd_api.g_ret_sts_error THEN

113:
114:
115:
116: -- check return status from the above procedure call
117: IF x_return_status = fnd_api.g_ret_sts_error THEN
118: RAISE fnd_api.g_exc_error;
119: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
120: RAISE fnd_api.g_exc_unexpected_error;
121: END IF;

Line 118: RAISE fnd_api.g_exc_error;

114:
115:
116: -- check return status from the above procedure call
117: IF x_return_status = fnd_api.g_ret_sts_error THEN
118: RAISE fnd_api.g_exc_error;
119: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
120: RAISE fnd_api.g_exc_unexpected_error;
121: END IF;
122:

Line 119: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN

115:
116: -- check return status from the above procedure call
117: IF x_return_status = fnd_api.g_ret_sts_error THEN
118: RAISE fnd_api.g_exc_error;
119: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
120: RAISE fnd_api.g_exc_unexpected_error;
121: END IF;
122:
123: --

Line 120: RAISE fnd_api.g_exc_unexpected_error;

116: -- check return status from the above procedure call
117: IF x_return_status = fnd_api.g_ret_sts_error THEN
118: RAISE fnd_api.g_exc_error;
119: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
120: RAISE fnd_api.g_exc_unexpected_error;
121: END IF;
122:
123: --
124: -- end of api body

Line 139: WHEN fnd_api.g_exc_error THEN

135: p_data => x_msg_data
136: );
137:
138: EXCEPTION
139: WHEN fnd_api.g_exc_error THEN
140: -- ROLLBACK TO get_systems_pub;
141: x_return_status := fnd_api.g_ret_sts_error ;
142: fnd_msg_pub.count_and_get
143: (p_count => x_msg_count ,

Line 141: x_return_status := fnd_api.g_ret_sts_error ;

137:
138: EXCEPTION
139: WHEN fnd_api.g_exc_error THEN
140: -- ROLLBACK TO get_systems_pub;
141: x_return_status := fnd_api.g_ret_sts_error ;
142: fnd_msg_pub.count_and_get
143: (p_count => x_msg_count ,
144: p_data => x_msg_data
145: );

Line 147: WHEN fnd_api.g_exc_unexpected_error THEN

143: (p_count => x_msg_count ,
144: p_data => x_msg_data
145: );
146:
147: WHEN fnd_api.g_exc_unexpected_error THEN
148: -- ROLLBACK TO get_systems_pub;
149: x_return_status := fnd_api.g_ret_sts_unexp_error ;
150: fnd_msg_pub.count_and_get
151: (p_count => x_msg_count ,

Line 149: x_return_status := fnd_api.g_ret_sts_unexp_error ;

145: );
146:
147: WHEN fnd_api.g_exc_unexpected_error THEN
148: -- ROLLBACK TO get_systems_pub;
149: x_return_status := fnd_api.g_ret_sts_unexp_error ;
150: fnd_msg_pub.count_and_get
151: (p_count => x_msg_count ,
152: p_data => x_msg_data
153: );

Line 157: x_return_status := fnd_api.g_ret_sts_unexp_error ;

153: );
154:
155: WHEN OTHERS THEN
156: -- ROLLBACK TO get_systems_pub;
157: x_return_status := fnd_api.g_ret_sts_unexp_error ;
158: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
159: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
160: END IF;
161: fnd_msg_pub.count_and_get

Line 201: IF NOT fnd_api.compatible_api_call ( l_api_version,

197: csi_utility_grp.check_ib_active;
198:
199:
200: -- standard call to check for call compatibility.
201: IF NOT fnd_api.compatible_api_call ( l_api_version,
202: p_api_version,
203: l_api_name,
204: g_pkg_name)
205: THEN

Line 206: RAISE fnd_api.g_exc_unexpected_error;

202: p_api_version,
203: l_api_name,
204: g_pkg_name)
205: THEN
206: RAISE fnd_api.g_exc_unexpected_error;
207: END IF;
208:
209:
210: -- initialize message list if p_init_msg_list is set to true.

Line 211: IF fnd_api.to_boolean( p_init_msg_list )

207: END IF;
208:
209:
210: -- initialize message list if p_init_msg_list is set to true.
211: IF fnd_api.to_boolean( p_init_msg_list )
212: THEN
213: fnd_msg_pub.initialize;
214: END IF;
215:

Line 219: x_return_status := fnd_api.g_ret_sts_success;

215:
216:
217:
218: -- initialize api return status to success
219: x_return_status := fnd_api.g_ret_sts_success;
220:
221: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
222: -- if debug_level = 1 then dump the procedure name
223: IF (l_debug_level > 0) THEN

Line 255: p_commit =>fnd_api.g_false,

251:
252:
253: csi_systems_pvt.create_system(
254: p_api_version =>p_api_version,
255: p_commit =>fnd_api.g_false,
256: p_init_msg_list =>p_init_msg_list,
257: p_validation_level =>p_validation_level,
258: p_system_rec =>p_system_rec,
259: p_txn_rec =>p_txn_rec,

Line 269: IF x_return_status = fnd_api.g_ret_sts_error THEN

265:
266:
267:
268: -- check return status from the above procedure call
269: IF x_return_status = fnd_api.g_ret_sts_error THEN
270: RAISE fnd_api.g_exc_error;
271: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
272: RAISE fnd_api.g_exc_unexpected_error;
273: END IF;

Line 270: RAISE fnd_api.g_exc_error;

266:
267:
268: -- check return status from the above procedure call
269: IF x_return_status = fnd_api.g_ret_sts_error THEN
270: RAISE fnd_api.g_exc_error;
271: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
272: RAISE fnd_api.g_exc_unexpected_error;
273: END IF;
274:

Line 271: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN

267:
268: -- check return status from the above procedure call
269: IF x_return_status = fnd_api.g_ret_sts_error THEN
270: RAISE fnd_api.g_exc_error;
271: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
272: RAISE fnd_api.g_exc_unexpected_error;
273: END IF;
274:
275: --

Line 272: RAISE fnd_api.g_exc_unexpected_error;

268: -- check return status from the above procedure call
269: IF x_return_status = fnd_api.g_ret_sts_error THEN
270: RAISE fnd_api.g_exc_error;
271: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
272: RAISE fnd_api.g_exc_unexpected_error;
273: END IF;
274:
275: --
276: -- end of api body.

Line 280: IF fnd_api.to_boolean( p_commit )

276: -- end of api body.
277: --
278:
279: -- standard check for p_commit
280: IF fnd_api.to_boolean( p_commit )
281: THEN
282: COMMIT WORK;
283: END IF;
284:

Line 298: WHEN fnd_api.g_exc_error THEN

294: p_data => x_msg_data
295: );
296:
297: EXCEPTION
298: WHEN fnd_api.g_exc_error THEN
299: ROLLBACK TO create_system_pub;
300: x_return_status := fnd_api.g_ret_sts_error ;
301: fnd_msg_pub.count_and_get
302: (p_count => x_msg_count ,

Line 300: x_return_status := fnd_api.g_ret_sts_error ;

296:
297: EXCEPTION
298: WHEN fnd_api.g_exc_error THEN
299: ROLLBACK TO create_system_pub;
300: x_return_status := fnd_api.g_ret_sts_error ;
301: fnd_msg_pub.count_and_get
302: (p_count => x_msg_count ,
303: p_data => x_msg_data
304: );

Line 306: WHEN fnd_api.g_exc_unexpected_error THEN

302: (p_count => x_msg_count ,
303: p_data => x_msg_data
304: );
305:
306: WHEN fnd_api.g_exc_unexpected_error THEN
307: ROLLBACK TO create_system_pub;
308: x_return_status := fnd_api.g_ret_sts_unexp_error ;
309: fnd_msg_pub.count_and_get
310: (p_count => x_msg_count ,

Line 308: x_return_status := fnd_api.g_ret_sts_unexp_error ;

304: );
305:
306: WHEN fnd_api.g_exc_unexpected_error THEN
307: ROLLBACK TO create_system_pub;
308: x_return_status := fnd_api.g_ret_sts_unexp_error ;
309: fnd_msg_pub.count_and_get
310: (p_count => x_msg_count ,
311: p_data => x_msg_data
312: );

Line 316: x_return_status := fnd_api.g_ret_sts_unexp_error ;

312: );
313:
314: WHEN OTHERS THEN
315: ROLLBACK TO create_system_pub;
316: x_return_status := fnd_api.g_ret_sts_unexp_error ;
317: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
318: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
319: END IF;
320: fnd_msg_pub.count_and_get

Line 408: IF NOT fnd_api.compatible_api_call ( l_api_version,

404: csi_utility_grp.check_ib_active;
405:
406:
407: -- standard call to check for call compatibility.
408: IF NOT fnd_api.compatible_api_call ( l_api_version,
409: p_api_version,
410: l_api_name,
411: g_pkg_name)
412: THEN

Line 413: RAISE fnd_api.g_exc_unexpected_error;

409: p_api_version,
410: l_api_name,
411: g_pkg_name)
412: THEN
413: RAISE fnd_api.g_exc_unexpected_error;
414: END IF;
415:
416:
417: -- initialize message list if p_init_msg_list is set to true.

Line 418: IF fnd_api.to_boolean( p_init_msg_list )

414: END IF;
415:
416:
417: -- initialize message list if p_init_msg_list is set to true.
418: IF fnd_api.to_boolean( p_init_msg_list )
419: THEN
420: fnd_msg_pub.initialize;
421: END IF;
422:

Line 425: x_return_status := fnd_api.g_ret_sts_success;

421: END IF;
422:
423:
424: -- initialize api return status to success
425: x_return_status := fnd_api.g_ret_sts_success;
426:
427: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
428: -- if debug_level = 1 then dump the procedure name
429: IF (l_debug_level > 0) THEN

Line 457: p_commit => fnd_api.g_false,

453: ****/
454:
455: csi_systems_pvt.update_system(
456: p_api_version => p_api_version,
457: p_commit => fnd_api.g_false,
458: p_init_msg_list => p_init_msg_list,
459: p_validation_level => p_validation_level,
460: p_system_rec => p_system_rec,
461: p_txn_rec => p_txn_rec,

Line 471: IF x_return_status = fnd_api.g_ret_sts_error THEN

467:
468:
469:
470: -- check return status from the above procedure call
471: IF x_return_status = fnd_api.g_ret_sts_error THEN
472: RAISE fnd_api.g_exc_error;
473: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
474: RAISE fnd_api.g_exc_unexpected_error;
475: END IF;

Line 472: RAISE fnd_api.g_exc_error;

468:
469:
470: -- check return status from the above procedure call
471: IF x_return_status = fnd_api.g_ret_sts_error THEN
472: RAISE fnd_api.g_exc_error;
473: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
474: RAISE fnd_api.g_exc_unexpected_error;
475: END IF;
476:

Line 473: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN

469:
470: -- check return status from the above procedure call
471: IF x_return_status = fnd_api.g_ret_sts_error THEN
472: RAISE fnd_api.g_exc_error;
473: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
474: RAISE fnd_api.g_exc_unexpected_error;
475: END IF;
476:
477: -- Bug 6675862

Line 474: RAISE fnd_api.g_exc_unexpected_error;

470: -- check return status from the above procedure call
471: IF x_return_status = fnd_api.g_ret_sts_error THEN
472: RAISE fnd_api.g_exc_error;
473: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
474: RAISE fnd_api.g_exc_unexpected_error;
475: END IF;
476:
477: -- Bug 6675862
478: -- Updating Child systems if Cascasde ownership is selected

Line 553: l_child_system_rec.CUSTOMER_ID := FND_API.G_MISS_NUM;

549: -- Cascading changes to the child systems
550: IF NVL(p_system_rec.CASCADE_CUST_TO_INS_FLAG,'N') = 'Y' THEN
551: l_child_system_rec.CUSTOMER_ID := p_system_rec.CUSTOMER_ID;
552: ELSE
553: l_child_system_rec.CUSTOMER_ID := FND_API.G_MISS_NUM;
554: END IF;
555:
556: IF NVL(p_system_rec.ship_to_site_change_flag,'N') = 'Y' THEN
557: l_child_system_rec.SHIP_TO_SITE_USE_ID := p_system_rec.SHIP_TO_SITE_USE_ID;

Line 559: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;

555:
556: IF NVL(p_system_rec.ship_to_site_change_flag,'N') = 'Y' THEN
557: l_child_system_rec.SHIP_TO_SITE_USE_ID := p_system_rec.SHIP_TO_SITE_USE_ID;
558: else
559: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
560: END IF;
561:
562: IF NVL(p_system_rec.bill_to_site_change_flag,'N') = 'Y' THEN
563: l_child_system_rec.BILL_TO_SITE_USE_ID := p_system_rec.BILL_TO_SITE_USE_ID;

Line 565: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;

561:
562: IF NVL(p_system_rec.bill_to_site_change_flag,'N') = 'Y' THEN
563: l_child_system_rec.BILL_TO_SITE_USE_ID := p_system_rec.BILL_TO_SITE_USE_ID;
564: else
565: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
566: END IF;
567:
568: IF NVL(p_system_rec.install_to_site_change_flag,'N') = 'Y' then
569: l_child_system_rec.INSTALL_SITE_USE_ID := p_system_rec.INSTALL_SITE_USE_ID;

Line 571: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;

567:
568: IF NVL(p_system_rec.install_to_site_change_flag,'N') = 'Y' then
569: l_child_system_rec.INSTALL_SITE_USE_ID := p_system_rec.INSTALL_SITE_USE_ID;
570: else
571: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;
572: end if;
573:
574: IF NVL(p_system_rec.tech_cont_change_flag,'N') = 'Y' THEN
575: l_child_system_rec.TECHNICAL_CONTACT_ID := p_system_rec.TECHNICAL_CONTACT_ID;

Line 578: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;

574: IF NVL(p_system_rec.tech_cont_change_flag,'N') = 'Y' THEN
575: l_child_system_rec.TECHNICAL_CONTACT_ID := p_system_rec.TECHNICAL_CONTACT_ID;
576:
577: ELSE
578: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;
579: END IF;
580:
581: IF NVL(p_system_rec.bill_to_cont_change_flag,'N') = 'Y' THEN
582:

Line 585: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;

581: IF NVL(p_system_rec.bill_to_cont_change_flag,'N') = 'Y' THEN
582:
583: l_child_system_rec.BILL_TO_CONTACT_ID := p_system_rec.BILL_TO_CONTACT_ID;
584: ELSE
585: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;
586: END IF;
587:
588:
589: IF NVL(p_system_rec.ship_to_cont_change_flag,'N') = 'Y' THEN

Line 592: l_child_system_rec.SHIP_TO_CONTACT_ID := FND_API.G_MISS_NUM;

588:
589: IF NVL(p_system_rec.ship_to_cont_change_flag,'N') = 'Y' THEN
590: l_child_system_rec.SHIP_TO_CONTACT_ID := p_system_rec.SHIP_TO_CONTACT_ID;
591: ELSE
592: l_child_system_rec.SHIP_TO_CONTACT_ID := FND_API.G_MISS_NUM;
593: END IF;
594:
595:
596: IF NVL(p_system_rec.serv_admin_cont_change_flag,'N') = 'Y' THEN

Line 599: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;

595:
596: IF NVL(p_system_rec.serv_admin_cont_change_flag,'N') = 'Y' THEN
597: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := p_system_rec.SERVICE_ADMIN_CONTACT_ID;
598: ELSE
599: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;
600: END IF;
601:
602: --bug 8604665 end
603:

Line 609: l_child_system_rec.SHIP_TO_CONTACT_ID := FND_API.G_MISS_NUM;

605: -- parent system wont be cascaded
606:
607: --commented for bug 8604665
608: /*
609: l_child_system_rec.SHIP_TO_CONTACT_ID := FND_API.G_MISS_NUM;
610: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;
611: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;
612: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;
613: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;

Line 610: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;

606:
607: --commented for bug 8604665
608: /*
609: l_child_system_rec.SHIP_TO_CONTACT_ID := FND_API.G_MISS_NUM;
610: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;
611: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;
612: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;
613: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
614: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;

Line 611: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;

607: --commented for bug 8604665
608: /*
609: l_child_system_rec.SHIP_TO_CONTACT_ID := FND_API.G_MISS_NUM;
610: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;
611: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;
612: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;
613: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
614: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
615: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;

Line 612: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;

608: /*
609: l_child_system_rec.SHIP_TO_CONTACT_ID := FND_API.G_MISS_NUM;
610: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;
611: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;
612: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;
613: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
614: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
615: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;
616: */

Line 613: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;

609: l_child_system_rec.SHIP_TO_CONTACT_ID := FND_API.G_MISS_NUM;
610: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;
611: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;
612: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;
613: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
614: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
615: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;
616: */
617:

Line 614: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;

610: l_child_system_rec.BILL_TO_CONTACT_ID := FND_API.G_MISS_NUM;
611: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;
612: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;
613: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
614: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
615: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;
616: */
617:
618: l_child_system_rec.TECH_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;

Line 615: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;

611: l_child_system_rec.TECHNICAL_CONTACT_ID := FND_API.G_MISS_NUM;
612: l_child_system_rec.SERVICE_ADMIN_CONTACT_ID := FND_API.G_MISS_NUM;
613: l_child_system_rec.SHIP_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
614: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
615: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;
616: */
617:
618: l_child_system_rec.TECH_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
619: l_child_system_rec.BILL_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;

Line 618: l_child_system_rec.TECH_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;

614: l_child_system_rec.BILL_TO_SITE_USE_ID := FND_API.G_MISS_NUM;
615: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;
616: */
617:
618: l_child_system_rec.TECH_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
619: l_child_system_rec.BILL_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
620: l_child_system_rec.SHIP_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;

Line 619: l_child_system_rec.BILL_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;

615: l_child_system_rec.INSTALL_SITE_USE_ID := FND_API.G_MISS_NUM;
616: */
617:
618: l_child_system_rec.TECH_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
619: l_child_system_rec.BILL_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
620: l_child_system_rec.SHIP_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
623: l_child_system_rec.SHIP_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;

Line 620: l_child_system_rec.SHIP_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;

616: */
617:
618: l_child_system_rec.TECH_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
619: l_child_system_rec.BILL_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
620: l_child_system_rec.SHIP_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
623: l_child_system_rec.SHIP_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
624: l_child_system_rec.INSTALL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;

Line 621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;

617:
618: l_child_system_rec.TECH_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
619: l_child_system_rec.BILL_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
620: l_child_system_rec.SHIP_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
623: l_child_system_rec.SHIP_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
624: l_child_system_rec.INSTALL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
625: l_child_system_rec.CASCADE_CUST_TO_INS_FLAG := FND_API.G_MISS_CHAR;

Line 622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;

618: l_child_system_rec.TECH_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
619: l_child_system_rec.BILL_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
620: l_child_system_rec.SHIP_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
623: l_child_system_rec.SHIP_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
624: l_child_system_rec.INSTALL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
625: l_child_system_rec.CASCADE_CUST_TO_INS_FLAG := FND_API.G_MISS_CHAR;
626:

Line 623: l_child_system_rec.SHIP_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;

619: l_child_system_rec.BILL_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
620: l_child_system_rec.SHIP_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
623: l_child_system_rec.SHIP_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
624: l_child_system_rec.INSTALL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
625: l_child_system_rec.CASCADE_CUST_TO_INS_FLAG := FND_API.G_MISS_CHAR;
626:
627: csi_gen_utility_pvt.put_line('Updating Child System ID - ' || l_child_system_rec.system_id);

Line 624: l_child_system_rec.INSTALL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;

620: l_child_system_rec.SHIP_TO_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
623: l_child_system_rec.SHIP_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
624: l_child_system_rec.INSTALL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
625: l_child_system_rec.CASCADE_CUST_TO_INS_FLAG := FND_API.G_MISS_CHAR;
626:
627: csi_gen_utility_pvt.put_line('Updating Child System ID - ' || l_child_system_rec.system_id);
628: csi_gen_utility_pvt.put_line('Corresponding Parent System ID - ' || l_child_system_rec.parent_system_id);

Line 625: l_child_system_rec.CASCADE_CUST_TO_INS_FLAG := FND_API.G_MISS_CHAR;

621: l_child_system_rec.SERV_ADMIN_CONT_CHANGE_FLAG := FND_API.G_MISS_CHAR;
622: l_child_system_rec.BILL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
623: l_child_system_rec.SHIP_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
624: l_child_system_rec.INSTALL_TO_SITE_CHANGE_FLAG := FND_API.G_MISS_CHAR;
625: l_child_system_rec.CASCADE_CUST_TO_INS_FLAG := FND_API.G_MISS_CHAR;
626:
627: csi_gen_utility_pvt.put_line('Updating Child System ID - ' || l_child_system_rec.system_id);
628: csi_gen_utility_pvt.put_line('Corresponding Parent System ID - ' || l_child_system_rec.parent_system_id);
629:

Line 632: p_commit => fnd_api.g_false,

628: csi_gen_utility_pvt.put_line('Corresponding Parent System ID - ' || l_child_system_rec.parent_system_id);
629:
630: csi_systems_pvt.update_system(
631: p_api_version => p_api_version,
632: p_commit => fnd_api.g_false,
633: p_init_msg_list => p_init_msg_list,
634: p_validation_level => p_validation_level,
635: p_system_rec => l_child_system_rec,
636: p_txn_rec => p_txn_rec,

Line 658: IF fnd_api.to_boolean( p_commit )

654: -- end of api body
655: --
656:
657: -- standard check for p_commit
658: IF fnd_api.to_boolean( p_commit )
659: THEN
660: COMMIT WORK;
661: END IF;
662:

Line 676: WHEN fnd_api.g_exc_error THEN

672: p_data => x_msg_data
673: );
674:
675: EXCEPTION
676: WHEN fnd_api.g_exc_error THEN
677: ROLLBACK TO update_system_pub;
678: x_return_status := fnd_api.g_ret_sts_error ;
679: fnd_msg_pub.count_and_get
680: (p_count => x_msg_count ,

Line 678: x_return_status := fnd_api.g_ret_sts_error ;

674:
675: EXCEPTION
676: WHEN fnd_api.g_exc_error THEN
677: ROLLBACK TO update_system_pub;
678: x_return_status := fnd_api.g_ret_sts_error ;
679: fnd_msg_pub.count_and_get
680: (p_count => x_msg_count ,
681: p_data => x_msg_data
682: );

Line 684: WHEN fnd_api.g_exc_unexpected_error THEN

680: (p_count => x_msg_count ,
681: p_data => x_msg_data
682: );
683:
684: WHEN fnd_api.g_exc_unexpected_error THEN
685: ROLLBACK TO update_system_pub;
686: x_return_status := fnd_api.g_ret_sts_unexp_error ;
687: fnd_msg_pub.count_and_get
688: (p_count => x_msg_count ,

Line 686: x_return_status := fnd_api.g_ret_sts_unexp_error ;

682: );
683:
684: WHEN fnd_api.g_exc_unexpected_error THEN
685: ROLLBACK TO update_system_pub;
686: x_return_status := fnd_api.g_ret_sts_unexp_error ;
687: fnd_msg_pub.count_and_get
688: (p_count => x_msg_count ,
689: p_data => x_msg_data
690: );

Line 694: x_return_status := fnd_api.g_ret_sts_unexp_error ;

690: );
691:
692: WHEN OTHERS THEN
693: ROLLBACK TO update_system_pub;
694: x_return_status := fnd_api.g_ret_sts_unexp_error ;
695: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
696: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
697: END IF;
698: fnd_msg_pub.count_and_get

Line 736: IF NOT fnd_api.compatible_api_call ( l_api_version,

732: csi_utility_grp.check_ib_active;
733:
734:
735: -- standard call to check for call compatibility.
736: IF NOT fnd_api.compatible_api_call ( l_api_version,
737: p_api_version,
738: l_api_name,
739: g_pkg_name)
740: THEN

Line 741: RAISE fnd_api.g_exc_unexpected_error;

737: p_api_version,
738: l_api_name,
739: g_pkg_name)
740: THEN
741: RAISE fnd_api.g_exc_unexpected_error;
742: END IF;
743:
744:
745: -- initialize message list if p_init_msg_list is set to true.

Line 746: IF fnd_api.to_boolean( p_init_msg_list )

742: END IF;
743:
744:
745: -- initialize message list if p_init_msg_list is set to true.
746: IF fnd_api.to_boolean( p_init_msg_list )
747: THEN
748: fnd_msg_pub.initialize;
749: END IF;
750:

Line 753: x_return_status := fnd_api.g_ret_sts_success;

749: END IF;
750:
751:
752: -- initialize api return status to success
753: x_return_status := fnd_api.g_ret_sts_success;
754:
755: l_debug_level:=fnd_profile.value('CSI_DEBUG_LEVEL');
756: -- if debug_level = 1 then dump the procedure name
757: IF (l_debug_level > 0) THEN

Line 787: p_commit => fnd_api.g_false,

783: ****/
784:
785: csi_systems_pvt.expire_system(
786: p_api_version => p_api_version,
787: p_commit => fnd_api.g_false,
788: p_init_msg_list => p_init_msg_list,
789: p_validation_level => p_validation_level,
790: p_system_rec => p_system_rec,
791: p_txn_rec => p_txn_rec,

Line 802: IF x_return_status = fnd_api.g_ret_sts_error THEN

798:
799:
800:
801: -- check return status from the above procedure call
802: IF x_return_status = fnd_api.g_ret_sts_error THEN
803: RAISE fnd_api.g_exc_error;
804: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
805: RAISE fnd_api.g_exc_unexpected_error;
806: END IF;

Line 803: RAISE fnd_api.g_exc_error;

799:
800:
801: -- check return status from the above procedure call
802: IF x_return_status = fnd_api.g_ret_sts_error THEN
803: RAISE fnd_api.g_exc_error;
804: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
805: RAISE fnd_api.g_exc_unexpected_error;
806: END IF;
807:

Line 804: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN

800:
801: -- check return status from the above procedure call
802: IF x_return_status = fnd_api.g_ret_sts_error THEN
803: RAISE fnd_api.g_exc_error;
804: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
805: RAISE fnd_api.g_exc_unexpected_error;
806: END IF;
807:
808:

Line 805: RAISE fnd_api.g_exc_unexpected_error;

801: -- check return status from the above procedure call
802: IF x_return_status = fnd_api.g_ret_sts_error THEN
803: RAISE fnd_api.g_exc_error;
804: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
805: RAISE fnd_api.g_exc_unexpected_error;
806: END IF;
807:
808:
809:

Line 815: IF fnd_api.to_boolean( p_commit )

811: -- end of api body
812: --
813:
814: -- standard check for p_commit
815: IF fnd_api.to_boolean( p_commit )
816: THEN
817: COMMIT WORK;
818: END IF;
819:

Line 833: WHEN fnd_api.g_exc_error THEN

829: p_data => x_msg_data
830: );
831:
832: EXCEPTION
833: WHEN fnd_api.g_exc_error THEN
834: ROLLBACK TO expire_system_pub;
835: x_return_status := fnd_api.g_ret_sts_error ;
836: fnd_msg_pub.count_and_get
837: (p_count => x_msg_count ,

Line 835: x_return_status := fnd_api.g_ret_sts_error ;

831:
832: EXCEPTION
833: WHEN fnd_api.g_exc_error THEN
834: ROLLBACK TO expire_system_pub;
835: x_return_status := fnd_api.g_ret_sts_error ;
836: fnd_msg_pub.count_and_get
837: (p_count => x_msg_count ,
838: p_data => x_msg_data
839: );

Line 841: WHEN fnd_api.g_exc_unexpected_error THEN

837: (p_count => x_msg_count ,
838: p_data => x_msg_data
839: );
840:
841: WHEN fnd_api.g_exc_unexpected_error THEN
842: ROLLBACK TO expire_system_pub;
843: x_return_status := fnd_api.g_ret_sts_unexp_error ;
844: fnd_msg_pub.count_and_get
845: (p_count => x_msg_count ,

Line 843: x_return_status := fnd_api.g_ret_sts_unexp_error ;

839: );
840:
841: WHEN fnd_api.g_exc_unexpected_error THEN
842: ROLLBACK TO expire_system_pub;
843: x_return_status := fnd_api.g_ret_sts_unexp_error ;
844: fnd_msg_pub.count_and_get
845: (p_count => x_msg_count ,
846: p_data => x_msg_data
847: );

Line 851: x_return_status := fnd_api.g_ret_sts_unexp_error ;

847: );
848:
849: WHEN OTHERS THEN
850: ROLLBACK TO expire_system_pub;
851: x_return_status := fnd_api.g_ret_sts_unexp_error ;
852: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
853: fnd_msg_pub.add_exc_msg(g_pkg_name ,l_api_name);
854: END IF;
855: fnd_msg_pub.count_and_get