215: p_object_version_number = l_object_version_number ) )
216: THEN
217: FND_MESSAGE.SET_NAME('AR', 'HZ_API_RECORD_CHANGED');
218: FND_MESSAGE.SET_TOKEN('TABLE', 'hz_style_fmt_variations');
219: FND_MSG_PUB.ADD;
220: RAISE FND_API.G_EXC_ERROR;
221: END IF;
222:
223: p_object_version_number := nvl(l_object_version_number, 1) + 1;
226: FND_MESSAGE.SET_NAME('AR', 'HZ_API_NO_RECORD');
227: FND_MESSAGE.SET_TOKEN('RECORD', 'style format variation');
228: FND_MESSAGE.SET_TOKEN('VALUE', NVL(( p_style_fmt_variation_rec.style_format_code || ',' ||
229: p_style_fmt_variation_rec.variation_number ), 'null'));
230: FND_MSG_PUB.ADD;
231: RAISE FND_API.G_EXC_ERROR;
232: END;
233:
234: -- validate style format variation record
347: END IF;
348:
349: -- initialize message list if p_init_msg_list is set to TRUE.
350: IF FND_API.to_Boolean(p_init_msg_list) THEN
351: FND_MSG_PUB.initialize;
352: END IF;
353:
354: -- initialize API return status to success.
355: x_return_status := FND_API.G_RET_STS_SUCCESS;
359: l_style_fmt_variation_rec,
360: x_return_status);
361:
362: -- standard call to get message count and if count is 1, get message info.
363: FND_MSG_PUB.Count_And_Get(
364: p_encoded => FND_API.G_FALSE,
365: p_count => x_msg_count,
366: p_data => x_msg_data);
367: -- Debug info.
383: EXCEPTION
384: WHEN FND_API.G_EXC_ERROR THEN
385: ROLLBACK TO create_style_fmt_variation;
386: x_return_status := FND_API.G_RET_STS_ERROR;
387: FND_MSG_PUB.Count_And_Get(
388: p_encoded => FND_API.G_FALSE,
389: p_count => x_msg_count,
390: p_data => x_msg_data);
391:
407:
408: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
409: ROLLBACK TO create_style_fmt_variation;
410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
411: FND_MSG_PUB.Count_And_Get(
412: p_encoded => FND_API.G_FALSE,
413: p_count => x_msg_count,
414: p_data => x_msg_data);
415:
434: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
435:
436: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
437: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
438: FND_MSG_PUB.ADD;
439:
440: FND_MSG_PUB.Count_And_Get(
441: p_encoded => FND_API.G_FALSE,
442: p_count => x_msg_count,
436: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
437: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
438: FND_MSG_PUB.ADD;
439:
440: FND_MSG_PUB.Count_And_Get(
441: p_encoded => FND_API.G_FALSE,
442: p_count => x_msg_count,
443: p_data => x_msg_data);
444:
522: END IF;
523:
524: -- initialize message list if p_init_msg_list is set to TRUE.
525: IF FND_API.to_Boolean(p_init_msg_list) THEN
526: FND_MSG_PUB.initialize;
527: END IF;
528:
529: -- initialize API return status to success.
530: x_return_status := FND_API.G_RET_STS_SUCCESS;
535: p_object_version_number,
536: x_return_status);
537:
538: -- standard call to get message count and if count is 1, get message info.
539: FND_MSG_PUB.Count_And_Get(
540: p_encoded => FND_API.G_FALSE,
541: p_count => x_msg_count,
542: p_data => x_msg_data);
543:
560: EXCEPTION
561: WHEN FND_API.G_EXC_ERROR THEN
562: ROLLBACK TO update_style_fmt_variation;
563: x_return_status := FND_API.G_RET_STS_ERROR;
564: FND_MSG_PUB.Count_And_Get(
565: p_encoded => FND_API.G_FALSE,
566: p_count => x_msg_count,
567: p_data => x_msg_data);
568:
584:
585: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
586: ROLLBACK TO update_style_fmt_variation;
587: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
588: FND_MSG_PUB.Count_And_Get(
589: p_encoded => FND_API.G_FALSE,
590: p_count => x_msg_count,
591: p_data => x_msg_data);
592:
611: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
612:
613: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
614: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
615: FND_MSG_PUB.ADD;
616:
617: FND_MSG_PUB.Count_And_Get(
618: p_encoded => FND_API.G_FALSE,
619: p_count => x_msg_count,
613: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
614: FND_MESSAGE.SET_TOKEN('ERROR' ,SQLERRM);
615: FND_MSG_PUB.ADD;
616:
617: FND_MSG_PUB.Count_And_Get(
618: p_encoded => FND_API.G_FALSE,
619: p_count => x_msg_count,
620: p_data => x_msg_data);
621:
692: END IF;
693:
694: -- Initialize message list if p_init_msg_list is set to TRUE.
695: IF fnd_api.to_boolean(p_init_msg_list) THEN
696: fnd_msg_pub.initialize;
697: END IF;
698:
699: -- Initialize API return status to success.
700: x_return_status := fnd_api.g_ret_sts_success;
705: p_variation_number IS NULL OR
706: p_variation_number = fnd_api.g_miss_num THEN
707: fnd_message.set_name('AR', 'HZ_API_MISSING_COLUMN');
708: fnd_message.set_token('COLUMN', 'p_style_format_code and p_variation_number');
709: fnd_msg_pub.add;
710: RAISE fnd_api.g_exc_error;
711: END IF;
712:
713: x_style_fmt_variation_rec.style_format_code := p_style_format_code;
736: p_msg_level=>fnd_log.level_procedure);
737: END IF;
738:
739: --Standard call to get message count and if count is 1, get message info.
740: fnd_msg_pub.count_and_get(
741: p_encoded => fnd_api.g_false,
742: p_count => x_msg_count,
743: p_data => x_msg_data
744: );
760: --disable_debug;
761: EXCEPTION
762: WHEN fnd_api.g_exc_error THEN
763: x_return_status := fnd_api.g_ret_sts_error;
764: fnd_msg_pub.count_and_get(
765: p_encoded => fnd_api.g_false,
766: p_count => x_msg_count,
767: p_data => x_msg_data
768: );
785:
786: WHEN fnd_api.g_exc_unexpected_error THEN
787: x_return_status := fnd_api.g_ret_sts_unexp_error;
788:
789: fnd_msg_pub.count_and_get(
790: p_encoded => fnd_api.g_false,
791: p_count => x_msg_count,
792: p_data => x_msg_data
793: );
812: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
813:
814: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
815: fnd_message.set_token('ERROR' ,SQLERRM);
816: fnd_msg_pub.add;
817:
818: fnd_msg_pub.count_and_get(
819: p_encoded => fnd_api.g_false,
820: p_count => x_msg_count,
814: fnd_message.set_name('AR', 'HZ_API_OTHERS_EXCEP');
815: fnd_message.set_token('ERROR' ,SQLERRM);
816: fnd_msg_pub.add;
817:
818: fnd_msg_pub.count_and_get(
819: p_encoded => fnd_api.g_false,
820: p_count => x_msg_count,
821: p_data => x_msg_data
822: );