[Home] [Help]
201: -- PURPOSE
202: -- The procedure insert a collection of data into a table whose name is
203: -- specified by the "p_table_name" field. It uses native dynamic SQL to
204: -- bulk insert records using binding tables.
205: -- p_table_name must be a view on top of cn_imp_lines
206: --
207: -- The "p_col_names" field contains a collection of the column names.
208: -- The "p_data" contains all data needed to be inserted, assuming all data
209: -- types are "VARCHAR2". For example, if the data to be inserted are the
246: L_FULL_NAME CONSTANT VARCHAR2(60) := G_PKG_NAME ||'.'|| L_API_NAME;
247:
248: --
249: -- "FORALL i IN 1 .. :row_count
250: -- INSERT INTO CN_IMP_LINES"
251: --
252: l_tab_name_clause VARCHAR2(8000) := 'BEGIN FORALL i IN 1 .. :row_count
253: INSERT INTO ';
254:
435: -- Build sequence collection
436: -- initialize "l_prim_keys" table
437: l_prim_keys.EXTEND(p_row_count, 1);
438: FOR i IN 1 .. p_row_count LOOP
439: SELECT CN_IMP_LINES_S.NEXTVAL
440: INTO l_prim_keys(i) FROM dual;
441: END LOOP;
442:
443: cn_message_pkg.debug('Insert Data : Start insert into DB');
1253: l_date DATE := SYSDATE;
1254: l_user_id NUMBER := FND_GLOBAL.User_ID;
1255: l_login_id NUMBER := FND_GLOBAL.Login_ID;
1256: l_objvernum NUMBER := 1;
1257: l_status cn_imp_lines.status_code%TYPE := 'STAGE';
1258:
1259: BEGIN
1260:
1261: IF p_col_count >= G_COL_NUM THEN