[U2] How to setup MALLOCTRACING?
Hi Everyone, I'm still battling with the 'Available memory exceeded' problem on Sco Unixware. I haven't been able to receive feedback from anyone on the list running UV on Unixware on how they have configured their system and how much memory they can be mallocated in one big chuck. I can only get 30Mb max before the memory exceeded error is thrown even though I have 8 Gig RAM and am the only user on the system. The system runs nothing else but UV and all possible Unixware parameters must be optimised for UV. I want to turn on MALLOCTRACING to 1 in the hope that I will be able to find out the exact nature of the failure. I have tried but then UV fails to start with a missing parameter message. Does anyone know how to setup the malloctracing? Where does the tracing information get written to and how to interpret it? Thanks for any help. Regards, Marco. - Win a castle for NYE with your mates and Yahoo! Messenger --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Testing if a Unidata file has records or not!
Quickest way I can think of would be: PRINT 'Enter Filename : ':;INPUT FILENAME PERFORM 'SELECT ':FILENAME:' SAMPLE 1' SELECTED = @SYSTEM.RETURN.CODE IF SELECTED THEN PRINT FILENAME:' contains records' END ELSE PRINT FILENAME:' is empty END PERFORM "CLEARSELECT" STOP -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Bright, Frank Sent: Monday, November 29, 2004 13:38 To: U2-Users Group (E-mail) Subject: [U2] Testing if a Unidata file has records or not! To All: I am writing an interesting program. One that finds where a file is empty of records or not. I used the EXECUTE command with the COUNT command to get the number of records in a file. If its 0 then the file is empty. But is there a better way as the execution command causes problem in other parts of this program. So, if anyone has any ideas along the lines of telling if a file is empty (Unidata file), could you please give me a note! Thank You Very Much! Frank Bright Univ. of the Arts [EMAIL PROTECTED] ___ Frank M. Bright [EMAIL PROTECTED] Administrative Computing University of the Arts (A15) http://www.uarts.edu 320 S. Broad St. 215-717-6081(w) Philadelphia, PA 19102 215-717-6087(f) Colleague 17.0.14 AIX 5.2.0.2 Unidata 6.03 --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Testing if a Unidata file has records or not!
I would do this: SEL.8 = 8 OPEN '', 'TEST.FILE' TO OPEN.FILE THEN SELECT OPEN.FILE TO SEL.8 READNEXT ID FROM SEL.8 THEN HAVE.RECORDS = 1 END ELSE HAVE.RECORDS = 0 END CLEARSELECT SEL.8 END This should work on UV and UD. Dick Kryka Director of Applications CCCS of Greater Denver, Inc. Paragon Financial Services 303-632-2226 [EMAIL PROTECTED] -Original Message- I am writing an interesting program. One that finds where a file is empty of records or not. I used the EXECUTE command with the COUNT command to get the number of records in a file. If its 0 then the file is empty. But is there a better way as the execution command causes problem in other parts of this program. So, if anyone has any ideas along the lines of telling if a file is empty (Unidata file), could you please give me a note! --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: Unclassified RE: [U2] Testing if a Unidata file has records or not!
I'd recommend the same, but I'd use READNEXT instead of @SELECTED so there isn't a list floating around waiting to be used. EXECUTE 'SELECT filename SAMPLE 1' READNEXT DUMMY THEN EMPTY = 0 ELSE EMPTY = 1 -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of HENDERSON MICHAEL MR Sent: Monday, November 29, 2004 3:17 PM To: [EMAIL PROTECTED] Subject: Unclassified RE: [U2] Testing if a Unidata file has records or not! Frank, I wouldn't do it that way! If the file actually has a gazillion records in it, "COUNT" could take a l-o-n-g time! ;-) Another way could be to do EXECUTE 'SELECT SAMPLE 1'. IF @SELECTED EQ 0 THEN END ELSE END [This is the UniVerse syntax, but UDT should be similar] HTH Mike -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bright, Frank Sent: Tuesday, 30 November 2004 10:38 To: U2-Users Group (E-mail) Subject: [U2] Testing if a Unidata file has records or not! To All: I am writing an interesting program. One that finds where a file is empty of records or not. I used the EXECUTE command with the COUNT command to get the number of records in a file. If its 0 then the file is empty. But is there a better way as the execution command causes problem in other parts of this program. So, if anyone has any ideas along the lines of telling if a file is empty (Unidata file), could you please give me a note! Thank You Very Much! Frank Bright Univ. of the Arts [EMAIL PROTECTED] ___ Frank M. Bright [EMAIL PROTECTED] Administrative Computing University of the Arts (A15) http://www.uarts.edu 320 S. Broad St. 215-717-6081(w) Philadelphia, PA 19102 215-717-6087(f) Colleague 17.0.14 AIX 5.2.0.2 Unidata 6.03 --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ The information contained in this Internet Email message is intended for the addressee only and may contain privileged information, but not necessarily the official views or opinions of the New Zealand Defence Force. If you are not the intended recipient you must not use, disclose, copy or distribute this message or the information in it. If you have received this message in error, please Email or telephone the sender immediately. --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Testing if a Unidata file has records or not!
If all you want to know is whether a file has ANY records (not the specific number) something like the following should work, and should be pretty quick, regardless of the file size: TESTFILE = 'SOMEFILETOTEST' OPEN '',TESTFILE TO FIL.TEST ELSE STOP "CAN'T OPEN ":TESTFILE HAS.RECORDS = 0 SELECT FIL.TEST LOOP WHILE READNEXT KEY.TEST HAS.RECORDS = 1 EXIT REPEAT CLEARSELECT Larry Hiscock Western Computer Services -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bright, Frank Sent: Monday, November 29, 2004 1:38 PM To: U2-Users Group (E-mail) Subject: [U2] Testing if a Unidata file has records or not! To All: I am writing an interesting program. One that finds where a file is empty of records or not. I used the EXECUTE command with the COUNT command to get the number of records in a file. If its 0 then the file is empty. But is there a better way as the execution command causes problem in other parts of this program. So, if anyone has any ideas along the lines of telling if a file is empty (Unidata file), could you please give me a note! Thank You Very Much! Frank Bright Univ. of the Arts [EMAIL PROTECTED] ___ Frank M. Bright [EMAIL PROTECTED] Administrative Computing University of the Arts (A15) http://www.uarts.edu 320 S. Broad St. 215-717-6081(w) Philadelphia, PA 19102 215-717-6087(f) Colleague 17.0.14 AIX 5.2.0.2 Unidata 6.03 --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Testing if a Unidata file has records or not!
On Mon, 29 Nov 2004 16:37:32 -0500, you wrote:
>To All:
>
>I am writing an interesting program. One that finds where a file is empty of
>records or not. I used the EXECUTE command with the COUNT command to get the
>number of records in a file. If its 0 then the file is empty.
>
>But is there a better way as the execution command causes problem in other
>parts of this program.
>
>So, if anyone has any ideas along the lines of telling if a file is empty
>(Unidata file), could you please give me a note!
>
>
>Thank You Very Much!
OPEN "", "SOMEFILE" TO F.SOMEFILE ELSE
CRT "FAILED TO OPEN SOMEFILE"
STOP
END
SELECT F.SOMEFILE
READNEXT K.SOMEFILE THEN
FILE.EMPTY = 0 ;* FALSE
CLEARSELECT
END ELSE
FILE.EMPTY = 1 ;* TRUE
END
IF (FILE.EMPTY) THEN
. Do something
END ELSE
Do something else
END
If you want to know how many records are in the file, then you could
loop off of the active select list incrementing a counter. If you
don't need to know how many, but merely if there are *any*, this logic
will get you in and out fairly quickly.
Regards.
--
Allen Egerton
[EMAIL PROTECTED]
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Testing if a Unidata file has records or not!
I don't know if Unidata has it but in a Universe basic program if you open the file then do a BASIC select, (not a TCL SELECT) you can then use SELECTINFO(0,1) to report true/false if a select list is active in Select List 0. SELECTINFO(0,3) reports the count of the records selected. You can then do a CLEARSELECT if there were any data records. There is also the idea of doing the same BASIC select but instead of SELECTINFO, just do a single READNEXT. If you hit ELSE, it's empty. Again, CLEARSELECT to release the select list. Bob Woodward Programmer/Analyst Harbor Wholesale Grocery [EMAIL PROTECTED] > -Original Message- > From: [EMAIL PROTECTED] [mailto:owner-u2- > [EMAIL PROTECTED] On Behalf Of Bright, Frank > Sent: Monday, November 29, 2004 1:38 PM > To: U2-Users Group (E-mail) > Subject: [U2] Testing if a Unidata file has records or not! > > To All: > > I am writing an interesting program. One that finds where a file is empty > of records or not. I used the EXECUTE command with the COUNT command to > get the number of records in a file. If its 0 then the file is empty. > > But is there a better way as the execution command causes problem in other > parts of this program. > > So, if anyone has any ideas along the lines of telling if a file is empty > (Unidata file), could you please give me a note! > > > Thank You Very Much! > > > Frank Bright > Univ. of the Arts > [EMAIL PROTECTED] > > > > ___ > Frank M. Bright [EMAIL PROTECTED] > Administrative Computing > University of the Arts (A15) http://www.uarts.edu > 320 S. Broad St. 215-717-6081(w) > Philadelphia, PA 19102 215-717-6087(f) > Colleague 17.0.14 AIX 5.2.0.2 Unidata 6.03 > --- > u2-users mailing list > [EMAIL PROTECTED] > To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
Re: [U2] Testing if a Unidata file has records or not!
Hi Frank, I'm not a UD expert, but how about this: OPEN "MYFILE" TO FH ELSE PRINT "FAILED TO OPEN MYFILE" STOP END SELECT FH * After a UniBASIC SELECT, SYSTEM(11) contains the number of items in the current group. If this is 0 then the file should be empty. IF SYSTEM(11) THEN PRINT "FILE IS NOT EMPTY" END ELSE PRINT "FILE IS EMPTY" END Craig --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Testing if a Unidata file has records or not!
> I am writing an interesting program. One that finds where a > file is empty of records or not. I used the EXECUTE command > with the COUNT command to get the number of records in a > file. If its 0 then the file is empty. > > But is there a better way as the execution command causes > problem in other parts of this program. OPEN '',FILE_NAME TO FILE_VAR THEN SELECT FILE_VAR TO SEL_VAR REC_COUNT = 0 EOL = 0 LOOP READNEXT ITEM_KEY FROM SEL_VAR ELSE EOL = 1 UNTIL EOL REC_COUNT += 1 REPEAT END HTH, Ken --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
Unclassified RE: [U2] Testing if a Unidata file has records or not!
Frank, I wouldn't do it that way! If the file actually has a gazillion records in it, "COUNT" could take a l-o-n-g time! ;-) Another way could be to do EXECUTE 'SELECT SAMPLE 1'. IF @SELECTED EQ 0 THEN END ELSE END [This is the UniVerse syntax, but UDT should be similar] HTH Mike -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bright, Frank Sent: Tuesday, 30 November 2004 10:38 To: U2-Users Group (E-mail) Subject: [U2] Testing if a Unidata file has records or not! To All: I am writing an interesting program. One that finds where a file is empty of records or not. I used the EXECUTE command with the COUNT command to get the number of records in a file. If its 0 then the file is empty. But is there a better way as the execution command causes problem in other parts of this program. So, if anyone has any ideas along the lines of telling if a file is empty (Unidata file), could you please give me a note! Thank You Very Much! Frank Bright Univ. of the Arts [EMAIL PROTECTED] ___ Frank M. Bright [EMAIL PROTECTED] Administrative Computing University of the Arts (A15) http://www.uarts.edu 320 S. Broad St. 215-717-6081(w) Philadelphia, PA 19102 215-717-6087(f) Colleague 17.0.14 AIX 5.2.0.2 Unidata 6.03 --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ The information contained in this Internet Email message is intended for the addressee only and may contain privileged information, but not necessarily the official views or opinions of the New Zealand Defence Force. If you are not the intended recipient you must not use, disclose, copy or distribute this message or the information in it. If you have received this message in error, please Email or telephone the sender immediately. --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
[U2] Testing if a Unidata file has records or not!
To All: I am writing an interesting program. One that finds where a file is empty of records or not. I used the EXECUTE command with the COUNT command to get the number of records in a file. If its 0 then the file is empty. But is there a better way as the execution command causes problem in other parts of this program. So, if anyone has any ideas along the lines of telling if a file is empty (Unidata file), could you please give me a note! Thank You Very Much! Frank Bright Univ. of the Arts [EMAIL PROTECTED] ___ Frank M. Bright [EMAIL PROTECTED] Administrative Computing University of the Arts (A15) http://www.uarts.edu 320 S. Broad St. 215-717-6081(w) Philadelphia, PA 19102 215-717-6087(f) Colleague 17.0.14 AIX 5.2.0.2 Unidata 6.03 --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] [UD] XML Parse/Open/ReadXMLData
I noticed that too on Unidata 6.0.3 on Solaris 2.7. Also encountered a problem using the XML extraction in a subroutine called from uniobjects, thing would just peg the CPU it was on and never come back; run the same subroutine called from a program at ECL it would work fine. As I was on a time-critical project at the time, I had to program around it and move on. Curious to know if either of these are fixed in the UD 6.1+ versions and if anyone has encountered such a lockup. Murray Henderson Web Application Developer Ivy Hill Corporation [EMAIL PROTECTED] (502)473-2806 -Original Message- From: Don Verhagen [mailto:[EMAIL PROTECTED] Sent: Monday, November 29, 2004 12:37 PM To: [EMAIL PROTECTED] Subject: [U2] [UD] XML Parse/Open/ReadXMLData I'm having a problem with creating an extraction file in Unidata 6.0.9 on HPUX 11.11i. It's not writting to the correct attribute as defined by the dictionary item named in "field". Simple XML Doc(test.xml): Node1 Node2 Node3 - Extraction Record (text.ext) - Test Program *$BASICTYPE "U" SUBROUTINE B.TEST.XML OPEN '','TEST.FILE' TO F.TF ELSE RETURN * XML.FNAME = "_XML_/test.xml" EXT.FNAME = "_XML_/TEST.EXT" * STATUS = PREPAREXML(XML.FNAME,F_XML) IF NOT(STATUS) THEN STATUS = OPENXMLDATA(F_XML,EXT.FNAME,D_XML) IF NOT(STATUS) THEN MOREDATA = 1 LOOP WHILE (MOREDATA=1) DO STATUS = READXMLDATA(D_XML,THIS.REC) IF NOT(STATUS) THEN WRITE THIS.REC ON F.TF,'DON.XML' MOREDATA = 0 END ELSE MOREDATA = 0 STOP 'XML ERROR' END END REPEAT * STATUS = CLOSEXMLDATA(D_XML) STATUS = RELEASEXML(F_XML) END ELSE PRINT 'OPENXML ERROR' END END ELSE PRINT 'PREPARE ERROR' END - Results of Test record (DON.XML) written to TEST.FILE: <1> node1 <2> node3 - Unidata appears to just be writing the data out sequentially rather than using the attribute number in the dictionary item. Any ideas? Thanks, -- Donald Verhagen Application Development Manager [EMAIL PROTECTED] Tandem Staffing Solutions, Inc. 1690 S Congress Avenue, Suite 210 Delray Beach, FL 33445 USA Voice Phone: 561.454.3592 Fax Phone: 561.454.3640 --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: [SPAM] - [U2] [UD] XML Parse/Open/ReadXMLData - Bayesian Filter detected spam
Donald , I can't see how it gets to the write statement ? MOREDATA = 1 LOOP WHILE (MOREDATA=1) DO Cheers, Angelo Collazo Sr. Programmer PNY Technologies, Inc. Phone: (973) 560-5333 Fax: (973) 560-5280 E-Mail: [EMAIL PROTECTED] -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Don Verhagen Sent: Monday, November 29, 2004 12:37 PM To: [EMAIL PROTECTED] Subject: [SPAM] - [U2] [UD] XML Parse/Open/ReadXMLData - Bayesian Filter detected spam I'm having a problem with creating an extraction file in Unidata 6.0.9 on HPUX 11.11i. It's not writting to the correct attribute as defined by the dictionary item named in "field". Simple XML Doc(test.xml): Node1 Node2 Node3 - Extraction Record (text.ext) - Test Program *$BASICTYPE "U" SUBROUTINE B.TEST.XML OPEN '','TEST.FILE' TO F.TF ELSE RETURN * XML.FNAME = "_XML_/test.xml" EXT.FNAME = "_XML_/TEST.EXT" * STATUS = PREPAREXML(XML.FNAME,F_XML) IF NOT(STATUS) THEN STATUS = OPENXMLDATA(F_XML,EXT.FNAME,D_XML) IF NOT(STATUS) THEN MOREDATA = 1 LOOP WHILE (MOREDATA=1) DO STATUS = READXMLDATA(D_XML,THIS.REC) IF NOT(STATUS) THEN WRITE THIS.REC ON F.TF,'DON.XML' MOREDATA = 0 END ELSE MOREDATA = 0 STOP 'XML ERROR' END END REPEAT * STATUS = CLOSEXMLDATA(D_XML) STATUS = RELEASEXML(F_XML) END ELSE PRINT 'OPENXML ERROR' END END ELSE PRINT 'PREPARE ERROR' END - Results of Test record (DON.XML) written to TEST.FILE: <1> node1 <2> node3 - Unidata appears to just be writing the data out sequentially rather than using the attribute number in the dictionary item. Any ideas? Thanks, -- Donald Verhagen Application Development Manager [EMAIL PROTECTED] Tandem Staffing Solutions, Inc. 1690 S Congress Avenue, Suite 210 Delray Beach, FL 33445 USA Voice Phone: 561.454.3592 Fax Phone: 561.454.3640 --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ This e-mail message from PNY Technologies, Inc. is for the sole use of the intended recipient(s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] test
You just ain't had a good turkey that's all I can say. You need a southern deep fried turkey. You will want to have more than once a year. (Yes, the left overs are good too). Jimmy -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Simon Carter Sent: Friday, November 26, 2004 10:55 AM To: [EMAIL PROTECTED] Subject: RE: [U2] test Les, More to do with Thanksgiving than anything else. Personally, I can only face one turkey dinner per year... Simon -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Les Hewkin Sent: 26 November 2004 14:25 To: U2 Users (E-mail) Subject: [U2] test Are the lists up and running? I haven't seen any post for nearly 24 hours Les. This e-mail and any attachments are confidential and intended solely for the use of the addressee only. If you have received this message in error, you must not copy, distribute or disclose the contents; please notify the sender immediately and delete the message. This message is attributed to the sender and may not necessarily reflect the view of Travis Perkins plc or its subsidiaries (Travis Perkins). Agreements binding Travis Perkins may not be concluded by means of e-mail communication. E-mail transmissions are not secure and Travis Perkins accepts no responsibility for changes made to this message after it was sent. Whilst steps have been taken to ensure that this message is virus free, Travis Perkins accepts no liability for infection and recommends that you scan this e-mail and any attachments. Part of Travis Perkins plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, Northampton, NN5 7UG. --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
RE: [U2] Uniobjects.NET speed/performance
I've had the same experience, using a select loop in a list runs very slowly, and was planning to try this same approach. I tried to use ReadList method of the Slist object as documented in the UniObjects manual, but haven't gotten it to work yet. Did you use the ReadList or did you fill the array by repeating listobject.Next()? I'm still on UniObject 6, working with UniData 6. If I just do a listobject.Select(fileobject) then it processes fast enough. But if I execute a command to create a select list and then loop through it, the performance gets progressively worse as the record count increases. I'd appreciate any example you might be able share. Thanks Victor St. Clair -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Donald Kibbey Sent: Thursday, November 04, 2004 4:11 AM To: [EMAIL PROTECTED] Subject: Re: [U2] Uniobjects.NET speed/performance I found that using a select list within a loop was cause for a long nap... I fixed that by reading the entire list into an array and then looping through the array. I've read on this list that there is an updated uniobjects.dll available, but my VAR was not able to locate it?!? I really don't understand why IBM does not just post the developers tools as a public download. You really can't do much with them unless you already have a licensed database so why the hassle? Don Kibbey Financial Systems Manager Finnegan, Henderson, Farabow, Garrett & Dunner LLP --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/ --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
[U2] [UD] XML Parse/Open/ReadXMLData
I'm having a problem with creating an extraction file in Unidata 6.0.9 on HPUX 11.11i. It's not writting to the correct attribute as defined by the dictionary item named in "field". Simple XML Doc(test.xml): Node1 Node2 Node3 - Extraction Record (text.ext) - Test Program *$BASICTYPE "U" SUBROUTINE B.TEST.XML OPEN '','TEST.FILE' TO F.TF ELSE RETURN * XML.FNAME = "_XML_/test.xml" EXT.FNAME = "_XML_/TEST.EXT" * STATUS = PREPAREXML(XML.FNAME,F_XML) IF NOT(STATUS) THEN STATUS = OPENXMLDATA(F_XML,EXT.FNAME,D_XML) IF NOT(STATUS) THEN MOREDATA = 1 LOOP WHILE (MOREDATA=1) DO STATUS = READXMLDATA(D_XML,THIS.REC) IF NOT(STATUS) THEN WRITE THIS.REC ON F.TF,'DON.XML' MOREDATA = 0 END ELSE MOREDATA = 0 STOP 'XML ERROR' END END REPEAT * STATUS = CLOSEXMLDATA(D_XML) STATUS = RELEASEXML(F_XML) END ELSE PRINT 'OPENXML ERROR' END END ELSE PRINT 'PREPARE ERROR' END - Results of Test record (DON.XML) written to TEST.FILE: <1> node1 <2> node3 - Unidata appears to just be writing the data out sequentially rather than using the attribute number in the dictionary item. Any ideas? Thanks, -- Donald Verhagen Application Development Manager [EMAIL PROTECTED] Tandem Staffing Solutions, Inc. 1690 S Congress Avenue, Suite 210 Delray Beach, FL 33445 USA Voice Phone: 561.454.3592 Fax Phone: 561.454.3640 --- u2-users mailing list [EMAIL PROTECTED] To unsubscribe please visit http://listserver.u2ug.org/
