APPS.PA_PURGE_PROJECTS_GEN_PKG dependencies on DBMS_SQL

Line 62: v_cursor_gen_id := dbms_sql.open_cursor ;

58: l_where_clause VARCHAR2(2000);
59: v_cursor_gen_id INTEGER ;
60: v_open_cursor INTEGER ;
61: BEGIN
62: v_cursor_gen_id := dbms_sql.open_cursor ;
63: l_select_clause := 'select p.project_id, p.project_status_code ' ||
64: ' from pa_projects p ' ;
65: l_where_clause := ' where pa_security.allow_update(p.project_id) = ''Y'' '||
66: ' and p.template_flag != ''Y'' ';

Line 124: dbms_sql.parse(v_cursor_gen_id, l_select_clause ||

120: end if;
121: /* code added for the bug#2464149, ends here */
122:
123:
124: dbms_sql.parse(v_cursor_gen_id, l_select_clause ||
125: l_where_clause,
126: dbms_sql.v7);
127:
128: if x_organization_id is not NULL then

Line 126: dbms_sql.v7);

122:
123:
124: dbms_sql.parse(v_cursor_gen_id, l_select_clause ||
125: l_where_clause,
126: dbms_sql.v7);
127:
128: if x_organization_id is not NULL then
129: dbms_sql.bind_variable(v_cursor_gen_id, ':organization_id', x_organization_id) ;
130: end if;

Line 129: dbms_sql.bind_variable(v_cursor_gen_id, ':organization_id', x_organization_id) ;

125: l_where_clause,
126: dbms_sql.v7);
127:
128: if x_organization_id is not NULL then
129: dbms_sql.bind_variable(v_cursor_gen_id, ':organization_id', x_organization_id) ;
130: end if;
131:
132: if x_closed_thru_date is not NULL then
133: dbms_sql.bind_variable(v_cursor_gen_id, ':closed_thru_date', x_closed_thru_date) ;

Line 133: dbms_sql.bind_variable(v_cursor_gen_id, ':closed_thru_date', x_closed_thru_date) ;

129: dbms_sql.bind_variable(v_cursor_gen_id, ':organization_id', x_organization_id) ;
130: end if;
131:
132: if x_closed_thru_date is not NULL then
133: dbms_sql.bind_variable(v_cursor_gen_id, ':closed_thru_date', x_closed_thru_date) ;
134: end if;
135:
136: if x_project_type is not NULL then
137: dbms_sql.bind_variable(v_cursor_gen_id, ':project_type', x_project_type) ;

Line 137: dbms_sql.bind_variable(v_cursor_gen_id, ':project_type', x_project_type) ;

133: dbms_sql.bind_variable(v_cursor_gen_id, ':closed_thru_date', x_closed_thru_date) ;
134: end if;
135:
136: if x_project_type is not NULL then
137: dbms_sql.bind_variable(v_cursor_gen_id, ':project_type', x_project_type) ;
138: end if;
139:
140: if x_project_status_code is not NULL then
141: dbms_sql.bind_variable(v_cursor_gen_id, ':project_status_code', x_project_status_code) ;

Line 141: dbms_sql.bind_variable(v_cursor_gen_id, ':project_status_code', x_project_status_code) ;

137: dbms_sql.bind_variable(v_cursor_gen_id, ':project_type', x_project_type) ;
138: end if;
139:
140: if x_project_status_code is not NULL then
141: dbms_sql.bind_variable(v_cursor_gen_id, ':project_status_code', x_project_status_code) ;
142: end if;
143:
144: dbms_sql.define_column(v_cursor_gen_id, 1, l_project_id);
145: dbms_sql.define_column(v_cursor_gen_id, 2, l_project_status_code, 30);

Line 144: dbms_sql.define_column(v_cursor_gen_id, 1, l_project_id);

140: if x_project_status_code is not NULL then
141: dbms_sql.bind_variable(v_cursor_gen_id, ':project_status_code', x_project_status_code) ;
142: end if;
143:
144: dbms_sql.define_column(v_cursor_gen_id, 1, l_project_id);
145: dbms_sql.define_column(v_cursor_gen_id, 2, l_project_status_code, 30);
146:
147: x_no_recs := 0 ;
148: -- open GenProjects ;

Line 145: dbms_sql.define_column(v_cursor_gen_id, 2, l_project_status_code, 30);

141: dbms_sql.bind_variable(v_cursor_gen_id, ':project_status_code', x_project_status_code) ;
142: end if;
143:
144: dbms_sql.define_column(v_cursor_gen_id, 1, l_project_id);
145: dbms_sql.define_column(v_cursor_gen_id, 2, l_project_status_code, 30);
146:
147: x_no_recs := 0 ;
148: -- open GenProjects ;
149: v_open_cursor := dbms_sql.execute(v_cursor_gen_id);

Line 149: v_open_cursor := dbms_sql.execute(v_cursor_gen_id);

145: dbms_sql.define_column(v_cursor_gen_id, 2, l_project_status_code, 30);
146:
147: x_no_recs := 0 ;
148: -- open GenProjects ;
149: v_open_cursor := dbms_sql.execute(v_cursor_gen_id);
150:
151: LOOP
152: -- fetch GenProjects into l_project_id,
153: -- l_project_status_code ;

Line 155: If dbms_sql.fetch_rows(v_cursor_gen_id) = 0 then

151: LOOP
152: -- fetch GenProjects into l_project_id,
153: -- l_project_status_code ;
154:
155: If dbms_sql.fetch_rows(v_cursor_gen_id) = 0 then
156: exit ;
157: end if ;
158:
159: dbms_sql.column_value(v_cursor_gen_id, 1, l_project_id);

Line 159: dbms_sql.column_value(v_cursor_gen_id, 1, l_project_id);

155: If dbms_sql.fetch_rows(v_cursor_gen_id) = 0 then
156: exit ;
157: end if ;
158:
159: dbms_sql.column_value(v_cursor_gen_id, 1, l_project_id);
160: dbms_sql.column_value(v_cursor_gen_id, 2, l_project_status_code);
161:
162: -- if GenProjects%notfound then
163: -- exit ;

Line 160: dbms_sql.column_value(v_cursor_gen_id, 2, l_project_status_code);

156: exit ;
157: end if ;
158:
159: dbms_sql.column_value(v_cursor_gen_id, 1, l_project_id);
160: dbms_sql.column_value(v_cursor_gen_id, 2, l_project_status_code);
161:
162: -- if GenProjects%notfound then
163: -- exit ;
164: -- end if ;

Line 234: dbms_sql.close_cursor(v_cursor_gen_id) ;

230: x_no_recs := nvl(x_no_recs, 0) + SQL%ROWCOUNT ;
231: END LOOP ;
232:
233: -- close GenProjects ;
234: dbms_sql.close_cursor(v_cursor_gen_id) ;
235:
236: exception
237: when others then
238: raise ;