Is it possible to insert data from a .txt file onto a form list?

Hello everyone i have a question and really hope someone can help me out...
I have made a form list in acces but now i want the option to insert data from a .txt automatically to that list in shaprepoint.. is this possible????
* I forgot to say that i cannot use any third party software or powershell becauseof the limitations that i have in the comapny..

If it's in Access, than you can consider linking this to your SharePoint List. I'm not sure what sort of options you'll have with just a text file.
You might consider replacing that text file with an Excel Sheet and uploading it to the list with this Excel add-in
http://www.microsoft.com/en-us/download/details.aspx?id=9345
Steven Andrews
SharePoint Business Analyst: LiveNation Entertainment
Blog: baron72.wordpress.com
Twitter: Follow @backpackerd00d
My Wiki Articles:
CodePlex Corner Series
Please remember to mark your question as "answered" if this solves (or helps) your problem.

Similar Messages

Populate a table reading the data from a TXT file

how can I populate a table reading the data from a TXT file?
thanks

Hey Kevin!
Using FORMS.TEXT_IO to bulk load data from a file strikes me as re-inventing the wheel. It is just about justifiable in a self-service environment, but I regard the EXTERNAL TABLE is a better solution for that situation as well.
The same applies to UTL_FILE. I think the ability to read text with UTL_FILE is primarily intended for read file-based configuration or file manipulation/processing rather than data loading.
Re-writing a text file into SQL statements is too much like hard work (even with an editor that supports macro definition and regular expressions) for no real benefit. You lose all the bulk load peformance you would get from SQL*Loader. But for QAD I'd probably let you off with it.
You missed out one obvious alternative: using Java to turn the contents of an XML file into a CLOB and inserting it into a table which is read by a PL/SQL procedure that parses the XML records and insert the retrieved data into a table.
Stay lucky, APC

I have a VI and an attched .txt data file. Now I want to read the data from the .txt file and display it as an array in the front panel. But the result is not right. Any help?

I have a VI and an attched .txt data file. Now I want to read the data from the .txt file and display it as an array in the front panel. But the result is not right. Any help?
Attachments:
try2.txt ‏2 KB
read_array.vi ‏21 KB

The problem is in the delimiters in your text file. By default, Read From Spreadsheet File.vi expects a tab delimited file. You can specify a delimiter (like a space), but Read From Spreadsheet File.vi has a problem with repeated delimiters: if you specify a single space as a delimiter and Read From Spreadsheet File.vi finds two spaces back-to-back, it stops reading that line. Your file (as I got it from your earlier post) is delimited by 4 spaces.
Here are some of your choices to fix your problem.
1. Change the source file to a tab delimited file. Your VI will then run as is.
2. Change the source file to be delimited by a single space (rather than 4), then wire a string constant containing one space to the delimiter input of Read From Spreadsheet File.vi.
3. Wire a string constant containing 4 spaces to the delimiter input of Read From Spreadsheet File.vi. Then your text file will run as is.
Depending on where your text file comes from (see more comments below), I'd vote for choice 1: a tab delimited text file. It's the most common text output of spreadsheet programs.
Comments for choices 1 and 2: Where does the text file come from? Is it automatically generated or manually generated? Will it be generated multiple times or just once? If it's manually generated or generated just once, you can use any text editor to change 4 spaces to a tab or to a single space. Note: if you want to change it to a tab delimited file, you can't enter a tab directly into a box in the search & replace dialog of many programs like notepad, but you can do a cut and paste. Before you start your search and replace (just in the text window of the editor), press tab. A tab character will be entered. Press Shift-LeftArrow (not Backspace) to highlight the tab character. Press Ctrl-X to cut the tab character. Start your search and replace (Ctrl-H in notepad in Windows 2000). Click into the Find What box. Enter four spaces. Click into the Replace With box. Press Ctrl-V to paste the tab character. And another thing: older versions of notepad don't have search and replace. Use any editor or word processor that does.

What is the 'quickest' way to read char data from a txt file

Hello,
What is the 'quickest' way to read character data from a txt file stored on the phone to be displayed into the screen?
Regards

To be even a bit more constructive...
Since J2me does not have a BufferedInputStream, it will help to implement it yourself. It's much faster since you read large blocks at ones in stread of seperate chars.
something line this lets you read lines very fast:
while ( bytesread < filesize ) {
         length = configfile.read( buff, 0, buff.length );
         // append buffer to temp String
         if ( length < buff.length ) {
            byte[] buf = new byte[length];
            System.arraycopy( buff, 0, buf, 0, length );
            tmp.append( new String( buf ) );
         } else {
            tmp.append( new String( buff ) );
         // look in tmp string for \r\n
         idx1 = tmp.toString().indexOf( "\r\n" );
         while ( idx1 >= 0 ) {
            //if found, split into line and rest of tmp
            line = tmp.toString().substring( 0, idx1 );
         /// ... do with it whatever you want ... ////
            tmp = new StringBuffer( tmp.toString().substring( idx1 + 2 ) );
            idx1 = tmp.toString().indexOf( "\r\n" );
         bytesread += length;
      }

How to skip footer details when loading data from a .txt file

Hello experts,
i have to import data from a txt file into my database. I have skipped my header info by using SKIP but how can i ignore my footer details.
Thanks

Reply on your other thread:
Processing txt file for a required format

I can't read in a date from a txt file

Im not sure of the code needed to read in a date from the text file, this is an example of the text file:
1
2
2003
ie,
day
month year
I have to read in this date, this is the set method for the date:
public void setPurchaseDate (int d, int m, int y)
new Date(d,m,y);
And this is the code that I have tried using to readin the date:
PurchaseDate=(Integer.parseInt(line),Integer.parseInt(line),Integer.parseInt(line));now i know its wrong, I just dont know what the code should be!!
Cheers

ok, I am going to go through it and see what values I can and cant read in, here is the code i am trying to use:
private void addx()
       FileReader fin;
       int noBooks;
       int itemNum;
       String title;
       String subject;
       double costNew;
       double costPaid;
       String isbn;
       double sellingPrice = 0;
       int noAuthors;
       int day;
       int month;
       int year;
        String seperator = "#";
        Book[] book = new Book[9];
        try
            fin = new FileReader("Books.txt");
            BufferedReader buff = new BufferedReader(fin);
            String line = buff.readLine();
            int count= 0;
            //read in Number of books
            noBooks=Integer.parseInt(line);
            while( line != null)
                //Read in item number
                itemNum = Integer.parseInt(line);
                //Read in title
                title = buff.readLine();
                //Read in number of authors
                noAuthors=Integer.parseInt(line);
                //Read each line in as an author until number of authors reached
                ArrayList authors = new ArrayList();
                for(int i=0; i < noAuthors ; i++)
                    authors.add(buff.readLine());
                //Read in cost new
                costNew = Double.parseDouble(line);
                //Read in subject
                subject = buff.readLine();
                //Read in ISBN
                isbn = buff.readLine();
                //Read in purchase day
                day = Integer.parseInt(line);
                //Read in purchase month
                month=Integer.parseInt (line);
                //Read in purchase year
                year = Integer.parseInt (line);
                //Read in cost paid
                costPaid = Double.parseDouble(line);
                line = buff.readLine();
                //Pass date, month and year values to array
                Date purchaseDate =new Date(day,month,year);
                //Pass values to constructor
                if (line.equals(seperator))
                    book[count++] = new Book(itemNum, title, authors, subject, purchaseDate,costNew,costPaid,isbn, sellingPrice,noAuthors);
              // line = buff.readLine();
            System.out.println(book.toString());
        catch(Exception ex)
            System.out.println(ex.toString());
         }

How to Insert data from an XML file into an Oracle 10g table

Hello,
Please can you help me as I have hit a brick wall with this problem.
We are running version 10g Oracle and we will start receiving XML files with employee data that needs loading into a table, this is the XML file:
<?xml version="1.0"?>
<RECRUITS>
<RECRUIT>
<FIRST_NAME>Gordon</FIRST_NAME>
<LAST_NAME>Brown</LAST_NAME>
<SHORT_NAME>GORDONBROWN</SHORT_NAME>
<APP_NO>00002</APP_NO>
<STATUS>M</STATUS>
<DATE_FROM>21-JUL-2006</DATE_FROM>
<RESOURCE_TYPE>P</RESOURCE_TYPE>
<TITLE>Mr</TITLE>
<DATE_OF_BIRTH>28-DEC-1983</DATE_OF_BIRTH>
<SOCIAL_SEC>AB128456A</SOCIAL_SEC>
<PARTTIME_PCT>1</PARTTIME_PCT>
<SEX>M</SEX>
<ADDRESS_TYPE>1</ADDRESS_TYPE>
<ADDRESS>A HOUSE SOMEWHERE HERE</ADDRESS>
<ZIP_CODE>PE3 LLL</ZIP_CODE>
<PLACE>BOROUGH</PLACE>
<COUNTRY_CODE>UK</COUNTRY_CODE>
<PROVINCE>UK</PROVINCE>
<EMAIL>[email protected]</EMAIL>
</RECRUIT>
(FYI - there may be more than 1 employee in each file so all of the above will be repeated X amount of times)
</RECRUITS>
To make things simple we have created a table which mirrors the XML file completely to load the data into, the SQL i have used is thus:
CREATE TABLE RECRUITMENT
FIRST_NAME VARCHAR2(30),
LAST_NAME VARCHAR2(30),
SHORT_NAME VARCHAR2(30),
APP_NO NUMBER,
STATUS VARCHAR2(1),
DATE_FROM DATE,
RESOURCE_TYPE VARCHAR2(1),
TITLE VARCHAR2(4),
DATE_OF_BIRTH DATE,
SOCIAL_SEC VARCHAR2(9),
PARTTIME_PCT NUMBER,
SEX VARCHAR2(1),
ADDRESS_TYPE VARCHAR2(1),
ADDRESS VARCHAR2(30),
ZIP_CODE VARCHAR2(8),
PLACE VARCHAR2(10),
PROVINCE VARCHAR2(3),
EMAIL VARCHAR2(20)
Every method we try from the numerous documents and so called "user guides" have failed, please can somebody show me the PL/SQL i need to get this files data into the above table?
We need to be able to do this purely through SQL*PLUS as we hope - if we ever get it working manually to create a procuedure that will encapsulate everything so it can be run over and over again.
The XML file is sitting in the XMLDIR and is called REC.XML.
Please help : (

Hi, I have got some material for inserting data into oracle table from xml file, this might help you.
Create XML Document Table
create table XML_DOCUMENT_TABLE
FILENAME varchar2(64),
XML_DOCUMENT XMLTYPE
(This will be as per your record details).
Inserting record to Oracle Table
declare
XML_TEXT CLOB := '<smsnotification>
               <messageid> 256427844 </messageid>
          <protocolid> CO0NPS2KHQ </protocolid>
          <notifiedon> 1156123007416 </notifiedon>
          <status> 3PBI: Invalid </status>
<additionalinfo> Customer account not active </additionalinfo>
<carrierid> 1175 </carrierid>
</smsnotification>';
begin
insert into XML_DOCUMENT_TABLE values ('Receipt.xml',XMLTYPE(XML_TEXT));
end;
Select Statement
select extractValue(XML_DOCUMENT,'/smsnotification/messageid') Messageid,
extractValue(XML_DOCUMENT,'/smsnotification/status') Status,
extractValue(XML_DOCUMENT,'/smsnotification/carrierid') CarrierID
from XML_DOCUMENT_TABLE;

How to update a table AUTOMATICALY with data from a .txt file??

HI ,
I want to upload data which is in a notepad file and Create a table. This notepad file stores a string of datas. Here, the data comes in to the .txt file every second.
(The data is actually stored into the notepad file when a program is executed in Processing.js software)
Is it possible to do the following using APEX ? ?
1. This table has to be updated automatically once in 2 minutes (I want this completely automatic, no human intervention -- no update buttons)
2. A report is to be created in a apex application with this table, it should reflect the updates in the table every 2 minutes.
Is it possible?? give your ideas.. I want to do this soon for my engineering project :) Any help from you is appreciated. :)
Edited by: user13301695 on 28-Mar-2011 10:09

And how do you expect your database server to access a local file in your machine ?
Is the file accessible from outside your machine say inside a webserver folder so that some DB process can poll on the file ?
Or, is your DB server in the same machine where you have the text file ?
You will have to figure out the file acess part before automating user interaction or even auto-refreshing.

How to read data from a .txt file?

currently i'm under study on java
while need to extract data from a hyperterminal or .txt file
could any one help me in this problem.?
as in txt or .ht got their own overhead .( or what u call it. tt identify the file type)
so how to open it and read data one ah?
thanks all.

Here's a code snippet 4 u
String sInput = null;
FileInputStream sStream = new FileInputStream("yourTxtFile");
BufferedReader fileIn = new BufferedReader(new InputStreamReader(sStream));
while((sInput = fileIn.readLine()) != null){
System.out.println(sInput);
hope this help
*-)

How to read data from a .txt file in real time

Hi
I am running a fortran code which takes around 1 week to run and output data are continuously saved in .txt files. I want to display these data and plot it against time in labview.
Lets say I have a array of real numbers starting from 1.0 , and every 2-3 sec another number is added (output of code). So I dont want end-of-file-reached error in my program and also want program to wait until next data is updated in .txt file.
I tried to make a simple read_txt_file.vi, but I am getting problems in terms of continous reading. Help !! Help !!
Pl see the attached vi.
Thanx
PKJ
Attachments:
FileReader.vi ‏43 KB
labview.txt ‏18 KB

Hi PKJ,
I modified your VI and it seems to do what you asked, that is, display the data from a file as the data is being added.
Hope it helps!
Message Edited by Dynamik on 11-08-2005 04:32 PM
Message Edited by Dynamik on 11-08-2005 04:34 PM
When they give imbeciles handicap-parking, I won't have so far to walk!
Attachments:
FileReader.vi ‏52 KB

Importing data from a .txt file and have Acrobat create new pages

Hi everyone,
I've created a form in Acrobat 9 to be used as an invoice. I want to be able to import data from an excel spreadsheet or .txt file into all the form fields. I know that I can go Forms > Manage form Data > Import Data to import 1 record at a time, but say I have about 50 invoices to populate, is there a way to import all the records at once and have acrobat create a new invoice for each of the customer's records?
If there is a way, will it be compatible for Acrobat Reader users since this form will be used by someone who only has the Reader?
Really appreciate any help.

Sure.. this is what we use. "New Micro Right Click Tools"
http://www.nowmicro.com/rct/

Inserting records from a txt file to a database table

I would like to know how to insert records from a file (txt) to a database table through a java application?

[BufferedReader |http://java.sun.com/javase/6/docs/api/java/io/BufferedReader.html] and PreparedStatement
IO and JDBC

How to extract data from a .txt file & send it to a serial port automatically

Hi all
I'm a final yr B.Tech student. I am new to the entire LABVIEW thing. But i hear its really good. My dept. in collge has purchased labview & i'm tryng to use it
As i'm new to labview , i need help plz
" I want to open a .txt file (in my PC) & transmit all the contents of the file via serial (COM) port to an 89%! microcontroller. Also i want to read the feedback messages from the microcontroller thru the serial port & save it to the same file in the PC.All this must be done automatically. ie, no manual intervention after execution starts"
Kindly help me as i'm stuck here & unable to proceed further with my project

here is my 20min try without debugging (needs a rs232 and loopback connector )
use the probe and highlight the dataflow to see how it works.
as always: there are many ways to solve your problem
Greetings from Germany
Henrik
LV since v3.1
“ground” is a convenient fantasy
'˙˙˙˙uıɐƃɐ lɐıp puɐ °06 ǝuoɥd ɹnoʎ uɹnʇ ǝsɐǝld 'ʎɹɐuıƃɐɯı sı pǝlɐıp ǝʌɐɥ noʎ ɹǝqɯnu ǝɥʇ'
Attachments:
read write file to RS232.vi ‏69 KB

Possible to retrieve data from the backend using online interactive form ?

Hello All,
I am currently developing an online interactive form and in it, a textbox which allows user to search for employee data in the backend in the event that the default name is not correct. However, I noticed that in the proerty field of my interactiveform, there is only OnCheck and OnSubmit. Is it possible for me to make a search in the backend and have the results returned to my adobe form again ?
from
Kwok Wei

Hi Kwok Wei,
OnSubmit and OnCheck work in the same way. So if you need 2 buttons in your form then you can use both of these.
I have never tried passing parameters but you can define context attributes and assign values. Later these can be accessed from the onSubmit Method.
Regards,
Sangeeta

How to skip first record while inserting data from a flat file to BW system

Hi Experts,
In my project we have to upload flat file into a BW system. I have written a program and it is working fine.
Now we have got another requirement. The flat file will have a header record (first row). While uploading the flat file we have to skip this record. How I can do so?
The code is as below:
FORM upload1.
DATA : wf_title    TYPE string,
          lt_filetab TYPE filetable,
          l_separator TYPE char01,
          l_action    TYPE i,
          l_count     TYPE i,
          ls_filetab TYPE file_table,
          wf_delemt TYPE rollname,
          wa_fieldcat TYPE lvc_s_fcat,
          tb_fieldcat TYPE lvc_t_fcat,
          rows_read TYPE i,
          p_error   TYPE char01,
          l_file      TYPE string.
DATA: wf_object(30) TYPE c,
          wf_tablnm TYPE rsdchkview.
wf_object = 'myprogram'.
DATA i TYPE i.
DATA:
       lr_mdmt                TYPE REF TO cl_rsdmd_mdmt,
       lr_mdmtr               TYPE REF TO cl_rsdmd_mdmtr,
       lt_idocstate           TYPE rsarr_t_idocstate,
       lv_subrc               TYPE sysubrc.
TYPES : BEGIN OF test_struc,
           /bic/myprogram TYPE /bic/oimyprogram,
           txtmd   TYPE rstxtmd,
           END OF test_struc.
DATA :    tb_assum TYPE TABLE OF /bic/pmyprogram.
DATA: wa_ztext TYPE /bic/tmyprogram,
        myprogram_temp TYPE ziott_assum,
        wa_myprogram TYPE /bic/pmyprogram.
DATA : test_upload TYPE STANDARD TABLE OF test_struc,
         wa2 TYPE test_struc.
DATA : wa_test_upload TYPE test_struc,
         ztable_data TYPE TABLE OF /bic/pmyprogram,
         ztable_text TYPE TABLE OF /bic/tmyprogram,
         wa_upld_text TYPE /bic/tmyprogram,
         wa_upld_data TYPE /bic/pmyprogram,
          t_assum TYPE ziott_assum.
DATA : wa1 LIKE test_upload.
wf_title = text-026.
CALL METHOD cl_gui_frontend_services=>file_open_dialog
    EXPORTING
      window_title            = wf_title
      default_extension       = 'txt'
      file_filter             = 'Tab delimited Text Files (*.txt)'
    CHANGING
      file_table              = lt_filetab
      rc                      = l_count
      user_action             = l_action
    EXCEPTIONS
      file_open_dialog_failed = 1
      cntl_error              = 2
      OTHERS                  = 3.                          "#EC NOTEXT
IF sy-subrc <> 0.
    EXIT.
ENDIF.
LOOP AT lt_filetab INTO ls_filetab.
    l_file = ls_filetab.
ENDLOOP.
CHECK l_action = 0.
IF l_file IS INITIAL.
    EXIT.
ENDIF.
l_separator = 'X'.
wa_fieldcat-fieldname = 'test'.
wa_fieldcat-dd_roll = wf_delemt.
APPEND wa_fieldcat TO tb_fieldcat.
CALL FUNCTION 'MESSAGES_INITIALIZE'.
CLEAR wa_test_upload.
Upload file from front-end (PC)
File format is tab-delimited ASCII
CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      filename                = l_file
      has_field_separator     = l_separator
    TABLES
     data_tab                = i_mara
    data_tab                   = test_upload
    EXCEPTIONS
      file_open_error         = 1
      file_read_error         = 2
      no_batch                = 3
      gui_refuse_filetransfer = 4
      invalid_type            = 5
      no_authority            = 6
      unknown_error           = 7
      bad_data_format         = 8
      header_not_allowed      = 9
      separator_not_allowed   = 10
      header_too_long         = 11
      unknown_dp_error        = 12
      access_denied           = 13
      dp_out_of_memory        = 14
      disk_full               = 15
      dp_timeout              = 16
      OTHERS                  = 17.
IF sy-subrc <> 0.
    EXIT.
ELSE.
   CALL FUNCTION 'MESSAGES_INITIALIZE'.
    IF test_upload IS NOT INITIAL.
      DESCRIBE TABLE test_upload LINES rows_read.
      CLEAR : wa_test_upload,wa_upld_data.
      LOOP AT test_upload INTO wa_test_upload.
        CLEAR : p_error.
        rows_read = sy-tabix.
        IF wa_test_upload-/bic/myprogram IS INITIAL.
          p_error = 'X'.
          MESSAGE s153 WITH wa_test_upload-/bic/myprogram sy-tabix.
          CONTINUE.
        ELSE.
          TRANSLATE wa_test_upload-/bic/myprogram TO UPPER CASE.
          wa_upld_text-txtmd = wa_test_upload-txtmd.
          wa_upld_text-txtsh = wa_test_upload-txtmd.
          wa_upld_text-langu = sy-langu.
          wa_upld_data-chrt_accts = 'xyz1'.
          wa_upld_data-co_area = '12'.
          wa_upld_data-/bic/zxyzbcsg = 'Iy'.
          wa_upld_data-objvers = 'A'.
          wa_upld_data-changed = 'I'.
          wa_upld_data-/bic/zass_mdl = 'rrr'.
          wa_upld_data-/bic/zass_typ = 'I'.
          wa_upld_data-/bic/zdriver = 'yyy'.
          wa_upld_text-langu = sy-langu.
          MOVE-CORRESPONDING wa_test_upload TO wa_upld_data.
          MOVE-CORRESPONDING wa_test_upload TO wa_upld_text.
          APPEND wa_upld_data TO ztable_data.
          APPEND wa_upld_text TO ztable_text.
        ENDIF.
      ENDLOOP.
      DELETE ADJACENT DUPLICATES FROM ztable_data.
      DELETE ADJACENT DUPLICATES FROM ztable_text.
      IF ztable_data IS NOT INITIAL.
        CALL METHOD cl_rsdmd_mdmt=>factory
          EXPORTING
            i_chabasnm     = 'myprogram'
          IMPORTING
            e_r_mdmt       = lr_mdmt
          EXCEPTIONS
            invalid_iobjnm = 1
            OTHERS         = 2.
   CALL FUNCTION 'MESSAGES_INITIALIZE'.
   **Lock the Infoobject to update
        CALL FUNCTION 'RSDG_IOBJ_ENQUEUE'
          EXPORTING
            i_objnm      = wf_object
            i_scope      = '1'
            i_msgty      = rs_c_error
          EXCEPTIONS
            foreign_lock = 1
            sys_failure = 2.
        IF sy-subrc = 1.
          MESSAGE i107(zddd_rr) WITH wf_object sy-msgv2.
          EXIT.
        ELSEIF sy-subrc = 2.
          MESSAGE i108(zddd_rr) WITH wf_object.
          EXIT.
        ENDIF.
*****Update Master Table
        IF ztable_data IS NOT INITIAL.
          CALL FUNCTION 'RSDMD_WRITE_ATTRIBUTES_TEXTS'
                EXPORTING
                  i_iobjnm                     = 'myprogram'
                  i_tabclass                   = 'M'
       I_T_ATTR                     = lt_attr
                TABLES
                  i_t_table                    = ztable_data
                  EXCEPTIONS
                 attribute_name_error         = 1
                 iobj_not_found               = 2
                 generate_program_error       = 3
                 OTHERS                       = 4.
          IF sy-subrc <> 0.
            CALL FUNCTION 'MESSAGE_STORE'
              EXPORTING
                arbgb = 'zddd_rr'
                msgty = 'E'
                txtnr = '054'
                msgv1 = text-033
              EXCEPTIONS
                OTHERS = 3.
            MESSAGE e054(zddd_rr) WITH 'myprogram'.
          ELSE.
            CALL FUNCTION 'MESSAGE_STORE'
              EXPORTING
                arbgb = 'zddd_rr'
                msgty = 'S'
                txtnr = '053'
                msgv1 = text-033
              EXCEPTIONS
                OTHERS = 3.
          ENDIF.
*endif.
*****update Text Table
          IF ztable_text IS NOT INITIAL.
            CALL FUNCTION 'RSDMD_WRITE_ATTRIBUTES_TEXTS'
              EXPORTING
                i_iobjnm               = 'myprogram'
                i_tabclass             = 'T'
              TABLES
                i_t_table              = ztable_text
              EXCEPTIONS
                attribute_name_error   = 1
                iobj_not_found         = 2
                generate_program_error = 3
                OTHERS                 = 4.
            IF sy-subrc <> 0.
              CALL FUNCTION 'MESSAGE_STORE'
                EXPORTING
                  arbgb = 'zddd_rr'
                  msgty = 'E'
                  txtnr = '055'
                  msgv1 = text-033
                EXCEPTIONS
                  OTHERS = 3.
            ENDIF.
          ENDIF.
        ELSE.
          MESSAGE s178(zddd_rr).
        ENDIF.
      ENDIF.
      COMMIT WORK.
      CALL FUNCTION 'RSD_CHKTAB_GET_FOR_CHA_BAS'
        EXPORTING
          i_chabasnm = 'myprogram'
        IMPORTING
          e_chktab   = wf_tablnm
        EXCEPTIONS
          name_error = 1.
      IF sy-subrc <> 0.
        MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.
****Release locks on Infoobject
      CALL FUNCTION 'RSDG_IOBJ_DEQUEUE'
        EXPORTING
          i_objnm = 'myprogram'
          i_scope = '1'.
    ENDIF.
ENDIF.
PERFORM data_selection .
PERFORM update_alv_grid_display.
CALL FUNCTION 'MESSAGES_SHOW'.
ENDFORM.
Please let me know how I can skip first record of the flat file?
Regards,
S

go through this hope u can get some idea
REPORT ztest no standard page heading line-size 255.
                      Declaration                            *
TYPES t_itab1 TYPE alsmex_tabline.
types: begin of t_csks,
       kostl like csks-kostl,
      end of t_csks.
types: begin of t_cska,
       kstar like cska-kstar,
      end of t_cska.
data: begin of t_flatfile,
      docdate like COHEADER-BLDAT,
      postdate like COHEADER-BUDAT,
      doctext like COHEADER-BLTXT,
       costele like RK23F-KSTAR,
       amount like RK23F-WTGBTR,
       scostctr like RK23F-SKOSTL,
       rcostctr like RK23F-EKOSTL,
       rintorder like RK23F-EAUFNR,
     end of t_flatfile.
data: begin of t_flatfile1,
      docdate like COHEADER-BLDAT,
      postdate like COHEADER-BUDAT,
      doctext like COHEADER-BLTXT,
       costele like RK23F-KSTAR,
       amount like RK23F-WTGBTR,
       scostctr like RK23F-SKOSTL,
       rcostctr like RK23F-EKOSTL,
       rintorder like RK23F-EAUFNR,
       NUM LIKE SY-INDEX,
     end of t_flatfile1.
data: itab like table of t_flatfile with header line.
data: itab2 like table of t_flatfile1 with header line.
DATA: it_itab1 TYPE STANDARD TABLE OF t_itab1 WITH HEADER LINE,
      MESSTAB1 LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE,
      MESSTAB LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE.
data: begin of bdcdata occurs 0.
        include structure bdcdata.
data: end of bdcdata.
data:t_lin type i VALUE '0',
     u_rec type i VALUE '0',
     s_rec type i VALUE '0'.
data: it_csks type standard table of t_csks,
      wa_csks type t_csks.
data: it_cska type standard table of t_cska,
      wa_cska type t_cska.
*Selection Screen
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-010.
parameters: p_docdat LIKE COHEADER-BLDAT obligatory,
            p_postda LIKE COHEADER-BUDAT obligatory,
            p_doctxt LIKE COHEADER-BLTXT.
SELECTION-SCREEN END OF BLOCK b1.
SELECTION-SCREEN BEGIN OF BLOCK b2 WITH FRAME TITLE text-011.
parameters: p_file LIKE RLGRAP-FILENAME obligatory,
            DIS_MODE LIKE CTU_PARAMS-DISMODE DEFAULT 'N'.
SELECTION-SCREEN END OF BLOCK b2.
              A T S E L E C T I O N   S C R E E N                  *
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
PERFORM get_local_file_name USING p_file.
*Start of Selection
START-OF-SELECTION.
Perform get_Excel_data.
perform validate_data.
Perform Process_Data.
                end-of-selection
end-of-selection.
perform display_data.
*&      Form get_local_file_name
      text
     -->P_P_FILE text
FORM get_local_file_name USING    P_P_FILE.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
    CHANGING
      file_name = p_file.
ENDFORM.                    " get_local_file_name
*&      Form get_Excel_data
      text
--> p1        text
<-- p2        text
FORM get_Excel_data .
FIELD-SYMBOLS : <FS>.
DATA : V_INDEX TYPE I.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
    EXPORTING
      filename                = p_file
      i_begin_col             = 1
    i_begin_row             = 2
      i_begin_row             = 1
      i_end_col               = 256
      i_end_row               = 9999                        "65536
    TABLES
      intern                  = it_itab1
    EXCEPTIONS
      inconsistent_parameters = 1
      upload_ole              = 2
      OTHERS                  = 3.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    Message text-013 type 'E'.
ENDIF.
IF IT_ITAB1[] IS INITIAL.
    Message text-001 type 'E'.
else.                                    "IF IT_ITAB1[] IS INITIAL.
    data: itab2 like itab occurs 0 with header line.
    SORT IT_ITAB1 BY ROW COL.
    LOOP AT IT_ITAB1.
      MOVE :IT_ITAB1-COL TO V_INDEX.
      ASSIGN COMPONENT V_INDEX OF STRUCTURE itab2 TO <FS>.
      MOVE : IT_ITAB1-VALUE TO <FS>.
      AT END OF ROW.
        MOVE-CORRESPONDING itab2 TO itab.
        APPEND itab.
        CLEAR:itab,itab2.
      ENDAT.
    endloop.
    describe table itab lines t_lin.
endif.               "IF IT_ITAB1[] IS INITIAL.
ENDFORM.                    " get_Excel_data
*&      Form Process_Data
      text
--> p1        text
<-- p2        text
FORM Process_Data .
data:l_tabix type sy-tabix.
data:l_periv like t001-periv,
       l_monat like bkpf-monat,
       l_gjahr like bkpf-gjahr,
       l_amt(21) type c.
data: l_ddate(10),
        l_pdate(10).
WRITE p_docdat TO l_ddate.
WRITE p_postda TO l_pdate.
clear: l_periv,l_monat,l_gjahr.
select single periv from t001 into l_periv where bukrs = '5000'. "P_bukrs
if sy-subrc eq 0.
    l_gjahr = p_postda+0(4).
    call function 'FI_PERIOD_DETERMINE'
      EXPORTING
        i_budat = p_postda
        i_bukrs = '5000'     "p_bukrs
        i_periv = l_periv
        i_gjahr = l_gjahr
      IMPORTING
        e_monat = l_monat.
    clear:l_periv.
endif.
loop at itab2.
    refresh:bdcdata.
    clear:bdcdata.
    l_tabix = sy-tabix.
    perform bdc_dynpro      using 'SAPLK23F1' '1200'.
    perform bdc_field       using 'BDC_OKCODE'
                                  '/00'.
    perform bdc_field       using 'COHEADER-SEND_REC_REL'
                                  '10SAP'.
    perform bdc_field       using 'RK23F-STATUS'
                                  'S'.
    perform bdc_field       using 'COHEADER-BLDAT'
                             itab-docdate.
                                  l_ddate.
    perform bdc_field       using 'COHEADER-BUDAT'
                             itab-postdate.
                                  l_pdate.
    perform bdc_field       using 'COHEADER-PERIO'
                                   l_monat.                 "'9'.
    perform bdc_field       using 'COHEADER-BLTXT'
                             itab-doctext.
                                  p_doctxt.
    perform bdc_field       using 'RK23F-KSTAR'
                                  itab2-costele.
    WRITE itab2-amount TO l_amt.
l_amt = itab-amount.
    condense l_amt no-gaps.
    perform bdc_field       using 'RK23F-WTGBTR'
                                   l_amt.
                             itab-amount.
    perform bdc_field       using 'RK23F-WAERS'
                                  'USD'.
*perform bdc_field       using 'RK23F-SGTXT'
                             itab-doctext.
    perform bdc_field       using 'RK23F-SKOSTL'
                                  itab2-scostctr.
    perform bdc_field       using 'BDC_CURSOR'
                                  'RK23F-EAUFNR'.
    perform bdc_field       using 'RK23F-EKOSTL'
                                  itab2-rcostctr.
    perform bdc_field       using 'RK23F-EAUFNR'
                                  itab2-rintorder.
    perform bdc_dynpro      using 'SAPLK23F1' '1200'.
    perform bdc_field       using 'BDC_OKCODE'
                                  '=POST'.
    perform bdc_field       using 'COHEADER-SEND_REC_REL'
                                  '10SAP'.
    perform bdc_field       using 'RK23F-STATUS'
                                  'S'.
    perform bdc_field       using 'COHEADER-BLDAT'
                             itab-docdate.
                                  l_ddate.
    perform bdc_field       using 'COHEADER-BUDAT'
                              itab-postdate.
                                  l_pdate.
    perform bdc_field       using 'COHEADER-PERIO'
                             '9'.
                                    l_monat.
    perform bdc_field       using 'COHEADER-BLTXT'
                              itab-doctext.
                                  p_doctxt.
    perform bdc_field       using 'BDC_CURSOR'
                                  'RK23F-KSTAR'.
    perform bdc_field       using 'RK23F-WAERS'
                                  'USD'.
    CALL TRANSACTION 'KB15N' USING BDCDATA MODE DIS_MODE MESSAGES INTO MESSTAB.
    If sy-subrc = 0.
      s_rec = s_rec + 1.
    ELSE.
      u_rec = u_rec + 1.
      move ITAB2-NUM to messtab1-msgv1.
      concatenate itab2-costele ' | ' itab2-scostctr ' | ' itab2-rcostctr ' | ' itab2-rintorder into messtab1-msgv2.
      condense messtab1-msgv2.
      condense messtab1-msgv1.
      append messtab1.
    endif.
    clear:itab2.
endloop.
ENDFORM.                    " Process_Data
      BDC_DYNPRO                                                     *
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
CLEAR BDCDATA.
BDCDATA-PROGRAM = PROGRAM.
BDCDATA-DYNPRO   = DYNPRO.
BDCDATA-DYNBEGIN = 'X'.
APPEND BDCDATA.
ENDFORM.                    "BDC_DYNPRO
       BDC_FIELD                                                     *
FORM BDC_FIELD USING FNAM FVAL.
IF FVAL <> ''. "NODATA.
    CLEAR BDCDATA.
    BDCDATA-FNAM = FNAM.
    BDCDATA-FVAL = FVAL.
    APPEND BDCDATA.
ENDIF.
ENDFORM.                    "BDC_FIELD
*&      Form display_data
      text
--> p1        text
<-- p2        text
FORM display_data .
skip 2.
write:/15 text-002.
skip 2.
write:/8 text-003.
SKIP.
write:/12 text-008,
         25 P_DOCDAT.
SKIP.
write:/12 text-009,
         25 P_POSTDA.
SKIP.
write:/12 text-012,
          25 P_DOCTXT.
SKIP.
write:/12 text-004,
         25 p_file.
skip 2.
write:/8 text-005,
        60 t_lin.
skip.
write:/8 text-006,
        60 s_rec.
skip.
write:/8 text-007,
        60 u_rec.
skip.
write:/10 'row no',
         20 'Information'.
skip.
loop at messtab1.
    write:/10 messtab1-msgv1,
           20 messtab1-msgv2.
    clear:messtab1.
endloop.
ENDFORM.                    " display_data
*&      Form validate_data
      text
--> p1        text
<-- p2        text
FORM validate_data .
data: l_tabix1 type sy-tabix.
data: l_tabix2 type sy-tabix.
if not itab[] is initial.
    select kostl from CSKS into table it_csks.
    if sy-subrc eq 0.
      sort it_csks by kostl.
    endif.
    select kstar from CSKA into table it_cska.
    if sy-subrc eq 0.
      sort it_cska by kstar.
    endif.
    loop at itab.
      l_tabix1 = sy-tabix.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
    INPUT         = itab-scostctr
IMPORTING
   OUTPUT        = itab-scostctr .
      read table it_csks into wa_csks with key kostl = itab-scostctr.
      if sy-subrc ne 0.
        u_rec = u_rec + 1.
       L_TABIX2 = l_tabix1 + 1.
       move l_tabix2 to messtab1-msgv1.
        move l_tabix1 to messtab1-msgv1.
        move itab-rintorder to messtab1-msgv2.
        concatenate itab-costele ' | ' itab-scostctr ' | ' itab-rcostctr ' | ' itab-rintorder into messtab1-msgv2.
        condense messtab1-msgv2.
        condense messtab1-msgv1.
        append messtab1.
        clear:wa_csks.
       CLEAR:L_TABIX2.
        continue.
      endif.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
    INPUT         = itab-rcostctr
IMPORTING
   OUTPUT        = itab-rcostctr .
      read table it_csks into wa_csks with key kostl = itab-rcostctr.
      if sy-subrc ne 0.
        u_rec = u_rec + 1.
       L_TABIX2 = l_tabix1 + 1.
       move l_tabix2 to messtab1-msgv1.
        move l_tabix1 to messtab1-msgv1.
          concatenate itab-costele ' | ' itab-scostctr ' | ' itab-rcostctr ' | ' itab-rintorder into messtab1-msgv2.
        condense messtab1-msgv2.
        condense messtab1-msgv1.
        append messtab1.
        clear:wa_csks.
       CLEAR:L_TABIX2.
        continue.
      endif.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
EXPORTING
    INPUT         = itab-costele
IMPORTING
   OUTPUT        = itab-costele .
      read table it_cska into wa_cska with key kstar = itab-costele.
      if sy-subrc ne 0.
        u_rec = u_rec + 1.
       L_TABIX2 = l_tabix1 + 1.
       move l_tabix2 to messtab1-msgv1.
        move l_tabix1 to messtab1-msgv1.
        concatenate itab-costele ' | ' itab-scostctr ' | ' itab-rcostctr ' | ' itab-rintorder into messtab1-msgv2.
        condense messtab1-msgv2.
        condense messtab1-msgv1.
        append messtab1.
        clear:wa_csks.
       CLEAR:L_TABIX2.
        continue.
      endif.
move-corresponding itab to itab2.
MOVE l_tabix1 TO ITAB2-NUM.
append itab2.
clear: itab2.
      clear:itab.
    endloop.
else.
    message 'No records in File' type 'S'.
endif.
ENDFORM.                    " validate_data

Is it possible to insert data from a .txt file onto a form list?

Similar Messages

Maybe you are looking for