Insert value from an interanal table to a table in word

dear all
can anyone tell me how to insert the data from an internal table to the table created in word, i can insert data to the table of word by hard coding it,but finally the data has to come from an internal table, im using OLE concept so code related to that will be highly appreciated. the functionality is the same as ALV gives to excel download,but just in my case it has to be in word,
please help me i m in real need
Regards
Swarnali

Hi
If they have the same structure u can use a do cycle:
LOOP AT ITAB_NORMAL.
   DO.
     ASSIGN COMPONENT SY-INDEX OF STRUCTURE ITAB_NORMAL TO <VALUE_FROM>.
     IF SY-SUBRC NE 0. EXIT. ENDIF.
     ASSIGN COMPONENT SY-INDEX OF STRUCTURE <DYN_WA> TO <VALUE_TO>.
    <VALUE_TO> = <VALUE_FROM>.
   ENDDO.
   APPEND <DYN_WA> TO <DYN_TABLE>.
ENDLOOP.
If the dynamic table has only certain fields of ITAB_NORMAL, I suppose u have an internal table with the fields of dynamic table (u should use it to generate the dynamic table) so u can loop it instead of DO/ENDO cycle
LOOP AT ITAB_NORMAL.
   LOOP AT ITAB_FIELD.
     ASSIGN COMPONENT ITAB_FIELD-FIELDNAME OF STRUCTURE ITAB_NORMAL TO <VALUE_FROM>.
     ASSIGN COMPONENT ITAB_FIELD-FIELDNAME OF STRUCTURE <DYN_WA> TO <VALUE_TO>.
    <VALUE_TO> = <VALUE_FROM>.
   ENDLOOP.
   APPEND <DYN_WA> TO <DYN_TABLE>.
ENDLOOP.
Anyway u can find out many solutions in SCN, there are many posts with your problem
Max

Similar Messages

Logic for inserting values from Pl/sql table

Hi I'm using Forms 6i and db 10.2.0.1.0
I am reading an xml file using text_io, and extracting the contents to Pl/sql table.
Suppose, the xml
<?xml version="1.0" encoding="UTF-8" ?>
<XML>
<File name="S2_240463.201002170044.Z">
<BookingEnvelope>
<SenderID>KNPROD</SenderID>
<ReceiverID>NVOCC</ReceiverID>
<Password>TradingPartners</Password>
</BookingEnvelope>
</File>
</XML>From this xml, i'm extracting contents to a table of records, say bk_arr, which look like
Tag                             Val
File name                     S2_240463.201002170044.Z
SenderID                     KNPROD
ReceiverID                   NVOCC
Password                     TradingPartnersAnd now from this i've to insert into table, say bk_det .
The tag may come in different order, sometimes some additional tags may also come in between,
So i cannot access it sequentially and insert like
Insert into bk_det(file,sndr,rcvr,pswd) values(bk_arr(1).val,bk_arr(2).val....)
The tag name is constant ir for sender id, it will always be SenderID , not something like sndrid or sndid etc..
So if i've to insert to senderid column, then i've to match the tag = SenderID, and take the value at that index in the array.
How best i can do this?
Thanks

I am referring to how you are parsing the XML - as you can extract values from the XML by element name. And as the name is known, it's associated value can be inserted easily.
Basic example:
SQL> with XML_DATA as(
2          select
3                  xmltype(
4 '<?xml version="1.0" encoding="UTF-8" ?>
5 <XML>
6          <File name="S2_240463.201002170044.Z">
7                  <BookingEnvelope>
8                          <SenderID>KNPROD</SenderID>
9                          <ReceiverID>NVOCC</ReceiverID>
10                          <Password>TradingPartners</Password>
11                  </BookingEnvelope>
12          </File>
13 </XML>'         )       as XML_DOM
14          from    dual
15 )
16 select
17          extractValue( xml_dom, '/XML/File/@name' )                      as FILENAME,
18          extractValue( xml_dom, '/XML/File/BookingEnvelope/SenderID' )   as SENDER_ID,
19          extractValue( xml_dom, '/XML/File/BookingEnvelope/ReceiverID' ) as RECEIVER_ID,
20          extractValue( xml_dom, '/XML/File/BookingEnvelope/Password' )   as PASSWORD
21 from       xml_data
22 /
FILENAME                  SENDER_ID RECEIVER_I PASSWORD
S2_240463.201002170044.Z KNPROD     NVOCC      TradingPartners
SQL> Now this approach can be used as follows:
create or replace procedure AddFile( xml varchar2 ) is
begin
        insert into foo_files(
                filename,
                sender_id,
                receiver_id,
                password
        with XML_DATA as(
                select
                        xmltype( xml ) as XML_DOM
                from    dual
        select
                extractValue( xml_dom, '/XML/File/@name' ),
                extractValue( xml_dom, '/XML/File/BookingEnvelope/SenderID' ),
                extractValue( xml_dom, '/XML/File/BookingEnvelope/ReceiverID' ),
                extractValue( xml_dom, '/XML/File/BookingEnvelope/Password' )
        from    xml_data;
end;
/No need for a fantasy called PL/SQL "+tables+".

How can I insert values from table object into a regular table

I have a table named "ITEM", an object "T_ITEM_OBJ", a table object "ITEM_TBL" and a stored procedure as below.
CREATE TABLE ITEM
ITEMID VARCHAR2(10) NOT NULL,
PRODUCTID VARCHAR2(10) NOT NULL,
LISTPRICE NUMBER(10,2),
UNITCOST NUMBER(10,2),
SUPPLIER INTEGER,
STATUS VARCHAR2(2),
ATTR1 VARCHAR2(80),
ATTR2 VARCHAR2(80),
ATTR3 VARCHAR2(80),
ATTR4 VARCHAR2(80),
ATTR5 VARCHAR2(80)
TYPE T_ITEM_OBJ AS OBJECT
ITEMID VARCHAR2(10),
PRODUCTID VARCHAR2(10),
LISTPRICE NUMBER(10,2),
UNITCOST NUMBER(10,2),
SUPPLIER INTEGER,
STATUS VARCHAR2(2),
ATTR1 VARCHAR2(80),
ATTR2 VARCHAR2(80),
ATTR3 VARCHAR2(80),
ATTR4 VARCHAR2(80),
ATTR5 VARCHAR2(80)
TYPE ITEM_TBL AS TABLE OF T_ITEM_OBJ;
PROCEDURE InsertItemByObj(p_item_tbl IN ITEM_TBL, p_Count OUT PLS_INTEGER);
When I pass values from my java code through JDBC to this store procedure, how can I insert values from the "p_item_tbl" table object into ITEM table?
In the stored procedure, I wrote the code as below but it doesn't work at all even I can see values if I use something like p_item_tbl(1).itemid. How can I fix the problem?
INSERT INTO ITEM
ITEMID,
PRODUCTID,
LISTPRICE,
UNITCOST,
STATUS,
SUPPLIER,
ATTR1
) SELECT ITEMID, PRODUCTID, LISTPRICE,
UNITCOST, STATUS, SUPPLIER, ATTR1
FROM TABLE( CAST(p_item_tbl AS ITEM_TBL) ) it
WHERE it.ITEMID != NULL;
COMMIT;
Also, how can I count the number of objects in the table object p_item_tbl? and how can I use whole-loop or for-loop to retrieve values from the table object?
Thanks.

Sigh. I answered this in your other How can I convert table object into table record format?.
Please do not open multiple threads. It just confuses people and makes the trreads hard to follow. Also, please remember we are not Oracle employees, we are all volunteers here. We answer questions if we can, when we can. There is no SLA so please be patient.
Thank you for your future co-operation.
Cheers, APC

While inserting values from a xml file into the database.

Dear Forum Members,
While using Samp10.java (given in XSU!2_ver1_2_1/oracleXSU12/Sample)for inserting values from xml file Sampdoc.xml into database table xmltest_tab1,the error shown below appears on the DOS prompt.
The code for sam10 is:
import oracle.xml.sql.dml.*;
import java.sql.*;
import oracle.jdbc.driver.*;
import oracle.jdbc.*;
import java.net.*;
public class samp10
public static void main(String args[]) throws SQLException
String tabName = "xmltest_tab1";
String fileName = "sampdoc.xml";
try{
Class.forName("sun.jdbc.odbc.JdbcOdbcDriver");
Connection conn=DriverManager.getConnection("jdbc:odbc:BookingSealinerScott","scott","tiger");
OracleXMLSave sav = new OracleXMLSave(conn, tabName);
URL url = sav.createURL(fileName);
int rowCount = sav.insertXML(url);
System.out.println(" successfully inserted "+rowCount+
" rows into "+ tabName);
conn.close();
}catch (Exception e){e.printStackTrace();}
The Structure of Sampdoc.xml is:
<?xml version="1.0"?>
<ROWSET>
<ROW num="1">
<EMPNO>7369</EMPNO>
<ENAME>SMITH</ENAME>
<JOB>CLERK</JOB>
</ROW>
<ROW num="2">
<EMPNO>7499</EMPNO>
<ENAME>ALLEN</ENAME>
<JOB>SALESMAN</JOB>
</ROW>
<ROW num="3">
<EMPNO>7521</EMPNO>
<ENAME>WARD</ENAME>
<JOB>SALESMAN</JOB>
</ROW>
</ROWSET>
Description of table xmltest_tab1 is:
SQL> desc xmltest_tab1;
Name Null? Type
EMPNO NUMBER(4)
ENAME CHAR(10)
JOB VARCHAR2(9)
Error Displayed is:
A nonfatal internal JIT (3.00.078(x)) error 'Structured Exception(c0000005)' has
occurred in :
'oracle/xml/sql/dml/OracleXMLSave.cleanLobList ()V': Interpreting method.
Please report this error in detail to http://java.sun.com/cgi-bin/bugreport.cgi
oracle.xml.sql.OracleXMLSQLException: sun.jdbc.odbc.JdbcOdbcConnection
at oracle.xml.sql.dml.OracleXMLSave.saveXML(OracleXMLSave.java:1967)
at oracle.xml.sql.dml.OracleXMLSave.saveXML(OracleXMLSave.java:1880)
at oracle.xml.sql.dml.OracleXMLSave.insertXML(OracleXMLSave.java:1013)
at samp10.main(samp10.java:36)
Press any key to continue . . .
Please send me the solution as soon as possible.
Thanks,
Waiting for your Reply,
Bye,
Vineet Choudhary
Email id: [email protected]
null

Go and read about JDBC. You need to know some basics before asking such a st&*id questions.
Paul

How to insert data from different internal table into a data base table

hi all,
I want to insert a particular field in an internal table to a field in a data base table.Note that the fields in the internal table and database table are not of the same name since i need to insert data from different internal tables.can some one tell me how to do this?
in short i want to do something like the foll:
INSERT INTO ZMIS_CODES-CODE VALUE '1'.
*INSERT INTO ZMIS_CODES-COL1 VALUE DATA_MTD-AUFNR .(zmis_codes is the db table and data_mtd is the int.table)

REPORT ZINSERT.
tables kna1.
data: itab LIKE KNA1.
data lv_kUNAG LIKE KNA1-KUNNR.
lv_kuNAG = '0000010223'.
ITAB-kuNNR = lv_kuNAG.
ITAB-name1 = 'XYZ'.
INSERT INTO KNA1 VALUES ITAB.
IF SY-SUBRC = 0.
WRITE:/ 'SUCCESS'.
ELSE.
WRITE:/ 'FAILED'.
ENDIF.
Here lv_kunag is ref to kna1 kunnr passed in different name
In internal table .
Try and let me know if this logic dint work.

The best way to insert values in a Nested Table

Hi!
I want to insert values from a SQL-query in a Nested Table.What's the best way to do it?
In addition,the only way that I've found is doing a query and when I've got the query result I insert it into the Nested Table.For instance:
FOR cur_row IN (SELECT id,nstreet from example Where id=3) LOOP
--here I'm inserting the values of the query in the nested table.
-- VarNestedTable is a Nested Table of Row_Type.
--Row_Type is an object with two fields:Id,Nstreet
VarNestedTable.extend;
VarNestedTable(Coincidents.Last):= Row_type(cur_row.id,cur_row.nstreet);
END LOOP;

How to Use Tables: Creating a Table Model.
very bad example:
class DataObject {
String name, age, numberOfMonkeys;
class DOTableModel extends AbstractTableModel {
final String[] COLUMN_HEADER = { "Name", "Age", Monkeys" };
List dataObjects;
public String getColumnName(int column) {
     return COLUMN_HEADER[ column ];
public int getRowCount() {
    return dataObjects.size();
public int getColumnCount() {
     return COLUMN_HEADER.size();
public Object getValueAt(int row, int column) {
     DataObject do = dataObject.get( row );
     switch( column ) {
       case 0: return do.name;
       case 1: return do.age;
       case 2: return do.numberOfMonkeys;
}

Retrieve values from a HTML table !!!

Hi.
How can i retrieve values from a HTML table using javascript ?
I´m trying to use the command "document.getElementsByTagName" without success.
Thanks in advance.
Eduardo

Hi, Deepu.
I´m still with trouble in retrieving the value in HTML.
In debug the C_CELL_ID seems to be correctly updated but
when using the command "document.getElementById" the value is always "null".
I implemented in the method DATA_CELL the code :
if i_x = 3 and i_y = 2.
C_CELL_ID = 'zs'.
C_CELL_CONTENT = 10.
endif.
And in HTML :
var ztest = document.getElementById('zs');
alert(ztest);
Could you help me please.
Many regards
Eduardo S.
Message was edited by: Eduardo Silberberg

Distinct values from dynamic internal tabls

Hi All,
I have a dynamic internal tables like <dy_table> , i want to get distinct values from this internal tables,
how to do that, structure of dynamic internal tables is dynamic acc. to user conditions.
regards,
Anuj

Hi Anuj
Just try this,
CALL METHOD cl_alv_table_create=>create_dynamic_table
EXPORTING
it_fieldcatalog = tb_fields_for_it
IMPORTING
ep_table = gp_dyn_table.
ASSIGN gp_dyn_table->* TO <gt_table>.
ASSIGN LOCAL COPY OF INITIAL LINE OF <gt_table> TO <fs_table>.
LOOP AT tb_output.
*To assign value for serial number.
ASSIGN COMPONENT 1 OF STRUCTURE <fs_table> TO <ls_field>.
<ls_field> = tb_output-sno.
UNASSIGN <ls_field>.
*To assign value for Sales Organization.
ASSIGN COMPONENT 2 OF STRUCTURE <fs_table> TO <ls_field>.
<ls_field> = tb_output-vkorg.
UNASSIGN <ls_field>.
*To assign Rate for its respective Condition type.
LOOP AT tb_konp WHERE knumh = tb_output-knumh.
READ TABLE tb_fieldcat1 WITH KEY fieldname = tb_output-kschl.
IF sy-subrc EQ 0.
lv_count = tb_fieldcat1-col_pos.
ASSIGN COMPONENT lv_count OF STRUCTURE <fs_table> TO <ls_field>.
IF tb_konp-konwa EQ '%'.
tb_konp-kbetr = tb_konp-kbetr / co_10.
<ls_field> = tb_konp-kbetr.
ELSE.
<ls_field> = tb_konp-kbetr.
ENDIF.
ENDIF.
ENDLOOP.
lv_count = lv_count + 1.
APPEND <fs_table> TO <gt_table>.
CLEAR <fs_table>.
ENDLOOP.
Hope this proves helpful to you.

How to retrieve the values from PL/SQL table types.

Hi Every one,
I have the following procedure:
DECLARE
TYPE t1 IS TABLE OF emp%ROWTYPE
INDEX BY BINARY_INTEGER;
t t1;
BEGIN
SELECT *
BULK COLLECT INTO t
FROM emp;
END;
This procedure works perfectly fine to store the rows of employee in a table type. I am not able to retrieve the values from Pl/SQL table and display it using dbms_output.put_line command.
Can anybody help me please!!!!!
Thanks
Ahmed.

You mean, you can't add this
for i in t.first..t.last loop
dbms_output.put_line(t(i).empno||' '||t(i).ename||' '||t(i).job);
end loop;or you can't add this
set serveroutput onor maybe, you are working in third party application where dbms_output is not applicable at all?
You see, not able like very similar it is not working - both are too vague...
Best regards
Maxim

How to Insert data from notepad to Table

Hi,
I have one table with nodata.i need to insert data into table.but i have records in one notepad.if i enter manually
like using insert statement it will take more time.
Any one know insert data from notepad to table or i need sql script that will use for all the records.Here im using sqldeveloper.

Hi dude,
We can use below 2 types.
1) Sql loader
2) utl file
SQL*Loader utility?
One can load data into an Oracle database by using the sqlldr (sqlload on some platforms) utility. Invoke the utility without arguments to get a list of available parameters. Look at the following example:
sqlldr username@server/password control=loader.ctl
sqlldr username/password@server control=loader.ctlThis sample control file (loader.ctl) will load an external data file containing delimited data:
load data
infile 'c:\data\mydata.csv'
into table emp
fields terminated by "," optionally enclosed by '"'
( empno, empname, sal, deptno )
{code}
The mydata.csv file may look like this:
{code}
10001,"Scott Tiger", 1000, 40
10002,"Frank Naude", 500, 20
{code}
Optionally, you can work with tabulation delimited files by using one of the following syntaxes:
{code}
fields terminated by "\t"
fields terminated by X'09'
{code}
Additionally, if your file was in Unicode, you could make the following addition.
{code}
load data
CHARACTERSET UTF16
infile 'c:\data\mydata.csv'
into table emp
fields terminated by "," optionally enclosed by '"'
( empno, empname, sal, deptno )Another Sample control file with in-line data formatted as fix length records. The trick is to specify "*" as the name of the data file, and use BEGINDATA to start the data section in the control file:
load data
infile *
replace
into table departments
( dept     position (02:05) char(4),
    deptname position (08:27) char(20)
begindata
COSC COMPUTER SCIENCE
ENGL ENGLISH LITERATURE
MATH MATHEMATICS
POLY POLITICAL SCIENCEPlease refer the below link.. it will useful for you.
http://psoug.org/reference/sqlloader.html
http://docs.oracle.com/cd/B10500_01/server.920/a96652/ch05.htm
Regards,
N.Senthil.

How to retrieve a column field value from an ADF table ?

All,
I have a backing bean where I have bounded a field of an ADF table.
I would like, in the bean, to read the value of that field so that I can use it inside a task flow router.
The question: how to read a value from a ADF table column field ?
In the bean I have the getter and setter of the RichInputText ADF table field. But when I type:
System.out.println("the name is: " + this.getName().getValue());
or
System.out.println("the name is: " + this.Name().getValue());
I get a null pointer exception.
Thanks in advance,
Sergio.

Thanks Marvin, but this is not really what I'm looking for. Or at least, it does not sounds like to be :)
I need to get the value contained in a row cell of an ADF table.
Let's say the table (two rows, three cells) contains these values:
"table_A", "123", "John"
"table_B", "456", "Peter"
When I click on the first row, I need the value: "table_A". Once I got that value, I extract the last char, in this case: "A", and then I call a specific task flow from a task flow router (specified in the task flow router Cases property).
When I click on the second row, the same process applies, only the router now points to another flow view.
So to summarize, I need to get the value of a row cell in an ADF table. How to do that from within a javaBean in JDeveloper 11g Release 2 ?
This is what I have in the bean; so far I've bounded the related row cell (herkunft) to the bean. Each time I select a row on the ADF table, the function setHerkunft() runs - I see that from within the JDeveloper console - but when I try to get its value, I get a null value - hence the surrounding if statement.
package bean;
import javax.faces.component.UIComponent;
import javax.faces.context.FacesContext;
import javax.faces.event.ValueChangeEvent;
import oracle.adf.view.rich.component.rich.input.RichInputText;
+public class taskFlowBean {+
public RichInputText herkunft;
public static String taskFlowView = "C";
+public taskFlowBean() {+
System.out.println("taskFlowBean constructor call");
+}+
+public void setHerkunft(RichInputText herkunft) {+
System.out.println("set herkunft");
this.herkunft = herkunft;
if (this.getHerkunft().getValue() != null )
System.out.println("herkunft is: " + this.getHerkunft().getValue());
+//here taskFlowView will set accordingly with the herkunft value.+
+}+
+public RichInputText getHerkunft() {+
System.out.println("get herkunft");
return herkunft;
+}+
+public String getTaskFlowView() {+
System.out.println("get taskFlowView ! : " this.taskFlowView);+
return this.taskFlowView;
+}+
+}+
Regards,
Sergio.

List rows with a certain value from a different table?

Hi,
I'm trying to list certain rows from a different table. Similar to the filter feature, kind of like a report.
To be specific, I have 12 tables (Jan-Dec) with many entries each (as rows). Each row has a date, text and further data. Now I want to create an additional table that lists rows from the other tables that have a certain date.
I would like to just enter that date in a header row cell so I can make a quick query. Using LOOKUP only shows the first row of that date. Is that even possible?

Hi papalapapp,
If you don't mind using a script, you're using Numbers 3, and all of your monthly tables are on the same sheet, then you could do something like this:
Copy-paste script to Script Editor
Enter date you want to filter on in the designated filterCell (here A1 of the Extract table). Make sure it is formatted exactly like the dates in the monthly tables.
Clear any existing values from the Extract table, and make sure there are enough blank rows.
Click the run button in Script Editor.
SG
property targetTable : "Extract"
property filterCell : "A1"
tell application "Numbers"
tell document 1's active sheet
set dateFilter to table targetTable's cell filterCell's formatted value
--get all data in tables (excluding Extract table)
set vv to {}
repeat with t in tables
if t's name is not targetTable then
set vv to vv & t's rows's cells's formatted value
end if
end repeat
--filter data
set vvFilt to {}
repeat with i from 1 to vv's length
if vv's item i's item 1 is dateFilter then
set vvFilt to vvFilt & {vv's item i}
end if
end repeat
--write filtered data to table
tell table targetTable
repeat with r from 1 to (vvFilt's length)
repeat with c from 1 to vvFilt's item 1's length
set row (r + 1)'s cell c's value to vvFilt's item r's item c
end repeat
end repeat
end tell
end tell
end tell

Can COPA pull values from material classification tables

Hi All,
I know COPA can pull values from standard SAP tables like material master tables (e.g. MARA) but can it also pull values from material classification table(s)?
Your help is greatly appreciated,
Points will be rewarded

Hi Kati,
In order to derive CO-PA chars from material classification view for a
specific material value you have to implement the CO-PA derivation exit
(include ZXKKEU11) accordingly. It's indeed table AUSP from which you
can get the corresponding value (field ATWRT) for each classifying
attribute (field ATINN). In order to find out the field name for each
ATINN number (so that the mapping to corresponding CO-PA chars can be
done in a sensible way) you have to select additionally the ATNAM value
from table CABN (for given ATINN number).
BR,
MLM

Inserting values from a PL SQL table to a database table

Hi,
Here is my dilemma.
I have values inserted to a pl sql table which I have gathered from a web page. Now I need to add these same values to a database table. I see the values as 1-'AA', 2='BB' etc.
I use the following code to insert to a outside table in the database and it seems to be crashing.
for i in app_table.first .. app_table.last loop
r_convention(i).priority_country_code:=app_table(i);
insert into test_countries
values (test_seq,tion(i).r_convention(i).priority_country_code);
commit;
end loop;
WHen I run this code I see the values. But it goes to the first value and then crashes and does not go through the
rest of the values. What am I missing here?
Thanks!

Hi,
Why can't you directly insert into the table from the object type....
for i in app_table.first .. app_table.last loop
r_convention(i).priority_country_code:=app_table(i);
insert into test_countries
values (test_seq,app_table(i));
commit;
end loop;Can you give me your complete code, so that we can have a better picture..
Edited by: plsql dev on Sep 10, 2010 10:14 PM

Inserting values from a cursor to a table

Hi,
I need to insert the values from a cursor into a table,this i the part of code which trieds to do it...i get error stating "select stmt missing"...pls help out...
OPEN p_cursor for V_SQLSTATEMENT;
        ---for i in p_cursor
        LOOP
          FETCH p_cursor INTO v_cursor_type;
          insert into TEMPCHARTVALUES(HOP,AMOUNT,EFFECTIVE_FROM,EFFECTIVE_TO,CURRENCY)
               values (v_cursor_type.PMC1_HOP_CODE,
                     v_cursor_type.PMC1_Amount,
                     v_cursor_type.PMC1_EFFECTIVE_FROM,
                     v_cursor_type.PMC1_EFFECTIVE_UPTO,
                     v_cursor_type.PMC1_CURRENCY);
                                                       --dbms_output.put_line(v_cursor_type.KEYCODE1);
          EXIT WHEN p_cursor%ROWCOUNT = v_REC_COUNT;
          end loop;

Hi, here it is..
create or replace
procedure prm_sp_charts_db (P_CURSOR OUT SYS_REFCURSOR,CHARTCode VARCHAR,tablename varchar)
IS
v_COUNT varchar2(200);
v_REC_COUNT NUMBER;
V_SQLSTATEMENT VARCHAR2(2000);
v_cursor_type TEMPCHARTVALUES%ROWTYPE;
    begin
     v_COUNT:='SELECT COUNT(*) FROM PRM_M_Chart_' || CHARTCode;
     execute immediate v_COUNT into v_REC_COUNT;
     V_SQLSTATEMENT := 'SELECT ';
     V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F1_CODE Keycode1,';
      open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F2_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F2_CODE Keycode2,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F3_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F3_CODE Keycode3,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
       open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F4_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F4_CODE Keycode4,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F5_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F5_CODE Keycode5,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F6_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F6_CODE Keycode6,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F7_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F7_CODE Keycode7,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F8_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F8_CODE Keycode8,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F9_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F9_CODE Keycode9,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      --open P_CURSOR for select column_name from user_tab_columns where table_name=tablename and column_name='PMC' || CHARTCode || '_F10_CODE';
      IF P_CURSOR%FOUND then
      V_SQLSTATEMENT := V_SQLSTATEMENT || 'PMC' || CHARTCode || '_F10_CODE Keycode10,';
      else
      V_SQLSTATEMENT := V_SQLSTATEMENT || '0,';
      END IF;
      V_SQLSTATEMENT := V_SQLSTATEMENT ||'PMC' || CHARTCode || '_HOP_CODE HOPCode,PMC' || CHARTCode || '_AMOUNT ,PMC'|| CHARTCode || '_EFFECTIVE_FROM Effective_From,PMC' || CHARTCode || '_EFFECTIVE_UPTO Effective_Upto,PMC' || CHARTCode || '_CURRENCY Currency FROM PRM_M_CHART_' || CHARTCode ;
      DBMS_OUTPUT.PUT_LINE(V_SQLSTATEMENT);
       OPEN p_cursor for V_SQLSTATEMENT;
        ---for i in p_cursor
        LOOP
          FETCH p_cursor INTO v_cursor_type;
          insert into TEMPCHARTVALUES(HOP,AMOUNT,EFFECTIVE_FROM,EFFECTIVE_TO,CURRENCY)
               values (v_cursor_type.PMC1_HOP_CODE,
                     v_cursor_type.PMC1_Amount,
                     v_cursor_type.PMC1_EFFECTIVE_FROM,
                     v_cursor_type.PMC1_EFFECTIVE_UPTO,
                     v_cursor_type.PMC1_CURRENCY);
                                                       --dbms_output.put_line(v_cursor_type.KEYCODE1);
          EXIT WHEN p_cursor%ROWCOUNT = v_REC_COUNT;
          end loop;
end prm_sp_charts_db;

Insert value from an interanal table to a table in word

Similar Messages

Maybe you are looking for