Perhaps our approach was different. We created a hash of sorts and the size
isn't an issue. Here's the mod I made to the code. One of the developers I
work with came up with this. Works great.
DIM LOC.ARY(4000)
MAT LOC.ARY=''
Z=STR('*',1000)
T1=TIME()
FOR X=1 TO 100000
BUCKET=MOD(CHECKSUM(X),4000)+1
LOC.ARY(BUCKET)<-1>=Z
NEXT X
T2=TIME()
CRT OCONV(T2-T1,'MTS')
Elapsed Time 00:00:00 (0.172)
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Baakkonen, Rodney
A (Rod) 46K
Sent: Thursday, July 09, 2009 10:36 AM
To: U2 Users List
Subject: Re: [U2] General guidelines on indexing
We used to us the DIM approach as well. But having the process blow up a
couple of years later because the DIM array was not large enough to
accommodate the data caused us to go the work file method. The DIM array was
fast, but needed to much upkeep. And after Sarbanes-Oxley, making changes to
programs took a whole new perspective. But that is another rant for another
time.
-----Original Message-----
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of David Ward
Sent: Thursday, July 09, 2009 9:24 AM
To: 'U2 Users List'
Subject: Re: [U2] General guidelines on indexing
Original test and a couple of other variations. We use the DIM approach in
several cases where variable data is large and temporary.
Test system run on
WindowsXP
Single DuoCore @2.20ghz
2GB Ram
Original version - <-1> variable append
Elapsed Time 00:25:04
Altered version - Using WRITESEQ - Same System
1.203 seconds
Altered version - Using DIM Variable - Same System
0.172 seconds
_______________________________________________
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
----------------------------------------------------------------------------
--
CONFIDENTIALITY NOTICE: If you have received this email in error, please
immediately notify the sender by e-mail at the address shown. This email
transmission may contain confidential information. This information is
intended only for the use of the individual(s) or entity to whom it is
intended even if addressed incorrectly. Please delete it from your files if
you are not the intended recipient. Thank you for your compliance.
Copyright 2009 CIGNA
============================================================================
==
_______________________________________________
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
