DBA Data[Home] [Help]

APPS.IEM_DIAG_OES_RULE_PVT dependencies on DBMS_SQL

Line 99: l_cursorID := DBMS_SQL.OPEN_CURSOR;

95: fixInfo := FND_MESSAGE.GET_STRING('IEM', 'IEM_DIAG_HELP');
96: isFatal := 'FALSE';
97: END IF;
98:
99: l_cursorID := DBMS_SQL.OPEN_CURSOR;
100:
101: l_rule_table := 'om_server_rules' || l_im_link;
102: l_account_table := 'ds_account' || l_im_link;
103: l_domain_table := 'ds_domain' || l_im_link;

Line 109: DBMS_SQL.PARSE(l_cursorID, l_str, DBMS_SQL.V7);

105: l_str := 'select count(*) from ' || l_rule_table || ' a, ' || l_account_table || ' b, ' || l_domain_table || ' c where b.objectid = a.account_id and b.domainid = c.objectid and c.qualifiedname=UPPER(:domain) and b.name = UPPER(:username)';
106:
107: l_str1 := 'select info1 from ' || l_rule_table || ' a, ' || l_account_table || ' b, ' || l_domain_table || ' c where b.objectid = a.account_id and b.domainid = c.objectid and c.qualifiedname=UPPER(:domain) and b.name = UPPER(:username)';
108:
109: DBMS_SQL.PARSE(l_cursorID, l_str, DBMS_SQL.V7);
110:
111: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':domain', l_account_rec.domain);
112: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':username', l_account_rec.email_user);
113:

Line 111: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':domain', l_account_rec.domain);

107: l_str1 := 'select info1 from ' || l_rule_table || ' a, ' || l_account_table || ' b, ' || l_domain_table || ' c where b.objectid = a.account_id and b.domainid = c.objectid and c.qualifiedname=UPPER(:domain) and b.name = UPPER(:username)';
108:
109: DBMS_SQL.PARSE(l_cursorID, l_str, DBMS_SQL.V7);
110:
111: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':domain', l_account_rec.domain);
112: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':username', l_account_rec.email_user);
113:
114: DBMS_SQL.DEFINE_COLUMN(l_cursorID, 1, l_rule_count);
115:

Line 112: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':username', l_account_rec.email_user);

108:
109: DBMS_SQL.PARSE(l_cursorID, l_str, DBMS_SQL.V7);
110:
111: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':domain', l_account_rec.domain);
112: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':username', l_account_rec.email_user);
113:
114: DBMS_SQL.DEFINE_COLUMN(l_cursorID, 1, l_rule_count);
115:
116: l_dummy := DBMS_SQL.EXECUTE(l_cursorID);

Line 114: DBMS_SQL.DEFINE_COLUMN(l_cursorID, 1, l_rule_count);

110:
111: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':domain', l_account_rec.domain);
112: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':username', l_account_rec.email_user);
113:
114: DBMS_SQL.DEFINE_COLUMN(l_cursorID, 1, l_rule_count);
115:
116: l_dummy := DBMS_SQL.EXECUTE(l_cursorID);
117:
118: IF DBMS_SQL.FETCH_ROWS(l_cursorID) = 0 THEN

Line 116: l_dummy := DBMS_SQL.EXECUTE(l_cursorID);

112: DBMS_SQL.BIND_VARIABLE(l_cursorID, ':username', l_account_rec.email_user);
113:
114: DBMS_SQL.DEFINE_COLUMN(l_cursorID, 1, l_rule_count);
115:
116: l_dummy := DBMS_SQL.EXECUTE(l_cursorID);
117:
118: IF DBMS_SQL.FETCH_ROWS(l_cursorID) = 0 THEN
119: reportStr := 'no rows selected';
120: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);

Line 118: IF DBMS_SQL.FETCH_ROWS(l_cursorID) = 0 THEN

114: DBMS_SQL.DEFINE_COLUMN(l_cursorID, 1, l_rule_count);
115:
116: l_dummy := DBMS_SQL.EXECUTE(l_cursorID);
117:
118: IF DBMS_SQL.FETCH_ROWS(l_cursorID) = 0 THEN
119: reportStr := 'no rows selected';
120: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
121: EXIT;
122: END IF;

Line 124: DBMS_SQL.COLUMN_VALUE(l_cursorID, 1, l_rule_count);

120: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
121: EXIT;
122: END IF;
123:
124: DBMS_SQL.COLUMN_VALUE(l_cursorID, 1, l_rule_count);
125:
126: if (l_account_rec.account_flag = 'A') then
127: if (l_rule_count <> 0) then
128: statusStr := 'FAILURE';

Line 148: l_cursorID1 := DBMS_SQL.OPEN_CURSOR;

144: isFatal := 'FALSE';
145: else
146:
147: -- Check the rule has valid apps link name
148: l_cursorID1 := DBMS_SQL.OPEN_CURSOR;
149:
150: DBMS_SQL.PARSE(l_cursorID1, l_str1, DBMS_SQL.V7);
151: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':domain', l_account_rec.domain);
152: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':username', l_account_rec.email_user);

Line 150: DBMS_SQL.PARSE(l_cursorID1, l_str1, DBMS_SQL.V7);

146:
147: -- Check the rule has valid apps link name
148: l_cursorID1 := DBMS_SQL.OPEN_CURSOR;
149:
150: DBMS_SQL.PARSE(l_cursorID1, l_str1, DBMS_SQL.V7);
151: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':domain', l_account_rec.domain);
152: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':username', l_account_rec.email_user);
153:
154: DBMS_SQL.DEFINE_COLUMN(l_cursorID1, 1, l_rule_name, 500);

Line 151: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':domain', l_account_rec.domain);

147: -- Check the rule has valid apps link name
148: l_cursorID1 := DBMS_SQL.OPEN_CURSOR;
149:
150: DBMS_SQL.PARSE(l_cursorID1, l_str1, DBMS_SQL.V7);
151: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':domain', l_account_rec.domain);
152: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':username', l_account_rec.email_user);
153:
154: DBMS_SQL.DEFINE_COLUMN(l_cursorID1, 1, l_rule_name, 500);
155:

Line 152: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':username', l_account_rec.email_user);

148: l_cursorID1 := DBMS_SQL.OPEN_CURSOR;
149:
150: DBMS_SQL.PARSE(l_cursorID1, l_str1, DBMS_SQL.V7);
151: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':domain', l_account_rec.domain);
152: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':username', l_account_rec.email_user);
153:
154: DBMS_SQL.DEFINE_COLUMN(l_cursorID1, 1, l_rule_name, 500);
155:
156: l_dummy := DBMS_SQL.EXECUTE(l_cursorID1);

Line 154: DBMS_SQL.DEFINE_COLUMN(l_cursorID1, 1, l_rule_name, 500);

150: DBMS_SQL.PARSE(l_cursorID1, l_str1, DBMS_SQL.V7);
151: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':domain', l_account_rec.domain);
152: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':username', l_account_rec.email_user);
153:
154: DBMS_SQL.DEFINE_COLUMN(l_cursorID1, 1, l_rule_name, 500);
155:
156: l_dummy := DBMS_SQL.EXECUTE(l_cursorID1);
157:
158: IF DBMS_SQL.FETCH_ROWS(l_cursorID1) = 0 THEN

Line 156: l_dummy := DBMS_SQL.EXECUTE(l_cursorID1);

152: DBMS_SQL.BIND_VARIABLE(l_cursorID1, ':username', l_account_rec.email_user);
153:
154: DBMS_SQL.DEFINE_COLUMN(l_cursorID1, 1, l_rule_name, 500);
155:
156: l_dummy := DBMS_SQL.EXECUTE(l_cursorID1);
157:
158: IF DBMS_SQL.FETCH_ROWS(l_cursorID1) = 0 THEN
159: reportStr := 'no rows selected';
160: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);

Line 158: IF DBMS_SQL.FETCH_ROWS(l_cursorID1) = 0 THEN

154: DBMS_SQL.DEFINE_COLUMN(l_cursorID1, 1, l_rule_name, 500);
155:
156: l_dummy := DBMS_SQL.EXECUTE(l_cursorID1);
157:
158: IF DBMS_SQL.FETCH_ROWS(l_cursorID1) = 0 THEN
159: reportStr := 'no rows selected';
160: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
161: EXIT;
162: END IF;

Line 164: DBMS_SQL.COLUMN_VALUE(l_cursorID1, 1, l_rule_name);

160: JTF_DIAGNOSTIC_ADAPTUTIL.addStringToReport(reportClob,reportStr);
161: EXIT;
162: END IF;
163:
164: DBMS_SQL.COLUMN_VALUE(l_cursorID1, 1, l_rule_name);
165:
166: select length(l_rule_name) into l_length from dual;
167:
168: if (l_length < 35) then

Line 184: DBMS_SQL.CLOSE_CURSOR(l_cursorID1);

180: isFatal := 'FALSE';
181: end if;
182: end if;
183:
184: DBMS_SQL.CLOSE_CURSOR(l_cursorID1);
185: end if;
186: end if;
187:
188: DBMS_SQL.CLOSE_CURSOR(l_cursorID);

Line 188: DBMS_SQL.CLOSE_CURSOR(l_cursorID);

184: DBMS_SQL.CLOSE_CURSOR(l_cursorID1);
185: end if;
186: end if;
187:
188: DBMS_SQL.CLOSE_CURSOR(l_cursorID);
189:
190:
191: END LOOP; -- for email account
192: