Re: [U2] db listings
Hello Eric, Thank you for contacting us. We are just generating the May update of the ranking. It's too late to include it there, but we will definitely have a look to include it is future updates. best regards Matthias On 01.05.2013 18:56, Eric Neu wrote: Greetings, UniData and UniVerse (and the term U2) refer to a multivalue DBMS from Rocket Software. It would be nice to see how it ranks against the bigger players. Great site! Keep up the good work. -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Symeon Breen Sent: Wednesday, May 01, 2013 3:50 AM To: u2-users@listserver.u2ug.org Subject: [U2] db listings I have come across a few people recently who use this site to look at DB popularity - should U2 (and other MV systems be on there) http://db-engines.com/en/ranking/multivalue+dbms ___ 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
Re: [U2] [UD] Determining number of users licensed
Windows/UniData listuser has it as well :listuser Licensed/Effective # of Users Udt Sql iPhantom Total 68 / 68 51 0 0 51 -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: Wednesday, September 12, 2012 2:13 PM To: 'U2 Users List' Subject: Re: [U2] [UD] Determining number of users licensed Are you on UNIX by chance? The first couple of lines of listuser tell you: # listuser | head Licensed(UDT+CP)/Effective Udt Sql iPhtm Pooled Total ( 875 + 0 ) / 875 511 45 2 0 558 -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Colin Alfke Sent: Wednesday, September 12, 2012 3:54 PM To: 'U2 Users List' Subject: Re: [U2] [UD] Determining number of users licensed I've tracked the largest number of users logged in - but I didn't have to worry about the max. I had thought it was in the SYSTEM() somewhere - but a quick look through help didn't show it. You could try parsing it out of the @udtbin\smm.log file... It's in there for windows - not sure about HPUX though. good luck Colin -Original Message- From: dean.armbrus...@ferguson.com Sent: September 12, 2012 2:24 PM To: u2-users@listserver.u2ug.org Subject: [U2] [UD] Determining number of users licensed Is there a way to programmatically determine the number of licensed users allowed? SYSTEM(514) reports the number of non-phantom users currently logged in, which is essentially the number of licenses in use. I want to compare that against the number of users allowed in a monitoring program. I want to know if we're close to the limit before we run out. The number of licenses varies by server. Colleagues have suggested using grep on udtconfig for NUSERS, but that is not the same thing. Since we generally have 100-200 phantom processes, we sometimes configure to a size larger than the license limit to have room for those phantom processes. UniData 7.3.1 HPUX 11.31 Dean Armbruster ___ 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 (c) 2012 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
Re: [U2] trimming a list (a test of your ability)
Thought I'd have a go at something a bit different so I came up with a recursive routine (CHECK.LIST). I used a simple list of 5000 integers and filtered evens out as my test. The recursion basically splits the list in half until it's smallish, then processes CNT to 1 step -1. It didn't produce dramatic time savings until I used dimensioned arrays to quickly split the source list. I used the best suggestions from all the previous posts to compare a few different methods to gauge how each performs. TEST.LIST.PROCESSING List has 5000 entries 1]2]3]4]5]6]7]8]9]10]11]12]13]14]15]16]17]18]19]20]21]22]23]24]25]26]27] 28]... Evens filtered with DELETE, elapsed time is 313ms 1]3]5]7]9]11]13]15]17]19]21]23]25]27]29]31]33]35]37]39]41]43]45]47]49]51 ]53]55] Filtered with DEL, elapsed time is 453ms 1]3]5]7]9]11]13]15]17]19]21]23]25]27]29]31]33]35]37]39]41]43]45]47]49]51 ]53]55] DELETE using CNT to 1 STEP -1, elapsed time is 578ms 1]3]5]7]9]11]13]15]17]19]21]23]25]27]29]31]33]35]37]39]41]43]45]47]49]51 ]53]55] Filtered using second list, elapsed time is 547ms 1]3]5]7]9]11]13]15]17]19]21]23]25]27]29]31]33]35]37]39]41]43]45]47]49]51 ]53]55] Split lists recursively filter small lists, elapsed time is 16ms 1]3]5]7]9]11]13]15]17]19]21]23]25]27]29]31]33]35]37]39]41]43]45]47]49]51 ]53]55] Regards, Eric Y. Neu Sr. Programmer Analyst Zetron, Inc. 425.820.6363 x271 www.zetron.com ps are attachements allowed on this list server, wasn't sure so I posted the routines inline * Program: TEST.LIST.PROCESSING* * Purpose: test list handling methods * * By: EYNeu - 07/12/12 * * build a list of integers time filtering evens * from the list using various methods and techniques * --- build a list of integers to process TOTCNT = 5000 LIST = '' FOR I = 1 TO TOTCNT LIST-1=I NEXT I SAVELIST = LIST PRINT 'List has ':TOTCNT:' entries' PRINT LIST[1,75]:'...' * --- DELETE is baseline method CNT = TOTCNT LIST = SAVELIST BT = SYSTEM(12) FOR I = 1 TO CNT IF LISTI/2 = INT(LISTI/2) THEN LIST = DELETE(LIST,I) I -= 1 CNT -= 1 END NEXT I ET = SYSTEM(12) PRINT PRINT 'Evens filtered with DELETE,': PRINT ' elapsed time is ':ET-BT:'ms' PRINT LIST[1,79] * --- try DEL instead CNT = TOTCNT LIST = SAVELIST BT = SYSTEM(12) FOR I = 1 TO CNT IF LISTI/2 = INT(LISTI/2) THEN DEL LISTI I -= 1 CNT -= 1 END NEXT I ET = SYSTEM(12) PRINT PRINT 'Filtered with DEL,': PRINT ' elapsed time is ':ET-BT:'ms' PRINT LIST[1,79] * -- baseline method working from cnt to 1 CNT = TOTCNT LIST = SAVELIST BT = SYSTEM(12) FOR I = CNT TO 1 STEP -1 IF LISTI/2 = INT(LISTI/2) THEN LIST = DELETE(LIST,I) END NEXT I ET = SYSTEM(12) PRINT PRINT 'DELETE using CNT to 1 STEP -1,': PRINT ' elapsed time is ':ET-BT:'ms' PRINT LIST[1,79] * --- filter using a second list CNT = TOTCNT LIST = SAVELIST LIST2 = '' BT= SYSTEM(12) FOR I = 1 TO CNT IF LISTI/2 # INT(LISTI/2) THEN LIST2-1 = LISTI END NEXT I ET= SYSTEM(12) LIST = LIST2 LIST2 = '' PRINT PRINT 'Filtered using second list,': PRINT ' elapsed time is ':ET-BT:'ms' PRINT LIST[1,79] * --- recursively split list and filter smaller lists LIST = SAVELIST BT = SYSTEM(12) CALL CHECK.LIST(LIST) ET = SYSTEM(12) PRINT PRINT 'Split lists recursively filter small lists,': PRINT ' elapsed time is ':ET-BT:'ms' PRINT LIST[1,79] SUBROUTINE CHECK.LIST(LIST) * Program: CHECK.LIST * * Purpose: Recursive list processor* * By: EYNeu - 07/12/12 * LISTMAX = 100 CNT = DCOUNT(LIST,@AM) IF CNT LISTMAX THEN MID = INT(CNT/2) * -- first go at splitting lists * -- too much overhead in building split lists this way *FIRSTHALF = '' *FOR I = 1 TO MID * FIRSTHALF-1 = LISTI *NEXT I *CALL CHECK.LIST(FIRSTHALF) * *SECONDHALF = '' *FOR I = MID+1 TO CNT * SECONDHALF-1 = LISTI *NEXT I *CALL CHECK.LIST(SECONDHALF) * -- second go at splitting a list * -- dimensioned arrays are handy for a quick split FIRSTHALF = '' SECONDHALF = '' DIM LISTARRAY(CNT) MATPARSE LISTARRAY FROM LIST,@AM MATBUILD FIRSTHALF FROM LISTARRAY,1,MID CALL CHECK.LIST(FIRSTHALF) MATBUILD SECONDHALF FROM LISTARRAY,MID+1,CNT CALL CHECK.LIST(SECONDHALF) * -- put the lists back together LIST = FIRSTHALF LIST-1 = SECONDHALF END ELSE * -- perform the filter here FOR I = CNT TO 1 STEP -1 IF LISTI/2 = INT(LISTI/2) THEN LIST = DELETE(LIST,I) END NEXT I END RETURN -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson Sent: Wednesday, July 11, 2012 5:10 PM To: u2-users@listserver.u2ug.org Subject: [U2] trimming a list (a test of your ability) 1295 FOR DISPLAY.LOOP = 1 TO KEY.COUNT
Re: [U2] Select Statement Invalid
This works 001: PQ 002: HSELECT WIPMTLRQ WITH @ID = 003: H 240573] 004: H 292508] 005: H 235115] 006: H 203346] 007: H 219843] 008: H 170808] 009: H 203304] 010: P 011: HSAVE-LIST WIPMTLRQ 012: P Bottom. -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wally Terhune Sent: Wednesday, July 11, 2012 5:10 PM To: U2 Users List Subject: Re: [U2] Select Statement Invalid Paragraphs run in U mode. Change it to a proc or change the syntax Wally Terhune Technical Support Engineer Rocket Software 4600 South Ulster Street, Suite 1100 **Denver, CO 80237 **USA t: +1 720 475 8055 **e: wterh...@rocketsoftware.com **w: rocketsoftware.com/u2 -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Al DeWitt Sent: Wednesday, July 11, 2012 5:19 PM To: u2-users@listserver.u2ug.org Subject: [U2] Select Statement Invalid Unidata 7.1.20, pick flavor I have this quick paragraph to select records based on partial keys: 001: PA 002: SELECT WIPMTLRQ WITH @ID = 299486]302667]318583]337991]374396]376742]382767]385661] 398932]415256]445409]453821] 454353]478175]478845]502457] Bottom. However, this is what I get when I run it: No data retrieved from current (S)SELECT statement. Yet if I run SELECT WIPMTLRQ WITH @ID = 299486] I get records returned. What am I missing? Thanks. Albert DeWitt, CPIM ___ 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 ___ U2-Users mailing list U2-Users@listserver.u2ug.org http://listserver.u2ug.org/mailman/listinfo/u2-users
RE: [U2] I need a favor
Very Nice. When I write one-time utilities to fix an issue there's always bits of code I reuse from past programs. Things like an escape while processing in the main loop. Something like the following... 0058 * Provide an Escape 0059 IF SYSTEM(14) THEN 0060 INPUT ANS,1 0061 IF ANS=CHAR(27) THEN 0062 CALL SB.DISP(4,'UTLD9000.2') ;!Exit? Yes, No 0063 IF RTN.FLAG = 'X' THEN CLEARSELECT; GO 999 0064 END 0065 END I could see you're code generator being very useful if it had selectable options to include bits of code for different purposes. Regards, Eric Y. Neu Sr. Programmer Analyst Zetron, Inc. eneu at zetron dot com 425.820.6363 x271 www.zetron.com -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Charles Barouch Sent: Thursday, July 26, 2007 8:02 AM To: u2-users@listserver.u2ug.org Subject: [U2] I need a favor snip --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/
[U2] @LOGNAME?
Greetings all, Does anyone here know how UniData on Windows sets @LOGNAME. Where/When does it get set? (UniData 6.1, Windows 2003SE) We've recently undergone a standards enforcement for NT user ids and many of my users had their user id changed. When these users use a process that checks @LOGNAME (from BASIC) to determine who they are their old user id is returned. I thought perhaps UniData might have stored some trace of the old IDs in the user's registry but logging on a new machine produces the same result. I also thought perhaps UniData might cache Windows credentials and forcing a password change might trigger an update but that didn't help. I'll try a server reboot after the close of business but if that doesn't work I'm not sure what to try next. I have considered using GETENV('USERNAME') to return the ID I'm expecting (which works btw) but that means changing a slew of programs and I'd prefer not to do that. Any information on this would be really helpful. Thank you, Eric Neu Zetron, Inc. eneu at zetron dot com 425.820.6363 x271 www.zetron.com --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/