DBA Data[Home] [Help]

APPS.IGS_SC_GEN_001 dependencies on IGS_SC_GEN_001

Line 1: PACKAGE BODY IGS_SC_GEN_001 AS

1: PACKAGE BODY IGS_SC_GEN_001 AS
2: /* $Header: IGSSC06B.pls 120.7 2006/05/30 10:02:47 vskumar noship $ */
3:
4: /******************************************************************
5: Copyright (c) 2002 Oracle Corporation, Redwood Shores, CA, USA

Line 39: l_prog_label CONSTANT VARCHAR2(500) :='igs.plsql.igs_sc_gen_001';

35: );
36: TYPE g_grant_conds_t IS TABLE OF g_grant_cond_rec INDEX BY BINARY_INTEGER;
37: g_debug_level NUMBER(1) := 0;
38:
39: l_prog_label CONSTANT VARCHAR2(500) :='igs.plsql.igs_sc_gen_001';
40: l_request_id NUMBER;
41: l_label VARCHAR2(4000);
42: l_debug_str VARCHAR2(32000);
43: --mmkumar,

Line 244: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

240:
241: fnd_dsql.init;
242:
243: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
244: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
245: l_debug_str := P_ATTRIB_TAB.ADVISOR||','||
246: P_ATTRIB_TAB.ADVISOR_PERSON_ID||','||
247: P_ATTRIB_TAB.APPLICATION_PROGRAM_CODE||','||
248: P_ATTRIB_TAB.APPLICATION_TYPE||','||

Line 319: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

315: --
316:
317: --** Statement level logging.
318: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
319: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
320: if onlyZTypeAttributes then
321: l_debug_str := 'onlyZTypeAttributes : true ';
322: else
323: l_debug_str := 'onlyZTypeAttributes : false ';

Line 596: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

592: -- l_obj_select, l_usr_select - select statments.
593:
594: --** Statement level logging.
595: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
596: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
597: l_debug_str := 'l_obj_select is : '|| l_obj_select || ' and l_obj_const is ' || l_obj_const;
598: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
599: END IF;
600: --**

Line 605: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

601:
602:
603: --** Statement level logging.
604: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
605: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
606: l_debug_str := 'l_usr_select is : '|| l_usr_select || ' and l_usr_const is ' || l_usr_const;
607: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
608: END IF;
609: --**

Line 630: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

626: ELSE
627:
628: --** Statement level logging.
629: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
630: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
631: l_debug_str := 'l_obj_select is not null : '|| l_obj_select;
632: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
633: END IF;
634: --**

Line 730: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

726: l_bodmas_grant_text := IGS_SC_GRANTS_PVT.getBodmasCondition(l_grant_text);
727:
728: --** Statement level logging.
729: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
730: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
731: l_debug_str := 'Got string from bodmas : '|| l_bodmas_grant_text; --l_statment;
732: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
733: END IF;
734: --**

Line 810: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

806: fnd_dsql.add_text(substr(l_bodmas_grant_text,l_cur_pos));
807: END IF;
808: --** Statement level logging.
809: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
810: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
811: l_debug_str := 'Final Select: '|| fnd_dsql.get_text(); --l_statment;
812: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
813: END IF;
814: --**

Line 822: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

818: l_SelectStatement := fnd_dsql.get_text(FALSE);
819:
820: --** Statement level logging.
821: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
822: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
823: l_debug_str := 'statement to be executed : '|| l_SelectStatement;
824: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
825: END IF;
826: --**

Line 837: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.finalreturn';

833: lnRows := DBMS_SQL.EXECUTE (l_ext_cursor);
834: IF dbms_sql.fetch_rows(l_ext_cursor) > 0 THEN
835: dbms_sql.column_value(l_ext_cursor, 1, l_output);
836: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
837: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.finalreturn';
838: l_debug_str := 'Final Select: TRUE ';
839: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
840: END IF;
841: RETURN TRUE;

Line 849: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.finalreturn';

845: EXECUTE IMMEDIATE l_statment INTO l_val;
846:
847: IF (l_val = 1) THEN
848: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
849: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.finalreturn';
850: l_debug_str := 'Final Select: TRUE ';
851: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
852: END IF;
853:

Line 860: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.finalreturn';

856: */
857: EXCEPTION
858: WHEN NO_DATA_FOUND THEN
859: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
860: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.finalreturn';
861: l_debug_str := 'Final Select: FALSE ';
862: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
863: END IF;
864:

Line 869: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.Exception';

865: RETURN FALSE;
866: WHEN OTHERS THEN
867: --** Statement level logging.
868: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
869: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.Exception';
870: l_debug_str := 'Exception: '||SQLERRM;
871: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
872: END IF;
873: --**

Line 885: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.DefaultPolicy';

881: OPEN DEF_GRNT(P_OBJECT_NAME);
882: FETCH DEF_GRNT INTO l_def_gr;
883: IF l_def_gr = 'G' THEN
884: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
885: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.DefaultPolicy';
886: l_debug_str := 'DefaultPolicy: TRUE ';
887: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
888: END IF;
889: RETURN TRUE;

Line 892: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.DefaultPolicy';

888: END IF;
889: RETURN TRUE;
890: ELSE
891: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
892: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security.DefaultPolicy';
893: l_debug_str := 'DefaultPolicy: FALSE ';
894: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
895: END IF;
896: RETURN FALSE;

Line 902: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

898: END IF;
899:
900: --** Statement level logging.
901: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
902: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
903: l_debug_str := 'Returing False after setting it null : ';
904: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
905: END IF;
906: --**

Line 914: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';

910: EXCEPTION
911: WHEN OTHERS THEN
912: --** Statement level logging.
913: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
914: l_label := 'igs.plsql.igs_sc_gen_001.check_ins_security';
915: l_debug_str := 'inside exception section : ' || SQLERRM;
916: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
917: END IF;
918: --**

Line 939: l_label := 'igs.plsql.igs_sc_gen_001.set_ctx';

935: ------------------------------------------------------------------
936: BEGIN
937:
938: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
939: l_label := 'igs.plsql.igs_sc_gen_001.set_ctx';
940: l_debug_str := 'Context set User ID: '||FND_GLOBAL.USER_ID||','||'Responsibility ID'||FND_GLOBAL.RESP_ID;
941: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
942: END IF;
943:

Line 962: l_label := 'igs.plsql.igs_sc_gen_001.unset_ctx';

958: --Change History:
959: ------------------------------------------------------------------
960: BEGIN
961: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
962: l_label := 'igs.plsql.igs_sc_gen_001.unset_ctx';
963: l_debug_str := 'Context UNset User ID: '||FND_GLOBAL.USER_ID||','||'Responsibility ID'||FND_GLOBAL.RESP_ID;
964: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
965: END IF;
966:

Line 1000: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security';

996: Grant_cv GetGrantCurTyp;
997:
998: BEGIN
999: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
1000: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security';
1001: l_debug_str := 'Table Name: '||P_Tab_Name||','||'RowID: '||P_Rowid||','||'Action: '||P_Action;
1002: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1003: END IF;
1004:

Line 1021: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security';

1017: END IF;
1018:
1019: --** Statement level logging.
1020: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1021: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security';
1022: l_debug_str := 'executing statement : '|| l_obj_exists_cur;
1023: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1024: END IF;
1025: --**

Line 1043: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security';

1039: END IF;
1040:
1041: --** Statement level logging.
1042: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1043: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security';
1044: l_debug_str := 'L_WHERE_CLAUSE is : '|| L_WHERE_CLAUSE;
1045: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1046: END IF;
1047: --**

Line 1054: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security.finalselect';

1050: IF L_WHERE_CLAUSE IS NOT NULL THEN
1051: L_SELECT_STMT := 'SELECT 1 FROM '||P_Tab_Name||' WHERE ROWID = :1 AND ('||L_WHERE_CLAUSE||')';
1052:
1053: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1054: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security.finalselect';
1055: l_debug_str := 'Final Select: '||L_SELECT_STMT;
1056: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1057: END IF;
1058:

Line 1064: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security.finalreturn';

1060: FETCH Grant_cv INTO l_grant;
1061: IF Grant_cv%FOUND THEN
1062: close grant_cv;
1063: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1064: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security.finalreturn';
1065: l_debug_str := 'Final Select: TRUE ';
1066: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1067: END IF;
1068: RETURN TRUE;

Line 1072: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security.finalreturn';

1068: RETURN TRUE;
1069: ELSE
1070: close grant_cv;
1071: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1072: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security.finalreturn';
1073: l_debug_str := 'Final Select: FALSE ';
1074: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1075: END IF;
1076: RETURN FALSE;

Line 1088: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security.Exception';

1084: close grant_cv ;
1085: END IF;
1086:
1087: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1088: l_label := 'igs.plsql.igs_sc_gen_001.check_sel_upd_del_security.Exception';
1089: l_debug_str := 'Exception: '||SQLERRM;
1090: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1091: END IF;
1092: P_MSG_DATA := SQLERRM;

Line 1125: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';

1121: l_grant VARCHAR2(1);
1122:
1123: BEGIN
1124: IF fnd_log.test(fnd_log.level_procedure,l_prog_label) THEN
1125: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';
1126: l_debug_str := 'Table Name: '||P_Table_Name||','||'Person ID: '||P_Person_id||','||'Action: '||P_Action;
1127: fnd_log.string_with_context( fnd_log.level_procedure,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1128: END IF;
1129:

Line 1137: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';

1133: FETCH rowid_cv INTO L_ROWID;
1134: IF rowid_cv%NOTFOUND THEN
1135: --** Statement level logging.
1136: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1137: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';
1138: l_debug_str := 'NON-OSS Person';
1139: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1140: END IF;
1141: --**

Line 1147: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';

1143: L_WHERE_CLAUSE := IGS_SC_GRANTS_PVT.GENERATE_GRANT(P_Table_Name, P_Action );
1144:
1145: --** Statement level logging.
1146: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1147: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';
1148: l_debug_str := 'L_WHERE_CLAUSE is : '|| L_WHERE_CLAUSE;
1149: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1150: END IF;
1151: --**

Line 1163: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';

1159: L_SELECT_STMT := 'SELECT 1 FROM IGS_PE_PERSON_BASE_V WHERE PERSON_ID = :1 AND ('||L_WHERE_CLAUSE||')';
1160:
1161: --** Statement level logging.
1162: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1163: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';
1164: l_debug_str := 'L_SELECT_STMT is : '|| L_SELECT_STMT;
1165: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1166: END IF;
1167: --**

Line 1175: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';

1171: IF Grant_cv%FOUND THEN
1172: CLOSE grant_cv;
1173: --** Statement level logging.
1174: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1175: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';
1176: l_debug_str := 'Privilege Exists: Return True';
1177: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1178: END IF;
1179: --**

Line 1185: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';

1181: ELSE
1182: CLOSE grant_cv;
1183: --** Statement level logging.
1184: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1185: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';
1186: l_debug_str := 'Privilege Does not Exists: Return False';
1187: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1188: END IF;
1189: --**

Line 1195: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';

1191: END IF;
1192: ELSE
1193: --** Statement level logging.
1194: IF fnd_log.test(fnd_log.level_statement,l_prog_label) THEN
1195: l_label := 'igs.plsql.igs_sc_gen_001.check_person_security';
1196: l_debug_str := 'Privilege Exists: Default Policy: Return True';
1197: fnd_log.string_with_context( fnd_log.level_statement,l_label,l_debug_str, NULL,NULL,NULL,NULL,NULL,NULL);
1198: END IF;
1199: --**

Line 1328: END IGS_SC_GEN_001;

1324: RETURN l_return;
1325:
1326: END check_user_policy;
1327:
1328: END IGS_SC_GEN_001;