APPS.EDW_DEL_STG dependencies on DBMS_SQL

Line 102: cid := DBMS_SQL.open_cursor;

98: del_cur curType;
99: l_stmt varchar2(1000);
100: BEGIN
101: begin
102: cid := DBMS_SQL.open_cursor;
103:
104: DBMS_SQL.PARSE(cid, 'DELETE FROM '||p_stg_name||
105: ' WHERE nvl(COLLECTION_STATUS, ''ERROR'') = ''COLLECTED'' OR nvl(COLLECTION_STATUS, ''ERROR'') =''DUPLICATE-COLLECT''', dbms_sql.native);
106:

Line 104: DBMS_SQL.PARSE(cid, 'DELETE FROM '||p_stg_name||

100: BEGIN
101: begin
102: cid := DBMS_SQL.open_cursor;
103:
104: DBMS_SQL.PARSE(cid, 'DELETE FROM '||p_stg_name||
105: ' WHERE nvl(COLLECTION_STATUS, ''ERROR'') = ''COLLECTED'' OR nvl(COLLECTION_STATUS, ''ERROR'') =''DUPLICATE-COLLECT''', dbms_sql.native);
106:
107:
108: g_dummy_int:=DBMS_SQL.EXECUTE(cid);

Line 105: ' WHERE nvl(COLLECTION_STATUS, ''ERROR'') = ''COLLECTED'' OR nvl(COLLECTION_STATUS, ''ERROR'') =''DUPLICATE-COLLECT''', dbms_sql.native);

101: begin
102: cid := DBMS_SQL.open_cursor;
103:
104: DBMS_SQL.PARSE(cid, 'DELETE FROM '||p_stg_name||
105: ' WHERE nvl(COLLECTION_STATUS, ''ERROR'') = ''COLLECTED'' OR nvl(COLLECTION_STATUS, ''ERROR'') =''DUPLICATE-COLLECT''', dbms_sql.native);
106:
107:
108: g_dummy_int:=DBMS_SQL.EXECUTE(cid);
109: EXCEPTION

Line 108: g_dummy_int:=DBMS_SQL.EXECUTE(cid);

104: DBMS_SQL.PARSE(cid, 'DELETE FROM '||p_stg_name||
105: ' WHERE nvl(COLLECTION_STATUS, ''ERROR'') = ''COLLECTED'' OR nvl(COLLECTION_STATUS, ''ERROR'') =''DUPLICATE-COLLECT''', dbms_sql.native);
106:
107:
108: g_dummy_int:=DBMS_SQL.EXECUTE(cid);
109: EXCEPTION
110: when others then
111: g_errbuf := sqlerrm;
112: g_retcode := -1;

Line 115: DBMS_SQL.PARSE(cid, 'LOCK TABLE '||p_stg_name

111: g_errbuf := sqlerrm;
112: g_retcode := -1;
113: end;
114: begin
115: DBMS_SQL.PARSE(cid, 'LOCK TABLE '||p_stg_name
116: ||' IN EXCLUSIVE MODE NOWAIT', dbms_sql.native);
117: g_dummy_int:=DBMS_SQL.EXECUTE(cid);
118:
119: begin

Line 116: ||' IN EXCLUSIVE MODE NOWAIT', dbms_sql.native);

112: g_retcode := -1;
113: end;
114: begin
115: DBMS_SQL.PARSE(cid, 'LOCK TABLE '||p_stg_name
116: ||' IN EXCLUSIVE MODE NOWAIT', dbms_sql.native);
117: g_dummy_int:=DBMS_SQL.EXECUTE(cid);
118:
119: begin
120: l_stmt := 'select /*+ FIRST_ROWS */ 1 from '|| p_stg_name ||' where rownum=1';

Line 117: g_dummy_int:=DBMS_SQL.EXECUTE(cid);

113: end;
114: begin
115: DBMS_SQL.PARSE(cid, 'LOCK TABLE '||p_stg_name
116: ||' IN EXCLUSIVE MODE NOWAIT', dbms_sql.native);
117: g_dummy_int:=DBMS_SQL.EXECUTE(cid);
118:
119: begin
120: l_stmt := 'select /*+ FIRST_ROWS */ 1 from '|| p_stg_name ||' where rownum=1';
121: open del_cur for l_stmt;

Line 135: IF DBMS_SQL.IS_OPEN(cid) THEN

131: g_errbuf := sqlerrm;
132: commit;
133: end;
134:
135: IF DBMS_SQL.IS_OPEN(cid) THEN
136: DBMS_SQL.CLOSE_CURSOR(cid);
137: END IF;
138: END;
139:

Line 136: DBMS_SQL.CLOSE_CURSOR(cid);

132: commit;
133: end;
134:
135: IF DBMS_SQL.IS_OPEN(cid) THEN
136: DBMS_SQL.CLOSE_CURSOR(cid);
137: END IF;
138: END;
139:
140: Procedure Delete_Dimension(Errbuf in out NOCOPY varchar2, Retcode in out NOCOPY varchar2, p_dim_name in varchar2, p_purge_option in number) IS