[Home] [Help]
154:
155: close valid_language_cur;
156:
157: if l_return_status = false then
158: raise FND_API.g_exc_error;
159: -----dbms_output.put_line('invalid languages:' || p_language);
160: END IF;
161:
162: -----dbms_output.put_line('valid languages:' || p_language);
193: l_return_status := false;
194: end if;
195:
196: if l_return_status = false then
197: raise FND_API.g_exc_error;
198: end if;
199:
200: -----dbms_output.put_line('invalid orgid:' || p_orgid);
201:
234: end if;
235:
236: close valid_currency_cur;
237: if l_return_status = false then
238: raise FND_API.g_exc_error;
239: END IF;
240:
241: return l_return_status;
242:
280: then
281: FND_MESSAGE.set_name('JTF','JTF_MSITE_PRCLSTID_REQ');
282: FND_MESSAGE.set_token('CURR_CODE', p_currency);
283: FND_MSG_PUB.ADD;
284: raise FND_API.g_exc_error;
285: END IF;
286:
287: OPEN valid_currency_prclstid_cur(p_currency,p_walkin_prclstid,p_registered_prclstid,
288: p_bizpartner_prclstid);
316:
317:
318: PROCEDURE save_msite(
319: p_api_version IN NUMBER,
320: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
321: p_commit IN VARCHAR2 := FND_API.g_false,
322: x_return_status OUT VARCHAR2,
323: x_msg_count OUT NUMBER,
324: x_msg_data OUT VARCHAR2,
317:
318: PROCEDURE save_msite(
319: p_api_version IN NUMBER,
320: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
321: p_commit IN VARCHAR2 := FND_API.g_false,
322: x_return_status OUT VARCHAR2,
323: x_msg_count OUT NUMBER,
324: x_msg_data OUT VARCHAR2,
325: p_msite_rec IN OUT Msite_REC_TYPE )
333: l_master_exists NUMBER;
334: l_msite_master_flag VARCHAR2(1);
335: l_store_id NUMBER := NULL;
336: l_exists NUMBER ;
337: l_root_section_flag VARCHAR2(1) := FND_API.g_false;
338: l_return_status VARCHAR2(1);
339: l_msg_count NUMBER;
340: l_msg_data VARCHAR2(80);
341: l_root_section_id NUMBER := NULL;
378:
379: --------------------- initialize -----------------------+
380: SAVEPOINT save_msite;
381:
382: IF NOT FND_API.compatible_api_call(
383: g_api_version,
384: p_api_version,
385: l_api_name,
386: g_pkg_name ) THEN
383: g_api_version,
384: p_api_version,
385: l_api_name,
386: g_pkg_name ) THEN
387: RAISE FND_API.g_exc_unexpected_error;
388: END IF;
389:
390:
391: IF FND_API.to_boolean(p_init_msg_list) THEN
387: RAISE FND_API.g_exc_unexpected_error;
388: END IF;
389:
390:
391: IF FND_API.to_boolean(p_init_msg_list) THEN
392: FND_MSG_PUB.initialize;
393: END IF;
394:
395:
392: FND_MSG_PUB.initialize;
393: END IF;
394:
395:
396: x_return_status := FND_API.G_RET_STS_SUCCESS;
397:
398: --- Check if the msite_id exists
399: IF p_msite_rec.msite_id IS NOT NULL AND
400: p_msite_rec.msite_id <> FND_API.g_miss_num
396: x_return_status := FND_API.G_RET_STS_SUCCESS;
397:
398: --- Check if the msite_id exists
399: IF p_msite_rec.msite_id IS NOT NULL AND
400: p_msite_rec.msite_id <> FND_API.g_miss_num
401: THEN
402: --dbms_output.put_line('Minisite id is passed ' );
403:
404: if jtf_dspmgrvalidation_grp.check_msite_exists(
403:
404: if jtf_dspmgrvalidation_grp.check_msite_exists(
405: p_msite_rec.msite_id, p_msite_rec.Object_version_Number) = false
406: then
407: raise FND_API.g_exc_error;
408: end if;
409:
410: l_operation_type:='UPDATE';
411:
411:
412: --dbms_output.put_line('Operation is an update ' );
413:
414: END IF;
415: if p_msite_rec.msite_root_section_id <> FND_API.g_miss_num AND
416: p_msite_rec.msite_root_section_id is not null then
417:
418: if jtf_dspmgrvalidation_grp.check_root_section_exists(
419: p_msite_rec.msite_root_section_id) = false
417:
418: if jtf_dspmgrvalidation_grp.check_root_section_exists(
419: p_msite_rec.msite_root_section_id) = false
420: then
421: raise FND_API.g_exc_error;
422: end if;
423:
424: l_root_section_flag := FND_API.g_true;
425: l_root_section_id := p_msite_rec.msite_root_section_id;
420: then
421: raise FND_API.g_exc_error;
422: end if;
423:
424: l_root_section_flag := FND_API.g_true;
425: l_root_section_id := p_msite_rec.msite_root_section_id;
426: else
427: --- If the minisite is a new one, then root section id can be null ,
428: --todo
426: else
427: --- If the minisite is a new one, then root section id can be null ,
428: --todo
429: if (p_msite_rec.msite_id is not null and
430: p_msite_rec.enable_for_store = FND_API.g_true) or
431: p_msite_rec.enable_for_store = FND_API.g_true
432: then
433: FND_MESSAGE.set_name('JTF','JTF_MSITE_RSECID_INVLD');
434: FND_MSG_PUB.ADD;
427: --- If the minisite is a new one, then root section id can be null ,
428: --todo
429: if (p_msite_rec.msite_id is not null and
430: p_msite_rec.enable_for_store = FND_API.g_true) or
431: p_msite_rec.enable_for_store = FND_API.g_true
432: then
433: FND_MESSAGE.set_name('JTF','JTF_MSITE_RSECID_INVLD');
434: FND_MSG_PUB.ADD;
435: raise FND_API.g_exc_error;
431: p_msite_rec.enable_for_store = FND_API.g_true
432: then
433: FND_MESSAGE.set_name('JTF','JTF_MSITE_RSECID_INVLD');
434: FND_MSG_PUB.ADD;
435: raise FND_API.g_exc_error;
436: end if;
437: end if;
438:
439: if p_msite_rec.msite_master_flag = FND_API.g_true then
435: raise FND_API.g_exc_error;
436: end if;
437: end if;
438:
439: if p_msite_rec.msite_master_flag = FND_API.g_true then
440: raise master_msite_exists_exception;
441: else
442: l_msite_master_flag := 'N';
443: end if;
445:
446: --dbms_output.put_line('passed master mini site flag teste ' );
447: -- Check if the access_name for a minisite is unique
448: If ( p_msite_rec.msite_id IS NULL OR
449: p_msite_rec.msite_id = FND_API.g_miss_num) AND
450: (p_msite_rec.access_name IS NOT NULL AND
451: p_msite_rec.access_name <> FND_API.G_MISS_CHAR) Then
452: If Jtf_Dspmgrvalidation_Grp.Check_Msite_Accessname(
453: p_access_name => p_msite_rec.access_name)= FALSE
447: -- Check if the access_name for a minisite is unique
448: If ( p_msite_rec.msite_id IS NULL OR
449: p_msite_rec.msite_id = FND_API.g_miss_num) AND
450: (p_msite_rec.access_name IS NOT NULL AND
451: p_msite_rec.access_name <> FND_API.G_MISS_CHAR) Then
452: If Jtf_Dspmgrvalidation_Grp.Check_Msite_Accessname(
453: p_access_name => p_msite_rec.access_name)= FALSE
454: Then
455: Raise FND_API.G_EXC_ERROR ;
451: p_msite_rec.access_name <> FND_API.G_MISS_CHAR) Then
452: If Jtf_Dspmgrvalidation_Grp.Check_Msite_Accessname(
453: p_access_name => p_msite_rec.access_name)= FALSE
454: Then
455: Raise FND_API.G_EXC_ERROR ;
456: End If;
457: End If;
458:
459: if p_msite_rec.enable_for_store = FND_API.g_true then
455: Raise FND_API.G_EXC_ERROR ;
456: End If;
457: End If;
458:
459: if p_msite_rec.enable_for_store = FND_API.g_true then
460: --dbms_output.put_line('****************enabled for store is to true ' );
461: OPEN store_id_cur;
462: fetch store_id_cur into l_store_id;
463: if store_id_cur%NOTFOUND then
468:
469: if jtf_dspmgrvalidation_grp.check_root_section_exists(
470: p_msite_rec.msite_root_section_id) = false
471: then
472: raise FND_API.g_exc_error;
473: end if;
474:
475: if msite_default_lang_exists(p_msite_rec.msite_id) = false
476: then
506:
507: l_resp_access_flag := p_msite_rec.resp_access_flag;
508: IF (((l_operation_type = 'UPDATE') AND
509: (l_resp_access_flag IS NOT NULL AND
510: l_resp_access_flag <> FND_API.G_MISS_char)) OR
511: l_operation_type = 'INSERT')
512: THEN
513: OPEN yes_no_cur(l_resp_access_flag );
514: FETCH yes_no_cur INTO l_exists;
520:
521: l_party_access_code := p_msite_rec.party_access_code;
522: IF (((l_operation_type = 'UPDATE') AND
523: (l_party_access_code IS NOT NULL AND
524: l_party_access_code <> FND_API.G_MISS_char)) OR
525: l_operation_type = 'INSERT')
526: THEN
527: OPEN C_party_access_code(l_party_access_code );
528: FETCH C_party_access_code INTO l_exists;
584: --p_msite_rec.security_group_id,
585: l_resp_access_flag ,
586: l_party_access_code ,
587: p_msite_rec.access_name ,
588: DECODE(p_msite_rec.url,FND_API.G_MISS_CHAR,null,p_msite_rec.url) ,
589: DECODE(p_msite_rec.theme_id,FND_API.G_MISS_NUM,null,
590: p_msite_rec.theme_id));
591: --- Insert into the TL table
592: insert into JTF_MSITES_TL (
585: l_resp_access_flag ,
586: l_party_access_code ,
587: p_msite_rec.access_name ,
588: DECODE(p_msite_rec.url,FND_API.G_MISS_CHAR,null,p_msite_rec.url) ,
589: DECODE(p_msite_rec.theme_id,FND_API.G_MISS_NUM,null,
590: p_msite_rec.theme_id));
591: --- Insert into the TL table
592: insert into JTF_MSITES_TL (
593: MSITE_ID,
630: -- PARTY_ACCESS_CODE = l_party_access_code ,
631: -- ACCESS_NAME = p_msite_rec.access_name
632: --Bug fix for not updating end_date_active
633:
634: IF l_resp_access_flag = fnd_api.g_miss_char
635: THEN
636: l_resp_access_flag := NULL;
637: END IF;
638:
635: THEN
636: l_resp_access_flag := NULL;
637: END IF;
638:
639: IF l_party_access_code = fnd_api.g_miss_char
640: THEN
641: l_party_access_code := NULL;
642: END IF;
643:
640: THEN
641: l_party_access_code := NULL;
642: END IF;
643:
644: IF p_msite_rec.access_name = fnd_api.g_miss_char
645: THEN
646: p_msite_rec.access_name := NULL;
647: END IF;
648:
645: THEN
646: p_msite_rec.access_name := NULL;
647: END IF;
648:
649: IF p_msite_rec.start_date_active = fnd_api.g_miss_date
650: THEN
651: p_msite_rec.start_date_active := NULL;
652: END IF;
653:
650: THEN
651: p_msite_rec.start_date_active := NULL;
652: END IF;
653:
654: IF p_msite_rec.end_date_active = fnd_api.g_miss_date
655: THEN
656: p_msite_rec.end_date_active := NULL;
657: END IF;
658:
655: THEN
656: p_msite_rec.end_date_active := NULL;
657: END IF;
658:
659: IF p_msite_rec.url = fnd_api.g_miss_char
660: THEN
661: p_msite_rec.url := NULL;
662: END IF;
663:
660: THEN
661: p_msite_rec.url := NULL;
662: END IF;
663:
664: IF p_msite_rec.theme_id = fnd_api.g_miss_num
665: THEN
666: p_msite_rec.theme_id := NULL;
667: END IF;
668:
690: MSITE_ID = p_msite_rec.msite_id and
691: OBJECT_VERSION_NUMBER = p_msite_rec.object_version_number ;
692:
693: UPDATE JTF_MSITES_TL SET
694: MSITE_NAME = decode( p_msite_rec.Display_name, FND_API.G_MISS_CHAR,
695: MSITE_NAME, p_msite_rec.Display_name),
696: MSITE_DESCRIPTION = decode( p_msite_rec.description,
697: FND_API.G_MISS_CHAR, MSITE_DESCRIPTION, p_msite_rec.description),
698: LAST_UPDATE_DATE = SYSDATE,
693: UPDATE JTF_MSITES_TL SET
694: MSITE_NAME = decode( p_msite_rec.Display_name, FND_API.G_MISS_CHAR,
695: MSITE_NAME, p_msite_rec.Display_name),
696: MSITE_DESCRIPTION = decode( p_msite_rec.description,
697: FND_API.G_MISS_CHAR, MSITE_DESCRIPTION, p_msite_rec.description),
698: LAST_UPDATE_DATE = SYSDATE,
699: LAST_UPDATED_BY = FND_GLOBAL.user_id,
700: LAST_UPDATE_LOGIN = FND_GLOBAL.user_id,
701: OBJECT_VERSION_NUMBER= p_msite_rec.object_version_number +1 ,
707: p_msite_rec.object_version_number + 1;
708:
709: END IF;
710:
711: ----if p_msite_rec.enable_for_store = FND_API.g_true and
712: -- if l_root_section_flag = FND_API.g_true
713: -- then
714: -- IBE_DSP_HIERARCHY_SETUP_PVT.Associate_Root_Sct_To_MSite
715: -- (
708:
709: END IF;
710:
711: ----if p_msite_rec.enable_for_store = FND_API.g_true and
712: -- if l_root_section_flag = FND_API.g_true
713: -- then
714: -- IBE_DSP_HIERARCHY_SETUP_PVT.Associate_Root_Sct_To_MSite
715: -- (
716: -- p_api_version => p_api_version,
713: -- then
714: -- IBE_DSP_HIERARCHY_SETUP_PVT.Associate_Root_Sct_To_MSite
715: -- (
716: -- p_api_version => p_api_version,
717: -- p_init_msg_list => FND_API.g_false,
718: -- p_commit => FND_API.g_false,
719: -- p_validation_level => 100,
720: -- p_section_id => p_msite_rec.msite_root_section_id,
721: -- p_mini_site_id => p_msite_rec.msite_id,
714: -- IBE_DSP_HIERARCHY_SETUP_PVT.Associate_Root_Sct_To_MSite
715: -- (
716: -- p_api_version => p_api_version,
717: -- p_init_msg_list => FND_API.g_false,
718: -- p_commit => FND_API.g_false,
719: -- p_validation_level => 100,
720: -- p_section_id => p_msite_rec.msite_root_section_id,
721: -- p_mini_site_id => p_msite_rec.msite_id,
722: -- x_return_status => l_return_status,
723: -- x_msg_count => l_msg_count,
724: -- x_msg_data => l_msg_data
725: -- );
726: --
727: -- if l_return_status = FND_API.G_RET_STS_SUCCESS then
728: -- update JTF_MSITES_B set msite_root_section_id = l_root_section_id ,
729: -- store_id = l_store_id
730: -- where msite_id=p_msite_rec.msite_id;
731: -- else
728: -- update JTF_MSITES_B set msite_root_section_id = l_root_section_id ,
729: -- store_id = l_store_id
730: -- where msite_id=p_msite_rec.msite_id;
731: -- else
732: -- raise FND_API.g_exc_error;
733: -- end if;
734: -- end if;
735:
736:
736:
737: --dbms_output.put_line('Operation is successful ' );
738: --- Check if the caller requested to commit ,
739: --- If p_commit set to true, commit the transaction
740: IF FND_API.to_boolean(p_commit) THEN
741: COMMIT;
742: END IF;
743:
744: x_return_status := FND_API.G_RET_STS_SUCCESS;
740: IF FND_API.to_boolean(p_commit) THEN
741: COMMIT;
742: END IF;
743:
744: x_return_status := FND_API.G_RET_STS_SUCCESS;
745:
746: FND_MSG_PUB.count_and_get(
747: p_encoded => FND_API.g_false,
748: p_count => x_msg_count,
743:
744: x_return_status := FND_API.G_RET_STS_SUCCESS;
745:
746: FND_MSG_PUB.count_and_get(
747: p_encoded => FND_API.g_false,
748: p_count => x_msg_count,
749: p_data => x_msg_data
750: );
751:
750: );
751:
752: EXCEPTION
753:
754: WHEN FND_API.g_exc_error THEN
755: ROLLBACK TO save_msite;
756: x_return_status := FND_API.g_ret_sts_error;
757: FND_MSG_PUB.count_and_get(
758: p_encoded => FND_API.g_false,
752: EXCEPTION
753:
754: WHEN FND_API.g_exc_error THEN
755: ROLLBACK TO save_msite;
756: x_return_status := FND_API.g_ret_sts_error;
757: FND_MSG_PUB.count_and_get(
758: p_encoded => FND_API.g_false,
759: p_count => x_msg_count,
760: p_data => x_msg_data
754: WHEN FND_API.g_exc_error THEN
755: ROLLBACK TO save_msite;
756: x_return_status := FND_API.g_ret_sts_error;
757: FND_MSG_PUB.count_and_get(
758: p_encoded => FND_API.g_false,
759: p_count => x_msg_count,
760: p_data => x_msg_data
761: );
762:
759: p_count => x_msg_count,
760: p_data => x_msg_data
761: );
762:
763: WHEN FND_API.g_exc_unexpected_error THEN
764: ROLLBACK TO save_msite;
765: x_return_status := FND_API.g_ret_sts_unexp_error ;
766: --dbms_output.put_line('unexpected error raised');
767: FND_MSG_PUB.count_and_get(
761: );
762:
763: WHEN FND_API.g_exc_unexpected_error THEN
764: ROLLBACK TO save_msite;
765: x_return_status := FND_API.g_ret_sts_unexp_error ;
766: --dbms_output.put_line('unexpected error raised');
767: FND_MSG_PUB.count_and_get(
768: p_encoded => FND_API.g_false,
769: p_count => x_msg_count,
764: ROLLBACK TO save_msite;
765: x_return_status := FND_API.g_ret_sts_unexp_error ;
766: --dbms_output.put_line('unexpected error raised');
767: FND_MSG_PUB.count_and_get(
768: p_encoded => FND_API.g_false,
769: p_count => x_msg_count,
770: p_data => x_msg_data
771: );
772:
771: );
772:
773: WHEN master_msite_exists_exception THEN
774: ROLLBACK TO save_msite;
775: x_return_status := FND_API.g_ret_sts_error ;
776: FND_MESSAGE.set_name('JTF','JTF_MSITE_MASTER_EXISTS');
777: FND_MSG_PUB.ADD;
778: --dbms_output.put_line('master_msite error raised');
779: FND_MSG_PUB.count_and_get(
776: FND_MESSAGE.set_name('JTF','JTF_MSITE_MASTER_EXISTS');
777: FND_MSG_PUB.ADD;
778: --dbms_output.put_line('master_msite error raised');
779: FND_MSG_PUB.count_and_get(
780: p_encoded => FND_API.g_false,
781: p_count => x_msg_count,
782: p_data => x_msg_data
783: );
784:
783: );
784:
785: WHEN store_not_exists_exception THEN
786: ROLLBACK TO save_msite;
787: x_return_status := FND_API.g_ret_sts_error ;
788: FND_MSG_PUB.count_and_get(
789: p_encoded => FND_API.g_false,
790: p_count => x_msg_count,
791: p_data => x_msg_data
785: WHEN store_not_exists_exception THEN
786: ROLLBACK TO save_msite;
787: x_return_status := FND_API.g_ret_sts_error ;
788: FND_MSG_PUB.count_and_get(
789: p_encoded => FND_API.g_false,
790: p_count => x_msg_count,
791: p_data => x_msg_data
792: );
793:
792: );
793:
794: WHEN msite_default_org_missing THEN
795: ROLLBACK TO save_msite;
796: x_return_status := FND_API.g_ret_sts_error;
797: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_ORG_REQ');
798: FND_MESSAGE.set_token('ID', p_msite_rec.msite_id);
799: FND_MSG_PUB.ADD;
800: FND_MSG_PUB.count_and_get(
797: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_ORG_REQ');
798: FND_MESSAGE.set_token('ID', p_msite_rec.msite_id);
799: FND_MSG_PUB.ADD;
800: FND_MSG_PUB.count_and_get(
801: p_encoded => FND_API.g_false,
802: p_count => x_msg_count,
803: p_data => x_msg_data
804: );
805: WHEN msite_default_currency_missing THEN
803: p_data => x_msg_data
804: );
805: WHEN msite_default_currency_missing THEN
806: ROLLBACK TO save_msite;
807: x_return_status := FND_API.g_ret_sts_error;
808: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_CURR_REQ');
809: FND_MESSAGE.set_token('ID', p_msite_rec.msite_id);
810: FND_MSG_PUB.ADD;
811: FND_MSG_PUB.count_and_get(
808: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_CURR_REQ');
809: FND_MESSAGE.set_token('ID', p_msite_rec.msite_id);
810: FND_MSG_PUB.ADD;
811: FND_MSG_PUB.count_and_get(
812: p_encoded => FND_API.g_false,
813: p_count => x_msg_count,
814: p_data => x_msg_data
815: );
816:
815: );
816:
817: WHEN msite_default_lang_missing THEN
818: ROLLBACK TO save_msite;
819: x_return_status := FND_API.g_ret_sts_error;
820: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_LANG_REQ');
821: FND_MESSAGE.set_token('ID', p_msite_rec.msite_id);
822: FND_MSG_PUB.ADD;
823: FND_MSG_PUB.count_and_get(
820: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_LANG_REQ');
821: FND_MESSAGE.set_token('ID', p_msite_rec.msite_id);
822: FND_MSG_PUB.ADD;
823: FND_MSG_PUB.count_and_get(
824: p_encoded => FND_API.g_false,
825: p_count => x_msg_count,
826: p_data => x_msg_data
827: );
828:
827: );
828:
829: WHEN OTHERS THEN
830: ROLLBACK TO save_msite;
831: x_return_status := FND_API.g_ret_sts_unexp_error ;
832: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
833: THEN
834: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
835: END IF;
833: THEN
834: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
835: END IF;
836: FND_MSG_PUB.count_and_get(
837: p_encoded => FND_API.g_false,
838: p_count => x_msg_count,
839: p_data => x_msg_data
840: );
841:
843:
844:
845: PROCEDURE save_msite_languages(
846: p_api_version IN NUMBER,
847: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
848: p_commit IN VARCHAR2 := FND_API.g_false,
849: x_return_status OUT VARCHAR2,
850: x_msg_count OUT NUMBER,
851: x_msg_data OUT VARCHAR2,
844:
845: PROCEDURE save_msite_languages(
846: p_api_version IN NUMBER,
847: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
848: p_commit IN VARCHAR2 := FND_API.g_false,
849: x_return_status OUT VARCHAR2,
850: x_msg_count OUT NUMBER,
851: x_msg_data OUT VARCHAR2,
852: p_msite_id IN NUMBER,
870:
871: --------------------- initialize -----------------------+
872: SAVEPOINT save_msite_languages;
873:
874: IF NOT FND_API.compatible_api_call(
875: g_api_version,
876: p_api_version,
877: l_api_name,
878: g_pkg_name
876: p_api_version,
877: l_api_name,
878: g_pkg_name
879: ) THEN
880: RAISE FND_API.g_exc_unexpected_error;
881: END IF;
882:
883:
884: IF FND_API.to_boolean(p_init_msg_list) THEN
880: RAISE FND_API.g_exc_unexpected_error;
881: END IF;
882:
883:
884: IF FND_API.to_boolean(p_init_msg_list) THEN
885: FND_MSG_PUB.initialize;
886: END IF;
887:
888:
885: FND_MSG_PUB.initialize;
886: END IF;
887:
888:
889: x_return_status := FND_API.G_RET_STS_SUCCESS;
890:
891: --- Check if the msite_id exists
892: IF p_msite_id IS NOT NULL and p_msite_id <> FND_API.g_miss_num
893: THEN
888:
889: x_return_status := FND_API.G_RET_STS_SUCCESS;
890:
891: --- Check if the msite_id exists
892: IF p_msite_id IS NOT NULL and p_msite_id <> FND_API.g_miss_num
893: THEN
894:
895: if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id) = false then
896: raise FND_API.g_exc_error;
892: IF p_msite_id IS NOT NULL and p_msite_id <> FND_API.g_miss_num
893: THEN
894:
895: if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id) = false then
896: raise FND_API.g_exc_error;
897: end if;
898:
899: --dbms_output.put_line('Minisite id is passed ' );
900: ---- Delete all the entries for the mini-site
916: savepoint save_msite_language;
917:
918: if valid_language(p_msite_languages_tbl(l_index).language_code) =
919: false THEN
920: raise FND_API.g_exc_error;
921: end if;
922:
923: OPEN msite_languages_id_seq;
924: FETCH msite_languages_id_seq INTO l_msite_languages_id;
947:
948: --dbms_output.put_line('inserted language passed ' );
949: l_insert_row := l_insert_row + 1;
950: -- Check if this language is default
951: if p_msite_languages_tbl(l_index).default_flag = FND_API.g_true
952: and default_index = 0 then
953: default_index := l_index;
954: end if;
955:
955:
956: EXCEPTION
957: WHEN OTHERS THEN
958: ROLLBACK TO save_msite_language;
959: x_return_status := FND_API.g_ret_sts_error;
960: END;
961:
962: END LOOP;
963: /* else if msite_enabled_for_store(p_msite_id) = true then
981:
982: --- Check if the caller requested to commit ,
983: --- If p_commit set to true, commit the transaction
984: if l_insert_row > 0 then
985: IF FND_API.to_boolean(p_commit) THEN
986: COMMIT;
987: END IF;
988: else
989: raise FND_API.g_exc_error;
985: IF FND_API.to_boolean(p_commit) THEN
986: COMMIT;
987: END IF;
988: else
989: raise FND_API.g_exc_error;
990: end if;
991: else
992: raise jtf_dspmgrvalidation_grp.msite_req_exception;
993: end if;
990: end if;
991: else
992: raise jtf_dspmgrvalidation_grp.msite_req_exception;
993: end if;
994: FND_MSG_PUB.count_and_get( p_encoded => FND_API.g_false,
995: p_count => x_msg_count,
996: p_data => x_msg_data
997: );
998: EXCEPTION
995: p_count => x_msg_count,
996: p_data => x_msg_data
997: );
998: EXCEPTION
999: WHEN FND_API.g_exc_error THEN
1000: ROLLBACK TO save_msite_languages;
1001: x_return_status := FND_API.g_ret_sts_error;
1002: FND_MSG_PUB.count_and_get(
1003: p_encoded => FND_API.g_false,
997: );
998: EXCEPTION
999: WHEN FND_API.g_exc_error THEN
1000: ROLLBACK TO save_msite_languages;
1001: x_return_status := FND_API.g_ret_sts_error;
1002: FND_MSG_PUB.count_and_get(
1003: p_encoded => FND_API.g_false,
1004: p_count => x_msg_count,
1005: p_data => x_msg_data
999: WHEN FND_API.g_exc_error THEN
1000: ROLLBACK TO save_msite_languages;
1001: x_return_status := FND_API.g_ret_sts_error;
1002: FND_MSG_PUB.count_and_get(
1003: p_encoded => FND_API.g_false,
1004: p_count => x_msg_count,
1005: p_data => x_msg_data
1006: );
1007: WHEN jtf_dspmgrvalidation_grp.msite_req_exception THEN
1005: p_data => x_msg_data
1006: );
1007: WHEN jtf_dspmgrvalidation_grp.msite_req_exception THEN
1008: ROLLBACK TO save_msite_languages;
1009: x_return_status := FND_API.g_ret_sts_error;
1010: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1011: FND_MSG_PUB.ADD;
1012: FND_MSG_PUB.count_and_get(
1013: p_encoded => FND_API.g_false,
1009: x_return_status := FND_API.g_ret_sts_error;
1010: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1011: FND_MSG_PUB.ADD;
1012: FND_MSG_PUB.count_and_get(
1013: p_encoded => FND_API.g_false,
1014: p_count => x_msg_count,
1015: p_data => x_msg_data
1016: );
1017: WHEN msite_default_lang_missing THEN
1015: p_data => x_msg_data
1016: );
1017: WHEN msite_default_lang_missing THEN
1018: ROLLBACK TO save_msite_languages;
1019: x_return_status := FND_API.g_ret_sts_error;
1020: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_LANG_REQ');
1021: FND_MESSAGE.set_token('ID', p_msite_id);
1022: FND_MSG_PUB.ADD;
1023: FND_MSG_PUB.count_and_get(
1020: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_LANG_REQ');
1021: FND_MESSAGE.set_token('ID', p_msite_id);
1022: FND_MSG_PUB.ADD;
1023: FND_MSG_PUB.count_and_get(
1024: p_encoded => FND_API.g_false,
1025: p_count => x_msg_count,
1026: p_data => x_msg_data
1027: );
1028: WHEN FND_API.g_exc_unexpected_error THEN
1024: p_encoded => FND_API.g_false,
1025: p_count => x_msg_count,
1026: p_data => x_msg_data
1027: );
1028: WHEN FND_API.g_exc_unexpected_error THEN
1029: ROLLBACK TO save_msite_languages;
1030: x_return_status := FND_API.g_ret_sts_unexp_error ;
1031: FND_MSG_PUB.count_and_get(
1032: p_encoded => FND_API.g_false,
1026: p_data => x_msg_data
1027: );
1028: WHEN FND_API.g_exc_unexpected_error THEN
1029: ROLLBACK TO save_msite_languages;
1030: x_return_status := FND_API.g_ret_sts_unexp_error ;
1031: FND_MSG_PUB.count_and_get(
1032: p_encoded => FND_API.g_false,
1033: p_count => x_msg_count,
1034: p_data => x_msg_data );
1028: WHEN FND_API.g_exc_unexpected_error THEN
1029: ROLLBACK TO save_msite_languages;
1030: x_return_status := FND_API.g_ret_sts_unexp_error ;
1031: FND_MSG_PUB.count_and_get(
1032: p_encoded => FND_API.g_false,
1033: p_count => x_msg_count,
1034: p_data => x_msg_data );
1035: WHEN OTHERS THEN
1036: ROLLBACK TO save_msite_languages;
1033: p_count => x_msg_count,
1034: p_data => x_msg_data );
1035: WHEN OTHERS THEN
1036: ROLLBACK TO save_msite_languages;
1037: x_return_status := FND_API.g_ret_sts_unexp_error ;
1038: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1039: THEN
1040: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1041: END IF;
1039: THEN
1040: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1041: END IF;
1042: FND_MSG_PUB.count_and_get(
1043: p_encoded => FND_API.g_false,
1044: p_count => x_msg_count,
1045: p_data => x_msg_data );
1046:
1047: END save_msite_languages;
1047: END save_msite_languages;
1048:
1049: PROCEDURE save_msite_currencies(
1050: p_api_version IN NUMBER,
1051: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1052: p_commit IN VARCHAR2 := FND_API.g_false,
1053: x_return_status OUT VARCHAR2,
1054: x_msg_count OUT NUMBER,
1055: x_msg_data OUT VARCHAR2,
1048:
1049: PROCEDURE save_msite_currencies(
1050: p_api_version IN NUMBER,
1051: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1052: p_commit IN VARCHAR2 := FND_API.g_false,
1053: x_return_status OUT VARCHAR2,
1054: x_msg_count OUT NUMBER,
1055: x_msg_data OUT VARCHAR2,
1056: p_msite_id IN NUMBER,
1069: default_index NUMBER := 0;
1070: BEGIN
1071: --------------------- initialize -----------------------+
1072: SAVEPOINT save_msite_currencies;
1073: IF NOT FND_API.compatible_api_call(
1074: g_api_version,
1075: p_api_version,
1076: l_api_name,
1077: g_pkg_name ) THEN
1074: g_api_version,
1075: p_api_version,
1076: l_api_name,
1077: g_pkg_name ) THEN
1078: RAISE FND_API.g_exc_unexpected_error;
1079: END IF;
1080:
1081: IF FND_API.to_boolean(p_init_msg_list) THEN
1082: FND_MSG_PUB.initialize;
1077: g_pkg_name ) THEN
1078: RAISE FND_API.g_exc_unexpected_error;
1079: END IF;
1080:
1081: IF FND_API.to_boolean(p_init_msg_list) THEN
1082: FND_MSG_PUB.initialize;
1083: END IF;
1084: x_return_status := FND_API.G_RET_STS_SUCCESS;
1085: --- Check if the msite_id exists
1080:
1081: IF FND_API.to_boolean(p_init_msg_list) THEN
1082: FND_MSG_PUB.initialize;
1083: END IF;
1084: x_return_status := FND_API.G_RET_STS_SUCCESS;
1085: --- Check if the msite_id exists
1086: IF p_msite_id IS NOT NULL and p_msite_id <> FND_API.g_miss_num
1087: THEN
1088: --dbms_output.put_line('Minisite id is passed ' );
1082: FND_MSG_PUB.initialize;
1083: END IF;
1084: x_return_status := FND_API.G_RET_STS_SUCCESS;
1085: --- Check if the msite_id exists
1086: IF p_msite_id IS NOT NULL and p_msite_id <> FND_API.g_miss_num
1087: THEN
1088: --dbms_output.put_line('Minisite id is passed ' );
1089: if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id) = false then
1090: raise FND_API.g_exc_error;
1086: IF p_msite_id IS NOT NULL and p_msite_id <> FND_API.g_miss_num
1087: THEN
1088: --dbms_output.put_line('Minisite id is passed ' );
1089: if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id) = false then
1090: raise FND_API.g_exc_error;
1091: end if;
1092: if (p_msite_currencies_tbl.count > 0 ) then
1093: ---- Delete all the entries for the mini-site
1094: DELETE FROM JTF_MSITE_CURRENCIES where
1100: BEGIN
1101: savepoint save_msite_currency;
1102: if valid_currency(p_msite_currencies_tbl(l_index).currency_code)
1103: = false THEN
1104: raise FND_API.g_exc_error;
1105: end if;
1106: if valid_prc_lstids (
1107: p_msite_currencies_tbl(l_index).currency_code,
1108: p_msite_currencies_tbl(l_index).walkin_prc_lst_id,
1109: p_msite_currencies_tbl(l_index).registered_prc_lst_id,
1110: p_msite_currencies_tbl(l_index).biz_partner_prc_lst_id)
1111: = false then
1112: --dbms_output.put_line('invliad prc list id test');
1113: raise FND_API.g_exc_error;
1114: end if;
1115:
1116: OPEN msite_currencies_id_seq;
1117: FETCH msite_currencies_id_seq INTO l_msite_currencies_id;
1146: p_msite_currencies_tbl(l_index).orderable_limit);
1147: --dbms_output.put_line('inserted into currency');
1148: l_insert_row := l_insert_row + 1;
1149: --dbms_output.put_line('inserted into currency' || l_insert_row);
1150: if p_msite_currencies_tbl(l_index).default_flag = FND_API.g_true
1151: and default_index = 0 then
1152: default_index := l_index;
1153: end if;
1154: EXCEPTION
1153: end if;
1154: EXCEPTION
1155: WHEN OTHERS THEN
1156: ROLLBACK TO save_msite_currency;
1157: x_return_status := FND_API.g_ret_sts_error;
1158: END;
1159: END LOOP;
1160: /* else if msite_enabled_for_store(p_msite_id) = true then
1161: raise msite_currencies_missing;
1174: end if;
1175: --- Check if the caller requested to commit ,
1176: --- If p_commit set to true, commit the transaction
1177: if l_insert_row > 0 then
1178: IF FND_API.to_boolean(p_commit) THEN
1179: COMMIT;
1180: END IF;
1181: else
1182: --dbms_output.put_line('raising an error' || l_insert_row);
1179: COMMIT;
1180: END IF;
1181: else
1182: --dbms_output.put_line('raising an error' || l_insert_row);
1183: raise FND_API.g_exc_error;
1184: end if;
1185: else
1186: raise jtf_dspmgrvalidation_grp.msite_req_exception;
1187: end if;
1185: else
1186: raise jtf_dspmgrvalidation_grp.msite_req_exception;
1187: end if;
1188: FND_MSG_PUB.count_and_get(
1189: p_encoded => FND_API.g_false,
1190: p_count => x_msg_count,
1191: p_data => x_msg_data
1192: );
1193:
1191: p_data => x_msg_data
1192: );
1193:
1194: EXCEPTION
1195: WHEN FND_API.g_exc_error THEN
1196: ROLLBACK TO save_msite_currencies;
1197: x_return_status := FND_API.g_ret_sts_error;
1198: FND_MSG_PUB.count_and_get(
1199: p_encoded => FND_API.g_false,
1193:
1194: EXCEPTION
1195: WHEN FND_API.g_exc_error THEN
1196: ROLLBACK TO save_msite_currencies;
1197: x_return_status := FND_API.g_ret_sts_error;
1198: FND_MSG_PUB.count_and_get(
1199: p_encoded => FND_API.g_false,
1200: p_count => x_msg_count,
1201: p_data => x_msg_data
1195: WHEN FND_API.g_exc_error THEN
1196: ROLLBACK TO save_msite_currencies;
1197: x_return_status := FND_API.g_ret_sts_error;
1198: FND_MSG_PUB.count_and_get(
1199: p_encoded => FND_API.g_false,
1200: p_count => x_msg_count,
1201: p_data => x_msg_data
1202: );
1203: WHEN jtf_dspmgrvalidation_grp.msite_req_exception THEN
1201: p_data => x_msg_data
1202: );
1203: WHEN jtf_dspmgrvalidation_grp.msite_req_exception THEN
1204: ROLLBACK TO save_msite_currencies;
1205: x_return_status := FND_API.g_ret_sts_error;
1206: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1207: FND_MSG_PUB.ADD;
1208: FND_MSG_PUB.count_and_get(
1209: p_encoded => FND_API.g_false,
1205: x_return_status := FND_API.g_ret_sts_error;
1206: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1207: FND_MSG_PUB.ADD;
1208: FND_MSG_PUB.count_and_get(
1209: p_encoded => FND_API.g_false,
1210: p_count => x_msg_count,
1211: p_data => x_msg_data
1212: );
1213: WHEN msite_default_currency_missing THEN
1211: p_data => x_msg_data
1212: );
1213: WHEN msite_default_currency_missing THEN
1214: ROLLBACK TO save_msite_currencies;
1215: x_return_status := FND_API.g_ret_sts_error;
1216: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_CURR_REQ');
1217: FND_MESSAGE.set_token('ID', p_msite_id);
1218: FND_MSG_PUB.ADD;
1219: FND_MSG_PUB.count_and_get(
1216: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_CURR_REQ');
1217: FND_MESSAGE.set_token('ID', p_msite_id);
1218: FND_MSG_PUB.ADD;
1219: FND_MSG_PUB.count_and_get(
1220: p_encoded => FND_API.g_false,
1221: p_count => x_msg_count,
1222: p_data => x_msg_data
1223: );
1224: WHEN FND_API.g_exc_unexpected_error THEN
1220: p_encoded => FND_API.g_false,
1221: p_count => x_msg_count,
1222: p_data => x_msg_data
1223: );
1224: WHEN FND_API.g_exc_unexpected_error THEN
1225: ROLLBACK TO save_msite_currencies;
1226: x_return_status := FND_API.g_ret_sts_unexp_error ;
1227: FND_MSG_PUB.count_and_get(
1228: p_encoded => FND_API.g_false,
1222: p_data => x_msg_data
1223: );
1224: WHEN FND_API.g_exc_unexpected_error THEN
1225: ROLLBACK TO save_msite_currencies;
1226: x_return_status := FND_API.g_ret_sts_unexp_error ;
1227: FND_MSG_PUB.count_and_get(
1228: p_encoded => FND_API.g_false,
1229: p_count => x_msg_count,
1230: p_data => x_msg_data
1224: WHEN FND_API.g_exc_unexpected_error THEN
1225: ROLLBACK TO save_msite_currencies;
1226: x_return_status := FND_API.g_ret_sts_unexp_error ;
1227: FND_MSG_PUB.count_and_get(
1228: p_encoded => FND_API.g_false,
1229: p_count => x_msg_count,
1230: p_data => x_msg_data
1231: );
1232: WHEN OTHERS THEN
1230: p_data => x_msg_data
1231: );
1232: WHEN OTHERS THEN
1233: ROLLBACK TO save_msite_currencies;
1234: x_return_status := FND_API.g_ret_sts_unexp_error ;
1235: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1236: THEN
1237: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1238: END IF;
1236: THEN
1237: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1238: END IF;
1239: FND_MSG_PUB.count_and_get(
1240: p_encoded => FND_API.g_false,
1241: p_count => x_msg_count,
1242: p_data => x_msg_data
1243: );
1244:
1247:
1248:
1249: PROCEDURE save_msite_orgids(
1250: p_api_version IN NUMBER,
1251: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1252: p_commit IN VARCHAR2 := FND_API.g_false,
1253: x_return_status OUT VARCHAR2,
1254: x_msg_count OUT NUMBER,
1255: x_msg_data OUT VARCHAR2,
1248:
1249: PROCEDURE save_msite_orgids(
1250: p_api_version IN NUMBER,
1251: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1252: p_commit IN VARCHAR2 := FND_API.g_false,
1253: x_return_status OUT VARCHAR2,
1254: x_msg_count OUT NUMBER,
1255: x_msg_data OUT VARCHAR2,
1256: p_msite_id IN NUMBER,
1274:
1275: --------------------- initialize -----------------------+
1276: SAVEPOINT save_msite_orgids;
1277:
1278: IF NOT FND_API.compatible_api_call(
1279: g_api_version,
1280: p_api_version,
1281: l_api_name,
1282: g_pkg_name
1280: p_api_version,
1281: l_api_name,
1282: g_pkg_name
1283: ) THEN
1284: RAISE FND_API.g_exc_unexpected_error;
1285: END IF;
1286:
1287:
1288: IF FND_API.to_boolean(p_init_msg_list) THEN
1284: RAISE FND_API.g_exc_unexpected_error;
1285: END IF;
1286:
1287:
1288: IF FND_API.to_boolean(p_init_msg_list) THEN
1289: FND_MSG_PUB.initialize;
1290: END IF;
1291:
1292:
1289: FND_MSG_PUB.initialize;
1290: END IF;
1291:
1292:
1293: x_return_status := FND_API.G_RET_STS_SUCCESS;
1294:
1295: --- Check if the msite_id exists
1296: IF p_msite_id IS NOT NULL and p_msite_id <> FND_API.g_miss_num
1297: THEN
1292:
1293: x_return_status := FND_API.G_RET_STS_SUCCESS;
1294:
1295: --- Check if the msite_id exists
1296: IF p_msite_id IS NOT NULL and p_msite_id <> FND_API.g_miss_num
1297: THEN
1298: --dbms_output.put_line('Minisite id is passed ' );
1299:
1300: if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id) = false then
1297: THEN
1298: --dbms_output.put_line('Minisite id is passed ' );
1299:
1300: if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id) = false then
1301: raise FND_API.g_exc_error;
1302: end if;
1303:
1304: if (p_msite_orgids_tbl.count > 0 ) then
1305: ---- Delete all the entries for the mini-site
1315: BEGIN
1316: savepoint save_msite_orgid;
1317:
1318: if valid_orgid(p_msite_orgids_tbl(l_index).orgid) = false THEN
1319: raise FND_API.g_exc_error;
1320: end if;
1321: OPEN msite_oprorg_id_seq;
1322: FETCH msite_oprorg_id_seq INTO l_msite_org_id;
1323: CLOSE msite_oprorg_id_seq;
1345: p_msite_orgids_tbl(l_index).orgid);
1346: --dbms_output.put_line('inserted into opr org');
1347: l_insert_row := l_insert_row + 1;
1348:
1349: if p_msite_orgids_tbl(l_index).default_flag = FND_API.g_true
1350: and default_index = 0 then
1351: default_index := l_index;
1352: end if;
1353:
1353:
1354: EXCEPTION
1355: WHEN OTHERS THEN
1356: ROLLBACK TO save_msite_orgid;
1357: x_return_status := FND_API.g_ret_sts_error;
1358: END;
1359:
1360: END LOOP;
1361: else
1374:
1375: --- Check if the caller requested to commit ,
1376: --- If p_commit set to true, commit the transaction
1377: if l_insert_row > 0 then
1378: IF FND_API.to_boolean(p_commit) THEN
1379: COMMIT;
1380: END IF;
1381: else
1382: raise FND_API.g_exc_error;
1378: IF FND_API.to_boolean(p_commit) THEN
1379: COMMIT;
1380: END IF;
1381: else
1382: raise FND_API.g_exc_error;
1383: end if;
1384:
1385: else
1386: raise jtf_dspmgrvalidation_grp.msite_req_exception;
1386: raise jtf_dspmgrvalidation_grp.msite_req_exception;
1387: end if;
1388:
1389: FND_MSG_PUB.count_and_get(
1390: p_encoded => FND_API.g_false,
1391: p_count => x_msg_count,
1392: p_data => x_msg_data
1393: );
1394:
1393: );
1394:
1395: EXCEPTION
1396:
1397: WHEN FND_API.g_exc_error THEN
1398: ROLLBACK TO save_msite_orgids;
1399: x_return_status := FND_API.g_ret_sts_error;
1400: FND_MSG_PUB.count_and_get(
1401: p_encoded => FND_API.g_false,
1395: EXCEPTION
1396:
1397: WHEN FND_API.g_exc_error THEN
1398: ROLLBACK TO save_msite_orgids;
1399: x_return_status := FND_API.g_ret_sts_error;
1400: FND_MSG_PUB.count_and_get(
1401: p_encoded => FND_API.g_false,
1402: p_count => x_msg_count,
1403: p_data => x_msg_data
1397: WHEN FND_API.g_exc_error THEN
1398: ROLLBACK TO save_msite_orgids;
1399: x_return_status := FND_API.g_ret_sts_error;
1400: FND_MSG_PUB.count_and_get(
1401: p_encoded => FND_API.g_false,
1402: p_count => x_msg_count,
1403: p_data => x_msg_data
1404: );
1405:
1404: );
1405:
1406: WHEN jtf_dspmgrvalidation_grp.msite_req_exception THEN
1407: ROLLBACK TO save_msite_orgids;
1408: x_return_status := FND_API.g_ret_sts_error;
1409: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1410: FND_MSG_PUB.ADD;
1411: FND_MSG_PUB.count_and_get(
1412: p_encoded => FND_API.g_false,
1408: x_return_status := FND_API.g_ret_sts_error;
1409: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1410: FND_MSG_PUB.ADD;
1411: FND_MSG_PUB.count_and_get(
1412: p_encoded => FND_API.g_false,
1413: p_count => x_msg_count,
1414: p_data => x_msg_data
1415: );
1416: WHEN FND_API.g_exc_unexpected_error THEN
1412: p_encoded => FND_API.g_false,
1413: p_count => x_msg_count,
1414: p_data => x_msg_data
1415: );
1416: WHEN FND_API.g_exc_unexpected_error THEN
1417: ROLLBACK TO save_msite_orgids;
1418: x_return_status := FND_API.g_ret_sts_unexp_error ;
1419: FND_MSG_PUB.count_and_get(
1420: p_encoded => FND_API.g_false,
1414: p_data => x_msg_data
1415: );
1416: WHEN FND_API.g_exc_unexpected_error THEN
1417: ROLLBACK TO save_msite_orgids;
1418: x_return_status := FND_API.g_ret_sts_unexp_error ;
1419: FND_MSG_PUB.count_and_get(
1420: p_encoded => FND_API.g_false,
1421: p_count => x_msg_count,
1422: p_data => x_msg_data
1416: WHEN FND_API.g_exc_unexpected_error THEN
1417: ROLLBACK TO save_msite_orgids;
1418: x_return_status := FND_API.g_ret_sts_unexp_error ;
1419: FND_MSG_PUB.count_and_get(
1420: p_encoded => FND_API.g_false,
1421: p_count => x_msg_count,
1422: p_data => x_msg_data
1423: );
1424:
1423: );
1424:
1425: WHEN msite_default_org_missing THEN
1426: ROLLBACK TO save_msite_orgids;
1427: x_return_status := FND_API.g_ret_sts_error;
1428: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_ORG_REQ');
1429: FND_MESSAGE.set_token('ID', p_msite_id);
1430: FND_MSG_PUB.ADD;
1431: FND_MSG_PUB.count_and_get(
1428: FND_MESSAGE.set_name('JTF','JTF_MSITE_DEF_ORG_REQ');
1429: FND_MESSAGE.set_token('ID', p_msite_id);
1430: FND_MSG_PUB.ADD;
1431: FND_MSG_PUB.count_and_get(
1432: p_encoded => FND_API.g_false,
1433: p_count => x_msg_count,
1434: p_data => x_msg_data
1435: );
1436:
1435: );
1436:
1437: WHEN OTHERS THEN
1438: ROLLBACK TO save_msite_orgids;
1439: x_return_status := FND_API.g_ret_sts_unexp_error ;
1440: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1441: THEN
1442: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1443: END IF;
1441: THEN
1442: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1443: END IF;
1444: FND_MSG_PUB.count_and_get(
1445: p_encoded => FND_API.g_false,
1446: p_count => x_msg_count,
1447: p_data => x_msg_data
1448: );
1449:
1451:
1452:
1453: PROCEDURE delete_msite(
1454: p_api_version IN NUMBER,
1455: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1456: p_commit IN VARCHAR2 := FND_API.g_false,
1457: x_return_status OUT VARCHAR2,
1458: x_msg_count OUT NUMBER,
1459: x_msg_data OUT VARCHAR2,
1452:
1453: PROCEDURE delete_msite(
1454: p_api_version IN NUMBER,
1455: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1456: p_commit IN VARCHAR2 := FND_API.g_false,
1457: x_return_status OUT VARCHAR2,
1458: x_msg_count OUT NUMBER,
1459: x_msg_data OUT VARCHAR2,
1460: p_msite_id_tbl IN msite_delete_tbl_type
1477:
1478: --------------------- initialize -----------------------+
1479: SAVEPOINT delete_msite;
1480:
1481: IF NOT FND_API.compatible_api_call(
1482: g_api_version,
1483: p_api_version,
1484: l_api_name,
1485: g_pkg_name
1483: p_api_version,
1484: l_api_name,
1485: g_pkg_name
1486: ) THEN
1487: RAISE FND_API.g_exc_unexpected_error;
1488: END IF;
1489:
1490:
1491: IF FND_API.to_boolean(p_init_msg_list) THEN
1487: RAISE FND_API.g_exc_unexpected_error;
1488: END IF;
1489:
1490:
1491: IF FND_API.to_boolean(p_init_msg_list) THEN
1492: FND_MSG_PUB.initialize;
1493: END IF;
1494:
1495:
1492: FND_MSG_PUB.initialize;
1493: END IF;
1494:
1495:
1496: x_return_status := FND_API.G_RET_STS_SUCCESS;
1497:
1498: --- Check if the msite_id exists
1499: for l_index in 1..p_msite_id_tbl.count
1500: LOOP
1500: LOOP
1501: BEGIN
1502: savepoint delete_msite_id;
1503: IF p_msite_id_tbl(l_index).msite_id IS NOT NULL and
1504: p_msite_id_tbl(l_index).msite_id <> FND_API.g_miss_num
1505: THEN
1506: --dbms_output.put_line('Minisite id is passed ' );
1507:
1508: --- if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id_tbl(l_index).msite_id) = false then
1505: THEN
1506: --dbms_output.put_line('Minisite id is passed ' );
1507:
1508: --- if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id_tbl(l_index).msite_id) = false then
1509: --- raise FND_API.g_exc_error;
1510: --- end if;
1511:
1512: jtf_physicalmap_grp.delete_msite(p_msite_id_tbl(l_index).msite_id);
1513:
1525: for rec_msite_resp in c_msite_resp (p_msite_id_tbl(l_index).msite_id )
1526: Loop
1527: Jtf_Msite_Resp_Pvt.Delete_Msite_Resp(
1528: p_api_version => 1.0 ,
1529: p_init_msg_list => FND_API.G_FALSE,
1530: p_commit => FND_API.G_FALSE,
1531: p_validation_level=>FND_API.G_VALID_LEVEL_FULL,
1532: p_msite_resp_id => rec_msite_resp.msite_resp_id ,
1533: -- p_msite_id => FND_API.G_MISS_NUM,
1526: Loop
1527: Jtf_Msite_Resp_Pvt.Delete_Msite_Resp(
1528: p_api_version => 1.0 ,
1529: p_init_msg_list => FND_API.G_FALSE,
1530: p_commit => FND_API.G_FALSE,
1531: p_validation_level=>FND_API.G_VALID_LEVEL_FULL,
1532: p_msite_resp_id => rec_msite_resp.msite_resp_id ,
1533: -- p_msite_id => FND_API.G_MISS_NUM,
1534: --p_responsibility_id => FND_API.G_MISS_NUM,
1527: Jtf_Msite_Resp_Pvt.Delete_Msite_Resp(
1528: p_api_version => 1.0 ,
1529: p_init_msg_list => FND_API.G_FALSE,
1530: p_commit => FND_API.G_FALSE,
1531: p_validation_level=>FND_API.G_VALID_LEVEL_FULL,
1532: p_msite_resp_id => rec_msite_resp.msite_resp_id ,
1533: -- p_msite_id => FND_API.G_MISS_NUM,
1534: --p_responsibility_id => FND_API.G_MISS_NUM,
1535: --p_application_id => FND_API.G_MISS_NUM,
1529: p_init_msg_list => FND_API.G_FALSE,
1530: p_commit => FND_API.G_FALSE,
1531: p_validation_level=>FND_API.G_VALID_LEVEL_FULL,
1532: p_msite_resp_id => rec_msite_resp.msite_resp_id ,
1533: -- p_msite_id => FND_API.G_MISS_NUM,
1534: --p_responsibility_id => FND_API.G_MISS_NUM,
1535: --p_application_id => FND_API.G_MISS_NUM,
1536: x_return_status => x_return_status ,
1537: x_msg_count => x_msg_count ,
1530: p_commit => FND_API.G_FALSE,
1531: p_validation_level=>FND_API.G_VALID_LEVEL_FULL,
1532: p_msite_resp_id => rec_msite_resp.msite_resp_id ,
1533: -- p_msite_id => FND_API.G_MISS_NUM,
1534: --p_responsibility_id => FND_API.G_MISS_NUM,
1535: --p_application_id => FND_API.G_MISS_NUM,
1536: x_return_status => x_return_status ,
1537: x_msg_count => x_msg_count ,
1538: x_msg_data => x_msg_data );
1531: p_validation_level=>FND_API.G_VALID_LEVEL_FULL,
1532: p_msite_resp_id => rec_msite_resp.msite_resp_id ,
1533: -- p_msite_id => FND_API.G_MISS_NUM,
1534: --p_responsibility_id => FND_API.G_MISS_NUM,
1535: --p_application_id => FND_API.G_MISS_NUM,
1536: x_return_status => x_return_status ,
1537: x_msg_count => x_msg_count ,
1538: x_msg_data => x_msg_data );
1539:
1536: x_return_status => x_return_status ,
1537: x_msg_count => x_msg_count ,
1538: x_msg_data => x_msg_data );
1539:
1540: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1541: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_RESP_FL');
1542: FND_MSG_PUB.Add;
1543: RAISE FND_API.G_EXC_ERROR;
1544: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1539:
1540: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1541: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_RESP_FL');
1542: FND_MSG_PUB.Add;
1543: RAISE FND_API.G_EXC_ERROR;
1544: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1545: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_RESP_FL');
1546: FND_MSG_PUB.Add;
1547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1540: IF (x_return_status = FND_API.G_RET_STS_ERROR) THEN
1541: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_RESP_FL');
1542: FND_MSG_PUB.Add;
1543: RAISE FND_API.G_EXC_ERROR;
1544: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1545: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_RESP_FL');
1546: FND_MSG_PUB.Add;
1547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1548: END IF;
1543: RAISE FND_API.G_EXC_ERROR;
1544: ELSIF (x_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1545: FND_MESSAGE.Set_Name('JTF', 'JTF_MSITE_DELETE_MSITE_RESP_FL');
1546: FND_MSG_PUB.Add;
1547: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1548: END IF;
1549: End Loop;
1550:
1551: delete from jtf_msite_prty_accss
1557:
1558: EXCEPTION
1559: WHEN OTHERS THEN
1560: ROLLBACK TO delete_msite_id;
1561: x_return_status := FND_API.g_ret_sts_error;
1562: END;
1563:
1564: END LOOP;
1565:
1564: END LOOP;
1565:
1566:
1567:
1568: IF FND_API.to_boolean(p_commit) THEN
1569: COMMIT;
1570: END IF;
1571:
1572: x_return_status := FND_API.G_RET_STS_SUCCESS;
1568: IF FND_API.to_boolean(p_commit) THEN
1569: COMMIT;
1570: END IF;
1571:
1572: x_return_status := FND_API.G_RET_STS_SUCCESS;
1573:
1574: FND_MSG_PUB.count_and_get(
1575: p_encoded => FND_API.g_false,
1576: p_count => x_msg_count,
1571:
1572: x_return_status := FND_API.G_RET_STS_SUCCESS;
1573:
1574: FND_MSG_PUB.count_and_get(
1575: p_encoded => FND_API.g_false,
1576: p_count => x_msg_count,
1577: p_data => x_msg_data
1578: );
1579:
1577: p_data => x_msg_data
1578: );
1579:
1580: EXCEPTION
1581: WHEN FND_API.g_exc_error THEN
1582: ROLLBACK TO delete_msite;
1583: x_return_status := FND_API.g_ret_sts_error;
1584: FND_MSG_PUB.count_and_get(
1585: p_encoded => FND_API.g_false,
1579:
1580: EXCEPTION
1581: WHEN FND_API.g_exc_error THEN
1582: ROLLBACK TO delete_msite;
1583: x_return_status := FND_API.g_ret_sts_error;
1584: FND_MSG_PUB.count_and_get(
1585: p_encoded => FND_API.g_false,
1586: p_count => x_msg_count,
1587: p_data => x_msg_data
1581: WHEN FND_API.g_exc_error THEN
1582: ROLLBACK TO delete_msite;
1583: x_return_status := FND_API.g_ret_sts_error;
1584: FND_MSG_PUB.count_and_get(
1585: p_encoded => FND_API.g_false,
1586: p_count => x_msg_count,
1587: p_data => x_msg_data
1588: );
1589:
1588: );
1589:
1590: WHEN jtf_dspmgrvalidation_grp.msite_req_exception THEN
1591: ROLLBACK TO delete_msite;
1592: x_return_status := FND_API.g_ret_sts_error;
1593: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1594: FND_MSG_PUB.ADD;
1595: FND_MSG_PUB.count_and_get(
1596: p_encoded => FND_API.g_false,
1592: x_return_status := FND_API.g_ret_sts_error;
1593: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1594: FND_MSG_PUB.ADD;
1595: FND_MSG_PUB.count_and_get(
1596: p_encoded => FND_API.g_false,
1597: p_count => x_msg_count,
1598: p_data => x_msg_data
1599: );
1600:
1597: p_count => x_msg_count,
1598: p_data => x_msg_data
1599: );
1600:
1601: WHEN FND_API.g_exc_unexpected_error THEN
1602: ROLLBACK TO delete_msite;
1603: x_return_status := FND_API.g_ret_sts_unexp_error ;
1604: FND_MSG_PUB.count_and_get(
1605: p_encoded => FND_API.g_false,
1599: );
1600:
1601: WHEN FND_API.g_exc_unexpected_error THEN
1602: ROLLBACK TO delete_msite;
1603: x_return_status := FND_API.g_ret_sts_unexp_error ;
1604: FND_MSG_PUB.count_and_get(
1605: p_encoded => FND_API.g_false,
1606: p_count => x_msg_count,
1607: p_data => x_msg_data
1601: WHEN FND_API.g_exc_unexpected_error THEN
1602: ROLLBACK TO delete_msite;
1603: x_return_status := FND_API.g_ret_sts_unexp_error ;
1604: FND_MSG_PUB.count_and_get(
1605: p_encoded => FND_API.g_false,
1606: p_count => x_msg_count,
1607: p_data => x_msg_data
1608: );
1609:
1608: );
1609:
1610: WHEN OTHERS THEN
1611: ROLLBACK TO delete_msite;
1612: x_return_status := FND_API.g_ret_sts_unexp_error ;
1613: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1614: THEN
1615: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1616: END IF;
1614: THEN
1615: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1616: END IF;
1617: FND_MSG_PUB.count_and_get(
1618: p_encoded => FND_API.g_false,
1619: p_count => x_msg_count,
1620: p_data => x_msg_data
1621: );
1622:
1624:
1625:
1626: PROCEDURE get_msite_attribute (
1627: p_api_version IN NUMBER,
1628: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1629: p_commit IN VARCHAR2 := FND_API.g_false,
1630: x_return_status OUT VARCHAR2,
1631: x_msg_count OUT NUMBER,
1632: x_msg_data OUT VARCHAR2,
1625:
1626: PROCEDURE get_msite_attribute (
1627: p_api_version IN NUMBER,
1628: p_init_msg_list IN VARCHAR2 := FND_API.g_false,
1629: p_commit IN VARCHAR2 := FND_API.g_false,
1630: x_return_status OUT VARCHAR2,
1631: x_msg_count OUT NUMBER,
1632: x_msg_data OUT VARCHAR2,
1633: p_msite_id IN NUMBER,
1642:
1643: --------------------- initialize -----------------------+
1644: SAVEPOINT get_msite_attribute;
1645:
1646: IF NOT FND_API.compatible_api_call(
1647: g_api_version,
1648: p_api_version,
1649: l_api_name,
1650: g_pkg_name
1648: p_api_version,
1649: l_api_name,
1650: g_pkg_name
1651: ) THEN
1652: RAISE FND_API.g_exc_unexpected_error;
1653: END IF;
1654:
1655:
1656: IF FND_API.to_boolean(p_init_msg_list) THEN
1652: RAISE FND_API.g_exc_unexpected_error;
1653: END IF;
1654:
1655:
1656: IF FND_API.to_boolean(p_init_msg_list) THEN
1657: FND_MSG_PUB.initialize;
1658: END IF;
1659:
1660:
1657: FND_MSG_PUB.initialize;
1658: END IF;
1659:
1660:
1661: x_return_status := FND_API.G_RET_STS_SUCCESS;
1662:
1663: IF p_msite_id IS NOT NULL AND p_msite_id <> FND_API.g_miss_num
1664: THEN
1665: --dbms_output.put_line('Minisite id is passed ' );
1659:
1660:
1661: x_return_status := FND_API.G_RET_STS_SUCCESS;
1662:
1663: IF p_msite_id IS NOT NULL AND p_msite_id <> FND_API.g_miss_num
1664: THEN
1665: --dbms_output.put_line('Minisite id is passed ' );
1666:
1667: if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id) = false then
1664: THEN
1665: --dbms_output.put_line('Minisite id is passed ' );
1666:
1667: if jtf_dspmgrvalidation_grp.check_msite_exists(p_msite_id) = false then
1668: raise FND_API.g_exc_error;
1669: end if;
1670:
1671: x_msite_attribute_value := FND_PROFILE.VALUE_SPECIFIC(p_msite_attribute_name,null,null,671);
1672: ELSE
1672: ELSE
1673: raise jtf_dspmgrvalidation_grp.msite_req_exception;
1674: END IF;
1675:
1676: x_return_status := FND_API.G_RET_STS_SUCCESS;
1677:
1678: FND_MSG_PUB.count_and_get(
1679: p_encoded => FND_API.g_false,
1680: p_count => x_msg_count,
1675:
1676: x_return_status := FND_API.G_RET_STS_SUCCESS;
1677:
1678: FND_MSG_PUB.count_and_get(
1679: p_encoded => FND_API.g_false,
1680: p_count => x_msg_count,
1681: p_data => x_msg_data
1682: );
1683:
1681: p_data => x_msg_data
1682: );
1683:
1684: EXCEPTION
1685: WHEN FND_API.g_exc_error THEN
1686: ROLLBACK TO get_msite_attribute;
1687: x_return_status := FND_API.g_ret_sts_error;
1688: FND_MSG_PUB.count_and_get(
1689: p_encoded => FND_API.g_false,
1683:
1684: EXCEPTION
1685: WHEN FND_API.g_exc_error THEN
1686: ROLLBACK TO get_msite_attribute;
1687: x_return_status := FND_API.g_ret_sts_error;
1688: FND_MSG_PUB.count_and_get(
1689: p_encoded => FND_API.g_false,
1690: p_count => x_msg_count,
1691: p_data => x_msg_data
1685: WHEN FND_API.g_exc_error THEN
1686: ROLLBACK TO get_msite_attribute;
1687: x_return_status := FND_API.g_ret_sts_error;
1688: FND_MSG_PUB.count_and_get(
1689: p_encoded => FND_API.g_false,
1690: p_count => x_msg_count,
1691: p_data => x_msg_data
1692: );
1693:
1692: );
1693:
1694: WHEN jtf_dspmgrvalidation_grp.msite_req_exception THEN
1695: ROLLBACK TO get_msite_attribute;
1696: x_return_status := FND_API.g_ret_sts_error;
1697: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1698: FND_MSG_PUB.ADD;
1699: FND_MSG_PUB.count_and_get(
1700: p_encoded => FND_API.g_false,
1696: x_return_status := FND_API.g_ret_sts_error;
1697: FND_MESSAGE.set_name('JTF','JTF_MSITE_REQ');
1698: FND_MSG_PUB.ADD;
1699: FND_MSG_PUB.count_and_get(
1700: p_encoded => FND_API.g_false,
1701: p_count => x_msg_count,
1702: p_data => x_msg_data
1703: );
1704:
1701: p_count => x_msg_count,
1702: p_data => x_msg_data
1703: );
1704:
1705: WHEN FND_API.g_exc_unexpected_error THEN
1706: ROLLBACK TO get_msite_attribute;
1707: x_return_status := FND_API.g_ret_sts_unexp_error ;
1708: FND_MSG_PUB.count_and_get(
1709: p_encoded => FND_API.g_false,
1703: );
1704:
1705: WHEN FND_API.g_exc_unexpected_error THEN
1706: ROLLBACK TO get_msite_attribute;
1707: x_return_status := FND_API.g_ret_sts_unexp_error ;
1708: FND_MSG_PUB.count_and_get(
1709: p_encoded => FND_API.g_false,
1710: p_count => x_msg_count,
1711: p_data => x_msg_data
1705: WHEN FND_API.g_exc_unexpected_error THEN
1706: ROLLBACK TO get_msite_attribute;
1707: x_return_status := FND_API.g_ret_sts_unexp_error ;
1708: FND_MSG_PUB.count_and_get(
1709: p_encoded => FND_API.g_false,
1710: p_count => x_msg_count,
1711: p_data => x_msg_data
1712: );
1713:
1712: );
1713:
1714: WHEN OTHERS THEN
1715: ROLLBACK TO get_msite_attribute;
1716: x_return_status := FND_API.g_ret_sts_unexp_error ;
1717: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1718: THEN
1719: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1720: END IF;
1718: THEN
1719: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1720: END IF;
1721: FND_MSG_PUB.count_and_get(
1722: p_encoded => FND_API.g_false,
1723: p_count => x_msg_count,
1724: p_data => x_msg_data
1725: );
1726:
2198: THEME_ID = X_THEME_ID
2199: WHERE
2200: MSITE_ID = X_MSITE_ID
2201: AND OBJECT_VERSION_NUMBER = decode(X_OBJECT_VERSION_NUMBER,
2202: FND_API.G_MISS_NUM,
2203: OBJECT_VERSION_NUMBER,
2204: X_OBJECT_VERSION_NUMBER);
2205:
2206: if (sql%notfound) then
2217: SOURCE_LANG = userenv('LANG')
2218: where MSITE_ID = X_MSITE_ID
2219: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
2220: and OBJECT_VERSION_NUMBER = decode(X_OBJECT_VERSION_NUMBER,
2221: FND_API.G_MISS_NUM,
2222: OBJECT_VERSION_NUMBER,
2223: X_OBJECT_VERSION_NUMBER);
2224:
2225: if (sql%notfound) then
2329: Owner_id := 1;
2330: End If;
2331:
2332: IF ((x_object_version_number IS NOT NULL) AND
2333: (x_object_version_number <> FND_API.G_MISS_NUM))
2334: THEN
2335: l_object_version_number := x_object_version_number;
2336: END IF;
2337: