Reading variable block file

Hi,
I have a variable block file which was transmitted from mainframe side.
When i browse the variable block file in mainframe i can see it as
!Line 1
!Line 2
!Line 3
but once we transmit the file in Unix box, the file contents appear as
!Line1!Line2!Line3
does java differentiate between variable block and fixed block files..
does java has separate API to read Variable block file

Ah. Then perhaps the file browser that you use in the mainframe is displaying the data in lines even though there are actually no new-line characters separating the records. For your convenience of course.
And perhaps there's an option in the mainframe FTP client that can insert those new-line characters if you need them. Although it's quite possible that you don't need them in the Unix system. If the only problem is that you don't see any, then just write your program assuming that there are none.

Similar Messages

Read Variable Block

Is there any way to have read variable blocks without global variable actually defined in AutoCode generated code.
The thing is we would like to link AutoCode generated code with other code, and want to access the global variable defined in that code.
The read variable block redefines that variables and it generates multiple definition of same variables, which is giving linking error.
Thanks
Regards
Ishant

Ishant,
The only potential way of modifying this would be through modifying the template, however this would be at your own risk. You would probably be better off simply locating the declaration in the generated code, which shouldn't be too difficult if your variable has a unique name, and commenting it out when you go to link the autocode.
--Paul Mandeltort
Automotive and Industrial Communications Product Marketing

Reading a binary file to string variable does not populate correctly

Hi, I am new to Adobe Air/Flex and I'm trying to read a
binary file which also contains text in "cleartext". The problem
I'm having is that when I call FileStream.readUTFBytes method, only
the first 6 characters are showing up in my string variable
"contents" when I debug it in FlexBuilder or use a trace command
and debug it. I have also tried with other types of files but I
have a similar problem unless it's a non-binary file.
Am I doing something incorrectly or should I be reading a
binary file differently than the way I'm reading it currently?
The source code is shown below.
TIA,
Magnus
<?xml version="1.0" encoding="utf-8"?>
<mx:WindowedApplication xmlns:mx="
http://www.adobe.com/2006/mxml"
layout="absolute">
<mx:Script>
<![CDATA[
import flash.filesystem.File;
private function readFiles():void{
var feedFile:File = File.userDirectory.resolvePath( "Local
Settings/Application Data/Microsoft/Feeds/AppScout~.feed-ms" );
var stream:FileStream = new FileStream();
stream.open( feedFile, FileMode.READ );
var contents:String =
stream.readUTFBytes(stream.bytesAvailable);
trace(contents);
stream.close();
]]>
</mx:Script>
<mx:Button x="121" y="66" label="Button"
click="readFiles()" />
</mx:WindowedApplication>

It's difficult to tell what it is, it looks like a binary
pipe symbol but I can copy it from TextPad for example. Some of the
characters following it cannot be copied from TextPad which I
assume is because it's null. I can read the whole file in C#/.Net
and assign it to a string variable without any problems but perhaps
Air is somewhat limited to binary content.

Error 105, Could not read full block (2048 bytes) from checkpoint file ~/dirchk/sdfsdj.cpe

Hi expert,
i am getting below error in goldengate due to mount point full and i released the space and still the same error for all gg processes. i can see the *cpe cpr file become 0 bytes. so i deleted and re added the extract and repliacat and while adding the replcat i used add replicat checkpoint table because of that multiple entries of same replicat came in checkpoint table . my checkpoint details also present in ./GLOBALS. now my doubt is if add replicate with mentioning checkpoint table name will duplicate entry will be created or what is the work around for this.
MANAGER RUNNING
Invalid checkpoint for EXTRACT qqqq (error 105, Could not read full block (2048 bytes) from checkpoint file XXXXXXXXX)
Invalid checkpoint for EXTRACT qqq(error 105, Could not read full block (2048 bytes) from checkpoint file XXXXXXXXXX)
Invalid checkpoint for REPLICAT qqq (error 105, Could not read full block (2048 bytes) from checkpoint file XXXXXXXXXXX)

Hi Kariyath
Increase the page size of your windows machine.Check for the recommanded page size.Remember that the recommanded page size should be the lower limit.If you have any issue feel free to ask.Your prob will be solved
Award suitable points

Read a Properties File in a Static Floating Block

I am trying to read a properties file in a static floating block:
   static
      try
         Properties p = new Properties();
         String path = "/WEB-INF/classes";
         InputStream is = getClass().getResourceAsStream( path + "artimus_message_MessagInboxConfig.properties" );
         p.load(is); // load the stream into the Properties object
         WEBSITE_HOME = p.getProperty( "WEBSITE_HOME" );
         setWebSiteHome( WEBSITE_HOME );
      catch { ......}
   }I got a compilation error saying that the non-static method getClass() cannot be referenced from a static context. There is almost no way to make this static floating block non-static. What should I do?

Thanks for the reply. But, huh... I do not quite
understand. Which class is MyClass?It's a generic placeholder for whichever class your put that block into. You wouldn't put it there literally--replace it with the name of the actual class. If that block is in Foo.java, then use Foo.class instead of MyClass.class.
>
Okay, this static floating block is in a class called
MessageInboxConfig.java. Then use MessageInboxConfig.class.getResourceAsStream(...)
And inside this static
floating block, I am reading a properties file and
this properties file is in the
ContextRoot/WEB-INF/classes/artimus_message_MessagInbox
onfig.propertiesHow do I read this properties file?
Properties p = new Properties();
InputStream is = MessageInboxConfig.class.getResourceAsStream("artimus_message_MessagInboxConfig.properties" );
... etc. ...You shouldn't need to specify "WEB-INF/classes," since it should be in your classpath. What you pass to getResource is a path relative to a directory in your classpath.

Non-blocking file behaviour for Reader

Hi!
It will be really nice if Reader will not block files for writing. Assume someone is using TeX to create PDF and he need to
a) examine the results;
b) edit the source.
It becomes a nightmare with Reader. Compile TeX, open Reader, examine results, close Reader. And then from the beginning.
Auto reloading of a PDF file is also a nice feature!
So far I can see only one solution: one should use another viewer to get non-blocking behaviour.
Thanks!

OK, let us see. I use Windows XP Professional SP3, Reader version is 9.3.0. I made a simple test: openned a file in Reader, then openned this file in my favourite text editor and tried to change "%PDF-1.4" to "%PDF-1.3" and save. I received a "File sharing violation error". I can also try to do it in Ubuntu.
As for the open source viewers. That is what I am currently doing: I use additional viewer to view the files I create and I use Adobe Reader to view all other files. One can leave with such solution, but it is not the best.

FileInputStream.read() and non-blocking file i/o

According to the API, FileInputStream.read() is :
public native int read() throws IOException
Reads a byte of data from this input stream. This method blocks if no input is yet available.
Returns:
the next byte of data, or -1 if the end of the file is reached.In what instances does the read() blocks? Is there a danger that the call to read() would block forever?

thanks martian!
is the ff code right enough to prevent i/o blocking?
FileInputStream fis = new FileInputStream(src);
FileOutputStream fos = new FileOutputStream(sPersistorFolder+src.getName());
if(fis.available() > 0) {
    int c = -1;
    while((c=fis.read()) != -1) {
      fos.write(c);
fis.close();
fos.close();

Reading large graphics files as manageable blocks?

I am looking either for source code or a library that would allow me to easily read a graphics file in manageable blocks. For example given an image that is 20000x200000 pixels, I would like to be able to read only a block of 400x400, from a given offset x/y in the image.
I need this since I am writing a program that needs to handle very large images (I can't assume user has more memory than the files), but does not need to display the whole image in one go, and but would let the user navigate within the image. Formats I am looking to have support with are JPEG, PNG and TIFF.

I agree with Gerd. If you are working with binaries, why not use U8 instead of doubles.
If the file is indeed 50MB, then the array should be expecting 52428800 elements, not 50000000. So if you read the file in a loop and populate an element at a time, you could run out of memory fast because any additional element insertion above 50000000 may require additional memory allocation of the size above 50000000 (potentially for each iteration). This is just speculation since I don't see the portion of your code that populates the array.
Question: Why do you need an array? What do you do with the data after you read it? I agree with Altenbach, 50MB is not that big, so working with a file of such a size should not be a problem.

How can I read this xls file to vibration mkeasurement blocks??

Hi,
I want to use vibration toolkit to read and analyse
measurements given in this file. First column is time data and second is measurement value in mV.
Emir
Attachments:
SALKOx.xls ‏130 KB

Hai,
File I/O palette has a vi named "Read from spread sheet file.vi" that will read the file in specified path and gives the content of the file as
2-D array.
Read the measurement file with this vi and carry out the analysis.
With regards,
JK
Message Edited by JK1 on 11-20-2007 06:25 AM
Message Edited by JK1 on 11-20-2007 06:25 AM
With regards,
JK
(Certified LabVIEW Developer)
Give Kudos for Good Answers, and Mark it a solution if your problem is solved.

Data formatting and reading a CSV file without using Sqlloader

I am reading a csv file to an Oracle table called sps_dataload. The table is structured based on the record type of the data at the beginning of
each record in the csv file. But the first two lines of the file are not going to be loaded to the table due to the format.
Question # 1:
How can I skip reading the first two lines from my csv file?
Question # 2:
There are more fields in the csv file than there are number of columns in my table. I know I can add filler as an option, but then there are
about 150 odd fields which are comma-separated in the file and my table has 8 columns to load from the file. So, do I really have to use filler
for 140 times in my script or, there is a better way to do this?
Question # 3:
This is more of an extension of my question above. The csv file has fields with block quotes - I know this could be achieved in sql loader when we mention Occassionally enclosed by '"'.
But can this be doable in the insert as created in the below code?
I am trying to find the "wrap code" button in my post, but do not see it.
Heres my file layout -
PROSPACE SCHEMATIC FILE
; Version 2007.7.1
Project,abc xyz Project,,1,,7,1.5,1.5,1,1,0,,0,1,0,0,0,0,3,1,1,0,1,0,0,0,0,2,3,1,0,1,0,0,0,0,3,3,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Subproject,25580-1005303.pst,,102,192,42,12632256,1,1,102,192,42,1,12632256,0,6,1,0,32896,1,0,0,0,0,,,-1,-1,-1,-1,0,0,0,-1,-1,-1,-1,-1,-1,0,0,0,-1,-1,-1,-1,-1,-1,0,0,0,-1,-1,0,1,1,,,,,,1
Segment, , , 0, 102, 0, 0, 0, 0, 0, 0, 0, 0, 0, , , , , , , , , , , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, , , 1
Product,00093097000459,26007,2X4 MF SF SD SOLR,,28.25,9.5,52.3, 8421504,,0,,xyz INC.,SOLAR,,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,,0,0,0,0,1,000000.60,0,0,0,0,00,-1,0
Product,00093097000329,75556,"22""X22"" BZ CM DD 1548",,27,7,27, 8421504,,0,,xyz INC.,SOLAR,,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,,0,0,0,0,1,000000.20,0,0,0,0,0,0,0,,345.32
Product,00093097000336,75557,"22""X46"" BZ CM XD 48133",,27,7.5,51, 8421504,,0,,xyz INC.,SOLAR,,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,,0,0,0,0,1,000000.20,0,0,0,0,0,0,0,0
Product,00093097134833,75621,"22""X22"" BZ CM/YT DD 12828",,27,9,27, 8421504,,0,,xyz INC.,SOLAR,,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,,0,0,0,0,1,000000.20,0,0,0,0,0,0,0,,1
This is my table structure -
desc sps_dataload;
File_Name     Varchar2 (50) Not Null,
Record_Layer Varchar2 (20) Not Null,
Level_Id     Varchar2 (20),
Desc1          Varchar2 (50),
Desc2          Varchar2 (50),
Desc3          Varchar2 (50),
Desc4          Varchar2 (50)
Heres my code to do this -
create or replace procedure insert_spsdataloader(p_filepath IN varchar2,
p_filename IN varchar2,
p_Totalinserted IN OUT number) as
v_filename varchar2(30) := p_filename;
v_filehandle UTL_FILE.FILE_TYPE;
v_startPos number; --starting position of a field
v_Pos number; --position of string
v_lenstring number; --length of string
v_record_layer varchar2(20);
v_level_id varchar2(20) := 0;
v_desc1 varchar2(50);
v_desc2 varchar2(50);
v_desc3 varchar2(50);
v_desc4 varchar2(50);
v_input_buffer varchar2(1200);
v_delChar varchar2(1) := ','
v_str varchar2(255);
BEGIN
v_Filehandle :=utl_file.fopen(p_filepath, p_filename, 'r');
p_Totalinserted := 0;
LOOP
BEGIN
UTL_FILE.GET_LINE(v_filehandle,v_input_buffer);
EXCEPTION
WHEN NO_DATA_FOUND THEN
EXIT;
END;
-- this will read the 1st field from the file --
v_Pos := instr(v_input_buffer,v_delChar,1,1);
v_lenString := v_Pos - 1;
v_record_layer := substr(v_input_buffer,1,v_lenString);
v_startPos := v_Pos + 1;
-- this will read the 2nd field from the file --
v_Pos := instr(v_input_buffer,v_delChar,1,2);
v_lenString := v_Pos - v_startPos;
v_desc1 := substr(v_input_buffer,v_startPos,v_lenString);
v_startPos := v_Pos + 1;
-- this will read the 3rd field from the file --
v_Pos := instr(v_input_buffer,v_delChar,1,3);
v_lenString := v_Pos - v_startPos;
v_desc2 := substr(v_input_buffer,v_startPos,v_lenString);
v_startPos := v_Pos + 1;
-- this will read the 4th field from the file --
v_Pos := instr(v_input_buffer,v_delChar,1,4);
v_lenString := v_Pos - v_startPos;
v_desc3 := substr(v_input_buffer,v_startPos,v_lenString);
v_startPos := v_Pos + 1;
-- this will read the 5th field from the file --
v_Pos := instr(v_input_buffer,v_delChar,1,5);
v_lenString := v_Pos - v_startPos;
v_desc4 := substr(v_input_buffer,v_startPos,v_lenString);
v_startPos := v_Pos + 1;
v_str := 'insert into table sps_dataload values('||v_filename||','||v_record_layer||','||v_level_id||','||v_desc1||','||v_desc2||','||v_desc3||','||v_desc4||')';
Execute immediate v_str;
p_Totalinserted := p_Totalinserted + 1;
commit;
END LOOP;
UTL_FILE.FCLOSE(v_filehandle);
EXCEPTION
WHEN UTL_FILE.INVALID_OPERATION THEN
UTL_FILE.FCLOSE(v_FileHandle);
RAISE_APPLICATION_ERROR(-20051, 'sps_dataload: Invalid Operation');
WHEN UTL_FILE.INVALID_FILEHANDLE THEN
UTL_FILE.FCLOSE(v_FileHandle);
RAISE_APPLICATION_ERROR(-20052, 'sps_dataload: Invalid File Handle');
WHEN UTL_FILE.READ_ERROR THEN
UTL_FILE.FCLOSE(v_FileHandle);
RAISE_APPLICATION_ERROR(-20053, 'sps_dataload: Read Error');
WHEN UTL_FILE.INVALID_PATH THEN
UTL_FILE.FCLOSE(v_FileHandle);
RAISE_APPLICATION_ERROR(-20054, 'sps_dataload: Invalid Path');
WHEN UTL_FILE.INVALID_MODE THEN
UTL_FILE.FCLOSE(v_FileHandle);
RAISE_APPLICATION_ERROR(-20055, 'sps_dataload: Invalid Mode');
WHEN UTL_FILE.INTERNAL_ERROR THEN
UTL_FILE.FCLOSE(v_FileHandle);
RAISE_APPLICATION_ERROR(-20056, 'sps_dataload: Internal Error');
WHEN VALUE_ERROR THEN
UTL_FILE.FCLOSE(v_FileHandle);
RAISE_APPLICATION_ERROR(-20057, 'sps_dataload: Value Error');
WHEN OTHERS THEN
UTL_FILE.FCLOSE(v_FileHandle);
RAISE;
END insert_spsdataloader;
/

Justin, thanks. I did happen to change my pl sql procedure using utl_file.get_file and modifying the instr function based on position of ',' in the file, but my procedure is getting really big and too complex to debug. So I got motivated to use external tables or sql loader as plan b.
As I was reading more about creating an external table as an efficient way and thus believe I can perhaps build an extern table with my varying selection from the file. But I am still unclear if I can construct my external table by choosing different fields in a record based on a record identifier string value (which is the first field of any record). I guess I can, but I am looking for the construct as to how am I going to use the instr function for selecting the field from the file while creating the table.
PROSPACE SCHEMATIC FILE
; Version 2007.7.1
Project,abc xyz Project,,1,,7,1.5,1.5,1,1,0,,0,1,0,0,0,0,3,1,1,0,1,0,0,0,0,2,3,1,0,1,0,0,0,0,3,3,1,1,1,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
Subproject,25580-1005303.pst,,102,192,42,12632256,1,1,102,192,42,1,12632256,0,6,1,0,32896,1,0,0,0,0,,,-1,-1,-1,-1,0,0,0,-1,-1,-1,-1,-1,-1,0,0,0,-1,-1,-1,-1,-1,-1,0,0,0,-1,-1,0,1,1,,,,,,1
Segment, , , 0, 102, 0, 0, 0, 0, 0, 0, 0, 0, 0, , , , , , , , , , , 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 0, , , 1
Product,00093097000459,26007,2X4 MF SF SD SOLR,,28.25,9.5,52.3, 8421504,,0,,xyz INC.,SOLAR,,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,,0,0,0,0,1,000000.60,0,0,0,0,00,-1,0
Product,00093097000329,75556,"22""X22"" BZ CM DD 1548",,27,7,27, 8421504,,0,,xyz INC.,SOLAR,,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,,0,0,0,0,1,000000.20,0,0,0,0,0,0,0,,345.32
Product,00093097000336,75557,"22""X46"" BZ CM XD 48133",,27,7.5,51, 8421504,,0,,xyz INC.,SOLAR,,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,,0,0,0,0,1,000000.20,0,0,0,0,0,0,0,0
Product,00093097134833,75621,"22""X22"" BZ CM/YT DD 12828",,27,9,27, 8421504,,0,,xyz INC.,SOLAR,,0,0,0,0,1,0,0,0,0,0,0,0,0,0,0,,0,0,0,0,1,000000.20,0,0,0,0,0,0,0,,1For example, if I want to create an external table like this -
CREATE TABLE extern_sps_dataload
( record_layer            VARCHAR2(20),
attr1                   VARCHAR2(20),
attr2                   VARCHAR2(20),
attr3                   VARCHAR2(20),
attr4                   VARCHAR2(20)
ORGANIZATION EXTERNAL
( TYPE ORACLE_LOADER
DEFAULT DIRECTORY dataload
ACCESS PARAMETERS
( RECORDS DELIMITED BY NEWLINE
    BADFILE     dataload:'sps_dataload.bad'
    LOGFILE     dataload:'sps_dataload.log'
    DISCARDFILE dataload:'sps_dataload.dis'
    SKIP 2
    VARIABLE 2 FIELDS TERMINATED BY ','
    OPTIONALLY ENCLOSED BY '"' LRTRIM
    MISSING FIELD VALUES ARE NULL
    +LOAD WHEN RECORD_LAYER = 'PROJECT' (FIELD2, FIELD3,FIELD7,FIELD9)+
    +LOAD WHEN RECORD_LAYER= 'PRODUCT' (FIELD3,FIELD4,FIELD8,FIELD9)+
    +LOAD WHEN RECORD_LAYER= 'SEGMENT' (FIELD1,FIELD2,FIELD4,FIELD5)+    LOCATION ('sps_dataload.csv')
REJECT LIMIT UNLIMITED;
{code}
While I was reading the external table documentation, I thought I could achieve similar things by using position_spec option, but I am not getting behind its parameters. I have highlighted italics in the code above(from LOAD WHEN....FIELDS....), the part I think I am going to use, but not sure of it's construct.
Thank you for your help!! Appreciate your thoughts on this..
Sanders.

"read from measurement file" reads only first line of data

Hello,
I have a problem when trying to read a .lvm file through "Read from Measurements file" with the following block diagram
Problem: it reads only the first line of data from what I can see in the probe window,.
A part of the lvm file for reference.
I haven't used Labview in a long long time, I'm trying to figure out what I am doing wrong.
Thanks

Sorry meant to attach the lvm. Here it is. (Actually I had to put it in .txt because the forum wont let me upload a lvm file)
I unfortunately cannot share the full vi that record the data as I am not its owner/creator. I'll try to give as much info as I can with the relevant pictures attached, I hope it allows us to at least have an hint of where the problem might be.
(this is in a while loop)
In the stacked sequence, the other pannels are similar to the one shown here: value read fron a variable, converted to dynamic and a signal attribute is set. The "start recording" control operation is "switch when pressed".
Here are the properties of the set signal attributes
And here are the properties of the "write to measurement file"
Attachments:
NoTarget_full circle__Rx_-10-SAMPLE.txt ‏60 KB

Download read only excel file

Hi Experts,
How to download a READ ONLY excel file to workstation (local Machine).

Hi kaleemullah,
Steps to create a BDC program.
1. Create an internal table with fields same as Excel sheet fields.
2. Declare an internal table with BDCDATA table to store the BDC recording.
3. Declare an internal table with BDCMSGCOL to store the error messages after
the execution of the BDC.
4. Write the code using the fun. module ALSM_EXCEL_TO_INTERNAL_TABLE
to upload the data from the excel sheet.
5. loop that internal table and write the Subroutines to fill the internal table
BDCDATA with the recording of a specified Transaction Code.
6. Using Call Transaction execute the BDC recording.
7. Check Sy-subrc = 0 and store the error messages in the internal table.
8. If you want you can pass those error records to a session using the SESSION method.
Here is an example of a BDC program, but this program is from a text file. Change the function module WS_UPLOAD with ALSM_EXCEL_TO_INTERNAL_TABLE
to upload an excel and write the program with your BDC recording. You can do recording using t-code SHDB.
Sample Program:
REPORT ZRAJ_DATASET_XD01 NO STANDARD PAGE HEADING LINE-SIZE 132
LINE-COUNT 60
MESSAGE-ID Z00.
Table/Structure declarations. *
TABLES : KNA1. "Customer master
Constants declarations. *
CONSTANTS : C_MODE VALUE 'N',
C_UPDATE VALUE 'S',
C_X VALUE 'X',
C_SESS TYPE APQI-GROUPID VALUE 'ZCUSTOMER', "Session Name
C_XD01 LIKE TSTC-TCODE VALUE 'XD01'.
Variable declarations. *
DATA : V_FNAME(15) VALUE SPACE, " Name of file to be created
V_FAILREC TYPE I, " No of failed records
V_MSG(255), " Message Text
V_ERRREC TYPE I, " No of failed records
V_LINES TYPE I. " No of records
*-- FLAG DECLARATIONS
DATA : FG_DATA_EXIST VALUE 'X', " Check for data
FG_SESSION_OPEN VALUE ' '. " Check for Session Open
Structures / Internal table declarations *
*-- Structure to hold BDC data
TYPES : BEGIN OF T_BDCTABLE.
INCLUDE STRUCTURE BDCDATA.
TYPES END OF T_BDCTABLE.
*-- Structure to trap BDC messages
TYPES : BEGIN OF T_MSG.
INCLUDE STRUCTURE BDCMSGCOLL.
TYPES : END OF T_MSG.
*-- Structure to trap ERROR messages
TYPES : BEGIN OF T_ERR_MSG,
MESSAGE(255),
END OF T_ERR_MSG.
*--Internal table to store flat file data
DATA:BEGIN OF IT_KNA1 OCCURS 0,
KUNNR LIKE KNA1-KUNNR,
KTOKD LIKE T077D-KTOKD,
NAME1 LIKE KNA1-NAME1,
SORTL LIKE KNA1-SORTL,
ORT01 LIKE KNA1-ORT01,
PSTLZ LIKE KNA1-PSTLZ,
LAND1 LIKE KNA1-LAND1,
SPRAS LIKE KNA1-SPRAS,
LZONE LIKE KNA1-LZONE,
END OF IT_KNA1.
*-- Internal table to hold BDC data
DATA: IT_BDCDATA TYPE STANDARD TABLE OF T_BDCTABLE WITH HEADER LINE,
*-- Internal Table to store ALL messages
IT_MSG TYPE STANDARD TABLE OF T_MSG WITH HEADER LINE,
*-- Internal Table to store error messages
IT_ERR_MSG TYPE STANDARD TABLE OF T_ERR_MSG WITH HEADER LINE.
Selection Screen. *
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS : P_FLNAME(15) OBLIGATORY.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS : R_LIST RADIOBUTTON GROUP GRP1.
SELECTION-SCREEN COMMENT 5(20) TEXT-003.
PARAMETERS : R_SESS RADIOBUTTON GROUP GRP1.
SELECTION-SCREEN COMMENT 30(20) TEXT-004.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK B2.
Event:Initialization *
INITIALIZATION.
AT Selection Screen. *
AT SELECTION-SCREEN.
Event: Start-of-Selection *
START-OF-SELECTION.
V_FNAME = P_FLNAME.
PERFORM GET_DATA.
PERFORM GENERATE_DATASET.
Event: End-of-Selection *
END-OF-SELECTION.
IF FG_DATA_EXIST = ' '.
MESSAGE I010 WITH TEXT-009.
EXIT.
ENDIF.
PERFORM GENERATE_BDCDATA.
PERFORM DISPLAY_ERR_RECS.
Event: top-of-page
TOP-OF-PAGE.
FORM DEFINITIONS *
*& Form get_data
Subroutine to get the data from mard
--> p1 text
<-- p2 text
FORM GET_DATA.
CALL FUNCTION 'UPLOAD'
EXPORTING
CODEPAGE = ' '
FILENAME = 'C:\XD01.TXT'
FILETYPE = 'DAT'
ITEM = ' '
FILEMASK_MASK = ' '
FILEMASK_TEXT = ' '
FILETYPE_NO_CHANGE = ' '
FILEMASK_ALL = ' '
FILETYPE_NO_SHOW = ' '
LINE_EXIT = ' '
USER_FORM = ' '
USER_PROG = ' '
SILENT = 'S'
IMPORTING
FILESIZE =
CANCEL =
ACT_FILENAME =
ACT_FILETYPE =
TABLES
DATA_TAB = IT_KNA1
EXCEPTIONS
CONVERSION_ERROR = 1
INVALID_TABLE_WIDTH = 2
INVALID_TYPE = 3
NO_BATCH = 4
UNKNOWN_ERROR = 5
GUI_REFUSE_FILETRANSFER = 6
OTHERS = 7
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
IF IT_KNA1[] IS INITIAL.
FG_DATA_EXIST = ' '.
ENDIF.
ENDFORM. " get_data
*& Form GENERATE_DATASET
text
--> p1 text
<-- p2 text
FORM GENERATE_DATASET.
MESSAGE I010 WITH 'OPENING FILE IN APPLICATION SERVER'.
**--Creating a data set in application server
OPEN DATASET V_FNAME FOR OUTPUT IN TEXT MODE.
**---Transfering data from internal table to dataset
MESSAGE I010 WITH 'TRANSFERING DATA FROM INETERAL TABLE TO THE FILE'.
LOOP AT IT_KNA1.
TRANSFER IT_KNA1 TO V_FNAME.
ENDLOOP.
**--Closing the dataset
MESSAGE I010 WITH 'CLOSING THE FILE'.
CLOSE DATASET V_FNAME.
ENDFORM. " GENERATE_DATASET
*& Form BDC_DYNPRO
text
-->P_0467 text
-->P_0468 text
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
CLEAR IT_BDCDATA.
IT_BDCDATA-PROGRAM = PROGRAM.
IT_BDCDATA-DYNPRO = DYNPRO.
IT_BDCDATA-DYNBEGIN = 'X'.
APPEND IT_BDCDATA.
ENDFORM.
*& Form BDC_FIELD
text
-->P_0472 text
-->P_0473 text
FORM BDC_FIELD USING FNAM FVAL.
IF NOT FVAL IS INITIAL.
CLEAR IT_BDCDATA.
IT_BDCDATA-FNAM = FNAM.
IT_BDCDATA-FVAL = FVAL.
APPEND IT_BDCDATA.
ENDIF.
ENDFORM.
*& Form GENERATE_BDCDATA
text
--> p1 text
<-- p2 text
FORM GENERATE_BDCDATA.
REFRESH IT_KNA1.
Opening dataset for reading
OPEN DATASET V_FNAME FOR INPUT IN TEXT MODE.
Reading the file from application server
DO.
CLEAR: IT_KNA1,IT_BDCDATA.
REFRESH IT_BDCDATA.
READ DATASET V_FNAME INTO IT_KNA1.
IF SY-SUBRC <> 0.
EXIT.
ELSE.
Populate BDC Data for Initial Screen
PERFORM : BDC_DYNPRO USING 'SAPMF02D' '0100',
BDC_FIELD USING 'BDC_CURSOR' 'RF02D-KUNNR',
BDC_FIELD USING 'BDC_OKCODE' '/00',
BDC_FIELD USING 'RF02D-KUNNR' IT_KNA1-KUNNR,
BDC_FIELD USING 'RF02D-KTOKD' IT_KNA1-KTOKD.
Populate BDC Data for Second Screen
PERFORM : BDC_DYNPRO USING 'SAPMF02D' '0110',
BDC_FIELD USING 'BDC_CURSOR' 'KNA1-NAME1',
BDC_FIELD USING 'BDC_OKCODE' '/00',
BDC_FIELD USING 'KNA1-NAME1' IT_KNA1-NAME1,
BDC_FIELD USING 'KNA1-SORTL' IT_KNA1-SORTL,
BDC_FIELD USING 'KNA1-ORT01' IT_KNA1-ORT01,
BDC_FIELD USING 'KNA1-PSTLZ' IT_KNA1-PSTLZ,
BDC_FIELD USING 'KNA1-LAND1' IT_KNA1-LAND1,
BDC_FIELD USING 'KNA1-SPRAS' IT_KNA1-SPRAS.
Populate BDC Data for Third Screen
PERFORM : BDC_DYNPRO USING 'SAPMF02D' '0120',
BDC_FIELD USING 'BDC_CURSOR' 'KNA1-LZONE',
BDC_FIELD USING 'BDC_OKCODE' '=UPDA',
BDC_FIELD USING 'KNA1-LZONE' IT_KNA1-LZONE.
CALL TRANSACTION C_XD01 USING IT_BDCDATA
MODE C_MODE
UPDATE C_UPDATE
MESSAGES INTO IT_MSG.
IF SY-SUBRC <> 0.
*--In case of error list display
IF R_LIST = C_X.
V_ERRREC = V_ERRREC + 1.
PERFORM FORMAT_MESSAGE.
IT_ERR_MSG-MESSAGE = V_MSG.
APPEND IT_ERR_MSG.
CLEAR : V_MSG,IT_ERR_MSG.
ENDIF.
*--In case of session log
IF R_SESS = C_X.
*-- In case of transaction fails.
IF FG_SESSION_OPEN = ' '.
FG_SESSION_OPEN = C_X.
PERFORM BDC_OPEN_GROUP.
ENDIF. " IF FG_SESSION_OPEN = ' '.
*-- Insert BDC Data..
PERFORM BDC_INSERT_DATA.
ENDIF. " IF R_SESS = C_X.
ENDIF. " IF SY-SUBRC <> 0.
ENDIF. " IF SY-SUBRC <> 0.
ENDDO.
Closing the dataset
CLOSE DATASET V_FNAME.
*-- Close the session if opened
IF FG_SESSION_OPEN = C_X.
PERFORM BDC_CLOSE_GROUP.
CALL TRANSACTION 'SM35'.
ENDIF.
ENDFORM. " GENERATE_BDCDATA
*& Form BDC_OPEN_GROUP
text
--> p1 text
<-- p2 text
FORM BDC_OPEN_GROUP.
CALL FUNCTION 'BDC_OPEN_GROUP'
EXPORTING
CLIENT = SY-MANDT
DEST = FILLER8
GROUP = C_SESS
HOLDDATE = FILLER8
KEEP = C_X
USER = SY-UNAME
RECORD = FILLER1
IMPORTING
QID =
EXCEPTIONS
CLIENT_INVALID = 1
DESTINATION_INVALID = 2
GROUP_INVALID = 3
GROUP_IS_LOCKED = 4
HOLDDATE_INVALID = 5
INTERNAL_ERROR = 6
QUEUE_ERROR = 7
RUNNING = 8
SYSTEM_LOCK_ERROR = 9
USER_INVALID = 10
OTHERS = 11
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " BDC_OPEN_GROUP
*& Form BDC_INSERT_DATA
text
--> p1 text
<-- p2 text
FORM BDC_INSERT_DATA.
CALL FUNCTION 'BDC_INSERT'
EXPORTING
TCODE = C_XD01
POST_LOCAL = NOVBLOCAL
PRINTING = NOPRINT
TABLES
DYNPROTAB = IT_BDCDATA
EXCEPTIONS
INTERNAL_ERROR = 1
NOT_OPEN = 2
QUEUE_ERROR = 3
TCODE_INVALID = 4
PRINTING_INVALID = 5
POSTING_INVALID = 6
OTHERS = 7
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " BDC_INSERT_DATA
*& Form BDC_CLOSE_GROUP
text
--> p1 text
<-- p2 text
FORM BDC_CLOSE_GROUP.
CALL FUNCTION 'BDC_CLOSE_GROUP'
EXCEPTIONS
NOT_OPEN = 1
QUEUE_ERROR = 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.
ENDIF.
ENDFORM. " BDC_CLOSE_GROUP
*& Form FORMAT_MESSAGE
text
--> p1 text
<-- p2 text
FORM FORMAT_MESSAGE.
CLEAR V_LINES.
DESCRIBE TABLE IT_MSG LINES V_LINES.
READ TABLE IT_MSG INDEX V_LINES.
CLEAR V_MSG.
CALL FUNCTION 'FORMAT_MESSAGE'
EXPORTING
ID = IT_MSG-MSGID
LANG = IT_MSG-MSGSPRA
NO = IT_MSG-MSGNR
V1 = IT_MSG-MSGV1
V2 = IT_MSG-MSGV2
V3 = IT_MSG-MSGV3
V4 = IT_MSG-MSGV4
IMPORTING
MSG = V_MSG
EXCEPTIONS
NOT_FOUND = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " FORMAT_MESSAGE
*& Form DISPLAY_ERR_RECS
text
--> p1 text
<-- p2 text
FORM DISPLAY_ERR_RECS.
LOOP AT IT_ERR_MSG.
WRITE: / IT_ERR_MSG-MESSAGE.
ENDLOOP.
ENDFORM. " DISPLAY_ERR_RECS
Hope this resolves your query.
Reward all the helpful answers.
Regards

Issue with reading a xml file from xsl

Hi,
When I am trying to read a xml file from xsl, I am getting unwanted output.
Following is the XSL:
<?xml version="1.0" encoding="UTF-8" ?>
<?oracle-xsl-mapper

<mapSources>
    <source type="XSD">
      <schema location="../xsd/B2BMarketProperties.xsd"/>
      <rootElement name="ReceipentIDType" namespace="http://www.example.org"/>
    </source>
</mapSources>
<mapTargets>
    <target type="XSD">
      <schema location="../xsd/B2BMarketProperties.xsd"/>
      <rootElement name="ReceipentIDType" namespace="http://www.example.org"/>
    </target>
</mapTargets>

?>
<xsl:stylesheet version="1.0"
                xmlns:bpws="http://schemas.xmlsoap.org/ws/2003/03/business-process/"
                xmlns:xp20="http://www.oracle.com/XSL/Transform/java/oracle.tip.pc.services.functions.Xpath20"
                xmlns:mhdr="http://www.oracle.com/XSL/Transform/java/oracle.tip.mediator.service.common.functions.MediatorExtnFunction"
                xmlns:bpel="http://docs.oasis-open.org/wsbpel/2.0/process/executable"
                xmlns:oraext="http://www.oracle.com/XSL/Transform/java/oracle.tip.pc.services.functions.ExtFunc"
                xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
                xmlns:ns0="http://www.example.org"
                xmlns:dvm="http://www.oracle.com/XSL/Transform/java/oracle.tip.dvm.LookupValue"
                xmlns:hwf="http://xmlns.oracle.com/bpel/workflow/xpath"
                xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
                xmlns:med="http://schemas.oracle.com/mediator/xpath"
                xmlns:ids="http://xmlns.oracle.com/bpel/services/IdentityService/xpath"
                xmlns:bpm="http://xmlns.oracle.com/bpmn20/extensions"
                xmlns:xdk="http://schemas.oracle.com/bpel/extension/xpath/function/xdk"
                xmlns:xref="http://www.oracle.com/XSL/Transform/java/oracle.tip.xref.xpath.XRefXPathFunctions"
                xmlns:xsd="http://www.w3.org/2001/XMLSchema"
                xmlns:ora="http://schemas.oracle.com/xpath/extension"
                xmlns:socket="http://www.oracle.com/XSL/Transform/java/oracle.tip.adapter.socket.ProtocolTranslator"
                xmlns:ldap="http://schemas.oracle.com/xpath/extension/ldap"
                exclude-result-prefixes="xsi xsl ns0 xsd bpws xp20 mhdr bpel oraext dvm hwf med ids bpm xdk xref ora socket ldap">
<xsl:output method="xml" version="1.0" encoding="UTF-8" indent="yes"/>
<xsl:variable name="ReceipentID" select="document('../xsd/B2BMarketProperties.xml')"/>
<xsl:template match="/">
    <ns0:ReceipentIDType>
    <xsl:for-each select="$ReceipentID">
      <ns0:ReceipentID>
        <xsl:value-of select="$ReceipentID"/>
      </ns0:ReceipentID>
      </xsl:for-each>
    </ns0:ReceipentIDType>
</xsl:template>
</xsl:stylesheet>
Following is the XML ( B2BMarketProperties.xml)
<?xml version="1.0" encoding="UTF-8" ?>
<ReceipentIDType xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
                 xsi:schemaLocation="http://www.example.org B2BMarketProperties.xsd"
                 xmlns="http://www.example.org">
<ReceipentID>123</ReceipentID>
<ReceipentID>345</ReceipentID>
</ReceipentIDType>
The output i am getting with this code is
<?xml version="1.0" encoding="UTF-8"?>
<ns0:ReceipentIDType xmlns:ns0="http://www.example.org">
    <ns0:ReceipentID>123345</ns0:ReceipentID>
</ns0:ReceipentIDType>
But, I need output in the following format
<ns0:ReceipentIDType xmlns:ns0="http://www.example.org">
    <ns0:ReceipentID>123</ns0:ReceipentID>
     <ns0:ReceipentID>345</ns0:ReceipentID>
</ns0:ReceipentIDType>
Could you guys let me know what i am doing wrong. Any help would be appreciated.
Thanks,

This worked for me :
<xsl:template match="/">
    <ns0:ReceipentIDType>
      <xsl:for-each select="document('B2BMarketProperties.xml')/*:ReceipentIDType/*:ReceipentID">
        <xsl:variable name="count" select="position()"/>
        <ns0:ReceipentID>
          <xsl:value-of select="document('B2BMarketProperties.xml')/*:ReceipentIDType/*:ReceipentID[$count]"/>
        </ns0:ReceipentID>
      </xsl:for-each>
    </ns0:ReceipentIDType>
</xsl:template>

Issue in reading the XML file

Hi Gurus,
I am dier need of one of the xml issue which I am facing right now.
I am reading one of the xml file which is like this
<?xml version="1.0" encoding="UTF-8" ?>
- <GEBIZ_ORDER xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
- <HEADER>
<MINISTRY_CODE>RPO</MINISTRY_CODE>
<DEPARTMENT_CODE>000</DEPARTMENT_CODE>
<ORDER_CODE>RPO000EPO11000953</ORDER_CODE>
<EXTERNAL_SYSTEM_CODE>E</EXTERNAL_SYSTEM_CODE>
<AMENDMENT_NUMBER>0</AMENDMENT_NUMBER>
<VARIATION_NUMBER>0</VARIATION_NUMBER>
<DESCRIPTION>Purchase Order for Air tickets for SOT to Korea (from 17th - 26th Sep 2011) off PC(RPO000ECN11000100)for SAS</DESCRIPTION>
<STATUS>NEW</STATUS>
<STATUS_DATE>2011-07-08T16:57:39</STATUS_DATE>
<PAYMENT_TERMS xsi:nil="true" />
<BILL_TO>One-Stop Centre, 9 Woodlands Avenue 9, S(738964)</BILL_TO>
<JUSTIFICATION>Please refer to attached approval email.</JUSTIFICATION>
<CREATE_TIMESTAMP>2011-07-08T16:57:39</CREATE_TIMESTAMP>
<TERMINATE_REASON xsi:nil="true" />
<TERMINATE_TIMESTAMP xsi:nil="true" />
<ORDER_TYPE>1</ORDER_TYPE>
- <FINANCIAL_SYSTEM>
<SUB_BUSINESS_UNIT>RPS01</SUB_BUSINESS_UNIT>
</FINANCIAL_SYSTEM>
- <SUPPLIER>
<CODE>200003048E</CODE>
<NAME>Safe2Travel Pte Ltd</NAME>
<GST_NUMBER>20-0003048-E</GST_NUMBER>
<CONTACT_NAME>ONG PEI LENG</CONTACT_NAME>
<CONTACT_PHONE>68233103</CONTACT_PHONE>
<CONTACT_EMAIL>[email protected]</CONTACT_EMAIL>
<CONTACT_FAX>68221636</CONTACT_FAX>
- <SITES>
- <SITE>
<ID>1</ID>
<NAME>ravel Pte Ltd</NAME>
<PHONE>68233013</PHONE>
<PHONE_EXTENSION xsi:nil="true" />
<FAX>68221636</FAX>
<EMAIL>[email protected]</EMAIL>
<ADDRESS_LINE1>10 Eunos Road 8</ADDRESS_LINE1>
<ADDRESS_LINE2>#08-03 (North Lobby)</ADDRESS_LINE2>
<ADDRESS_LINE3>Singapore Post Centre</ADDRESS_LINE3>
<COUNTRY_CODE>SG</COUNTRY_CODE>
<PROVINCE xsi:nil="true" />
<STATE xsi:nil="true" />
<CITY xsi:nil="true" />
<AREA_CODE xsi:nil="true" />
<ZIP>408600</ZIP>
<REGION_CODE xsi:nil="true" />
</SITE>
- <SITE>
<ID>2</ID>
<NAME>ravel Pte Ltd</NAME>
<PHONE>62208866</PHONE>
<PHONE_EXTENSION xsi:nil="true" />
<FAX>62265578</FAX>
<EMAIL>[email protected]</EMAIL>
<ADDRESS_LINE1>3 Lim Teck Kim Road</ADDRESS_LINE1>
<ADDRESS_LINE2>#02-02</ADDRESS_LINE2>
<ADDRESS_LINE3>Singapore Technologies Building</ADDRESS_LINE3>
<COUNTRY_CODE>SG</COUNTRY_CODE>
<PROVINCE xsi:nil="true" />
<STATE xsi:nil="true" />
<CITY xsi:nil="true" />
<AREA_CODE xsi:nil="true" />
<ZIP>088934</ZIP>
<REGION_CODE xsi:nil="true" />
</SITE>
- <SITE>
<ID>3</ID>
<NAME>Safe2Travel Pte Ltd</NAME>
<PHONE>62208866</PHONE>
<PHONE_EXTENSION xsi:nil="true" />
<FAX>62265578</FAX>
<EMAIL>[email protected]</EMAIL>
<ADDRESS_LINE1>3 Lim Teck Kim Road</ADDRESS_LINE1>
<ADDRESS_LINE2>#02-02</ADDRESS_LINE2>
<ADDRESS_LINE3>Singapore Technologies Building</ADDRESS_LINE3>
<COUNTRY_CODE>SG</COUNTRY_CODE>
<PROVINCE xsi:nil="true" />
<STATE xsi:nil="true" />
<CITY xsi:nil="true" />
<AREA_CODE xsi:nil="true" />
<ZIP>088934</ZIP>
<REGION_CODE xsi:nil="true" />
</SITE>
</SITES>
</SUPPLIER>
- <USER>
<CODE>JOYCE SOON</CODE>
<NAME>JOYCE SOON</NAME>
<ORGANISATION_NAME>Republic Polytechnic</ORGANISATION_NAME>
</USER>
- <FUND_COMMIT_AMOUNT>
<CURRENCY_CODE>SGD</CURRENCY_CODE>
<CURRENCY_RATE>1</CURRENCY_RATE>
<CURRENCY_RATE_DATE>1900-01-01T00:00:00</CURRENCY_RATE_DATE>
<CURRENCY_RATE_TYPE>BOOK</CURRENCY_RATE_TYPE>
<CURRENCY_AMOUNT>21551.4</CURRENCY_AMOUNT>
</FUND_COMMIT_AMOUNT>
- <PERIOD_CONTRACT>
<CODE>RPO000ECN11000100</CODE>
<AGENCY_CODE>RPO000</AGENCY_CODE>
<ADMIN_FEE_SGD_AMOUNT>0</ADMIN_FEE_SGD_AMOUNT>
</PERIOD_CONTRACT>
- <BUYER>
<ORGANISATION_CODE>1</ORGANISATION_CODE>
<ORGANISATION_NAME>Republic Polytechnic</ORGANISATION_NAME>
<NAME>Sally Ang</NAME>
<PHONE>31001711</PHONE>
<FAX>64151310</FAX>
<EMAIL>[email protected]</EMAIL>
</BUYER>
<APPROVING_OFFICERS />
</HEADER>
- <ITEMS>
- <ITEM>
<LINE_NUMBER>1</LINE_NUMBER>
<STATUS>NEW</STATUS>
<STATUS_DATE>2011-07-08T16:57:39</STATUS_DATE>
<DESCRIPTION>Return Air Ticket including Airport Taxes and Fuel Surcharges (2 staff and 24 students)</DESCRIPTION>
<UNIT_OF_MEASURE>PAX</UNIT_OF_MEASURE>
<QUANTITY>26</QUANTITY>
<LINE_TYPE>SERVICES</LINE_TYPE>
<UNIT_PRICE>828.9</UNIT_PRICE>
<PRICE_UNIT>1</PRICE_UNIT>
<TOTAL_AMOUNT>21551.4</TOTAL_AMOUNT>
<MATERIAL_MASTER_CODE xsi:nil="true" />
<MATERIAL_GROUP_CODE xsi:nil="true" />
<PLANT_CODE xsi:nil="true" />
<ITEM_CATEGORY_CODE xsi:nil="true" />
<ADMIN_FEE_SGD_AMOUNT>0</ADMIN_FEE_SGD_AMOUNT>
<INSTRUCTION_TO_SUPPLIER>Purchase of goods/services is subject to the Terms & Conditions found in www.rp.sg/purchase and/or in the ITQ/ITT Specifications. Please liaise with the Contact Person for delivery details. Invoice MUST be addressed to the Contact Person. PO number MUST be included in the Description field under e-Invoice Details section at Vendor@Gov.</INSTRUCTION_TO_SUPPLIER>
<PERIOD_CONTRACT_LINE_NUMBER>1</PERIOD_CONTRACT_LINE_NUMBER>
<GOODS_INSPECT_FLAG>N</GOODS_INSPECT_FLAG>
- <PURCHASE_REQUEST>
<CODE>RPO000EPR11000465</CODE>
<LINE_NUMBER>1</LINE_NUMBER>
</PURCHASE_REQUEST>
- <PART_NUMBER_INFORMATION>
<NATO_STOCK_NUMBER xsi:nil="true" />
<MANUFACTURER_PART_NUMBER xsi:nil="true" />
<PART_NUMBER xsi:nil="true" />
<CAGE_CODE xsi:nil="true" />
<CAGE_NAME xsi:nil="true" />
<ITEM_CONDITION xsi:nil="true" />
<MINIMUM_SHELF_LIFE xsi:nil="true" />
<SHELF_LIFE_REMAINING xsi:nil="true" />
<CERTIFICATE_OF_CONFORMANCE xsi:nil="true" />
<EXPORT_LICENSE xsi:nil="true" />
</PART_NUMBER_INFORMATION>
- <LOCATIONS>
- <LOCATION>
<LINE_NUMBER>1</LINE_NUMBER>
<STATUS>NEW</STATUS>
<STATUS_DATE>2011-07-08T16:57:39</STATUS_DATE>
<QUANTITY>26</QUANTITY>
<DELIVERY_DESTINATION>Republic Polytechnic, One-Stop Centre, 9 Woodlands Avenue 9, S(738964)</DELIVERY_DESTINATION>
<DELIVERY_DATE>2011-07-11T00:00:00</DELIVERY_DATE>
<DELIVERY_TERMS>LOC</DELIVERY_TERMS>
<PORT_OF_ORIGIN>-</PORT_OF_ORIGIN>
- <RECIPIENT>
<CODE>OSC</CODE>
<NAME>One Stop Centre</NAME>
<PHONE>65103000</PHONE>
<EMAIL>[email protected]</EMAIL>
</RECIPIENT>
- <DISTRIBUTIONS>
- <DISTRIBUTION>
<LINE_NUMBER>1</LINE_NUMBER>
<STATUS>NEW</STATUS>
<STATUS_DATE>2011-07-08T16:57:39</STATUS_DATE>
<QUANTITY>26</QUANTITY>
<CHART_OF_ACCOUNT>1/G01/3SAS/020/220908/0000/0000/0000</CHART_OF_ACCOUNT>
<PROJECT_DISTRIBUTION xsi:nil="true" />
</DISTRIBUTION>
</DISTRIBUTIONS>
</LOCATION>
</LOCATIONS>
</ITEM>
</ITEMS>
</GEBIZ_ORDER>I was able to read this kind of file structure but due to some constraints now they added supplier sites and increment that one which will be like variable kind of thing now.
And below mentioned is the script which I am using right now for reading that xml file
PROCEDURE XGBZPROD.XGBZ_PUR_ORD_XMLTAG_PROC(P_XML_FILE IN VARCHAR2, P_FOLDER_NAME IN VARCHAR2)
IS
lv_supp_file     XMLTYPE;
lv_hdr_error     VARCHAR2(240);
lv_line_error    VARCHAR2(240);
lv_line_loc_err VARCHAR2(240);
lv_dist_err      VARCHAR2(240);
l_file_name      VARCHAR2(300);
l_folder_name    VARCHAR2(300);
lv_sysdate       DATE := sysdate;
BEGIN
l_file_name     := p_xml_file;
l_folder_name   := p_folder_name;
-- this clause to check whether is xml file or NODATA FILE.
IF upper(substr(l_file_name,instr(l_file_name,'.',1)+1,3)) ='XML' THEN
    lv_supp_file := xmltype( bfilename('XMLDIR',P_XML_FILE), nls_charset_id('AL32UTF8'));
    dbms_output.put_line('P_XML_FILE '||P_XML_FILE);
-- Initially insert data into 11g table
-- This is to read xml datafile
INSERT INTO XGBZ_PO_XML_DETAILS
   (ministry_code                ,
    department_code              ,
    order_code                   ,
    external_system_code         ,
    amendment_number             ,
    variation_number             ,
    description                  ,
    status                       ,
    status_date                  ,
    payment_terms                ,
    bill_to                      ,
    justification                ,
    create_timestamp             ,
    terminate_reason             ,
    terminate_timestamp          ,
    order_type                   ,
    sub_business_unit            ,
    cost_center_group            ,
    buyer_code                   ,
    financial_system_order_code ,
    user_nric                    ,
    supplier_code                ,
    supplier_name                ,
    gst_number                   ,
    contact_name                 ,
    contact_phone                ,
    contact_email                ,
    contact_fax                  ,
    supp_site_id                 ,
    supp_site_name               ,
    supp_site_phone              ,
    supp_sit_phone_ext           ,
    supp_site_fax                ,
    supp_site_email              ,
    supp_site_add_line1          ,
    supp_site_add_line2          ,
    supp_site_add_line3          ,
    supp_site_country_code       ,
    supp_site_province           ,
    supp_site_state              ,
    supp_site_city               ,
    supp_site_area_code          ,
    supp_site_zip                ,
    supp_site_region_code        ,
    user_code                    ,
    user_name                    ,
    user_org_name                ,
    currency_code                ,
    currency_rate                ,
    currency_rate_date           ,
    currency_rate_type           ,
    currency_amount              ,
    tx_field_2                   ,
    agency_code                  ,
    admin_fee_sgd                ,
    buyer_orgn_code              ,
    buyer_orgn_name              ,
    buyer_name                   ,
    buyer_phone                  ,
    buyer_fax                    ,
    buyer_email                  ,
    ao_code                      ,
    ao_name                      ,
    line_no                      ,
    line_status                  ,
    line_status_date             ,
    line_description             ,
    unit_of_measure              ,
    line_qty                     ,
    line_type                    ,
    unit_price                   ,
    line_total_amount            ,
    material_master_code         ,
    material_group_code          ,
    item_category_code           ,
    line_admin_fee_sgd_amt       ,
    instruction_supplier         ,
    period_contract_line_no      ,
    goods_inspect_flag           ,
    pr_code                      ,
    pr_line_number               ,
    nato_stock_number            ,
    manufacturer_part_no         ,
    part_number                  ,
    cage_code                    ,
    cage_name                    ,
    item_condition               ,
    minimum_shelf_life           ,
    shelf_life_remaining         ,
    cert_of_conformance          ,
    export_license               ,
    line_location_no             ,
    line_loc_status              ,
    line_loc_status_date         ,
    line_loc_qty                 ,
    delivery_destination         ,
    delivery_date                ,
    delivery_terms               ,
    port_of_origin               ,
    recipient_code               ,
    recipient_name               ,
    recipient_phone              ,
    recipient_email              ,
    dist_line_no                 ,
    dist_line_status             ,
    dist_line_status_date        ,
    dist_line_qty                ,
    chart_of_account             ,
    project_distribution
   SELECT --Header Data
          ministry_code                ,
          department_code              ,
          order_code                   ,
          external_system_code         ,
          amendment_number             ,
          variation_number             ,
          description                  ,
          status                       ,
          status_date                  ,
          payment_terms                ,
          bill_to                      ,
          justification                ,
          create_timestamp             ,
          terminate_reason             ,
          terminate_timestamp          ,
          order_type                   ,
          sub_business_unit            ,
          cost_center_group            ,
          buyer_code                   ,
          financial_system_order_code ,
          user_nric                    ,
          supplier_code                ,
          supplier_name                ,
          gst_number                   ,
          contact_name                 ,
          contact_phone                ,
          contact_email                ,
          contact_fax                  ,
          supp_site_id                 ,
          supp_site_name               ,
          supp_site_phone              ,
          supp_sit_phone_ext           ,
          supp_site_fax                ,
          supp_site_email              ,
          supp_site_add_line1          ,
          supp_site_add_line2          ,
          supp_site_add_line3          ,
          supp_site_country_code       ,
          supp_site_province           ,
          supp_site_state              ,
          supp_site_city               ,
          supp_site_area_code          ,
          supp_site_zip                ,
          supp_site_region_code        ,
          user_code                    ,
          user_name                    ,
          user_org_name                ,
          currency_code                ,
          currency_rate                ,
          currency_rate_date           ,
          currency_rate_type           ,
          currency_amount              ,
          tx_field_2                   ,
          agency_code                  ,
          admin_fee_sgd                ,
          buyer_orgn_code              ,
          buyer_orgn_name              ,
          buyer_name                   ,
          buyer_phone                  ,
          buyer_fax                    ,
          buyer_email                  ,
          ao_code                      ,
          ao_name                      ,
          line_no                      ,
          line_status                  ,
          line_status_date             ,
          line_description             ,
          unit_of_measure              ,
          line_qty                     ,
          line_type                    ,
          unit_price                   ,
          line_total_amount            ,
          material_master_code         ,
          material_group_code          ,
          item_category_code           ,
          line_admin_fee_sgd_amt       ,
          instruction_supplier         ,
          period_contract_line_no      ,
          goods_inspect_flag           ,
          pr_code                      ,
          pr_line_number               ,
          nato_stock_number            ,
          manufacturer_part_no         ,
          part_number                  ,
          cage_code                    ,
          cage_name                    ,
          item_condition               ,
          minimum_shelf_life           ,
          shelf_life_remaining         ,
          cert_of_conformance          ,
          export_license               ,
          line_location_no             ,
          line_loc_status              ,
          line_loc_status_date         ,
          line_loc_qty                 ,
          delivery_destination         ,
          delivery_date                ,
          delivery_terms               ,
          port_of_origin               ,
          recipient_code               ,
          recipient_name               ,
          recipient_phone              ,
          recipient_email              ,
          dist_line_no                 ,
          dist_line_status             ,
          dist_line_status_date        ,
          dist_line_qty                ,
          chart_of_account             ,
          project_distribution
     FROM XMLTable('/GEBIZ_ORDER'
          passing lv_supp_file
          columns
          ministry_code                      VARCHAR2(3)    path    'HEADER/MINISTRY_CODE',
          department_code                    VARCHAR2(3)    path    'HEADER/DEPARTMENT_CODE',
          order_code                         VARCHAR2(17 ) path    'HEADER/ORDER_CODE',
          external_system_code               VARCHAR2(1)    path    'HEADER/EXTERNAL_SYSTEM_CODE',
          amendment_number                   VARCHAR2(5)    path    'HEADER/AMENDMENT_NUMBER' ,
          variation_number                   VARCHAR2(5)    path    'HEADER/VARIATION_NUMBER',
          description                        VARCHAR2(500) path    'HEADER/DESCRIPTION',
          status                             VARCHAR2(500) path    'HEADER/STATUS',
          status_date                        VARCHAR2(24)   path    'HEADER/STATUS_DATE',
          payment_terms                      VARCHAR2(400) path    'HEADER/PAYMENT_TERMS',
          bill_to                            VARCHAR2(200) path    'HEADER/BILL_TO',
          justification                      VARCHAR2(400) path    'HEADER/JUSTIFICATION',
          create_timestamp                   VARCHAR2(24)   path    'HEADER/CREATE_TIMESTAMP',
          terminate_reason                   VARCHAR2(400) path    'HEADER/TERMINATE_REASON',
          terminate_timestamp                VARCHAR2(24)   path    'HEADER/TERMINATE_TIMESTAMP',
          order_type                         VARCHAR2(2 )   path    'HEADER/ORDER_TYPE',
          sub_business_unit                  VARCHAR2(5 )   path    'HEADER/FINANCIAL_SYSTEM/SUB_BUSINESS_UNIT',
          cost_center_group                  VARCHAR2(20 ) path    'HEADER/FINANCIAL_SYSTEM/NFS/COST_CENTER_GROUP',
          buyer_code                         VARCHAR2(30 ) path    'HEADER/FINANCIAL_SYSTEM/NFS/BUYER_CODE',
          financial_system_order_code        VARCHAR2(20 ) path    'HEADER/FINANCIAL_SYSTEM/NFS/FINANCIAL_SYSTEM_ORDER_CODE',
          user_nric                          VARCHAR2(9 )   path    'HEADER/FINANCIAL_SYSTEM/NFS/USER_NRIC',
          supplier_code                      VARCHAR2(10)   path    'HEADER/SUPPLIER/CODE',
          supplier_name                      VARCHAR2(140) path    'HEADER/SUPPLIER/NAME' ,
          gst_number                         VARCHAR2(30 ) path    'HEADER/SUPPLIER/GST_NUMBER',
          contact_name                       VARCHAR2(140 ) path    'HEADER/SUPPLIER/CONTACT_NAME',
          contact_phone                      VARCHAR2(23 ) path    'HEADER/SUPPLIER/CONTACT_PHONE',
          contact_email                      VARCHAR2(100) path    'HEADER/SUPPLIER/CONTACT_EMAIL',
          contact_fax                        VARCHAR2(23 ) path    'HEADER/SUPPLIER/CONTACT_FAX',
          supp_site_id                       NUMBER         path    'HEADER/SUPPLIER/SITES/SITE/ID',
          supp_site_name                     VARCHAR2(140) path    'HEADER/SUPPLIER/SITES/SITE/NAME',
          supp_site_phone                    VARCHAR2(23)   path    'HEADER/SUPPLIER/SITES/SITE/PHONE',
          supp_sit_phone_ext                 VARCHAR2(4 )   path    'HEADER/SUPPLIER/SITES/SITE/PHONE_EXTENSION',
          supp_site_fax                      VARCHAR2(23 ) path    'HEADER/SUPPLIER/SITES/SITE/FAX',
          supp_site_email                    VARCHAR2(100 ) path    'HEADER/SUPPLIER/SITES/SITE/EMAIL',
          supp_site_add_line1                VARCHAR2(254 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE1',
          supp_site_add_line2                VARCHAR2(35 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE2',
          supp_site_add_line3                VARCHAR2(35 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE3',
          supp_site_country_code             VARCHAR2(2 )   path    'HEADER/SUPPLIER/SITES/SITE/COUNTRY_CODE',
          supp_site_province                 VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/PROVINCE',
          supp_site_state                    VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/STATE',
          supp_site_city                     VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/CITY',
          supp_site_area_code                VARCHAR2(10 ) path    'HEADER/SUPPLIER/SITES/SITE/AREA_CODE',
          supp_site_zip                      VARCHAR2(20 ) path    'HEADER/SUPPLIER/SITES/SITE/ZIP',
          supp_site_region_code              VARCHAR2(3 )   path    'HEADER/SUPPLIER/SITES/SITE/REGION_CODE',
          user_code                          VARCHAR2(16 ) path    'HEADER/USER/CODE',
          user_name                          VARCHAR2(25 ) path    'HEADER/USER/NAME',
          user_org_name                      VARCHAR2(95 ) path    'HEADER/USER/ORGANISATION_NAME',
          currency_code                      VARCHAR2(3 )   path    'HEADER/FUND_COMMIT_AMOUNT/CURRENCY_CODE',
          currency_rate                      NUMBER         path    'HEADER/FUND_COMMIT_AMOUNT/CURRENCY_RATE',
          currency_rate_date                 VARCHAR2(24)   path    'HEADER/FUND_COMMIT_AMOUNT/CURRENCY_RATE_DATE',
          currency_rate_type                 VARCHAR2(5 )   path    'HEADER/FUND_COMMIT_AMOUNT/CURRENCY_RATE_TYPE',
          currency_amount                    NUMBER         path    'HEADER/FUND_COMMIT_AMOUNT/CURRENCY_AMOUNT',
          tx_field_2                         VARCHAR2(17 ) path    'HEADER/PERIOD_CONTRACT/CODE',
          agency_code                        VARCHAR2(6 )   path    'HEADER/PERIOD_CONTRACT/AGENCY_CODE',
          admin_fee_sgd                      NUMBER         path    'HEADER/PERIOD_CONTRACT/ADMIN_FEE_SGD_AMOUNT' ,
          buyer_orgn_code                    VARCHAR2(5 )   path    'HEADER/BUYER/ORGANISATION_CODE',
          buyer_orgn_name                    VARCHAR2(95 ) path    'HEADER/BUYER/ORGANISATION_NAME',
          buyer_name                         VARCHAR2(80 ) path    'HEADER/BUYER/NAME',
          buyer_phone                        VARCHAR2(23 ) path    'HEADER/BUYER/PHONE',
          buyer_fax                          VARCHAR2(23 ) path    'HEADER/BUYER/FAX',
          buyer_email                        VARCHAR2(100 ) path    'HEADER/BUYER/EMAIL',
          ao_code                            VARCHAR2(16 ) path    'HEADER/APPROVING_OFFICERS/APPROVING_OFFICER/CODE',
          ao_name                            VARCHAR2(40 ) path    'HEADER/APPROVING_OFFICERS/APPROVING_OFFICER/NAME',
          items                              XMLTYPE        path    'ITEMS'
          ) x1,
        XMLTABLE('/ITEMS/ITEM'
        passing x1.items
        columns
          line_no                            VARCHAR2(5)    path    'LINE_NUMBER',
          line_status                        VARCHAR2(15)   path    'STATUS',
          line_status_date                   VARCHAR2(24)   path    'STATUS_DATE',
          line_description                   VARCHAR2(500) path    'DESCRIPTION',
          unit_of_measure                    VARCHAR2(3)    path    'UNIT_OF_MEASURE',
          line_qty                           NUMBER         path    'QUANTITY',
          line_type                          VARCHAR2(20)   path    'LINE_TYPE',
          unit_price                         NUMBER         path    'UNIT_PRICE',
          line_total_amount                  NUMBER         path    'TOTAL_AMOUNT',
          material_master_code               VARCHAR2(20)   path    'MATERIAL_MASTER_CODE',
          material_group_code                VARCHAR2(10)   path    'MATERIAL_GROUP_CODE',
          item_category_code                 VARCHAR2(18)   path    'ITEM_CATEGORY_CODE',
          line_admin_fee_sgd_amt             NUMBER         path    'ADMIN_FEE_SGD_AMOUNT',
          instruction_supplier               VARCHAR2(400) path    'INSTRUCTION_TO_SUPPLIER',
          period_contract_line_no            NUMBER         path    'PERIOD_CONTRACT_LINE_NUMBER',
          goods_inspect_flag                 VARCHAR2(1)    path    'GOODS_INSPECT_FLAG',
          pr_code                            VARCHAR2(17)   path    'PURCHASE_REQUEST/CODE',
          pr_line_number                     VARCHAR2(5)    path    'PURCHASE_REQUEST/LINE_NUMBER',
          nato_stock_number                  VARCHAR2(14)   path    'PART_NUMBER_INFORMATION/NATO_STOCK_NUMBER',
          manufacturer_part_no               VARCHAR2(32)   path    'PART_NUMBER_INFORMATION/MANUFACTURE_PART_NUMBER',
          part_number                        VARCHAR2(200) path    'PART_NUMBER_INFORMATION/PART_NUMBER',
          cage_code                          VARCHAR2(10)   path    'PART_NUMBER_INFORMATION/CAGE_CODE',
          cage_name                          VARCHAR2(140) path    'PART_NUMBER_INFORMATION/CAGE_NAME',
          item_condition                     VARCHAR2(1)    path    'PART_NUMBER_INFORMATION/ITEM_CONDITION' ,
          minimum_shelf_life                 NUMBER         path    'PART_NUMBER_INFORMATION/MINIMUM_SHELF_LIFE',
          shelf_life_remaining               VARCHAR2(3)    path    'PART_NUMBER_INFORMATION/SHELF_LIFE_REMAINING',
          cert_of_conformance                VARCHAR2(1000) path    'PART_NUMBER_INFORMATION/CERTIFICATE_OF_CONFORMANCE',
          export_license                     VARCHAR2(3)    path    'PART_NUMBER_INFORMATION/EXPORT_LICENSE',
          locations                          XMLTYPE        path    'LOCATIONS'
         )x2,
         XMLTABLE('/LOCATIONS/LOCATION'
         passing x2.locations
         columns
          line_location_no                   NUMBER         path     'LINE_NUMBER',
          line_loc_status                    VARCHAR2(15)   path     'STATUS',
          line_loc_status_date               VARCHAR2(24)   path     'STATUS_DATE',
          line_loc_qty                       NUMBER         path     'QUANTITY',
          delivery_destination               VARCHAR2(1000) path     'DELIVERY_DESTINATION',
          delivery_date                      VARCHAR2(24)   path     'DELIVERY_DATE',
          delivery_terms                     VARCHAR2(3)    path     'DELIVERY_TERMS',
          port_of_origin                     VARCHAR2(150) path     'PORT_OF_ORIGIN',
          recipient_code                     VARCHAR2(16 ) path     'RECIPIENT/CODE',
          recipient_name                     VARCHAR2(40 ) path     'RECIPIENT/NAME',
          recipient_phone                    VARCHAR2(23 ) path     'RECIPIENT/PHONE',
          recipient_email                    VARCHAR2(100 ) path     'RECIPIENT/EMAIL',
          distributions                      XMLTYPE        path     'DISTRIBUTIONS'
         )x3,
         XMLTABLE('/DISTRIBUTIONS/DISTRIBUTION'
         passing x3.distributions
         columns
          dist_line_no                       NUMBER         path     'LINE_NUMBER',
          dist_line_status                   VARCHAR2(15)   path     'STATUS',
          dist_line_status_date              VARCHAR2(24)   path     'STATUS_DATE',
          dist_line_qty                      NUMBER         path     'QUANTITY',
          chart_of_account                   VARCHAR2(420) path     'CHART_OF_ACCOUNT',
          project_distribution               VARCHAR2(4000) path     'PROJECT_DISTRIBUTION'
          )x4;
end;As there is change in requirement now I need to read the multiple supplier sites at the header level. Current this is my structure please give an idea how to read the mulitple sites as one record, probably i can increase the supplier site columns at table level so as to capture second site level information.
But if in case if i receive that time it should not fail please provide some good solution for this issue.
Thanks in advance for your help.
Regards
Nagendra

Hi odie,
Thanks for your response. But here my supplier site will always be maxiumum 2 times and minimum 1 time. My thinking is to fit this one in the existing code by repeating the supplier site only like this
          supp_site_id                       NUMBER         path    'HEADER/SUPPLIER/SITES/SITE/ID',
          supp_site_name                     VARCHAR2(140) path    'HEADER/SUPPLIER/SITES/SITE/NAME',
          supp_site_phone                    VARCHAR2(23)   path    'HEADER/SUPPLIER/SITES/SITE/PHONE',
          supp_sit_phone_ext                 VARCHAR2(4 )   path    'HEADER/SUPPLIER/SITES/SITE/PHONE_EXTENSION',
          supp_site_fax                      VARCHAR2(23 ) path    'HEADER/SUPPLIER/SITES/SITE/FAX',
          supp_site_email                    VARCHAR2(100 ) path    'HEADER/SUPPLIER/SITES/SITE/EMAIL',
          supp_site_add_line1                VARCHAR2(254 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE1',
          supp_site_add_line2                VARCHAR2(35 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE2',
          supp_site_add_line3                VARCHAR2(35 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE3',
          supp_site_country_code             VARCHAR2(2 )   path    'HEADER/SUPPLIER/SITES/SITE/COUNTRY_CODE',
          supp_site_province                 VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/PROVINCE',
          supp_site_state                    VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/STATE',
          supp_site_city                     VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/CITY',
          supp_site_area_code                VARCHAR2(10 ) path    'HEADER/SUPPLIER/SITES/SITE/AREA_CODE',
          supp_site_zip                      VARCHAR2(20 ) path    'HEADER/SUPPLIER/SITES/SITE/ZIP',
          supp_site_region_code              VARCHAR2(3 )   path    'HEADER/SUPPLIER/SITES/SITE/REGION_CODE',
          supp_site_id2                       NUMBER         path    'HEADER/SUPPLIER/SITES/SITE/ID',
          supp_site_name2                     VARCHAR2(140) path    'HEADER/SUPPLIER/SITES/SITE/NAME',
          supp_site_phone2                    VARCHAR2(23)   path    'HEADER/SUPPLIER/SITES/SITE/PHONE',
          supp_sit_phone_ext2                 VARCHAR2(4 )   path    'HEADER/SUPPLIER/SITES/SITE/PHONE_EXTENSION',
          supp_site_fax2                      VARCHAR2(23 ) path    'HEADER/SUPPLIER/SITES/SITE/FAX',
          supp_site_email2                    VARCHAR2(100 ) path    'HEADER/SUPPLIER/SITES/SITE/EMAIL',
          supp_site_add_line1_2                VARCHAR2(254 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE1',
          supp_site_add_line2_2                VARCHAR2(35 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE2',
          supp_site_add_line3_2                VARCHAR2(35 ) path    'HEADER/SUPPLIER/SITES/SITE/ADDRESS_LINE3',
          supp_site_country_code_2             VARCHAR2(2 )   path    'HEADER/SUPPLIER/SITES/SITE/COUNTRY_CODE',
          supp_site_province_2                 VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/PROVINCE',
          supp_site_state_2                    VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/STATE',
          supp_site_city_2                     VARCHAR2(25 ) path    'HEADER/SUPPLIER/SITES/SITE/CITY',
          supp_site_area_code_2                VARCHAR2(10 ) path    'HEADER/SUPPLIER/SITES/SITE/AREA_CODE',
          supp_site_zip_2                      VARCHAR2(20 ) path    'HEADER/SUPPLIER/SITES/SITE/ZIP',
          supp_site_region_code_2              VARCHAR2(3 )   path    'HEADER/SUPPLIER/SITES/SITE/REGION_CODE',As this table I am being used in many areas, it will be problem for me if try to go for different levels of tables. Or else can it be possible to read only once
I mean only the first in the xml tags and leave the second xml. As there is not much significant for the second one.
I appreciate your ideas on this, as the structure we are following is to rigid so I don't have much options to explore, please provide me your inputs in this context.
Thanks for your help.
Regards
Nagendra
Edited by: 838961 on Jul 13, 2011 1:43 AM

Read Tab delimited File from Application server

Hi Experts,
I am facing problem while reading file from Application server.
File in Application server is stored as follows, The below file is a tab delimited file.
##K#U#N#N#R###T#I#T#L#E###N#A#M#E#1###N#A#M#E#2###N#A#M#E#3###N#A#M#E#4###S#O#R#T#1###S#O#R#T#2###N#A#M#E#_#C#O###S#T#R#_#S#U#P#P#L#1###S#T#R#_#S#U#P#P#L#2###S#T#R#E#E#T###H#O#U#S#E#_#N#U#M#1
i have downloaded this file from Application server using Transaction CG3Y. the Downloaded file is a tab delimited file and i could not see "#' in the file,
The code is as Below.
c_split TYPE abap_char1 VALUE cl_abap_char_utilities=>horizontal_tab.
here i am using IGNORING CONVERSION ERRORS in order to avoid Conversion Error Short Dump.
OPEN DATASET wa_filename-file FOR INPUT IN TEXT MODE ENCODING DEFAULT IGNORING CONVERSION ERRORS.
      IF sy-subrc = 0.
        WRITE : /,'...Processing file - ', wa_filename-file.
       DO.
      Read the contents of file
          READ DATASET wa_filename-file INTO wa_file-data.
          IF sy-subrc = 0.
            SPLIT wa_file-data AT c_split INTO wa_adrc_2-kunnr
                                               wa_adrc_2-title
                                               wa_adrc_2-name1
                                               wa_adrc_2-name2
                                               wa_adrc_2-name3
                                               wa_adrc_2-name4
                                               wa_adrc_2-name_co
                                               wa_adrc_2-city1
                                               wa_adrc_2-city2
                                               wa_adrc_2-regiogroup
                                               wa_adrc_2-post_code1
                                               wa_adrc_2-post_code2
                                               wa_adrc_2-po_box
                                               wa_adrc_2-po_box_loc
                                               wa_adrc_2-transpzone
                                               wa_adrc_2-street
                                               wa_adrc_2-house_num1
                                               wa_adrc_2-house_num2
                                               wa_adrc_2-str_suppl1
                                               wa_adrc_2-str_suppl2
                                               wa_adrc_2-country
                                               wa_adrc_2-langu
                                               wa_adrc_2-region
                                               wa_adrc_2-sort1
                                               wa_adrc_2-sort2
                                               wa_adrc_2-deflt_comm
                                               wa_adrc_2-tel_number
                                               wa_adrc_2-tel_extens
                                               wa_adrc_2-fax_number
                                               wa_adrc_2-fax_extens
                                               wa_adrc_2-taxjurcode.
WA_FILE-DATA is having below values
##K#U#N#N#R###T#I#T#L#E###N#A#M#E#1###N#A#M#E#2###N#A#M#E#3###N#A#M#E#4###S#O#R#T#1###S#O#R#T#2###N#A#M#E#_#C#O###S#T#R#_#S#U#P#P#L#1###S#T#R#_#S#U#P#P#L#2###S#T#R#E#E#T###H#O#U#S#E#_#N#U#M#1
And this is split by tab delimited and moved to other variables as shown above.
Please guide me how to read the contents without "#' from the file.
I have tried all possible ways and unable to get solution.
Thanks,
Shrikanth

Hi ,
In ECC 6 if all the unicode patches are applied then UTF 16 will defintly work..
More over i would suggest you to ist replace # with some other * or , and then try to see in debugging if any further # appears..
and no # appears then try to split now.
if even now the # appears after replace statement then try to find out what exactly is it... wheather it is a horizantal tab etc....
and then again try to replace it and then split..
Please follow the process untill all the # are replaced...
This should work for you..
Let me know if you further face any issue...
Regards
Satish Boguda

Reading variable block file

Similar Messages

Maybe you are looking for