Re: [U2] how to round to 2 decimals?

2010-10-14 Thread John Woollam
Hi

I've always used 'R2'

e.g. ANS = N1 * N2 'R2'

No scaling, just rounding

Regards

John Woollam  |  Group Function Support 1  (Finance Systems)  |  Travis
Perkins PLC  |  01604 682751
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Chris Austin
Sent: 13 October 2010 22:22
To: u2-users@listserver.u2ug.org
Subject: [U2] how to round to 2 decimals?


I'm trying to figure out how to round to 2 decimal places with a
floating point in UniVerse

For example 2596 x 8.333 = 21,632.468

How would you round that in UniVerse to 21,632.47?

Thanks!
  
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] how to round to 2 decimals?

2010-10-14 Thread John Woollam
Hi

Never heard of the DROUND() function in Universe.

Anyway, why would I want to use a function syntax when I can do

ANS = N1 * N2 'R2' and it is the answer that gets rounded?
Easy to write.
Easy to read...

John Woollam  |  Group Function Support 1  (Finance Systems)  |  Travis
Perkins PLC  |  01604 682751

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Larry Hiscock
Sent: 14 October 2010 16:49
To: 'U2 Users List'
Subject: Re: [U2] how to round to 2 decimals?

Does UniVerse not support the DROUND() function?  

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of John Woollam
Sent: Thursday, October 14, 2010 1:02 AM
To: U2 Users List
Subject: Re: [U2] how to round to 2 decimals?

Hi

I've always used 'R2'

e.g. ANS = N1 * N2 'R2'

No scaling, just rounding

Regards

John Woollam  |  Group Function Support 1  (Finance Systems)  |  Travis
Perkins PLC  |  01604 682751
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Chris Austin
Sent: 13 October 2010 22:22
To: u2-users@listserver.u2ug.org
Subject: [U2] how to round to 2 decimals?


I'm trying to figure out how to round to 2 decimal places with a
floating point in UniVerse

For example 2596 x 8.333 = 21,632.468

How would you round that in UniVerse to 21,632.47?

Thanks!
  
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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.
/SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis
Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2

Re: [U2] Unix to SQLServer

2010-08-13 Thread John Woollam
We have a large SQL server database behind our Business Objects setup.
We just export tilde-delimited flat files daily and have SQL Server
import them.
Dead easy.
No learning curve really.
No good for your CV, though...

John Woollam  |  Group Function Support 1  (Finance Systems)  |  Travis
Perkins PLC  | UK |  01604 682751


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Norman, David
(Health)
Sent: 13 August 2010 01:24
To: 'u2-users@listserver.u2ug.org'
Subject: [U2] Unix to SQLServer

In the dying months of our major application, we are looking at sending
small amounts of data from UniVerse 10.0.16 HP-UX 11 to an SQLServer
database every few minutes from a phantom. I assume ODBC would be the
way to go, with middleware from someone. Which middleware do people
recommend ? Is there any which doesn't require UniVerse to be stopped to
install ? I looked on the Wiki but didn't find anything about this.

Thanks,

David Norman
Senior Software Engineer - SA Ambulance Service

ICT Services
SA Health
Government of South Australia

Box 3, GPO
Adelaide, South Australia 5001
*+61 8 8274 0384
* fax +61 8 8271 4844
* david.nor...@health.sa.gov.au


This e-mail may contain confidential information, which also may be
legally privileged. Only the intended recipient(s) may access, use,
distribute or copy this e-mail. If this e-mail is received in error,
please inform the sender by return e-mail and delete the original. If
there are doubts about the validity of this message, please contact the
sender by telephone. It is the recipient's responsibility to check the
e-mail and any attached files for viruses.



___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Writeseq - getting to the EOF

2010-03-25 Thread John Woollam
We have used the SEEK filehandle, 0 2 statement

It is literally an exposure of the C seek statement.

Yes, it works

John Woollam  |  Group Function Support 1  (Finance Systems)  |  Travis Perkins 
PLC  |  UK

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Don Robinson
Sent: 24 March 2010 23:43
To: U2 Users List
Subject: Re: [U2] Writeseq - getting to the EOF

George,

Have you tried the SEEK statement, ie,
SEEK filehandle, 0 , 2

The 0 (zero) is the offset and the 2 is relative to the end of the file.

Caution, untested code!
 
Good luck,
Don Robinson






From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Wed, March 24, 2010 5:25:31 PM
Subject: [U2] Writeseq - getting to the EOF

ok. UV 10.0.2

Is there a quick way to get to the end of a file to start appending after an 
OPENSEQ
Otherthan, a loop to READSEQ until it hits the EOF.

Right now, that is not a problem, but this file could grow to some considerable 
size, and
  that loop might take a little bit to cycle through.

I didn't see any options for the OPENSEQ to start at the EOF, and didn't find 
any commands
  that would set the eof (other than WEOFSEQ which doesn't seem likely to help).

Thanks


George Gallen
Senior Programmer/Analyst
Accounting/Data Division, EDI Administrator
ggal...@wyanokegroup.com
ph:856.848.9005 Ext 220
The Wyanoke Group
http://www.wyanokegroup.com



___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Comparing two DIMsnsioned arrays

2010-01-22 Thread John Woollam
Nope

We use Universe 10.1 at present in REALITY flavour and a trial program
with your code does not compile.

I recall that you can do

MAT ARRAY1 = MAT ARRAY2

as an assignment,

but to compare the two arrays you would have to MATBUILD both to dynamic
arrays and compare those


John Woollam  |  Group Function Support 1  (Finance Systems)  |  Travis
Perkins PLC  |  01604 682751

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Graham, Dave
Sent: 22 January 2010 15:47
To: u2-users@listserver.u2ug.org
Subject: [U2] Comparing two DIMsnsioned arrays

Does anyone recall the ability to compare two DIMensioned arrays as
follows?

 

DIM ARRAY1(10)

DIM ARRAY2(10)

MAT ARRAY1 = ''

MAT ARRAY2 = ''

.

.

.

IF MAT ARRAY1 = MAT ARRAY2 THEN dosomething ELSE dosomethingelse

 

I could have sworn that I used to do that on some PICK variant or
another.

 

 

 

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] UOJ The RPC Failed on Unifile.write()

2010-01-11 Thread John Woollam
If your Unifile is also a SQL Table, and the data you put into 73 is
illegal for that table, it will cause a write failure as the SQL
checking will not allow you to write it.

John Woollam  |  Group Financial Systems  |  Travis Perkins PLC  |
01604 682751
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Kevin King
Sent: 11 January 2010 14:25
To: U2 Users List
Subject: [U2] UOJ The RPC Failed on Unifile.write()

I have a test UOJ program communicating to a backend Unidata/AIX server
that
seems to work fine with the exception (pun intended) of UniFile write.
The
file opens fine, we can read the record fine, but when attempting to
update
the record, we get this:

asjava.uniobjects.UniFileException: The RPC failed
at asjava.uniobjects.UniFile.write(UniFile.java:1288)
at Test.main(Test.java:46)

Here's the offending code:

43 UniFile uFile = uSession.open(PRODUCT);
44 UniDynArray record = new
UniDynArray(uFile.read(001!JM7012CK-6EU-F));
45 record.replace(73,TEST TEST TEST);
46 uFile.write(001!JM7012CK-6EU-F,record);

Probably something stupidly simple; any ideas?

-Kevin
http://www.PrecisOnline.com
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] UOJ The RPC Failed on Unifile.write()

2010-01-11 Thread John Woollam
We find that even in a simple, running on Unix, Databasic program, if
you try to write illegal data to a SQL table then you get a WRITE
FAILURE error, so we guess that the SQL integrity checking is working
even on a direct write from any source.

John Woollam  |  Group Financial Systems  |  Travis Perkins PLC  |
01604 682751

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Kevin King
Sent: 11 January 2010 15:02
To: U2 Users List
Subject: Re: [U2] UOJ The RPC Failed on Unifile.write()

File permissions are wide open.  I am intrigued however by the SQL
mention.
The file in question is defined in the VSG under a separate SQL name
(PRODUCT_1).  And oddly enough I keep getting a RPC parameter mismatch
error when I try to view the mapped attributes with the VSG.  Certainly
the
VSG definitions aren't used by UOJ are they?
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] UniVerse Indexes

2009-11-20 Thread John Woollam
SSELECTINDEX?
No.
Indices are sorted in key order. You will find that if you do a TCL
SELECT on a file where the key field is indexed, it is the same as a
SSELECT.

BUT
If you do a SELECT or SSELECT on the file from TCL or in an EXECUTE or
PERFORM, up to one index will be used. Try adding the word EXPLAIN to
the end of your command line SELECT.
I think you may need to use an EXECUTE to achieve the result you want.

I have also found, when unix-xopying files around, that a SELECTINDEX
will terminate the program with an error if the index is broken, whereas
an EXECUTEd SELECT will just go slow.

John Woollam  |  Group Financial Systems  |  Travis Perkins PLC  |
01604 682751


-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Steve
Hinnenkamp
Sent: 20 November 2009 14:23
To: U2 Users
Subject: [U2] UniVerse Indexes

Need help, I'm new at using UniVerse indexes.

In a basic program:

SELECTINDEX INDX.FLD, MATCH.FLD FROM OPEN.FILE SELECT TO IX.LIST
READNEXT ID FROM IX.LIST ELSE (loop until done)

This works great (and fast). Now I have come upon a need to bring these
matching indexes in sorted a different way. I could, in this
application, create a work around but I would think there should be an
easier way (SSELECTINDEX would be nice or some sort of
SAVE.LIST/GET.LIST).

Also, is there any way to utilize these indexes at the TCL level?

Thanks in advance for any help.

Steve Hinnenkamp


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] UniObject .NET Session and Common Block Bug

2009-10-08 Thread John Woollam
Hi All

Within an execution environment, all subroutines using a given common name, 
including unnamed common, must have each common the same size as every other 
subroutine in the same environment, otherwise you get a COMMON SIZE MISMATCH 
ERROR.

That is why, when you have 2 includes containing unnamed common, and include 
one in one subroutine and both in another, you get the common size mismatch 
error.

In short, put all your unnamed common in one include only and your problems 
will go away

Regards

John Woollam  |  Group Financial Systems  |  Travis Perkins PLC  |  01604 682751

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Anthony W. Youngman
Sent: 08 October 2009 16:51
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] UniObject .NET Session and Common Block Bug

In message 
13e4ae055d203648a4121114f2458c8c7a4adb8...@tefnut.perth.itvision.com.au
, Adrian Halid adrian.ha...@itvision.com.au writes
Thanks for the help.

It seems once you name your common block you do not get the error anymore.

I don't think that's the problem ...

Just having a read of the documentation about the common statement in 
the documentation.

A common area can be either named or unnamed. An unnamed common area is
lost when the program completes its execution and control returns to 
the UniVerse
command level. A named common area remains available for as long as the user
remains in the UniVerse environment.

From what it says I should be able to have them unnamed and loose it 
between subroutine calls.

That may well depend on your emulation. AIUI, unnamed common persists 
for as long as a program runs. It's returning to TCL that clears unnamed 
common (as I say, AIUI, I've never used unnamed common).

Named common persists until you log out. And I've had several obscure 
bugs where something tries to changed the size of common - that's not 
allowed.

So if subroutine A effectively contains COMMON A,B,C while subroutine 
B effectively contains COMMON A,B,C,D,E,F then running them in the 
same execution environment *will* cause a crash because B has tried to 
redefine common.

Regards


Adrian Halid
Senior Analyst/Programmer
 
Cheers,
Wol
-- 
Anthony W. Youngman pi...@thewolery.demon.co.uk
'Yings, yow graley yin! Suz ae rikt dheu,' said the blue man, taking the
thimble. 'What *is* he?' said Magrat. 'They're gnomes,' said Nanny. The man
lowered the thimble. 'Pictsies!' Carpe Jugulum, Terry Pratchett 1998
Visit the MaVerick web-site - http://www.maverick-dbms.org Open Source Pick
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

html
head
meta http-equiv=Content-type content=text/html; charset=UTF-8
/head
body
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'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. /SPAN/P
P style=MARGIN-TOP: 0pt; MARGIN-BOTTOM: 0ptSPAN 
style=FONT-SIZE: 8.2pt; FONT-FAMILY: 'MS Sans Serif'Part of Travis Perkins 
plc. Registered Office: Lodge Way House, Lodge Way, Harlestone Road, 
Northampton, NN5 7UG. /SPAN/P
/BODY
/HTML

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users