eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.BIS_RSG_PUB_API_PKG dependencies on FND_API

Line 151: x_return_status := FND_API.G_RET_STS_SUCCESS;

147: x_msg_data OUT NOCOPY VARCHAR2
148: ) IS
149: v_procedure_name VARCHAR2(50) := 'Create_Property';
150: BEGIN
151: x_return_status := FND_API.G_RET_STS_SUCCESS;
152:
153: execute immediate 'insert into bis_obj_properties (
154: object_type, OBJECT_NAME, OBJECT_OWNER,
155: CREATED_BY, CREATION_DATE, LAST_UPDATED_BY,

Line 165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

161: EXCEPTION
162: WHEN dup_val_on_index THEN
163: RETURN;
164: WHEN OTHERS THEN
165: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
166: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
167: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
168: END IF;
169: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 244: x_return_status := FND_API.G_RET_STS_SUCCESS;

240: IF (l_depend_object_owner IS NULL) THEN
241: l_depend_object_owner := p_depend_object_owner;
242: END IF;
243:
244: x_return_status := FND_API.G_RET_STS_SUCCESS;
245:
246: -- validate (object_type, object_name)
247: object_name_validation(p_object_type, l_object_name, x_return_status);
248: IF (x_return_status = 'N') THEN

Line 255: x_return_status := fnd_api.g_ret_sts_error;

251: x_msg_data := 'BIS_BIA_RSG_INVALID_OBJ';
252: ELSE
253: x_msg_data := 'BIS_REGION_NOT_EXISTING_MSG';
254: END IF;
255: x_return_status := fnd_api.g_ret_sts_error;
256: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
257: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, x_msg_data);
258: END IF;
259: RETURN;

Line 266: x_return_status := fnd_api.g_ret_sts_error;

262: -- validate object_owner
263: object_owner_validation(l_object_owner, x_return_status);
264: IF (x_return_status = 'N') THEN
265: x_msg_data := 'BIS_BIA_RSG_INVALID_OBJ_OWNER';
266: x_return_status := fnd_api.g_ret_sts_error;
267: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
268: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INVALID_OBJ_OWNER');
269: END IF;
270: RETURN;

Line 282: x_return_status := fnd_api.g_ret_sts_error;

278: x_msg_data := 'BIS_BIA_RSG_INVALID_DEP_OBJ';
279: ELSE
280: x_msg_data := 'BIS_REGION_NOT_EXISTING_MSG';
281: END IF;
282: x_return_status := fnd_api.g_ret_sts_error;
283: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
284: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, x_msg_data);
285: END IF;
286: RETURN;

Line 293: x_return_status := fnd_api.g_ret_sts_error;

289: -- validate depend_object_owner
290: object_owner_validation(l_depend_object_owner, x_return_status);
291: IF (x_return_status = 'N') THEN
292: x_msg_data := 'BIS_BIA_RSG_INV_DEP_OBJ_OWNER';
293: x_return_status := fnd_api.g_ret_sts_error;
294: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
295: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_DEP_OBJ_OWNER');
296: END IF;
297: RETURN;

Line 303: x_return_status := fnd_api.g_ret_sts_error;

299:
300: -- validate enabled flag
301: IF (p_enabled_flag IS NOT NULL AND p_enabled_flag <> 'Y'
302: AND p_enabled_flag <> 'N') THEN
303: x_return_status := fnd_api.g_ret_sts_error;
304: x_msg_data := 'BIS_BIA_RSG_INV_ENABLED_FLAG';
305: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
306: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_ENABLED_FLAG');
307: END IF;

Line 328: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

324: -- create corresponding object property if it doesn't exist in RSG previously
325: -- note that x_return_status and x_msg_data are set appropriately in create_property
326: create_property(p_object_type, l_object_owner, l_object_name,
327: x_return_status, x_msg_data);
328: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
329: RETURN;
330: END IF;
331:
332: --create corresponding depend object property if it doesn't exist in RSG previously

Line 337: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

333: -- note that x_return_status and x_msg_data are set appropriately in create_property
334: create_property(p_depend_object_type, l_depend_object_owner,
335: p_depend_object_name,
336: x_return_status, x_msg_data);
337: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
338: RETURN;
339: END IF;
340:
341: EXCEPTION

Line 343: x_return_status := FND_API.G_RET_STS_ERROR;

339: END IF;
340:
341: EXCEPTION
342: WHEN dup_val_on_index THEN -- unique constraint violation
343: x_return_status := FND_API.G_RET_STS_ERROR;
344: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
345: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
346: END IF;
347: x_msg_data := 'BIS_BIA_RSG_DUP_DEP_REC';

Line 349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

345: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
346: END IF;
347: x_msg_data := 'BIS_BIA_RSG_DUP_DEP_REC';
348: WHEN OTHERS THEN
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
350: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
351: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
352: END IF;
353: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 382: x_return_status := fnd_api.g_ret_sts_error;

378:
379: -- validate enabled_flag
380: IF (p_enabled_flag IS NOT NULL AND p_enabled_flag <> 'Y'
381: AND p_enabled_flag <> 'N') THEN
382: x_return_status := fnd_api.g_ret_sts_error;
383: x_msg_data := 'BIS_BIA_RSG_INV_ENABLED_FLAG';
384: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
385: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_ENABLED_FLAG');
386: END IF;

Line 392: x_return_status := FND_API.G_RET_STS_SUCCESS;

388: END IF;
389:
390: --dbms_output.put_line('enabled flag validated');
391:
392: x_return_status := FND_API.G_RET_STS_SUCCESS;
393:
394: execute immediate 'update bis_obj_dependency
395: set enabled_flag = :1,
396: last_updated_by = :2,

Line 405: -- x_return_status := FND_API.G_RET_STS_ERROR;

401: using p_enabled_flag, g_curr_user_id, g_curr_login_id, Sysdate,
402: l_object_name, p_object_type, p_depend_object_name, p_depend_object_type;
403:
404: --IF (SQL%notfound) THEN
405: -- x_return_status := FND_API.G_RET_STS_ERROR;
406: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
407: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
408: -- END IF;
409: -- x_msg_data := 'BIS_BIA_RSG_DEP_NOT_EXISTS';

Line 414: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

410: --END IF;
411:
412: EXCEPTION
413: WHEN OTHERS THEN
414: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
415: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
416: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
417: END IF;
418: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 469: x_return_status := FND_API.G_RET_STS_SUCCESS;

465: ELSE
466: l_object_name := p_object_name;
467: END IF;
468:
469: x_return_status := FND_API.G_RET_STS_SUCCESS;
470:
471: execute immediate 'delete from bis_obj_dependency
472: WHERE object_name = :1 AND object_type = :2
473: AND depend_object_name = :3 AND depend_object_type = :4'

Line 478: -- x_return_status := FND_API.G_RET_STS_ERROR;

474: using l_object_name, p_object_type, p_depend_object_name, p_depend_object_type;
475:
476: -- as per discussion with Tianyi, comment out the following code
477: -- IF (SQL%notfound) THEN
478: -- x_return_status := FND_API.G_RET_STS_ERROR;
479: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
480: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
481: -- END IF;
482: -- x_msg_data := 'BIS_BIA_RSG_DEP_NOT_EXISTS';

Line 491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

487: delete_property(p_depend_object_type, p_depend_object_name);
488:
489: EXCEPTION
490: WHEN OTHERS THEN
491: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
492: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
493: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
494: END IF;
495: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

522: delete_dependency(l_object_type,l_object_name,l_depend_object_type,l_depend_object_name,
523: x_return_status,x_msg_data);
524: EXCEPTION
525: WHEN OTHERS THEN
526: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
527: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';
528: END Delete_Dependency;
529:
530: PROCEDURE Delete_Page_Dependencies (

Line 549: x_return_status := FND_API.G_RET_STS_SUCCESS;

545: -- since page designer passes in fnd_form_function name instead of object name
546: -- we need take care of _OA problem by calling get_page_name_by_func, if object type is PAGE
547: l_object_name := get_page_name_by_func(p_object_name);
548:
549: x_return_status := FND_API.G_RET_STS_SUCCESS;
550:
551: -- execute immediate 'delete from bis_obj_dependency
552: -- WHERE object_name = :1 AND object_type = :2'
553: -- using l_object_name, 'PAGE';

Line 556: -- x_return_status := FND_API.G_RET_STS_ERROR;

552: -- WHERE object_name = :1 AND object_type = :2'
553: -- using l_object_name, 'PAGE';
554:
555: -- IF (SQL%notfound) THEN
556: -- x_return_status := FND_API.G_RET_STS_ERROR;
557: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
558: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
559: -- END IF;
560: -- x_msg_data := 'BIS_BIA_RSG_PAGE_NOT_EXISTS';

Line 577: EXIT WHEN (x_return_status <> FND_API.g_ret_sts_success);

573: v_dep.depend_object_type,
574: v_dep.depend_object_name,
575: x_return_status,
576: x_msg_data);
577: EXIT WHEN (x_return_status <> FND_API.g_ret_sts_success);
578: END LOOP;
579: CLOSE c_deps;
580: EXCEPTION
581: WHEN OTHERS THEN

Line 582: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

578: END LOOP;
579: CLOSE c_deps;
580: EXCEPTION
581: WHEN OTHERS THEN
582: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
583: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
584: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
585: END IF;
586: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 613: x_return_status := fnd_api.g_ret_sts_error;

609:
610: -- validate dimension_flag
611: IF (p_dimension_flag IS NOT NULL AND p_dimension_flag <> 'Y'
612: AND p_dimension_flag <> 'N') THEN
613: x_return_status := fnd_api.g_ret_sts_error;
614: x_msg_data := 'BIS_BIA_RSG_INVALID_DIM_FLAG';
615: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
616: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INVALID_DIM_FLAG');
617: END IF;

Line 621: x_return_status := FND_API.G_RET_STS_SUCCESS;

617: END IF;
618: RETURN;
619: END IF;
620:
621: x_return_status := FND_API.G_RET_STS_SUCCESS;
622:
623: execute immediate 'update bis_obj_properties
624: set dimension_flag = :1,
625: custom_api = :2,

Line 634: -- x_return_status := FND_API.G_RET_STS_ERROR;

630: using p_dimension_flag, p_custom_api, g_curr_user_id, g_curr_login_id, Sysdate,
631: l_object_name, p_object_type;
632:
633: --IF (SQL%notfound) THEN
634: -- x_return_status := FND_API.G_RET_STS_ERROR;
635: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
636: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
637: -- END IF;
638: -- x_msg_data := 'BIS_BIA_RSG_PROP_NOT_EXISTS';

Line 643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

639: --END IF;
640:
641: EXCEPTION
642: WHEN OTHERS THEN
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
645: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
646: END IF;
647: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 674: x_return_status := fnd_api.g_ret_sts_error;

670:
671: -- validate dimension_flag
672: IF (p_dimension_flag IS NOT NULL AND p_dimension_flag <> 'Y'
673: AND p_dimension_flag <> 'N') THEN
674: x_return_status := fnd_api.g_ret_sts_error;
675: x_msg_data := 'BIS_BIA_RSG_INVALID_DIM_FLAG';
676: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
677: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INVALID_DIM_FLAG');
678: END IF;

Line 682: x_return_status := FND_API.G_RET_STS_SUCCESS;

678: END IF;
679: RETURN;
680: END IF;
681:
682: x_return_status := FND_API.G_RET_STS_SUCCESS;
683:
684: execute immediate 'update bis_obj_properties
685: set dimension_flag = :1,
686: last_updated_by = :2,

Line 694: -- x_return_status := FND_API.G_RET_STS_ERROR;

690: using p_dimension_flag, g_curr_user_id, g_curr_login_id, Sysdate,
691: l_object_name, p_object_type;
692:
693: --IF (SQL%notfound) THEN
694: -- x_return_status := FND_API.G_RET_STS_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,v_procedure_name, NULL);
697: -- END IF;
698: -- x_msg_data := 'BIS_BIA_RSG_PROP_NOT_EXISTS';

Line 703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

699: -- END IF;
700:
701: EXCEPTION
702: WHEN OTHERS THEN
703: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
704: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
705: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
706: END IF;
707: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 730: x_return_status := FND_API.G_RET_STS_SUCCESS;

726: ELSE
727: l_object_name := p_object_name;
728: END IF;
729:
730: x_return_status := FND_API.G_RET_STS_SUCCESS;
731:
732: execute immediate 'update bis_obj_properties
733: set custom_api = :1,
734: last_updated_by = :2,

Line 742: -- x_return_status := FND_API.G_RET_STS_ERROR;

738: using p_custom_api, g_curr_user_id, g_curr_login_id, Sysdate,
739: l_object_name, p_object_type;
740:
741: --IF (SQL%notfound) THEN
742: -- x_return_status := FND_API.G_RET_STS_ERROR;
743: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
744: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
745: -- END IF;
746: -- x_msg_data := 'BIS_BIA_RSG_PROP_NOT_EXISTS';

Line 751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

747: --END IF;
748:
749: EXCEPTION
750: WHEN OTHERS THEN
751: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
752: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
753: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
754: END IF;
755: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 781: x_return_status := FND_API.G_RET_STS_SUCCESS;

777: ELSE
778: l_object_name := p_object_name;
779: END IF;
780:
781: x_return_status := FND_API.G_RET_STS_SUCCESS;
782:
783: execute immediate 'update bis_obj_properties
784: set SNAPSHOT_LOG_SQL = :1,
785: last_updated_by = :2,

Line 793: -- x_return_status := FND_API.G_RET_STS_ERROR;

789: using p_snapshot_log, g_curr_user_id, g_curr_login_id, Sysdate,
790: l_object_name, p_object_type;
791:
792: --IF (SQL%notfound) THEN
793: -- x_return_status := FND_API.G_RET_STS_ERROR;
794: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
795: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
796: -- END IF;
797: -- x_msg_data := 'BIS_BIA_RSG_PROP_NOT_EXISTS';

Line 802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

798: --END IF;
799:
800: EXCEPTION
801: WHEN OTHERS THEN
802: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
803: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
804: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
805: END IF;
806: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 835: x_return_status := FND_API.G_RET_STS_SUCCESS;

831: ELSE
832: l_object_name := p_object_name;
833: END IF;
834:
835: x_return_status := FND_API.G_RET_STS_SUCCESS;
836:
837: execute immediate 'select snapshot_log_sql
838: from bis_obj_properties
839: WHERE object_name = :1 AND object_type = :2'

Line 847: x_return_status := FND_API.G_RET_STS_ERROR;

843: RETURN v_snapshot_log;
844:
845: EXCEPTION
846: WHEN no_data_found THEN
847: x_return_status := FND_API.G_RET_STS_ERROR;
848: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
849: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
850: END IF;
851: x_msg_data := 'BIS_BIA_RSG_PROP_NOT_EXISTS';

Line 854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

850: END IF;
851: x_msg_data := 'BIS_BIA_RSG_PROP_NOT_EXISTS';
852: RETURN NULL;
853: WHEN OTHERS THEN
854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
855: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
856: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
857: END IF;
858: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 931: x_return_status := fnd_api.g_ret_sts_error;

927:
928: -- page is not allowed to have refresh program associated
929: IF (p_object_type = 'PAGE') THEN
930: x_msg_data := 'BIS_BIA_RSG_NO_PAGE_LINKAGE';
931: x_return_status := fnd_api.g_ret_sts_error;
932: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
933: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_NO_PAGE_LINKAGE');
934: END IF;
935: RETURN;

Line 944: x_return_status := fnd_api.g_ret_sts_error;

940: -- validate (object_type, object_name)
941: object_name_validation(p_object_type, p_object_name, x_return_status);
942: IF (x_return_status = 'N') THEN
943: x_msg_data := 'BIS_BIA_RSG_INVALID_OBJ';
944: x_return_status := fnd_api.g_ret_sts_error;
945: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
946: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INVALID_OBJ');
947: END IF;
948: RETURN;

Line 957: x_return_status := fnd_api.g_ret_sts_error;

953: -- validate object_owner
954: object_owner_validation(p_object_owner, x_return_status);
955: IF (x_return_status = 'N') THEN
956: x_msg_data := 'BIS_BIA_RSG_INVALID_OBJ_OWNER';
957: x_return_status := fnd_api.g_ret_sts_error;
958: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
959: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INVALID_OBJ_OWNER');
960: END IF;
961: RETURN;

Line 970: x_return_status := fnd_api.g_ret_sts_error;

966: -- validate concurrent program
967: prog_validation(P_CONC_PROG_NAME, P_APPL_SHORT_NAME, x_return_status);
968: IF (x_return_status = 'N') THEN
969: x_msg_data := 'BIS_BIA_RSG_INVALID_CONC_PROG';
970: x_return_status := fnd_api.g_ret_sts_error;
971: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
972: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INVALID_CONC_PROG');
973: END IF;
974: RETURN;

Line 981: x_return_status := fnd_api.g_ret_sts_error;

977: --dbms_output.put_line('4');
978:
979: -- validate enabled flag
980: IF (p_enabled_flag IS NOT NULL AND p_enabled_flag <> 'Y' AND p_enabled_flag <> 'N') THEN
981: x_return_status := fnd_api.g_ret_sts_error;
982: x_msg_data := 'BIS_BIA_RSG_INV_ENABLED_FLAG';
983: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
984: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_ENABLED_FLAG');
985: END IF;

Line 995: x_return_status := fnd_api.g_ret_sts_error;

991: -- validate loading mode
992: loading_mode_validation(p_refresh_mode, x_return_status);
993: IF (x_return_status = 'N') THEN
994: x_msg_data := 'BIS_BIA_RSG_INV_LOADING_MODE';
995: x_return_status := fnd_api.g_ret_sts_error;
996: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
997: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_LOADING_MODE');
998: END IF;
999: RETURN;

Line 1004: x_return_status := FND_API.G_RET_STS_SUCCESS;

1000: END IF;
1001:
1002: --dbms_output.put_line('6');
1003:
1004: x_return_status := FND_API.G_RET_STS_SUCCESS;
1005:
1006: execute immediate 'select application_id from fnd_application
1007: WHERE application_short_name = :1'
1008: INTO v_appl_id

Line 1032: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

1028: --create corresponding depend object property if it doesn't exist in RSG previously
1029: -- note that x_return_status and x_msg_data are set appropriately in create_property
1030: create_property(p_object_type, p_object_owner,
1031: p_object_name, x_return_status, x_msg_data);
1032: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1033: RETURN;
1034: END IF;
1035:
1036: EXCEPTION

Line 1038: x_return_status := FND_API.G_RET_STS_ERROR;

1034: END IF;
1035:
1036: EXCEPTION
1037: WHEN dup_val_on_index THEN -- unique constraint violation
1038: x_return_status := FND_API.G_RET_STS_ERROR;
1039: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1040: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1041: END IF;
1042: x_msg_data := 'BIS_BIA_RSG_DUP_LINKAGE_REC';

Line 1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1040: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1041: END IF;
1042: x_msg_data := 'BIS_BIA_RSG_DUP_LINKAGE_REC';
1043: WHEN OTHERS THEN
1044: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1045: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1046: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1047: END IF;
1048: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 1068: x_return_status := fnd_api.g_ret_sts_error;

1064:
1065: -- validate enabled_flag
1066: IF (p_enabled_flag IS NOT NULL AND p_enabled_flag <> 'Y'
1067: AND p_enabled_flag <> 'N') THEN
1068: x_return_status := fnd_api.g_ret_sts_error;
1069: x_msg_data := 'BIS_BIA_RSG_INV_ENABLED_FLAG';
1070: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
1071: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_ENABLED_FLAG');
1072: END IF;

Line 1082: x_return_status := fnd_api.g_ret_sts_error;

1078: --validate refresh mode
1079: loading_mode_validation(p_refresh_mode, x_return_status);
1080: IF (x_return_status = 'N') THEN
1081: x_msg_data := 'BIS_BIA_RSG_INV_LOADING_MODE';
1082: x_return_status := fnd_api.g_ret_sts_error;
1083: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
1084: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_LOADING_MODE');
1085: END IF;
1086: RETURN;

Line 1091: x_return_status := FND_API.G_RET_STS_SUCCESS;

1087: END IF;
1088:
1089: --dbms_output.put_line('2');
1090:
1091: x_return_status := FND_API.G_RET_STS_SUCCESS;
1092:
1093: execute immediate 'update bis_obj_prog_linkages
1094: set enabled_flag = :1,
1095: refresh_mode = :2,

Line 1107: -- x_return_status := FND_API.G_RET_STS_ERROR;

1103:
1104: --dbms_output.put_line('3');
1105:
1106: -- IF (SQL%notfound) THEN
1107: -- x_return_status := FND_API.G_RET_STS_ERROR;
1108: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1109: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1110: -- END IF;
1111: -- x_msg_data := 'BIS_BIA_RSG_LINKAGE_NOT_EXISTS';

Line 1118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1114: --dbms_output.put_line('4');
1115:
1116: EXCEPTION
1117: WHEN OTHERS THEN
1118: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1119: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1120: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1121: END IF;
1122: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 1142: x_return_status := fnd_api.g_ret_sts_error;

1138:
1139: -- validate enabled_flag
1140: IF (p_enabled_flag IS NOT NULL AND p_enabled_flag <> 'Y'
1141: AND p_enabled_flag <> 'N') THEN
1142: x_return_status := fnd_api.g_ret_sts_error;
1143: x_msg_data := 'BIS_BIA_RSG_INV_ENABLED_FLAG';
1144: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
1145: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_ENABLED_FLAG');
1146: END IF;

Line 1150: x_return_status := FND_API.G_RET_STS_SUCCESS;

1146: END IF;
1147: RETURN;
1148: END IF;
1149:
1150: x_return_status := FND_API.G_RET_STS_SUCCESS;
1151:
1152: execute immediate 'update bis_obj_prog_linkages
1153: set enabled_flag = :1,
1154: last_updated_by = :2,

Line 1163: -- x_return_status := FND_API.G_RET_STS_ERROR;

1159: using p_enabled_flag, g_curr_user_id, g_curr_login_id, Sysdate,
1160: p_object_name, p_object_type, p_conc_prog_name, p_appl_short_name;
1161:
1162: --IF (SQL%notfound) THEN
1163: -- x_return_status := FND_API.G_RET_STS_ERROR;
1164: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1165: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1166: -- END IF;
1167: -- x_msg_data := 'BIS_BIA_RSG_LINKAGE_NOT_EXISTS';

Line 1172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1168: --END IF;
1169:
1170: EXCEPTION
1171: WHEN OTHERS THEN
1172: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1173: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1174: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1175: END IF;
1176: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 1197: x_return_status := fnd_api.g_ret_sts_error;

1193: --validate refresh mode
1194: loading_mode_validation(p_refresh_mode, x_return_status);
1195: IF (x_return_status = 'N') THEN
1196: x_msg_data := 'BIS_BIA_RSG_INV_LOADING_MODE';
1197: x_return_status := fnd_api.g_ret_sts_error;
1198: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
1199: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_LOADING_MODE');
1200: END IF;
1201: RETURN;

Line 1204: x_return_status := FND_API.G_RET_STS_SUCCESS;

1200: END IF;
1201: RETURN;
1202: END IF;
1203:
1204: x_return_status := FND_API.G_RET_STS_SUCCESS;
1205:
1206: execute immediate 'update bis_obj_prog_linkages
1207: set refresh_mode = :1,
1208: last_updated_by = :2,

Line 1217: -- x_return_status := FND_API.G_RET_STS_ERROR;

1213: using p_refresh_mode, g_curr_user_id, g_curr_login_id, Sysdate,
1214: p_object_name, p_object_type, p_conc_prog_name, p_appl_short_name;
1215:
1216: --IF (SQL%notfound) THEN
1217: -- x_return_status := FND_API.G_RET_STS_ERROR;
1218: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1219: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1220: -- END IF;
1221: -- x_msg_data := 'BIS_BIA_RSG_LINKAGE_NOT_EXISTS';

Line 1226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1222: --END IF;
1223:
1224: EXCEPTION
1225: WHEN OTHERS THEN
1226: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1227: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1228: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1229: END IF;
1230: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 1244: x_return_status := FND_API.G_RET_STS_SUCCESS;

1240: ) IS
1241: v_procedure_name VARCHAR2(50) := 'Delete_Linkage';
1242: BEGIN
1243: FND_MSG_PUB.initialize;
1244: x_return_status := FND_API.G_RET_STS_SUCCESS;
1245:
1246: execute immediate 'delete from bis_obj_prog_linkages
1247: WHERE object_name = :1 AND object_type = :2
1248: AND conc_program_name = :3 AND conc_app_short_name = :4'

Line 1253: -- x_return_status := FND_API.G_RET_STS_ERROR;

1249: using p_object_name, p_object_type,
1250: p_conc_prog_name, p_appl_short_name;
1251:
1252: --IF (SQL%notfound) THEN
1253: -- x_return_status := FND_API.G_RET_STS_ERROR;
1254: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1255: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1256: -- END IF;
1257: -- x_msg_data := 'BIS_BIA_RSG_LINKAGE_NOT_EXISTS';

Line 1262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1258: --END IF;
1259:
1260: EXCEPTION
1261: WHEN OTHERS THEN
1262: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1263: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1264: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1265: END IF;
1266: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 1297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1293: delete_linkage(l_object_type,l_object_name,l_conc_prog_name,l_appl_short_name,
1294: x_return_status,x_msg_data);
1295: EXCEPTION
1296: WHEN OTHERS THEN
1297: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1298: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';
1299: END Delete_Linkage;
1300:
1301: PROCEDURE Delete_Obj_Linkages (

Line 1310: x_return_status := FND_API.G_RET_STS_SUCCESS;

1306: ) IS
1307: v_procedure_name VARCHAR2(50) := 'Delete_Obj_Linkages';
1308: BEGIN
1309: FND_MSG_PUB.initialize;
1310: x_return_status := FND_API.G_RET_STS_SUCCESS;
1311:
1312: execute immediate 'delete from bis_obj_prog_linkages
1313: WHERE object_name = :1 AND object_type = :2'
1314: using p_object_name, p_object_type;

Line 1317: -- x_return_status := FND_API.G_RET_STS_ERROR;

1313: WHERE object_name = :1 AND object_type = :2'
1314: using p_object_name, p_object_type;
1315:
1316: --IF (SQL%notfound) THEN
1317: -- x_return_status := FND_API.G_RET_STS_ERROR;
1318: -- IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1319: -- FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1320: -- END IF;
1321: -- x_msg_data := 'BIS_BIA_RSG_NO_OBJ_LINKAGES';

Line 1326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1322: --END IF;
1323:
1324: EXCEPTION
1325: WHEN OTHERS THEN
1326: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1327: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1328: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1329: END IF;
1330: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';

Line 1362: x_return_status := FND_API.G_RET_STS_SUCCESS;

1358: START WITH depend_object_name = p_dep_obj_name AND depend_object_type = p_dep_obj_type
1359: CONNECT BY PRIOR object_name = depend_object_name AND PRIOR object_type = depend_object_type;
1360: BEGIN
1361: FND_MSG_PUB.initialize;
1362: x_return_status := FND_API.G_RET_STS_SUCCESS;
1363:
1364: IF (p_dep_obj_name IS NULL OR p_dep_obj_name = '') THEN
1365: x_msg_data := 'BIS_BIA_RSG_INV_DEP_OBJ_NAME';
1366: x_return_status := fnd_api.g_ret_sts_error;

Line 1366: x_return_status := fnd_api.g_ret_sts_error;

1362: x_return_status := FND_API.G_RET_STS_SUCCESS;
1363:
1364: IF (p_dep_obj_name IS NULL OR p_dep_obj_name = '') THEN
1365: x_msg_data := 'BIS_BIA_RSG_INV_DEP_OBJ_NAME';
1366: x_return_status := fnd_api.g_ret_sts_error;
1367: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
1368: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_DEP_OBJ_NAME');
1369: END IF;
1370: RETURN x_parent_obj_table;

Line 1376: x_return_status := fnd_api.g_ret_sts_error;

1372:
1373: IF (p_dep_obj_type IS NULL OR
1374: p_dep_obj_type NOT IN ('TABLE','VIEW', 'MV', 'PORTLET', 'PAGE', 'REPORT')) THEN
1375: x_msg_data := 'BIS_BIA_RSG_INV_DEP_OBJ_TYPE';
1376: x_return_status := fnd_api.g_ret_sts_error;
1377: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
1378: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_DEP_OBJ_TYPE');
1379: END IF;
1380: RETURN x_parent_obj_table;

Line 1386: x_return_status := fnd_api.g_ret_sts_error;

1382:
1383: IF (p_obj_type IS NULL OR
1384: p_obj_type NOT IN ('TABLE','VIEW', 'MV', 'PORTLET', 'PAGE', 'REPORT')) THEN
1385: x_msg_data := 'BIS_BIA_RSG_INV_OBJ_TYPE';
1386: x_return_status := fnd_api.g_ret_sts_error;
1387: IF (fnd_msg_pub.check_msg_level(fnd_msg_pub.G_MSG_LVL_ERROR)) THEN
1388: fnd_msg_pub.add_exc_msg(g_pkg_name, v_procedure_name, 'BIS_BIA_RSG_INV_OBJ_TYPE');
1389: END IF;
1390: RETURN x_parent_obj_table;

Line 1407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1403: RETURN x_parent_obj_table;
1404:
1405: EXCEPTION
1406: WHEN OTHERS THEN
1407: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1408: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1409: FND_MSG_PUB.Add_Exc_Msg(g_pkg_name,v_procedure_name, NULL);
1410: END IF;
1411: x_msg_data := 'BIS_BIA_RSG_UNEXP_ERROR';