DBA Data[Home] [Help]

APPS.ECE_RULES_PKG dependencies on DBMS_SQL

Line 1134: l_sel_c := dbms_sql.open_cursor;

1130: ec_debug.pl (3, l_select);
1131: end if;
1132:
1133: xProgress := 'ECERULEB-70-1050';
1134: l_sel_c := dbms_sql.open_cursor;
1135:
1136: BEGIN
1137: xProgress := 'ECERULEB-70-1060';
1138: dbms_sql.parse (l_sel_c, l_select, dbms_sql.native);

Line 1138: dbms_sql.parse (l_sel_c, l_select, dbms_sql.native);

1134: l_sel_c := dbms_sql.open_cursor;
1135:
1136: BEGIN
1137: xProgress := 'ECERULEB-70-1060';
1138: dbms_sql.parse (l_sel_c, l_select, dbms_sql.native);
1139: EXCEPTION
1140: WHEN OTHERS then
1141: ece_error_handling_pvt.print_parse_error
1142: ( dbms_sql.last_error_position, l_select);

Line 1142: ( dbms_sql.last_error_position, l_select);

1138: dbms_sql.parse (l_sel_c, l_select, dbms_sql.native);
1139: EXCEPTION
1140: WHEN OTHERS then
1141: ece_error_handling_pvt.print_parse_error
1142: ( dbms_sql.last_error_position, l_select);
1143: raise;
1144: END;
1145:
1146: xProgress := 'ECERULEB-70-1070';

Line 1147: dbms_sql.define_column(l_sel_c, 1, l_match_column);

1143: raise;
1144: END;
1145:
1146: xProgress := 'ECERULEB-70-1070';
1147: dbms_sql.define_column(l_sel_c, 1, l_match_column);
1148:
1149: xProgress := 'ECERULEB-70-1075';
1150: dbms_sql.bind_variable(l_sel_c,'l_p_column_value',p_column_value);
1151:

Line 1150: dbms_sql.bind_variable(l_sel_c,'l_p_column_value',p_column_value);

1146: xProgress := 'ECERULEB-70-1070';
1147: dbms_sql.define_column(l_sel_c, 1, l_match_column);
1148:
1149: xProgress := 'ECERULEB-70-1075';
1150: dbms_sql.bind_variable(l_sel_c,'l_p_column_value',p_column_value);
1151:
1152: xProgress := 'ECERULEB-70-1080';
1153: l_dummy := dbms_sql.execute(l_sel_c);
1154:

Line 1153: l_dummy := dbms_sql.execute(l_sel_c);

1149: xProgress := 'ECERULEB-70-1075';
1150: dbms_sql.bind_variable(l_sel_c,'l_p_column_value',p_column_value);
1151:
1152: xProgress := 'ECERULEB-70-1080';
1153: l_dummy := dbms_sql.execute(l_sel_c);
1154:
1155: if (dbms_sql.fetch_rows(l_sel_c) > 0) then
1156: xProgress := 'ECERULEB-70-1090';
1157: dbms_sql.column_value (l_sel_c, 1, l_match_column);

Line 1155: if (dbms_sql.fetch_rows(l_sel_c) > 0) then

1151:
1152: xProgress := 'ECERULEB-70-1080';
1153: l_dummy := dbms_sql.execute(l_sel_c);
1154:
1155: if (dbms_sql.fetch_rows(l_sel_c) > 0) then
1156: xProgress := 'ECERULEB-70-1090';
1157: dbms_sql.column_value (l_sel_c, 1, l_match_column);
1158: if (l_match_column = 0) then
1159: xProgress := 'ECERULEB-70-1100';

Line 1157: dbms_sql.column_value (l_sel_c, 1, l_match_column);

1153: l_dummy := dbms_sql.execute(l_sel_c);
1154:
1155: if (dbms_sql.fetch_rows(l_sel_c) > 0) then
1156: xProgress := 'ECERULEB-70-1090';
1157: dbms_sql.column_value (l_sel_c, 1, l_match_column);
1158: if (l_match_column = 0) then
1159: xProgress := 'ECERULEB-70-1100';
1160: x_valid_rule := 'N';
1161: end if;

Line 1165: dbms_sql.close_cursor (l_sel_c);

1161: end if;
1162: end if;
1163:
1164: xProgress := 'ECERULEB-70-1110';
1165: dbms_sql.close_cursor (l_sel_c);
1166:
1167: if (x_valid_rule = 'N') then
1168: xProgress := 'ECERULEB-70-1120';
1169: fnd_message.set_name ('EC', 'ECE_SIMPLE_LOOKUP');

Line 1188: if (dbms_sql.is_open(l_sel_c)) then

1184: WHEN OTHERS THEN
1185: if (c_simple_lookup_rule%ISOPEN) then
1186: close c_simple_lookup_rule;
1187: end if;
1188: if (dbms_sql.is_open(l_sel_c)) then
1189: dbms_sql.close_cursor (l_sel_c);
1190: end if;
1191: ec_debug.pl (0, 'EC', 'ECE_PROGRAM_ERROR','PROGRESS_LEVEL', xProgress);
1192: ec_debug.pl (0, 'EC', 'ECE_ERROR_MESSAGE', 'ERROR_MESSAGE', SQLERRM);

Line 1189: dbms_sql.close_cursor (l_sel_c);

1185: if (c_simple_lookup_rule%ISOPEN) then
1186: close c_simple_lookup_rule;
1187: end if;
1188: if (dbms_sql.is_open(l_sel_c)) then
1189: dbms_sql.close_cursor (l_sel_c);
1190: end if;
1191: ec_debug.pl (0, 'EC', 'ECE_PROGRAM_ERROR','PROGRESS_LEVEL', xProgress);
1192: ec_debug.pl (0, 'EC', 'ECE_ERROR_MESSAGE', 'ERROR_MESSAGE', SQLERRM);
1193: ec_debug.pop ('ECE_RULES_PKG.SIMPLE_LOOKUP_RULE');

Line 4268: l_sel_c := dbms_sql.open_cursor;

4264: l_where := ' WHERE ' || p_where_clause;
4265: l_select := l_select || l_where;
4266: end if;
4267:
4268: l_sel_c := dbms_sql.open_cursor;
4269:
4270: BEGIN
4271: dbms_sql.parse (l_sel_c, l_select, dbms_sql.native);
4272: EXCEPTION

Line 4271: dbms_sql.parse (l_sel_c, l_select, dbms_sql.native);

4267:
4268: l_sel_c := dbms_sql.open_cursor;
4269:
4270: BEGIN
4271: dbms_sql.parse (l_sel_c, l_select, dbms_sql.native);
4272: EXCEPTION
4273: WHEN OTHERS then
4274: x_valid := False;
4275: END;

Line 4277: dbms_sql.close_cursor (l_sel_c);

4273: WHEN OTHERS then
4274: x_valid := False;
4275: END;
4276:
4277: dbms_sql.close_cursor (l_sel_c);
4278:
4279: EXCEPTION
4280: WHEN OTHERS THEN
4281: x_valid := False;

Line 4282: if (dbms_sql.is_open(l_sel_c)) then

4278:
4279: EXCEPTION
4280: WHEN OTHERS THEN
4281: x_valid := False;
4282: if (dbms_sql.is_open(l_sel_c)) then
4283: dbms_sql.close_cursor (l_sel_c);
4284: end if;
4285: app_exception.raise_exception;
4286:

Line 4283: dbms_sql.close_cursor (l_sel_c);

4279: EXCEPTION
4280: WHEN OTHERS THEN
4281: x_valid := False;
4282: if (dbms_sql.is_open(l_sel_c)) then
4283: dbms_sql.close_cursor (l_sel_c);
4284: end if;
4285: app_exception.raise_exception;
4286:
4287: END Validate_Form_Simple_Lookup;