|
|
|
|
|
|
|
Re: how to call database package from oracle 6i forms [message #582967 is a reply to message #582921] |
Tue, 23 April 2013 23:21 ![Go to previous message Go to previous message](/forum/theme/orafaq/images/up.png) |
![](//www.gravatar.com/avatar/71e7ed14bc76446bef38666d8e833174?s=64&d=mm&r=g) |
sameer_da
Messages: 74 Registered: April 2013 Location: India
|
Member |
|
|
Hii Michel,
Now i got it. Its my query
CREATE OR REPLACE PACKAGE PK_EXCEL_TO_DB IS
TYPE tKeyValue IS RECORD (V_ROUTE VARCHAR2(255),
ROUTE_VAL VARCHAR2(4000));
TYPE tDataList IS TABLE OF tKeyValue;
PROCEDURE PR_DO_INSERT(i_lData IN tDataList);
END;
CREATE OR REPLACE PACKAGE BODY PK_EXCEL_TO_DB IS
PROCEDURE PR_DO_INSERT(i_lData IN tDataList) IS
COL_NAME VARCHAR2(32000);
COL_VALUE VARCHAR2(32000);
BEGIN
FOR i IN 1..i_ldata.COUNT LOOP
COL_NAME :=COL_NAME || ',' || i_ldata(i).COL_NAME ;
COL_VALUE:=COL_VALUE|| ',''' || i_ldata(i).COL_VALUE || '''';
END LOOP;
EXECUTE IMMEDIATE 'INSERT INTO ROUTE_DTL (' || SUBSTR(COL_NAME, 2) || ') VALUES (' || SUBSTR(COL_VALUE,2) || ')';
END;
END;
[Updated on: Wed, 24 April 2013 07:58] by Moderator Report message to a moderator
|
|
|