Re: [U2] Green Screen - Wide Screen

2011-10-17 Thread Womack, Adrian
600 characters wide is a lot to display at the same time I'm pretty sure it would be illegible at that size - can't you just code your program to scroll the data sideways? - DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the

Re: [U2] Reading Dictionary Items

2011-09-29 Thread Womack, Adrian
I realise you already have an answer - but here's a one liner that would do the same thing, without writing any code: UPDATE.RECORD DICT filename F4,@ID ALL - DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended recipient,

Re: [U2] test

2011-09-28 Thread Womack, Adrian
Test reply - DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended recipient, please advise us by return e-mail immediately, and delete the e-mail and any attachments without using or disclosing the contents in any way. The

Re: [U2] ANOTHER TEST

2011-09-28 Thread Womack, Adrian
I saw those two test messages, so I thought I'd test posting as well. I haven't been able to post or reply to any messages on this list for well over a year (IRC) - so, somebody seems to have fixed something somewhere. - DISCLAIMER: Disclaimer. This

Re: [U2] Another NEW cutting-edge column based database concept!

2010-08-05 Thread Womack, Adrian
try it without the spam filter string nospam_please! -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Shawn Hayes Sent: Friday, 6 August 2010 10:09 AM To: U2 Users List Subject: Re: [U2] Another NEW cutting-edge

Re: [U2] UniJDBC calling UV subroutine: MESSAGE command limitations?

2010-06-30 Thread Womack, Adrian
Thankyou, thankyou! Phil. H didn't work - but it made me go and look up what other options are available for field 4 in the VOC. I needed to add a G - Allowed in an SQL CALL statement. So, no coding changes required at all - fantastic, just the way I like it. Thanks again. Adrian

Re: [U2] UniJDBC calling UV subroutine: MESSAGE command limitations?

2010-06-29 Thread Womack, Adrian
to perform the MESSAGE commands in a different process - maybe that would work. -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Womack, Adrian Sent: Wednesday, 30 June 2010 9:18 AM To: 'U2 Users List' Subject: [U2

Re: [U2] UniJDBC calling UV subroutine: MESSAGE command limitations?

2010-06-29 Thread Womack, Adrian
Oh, great - now I'm getting the same error for PHANTOM - so I can't use that workaround. VOC entry PHANTOM illegal as or in a procedure. -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Womack, Adrian Sent

Re: [U2] UniJDBC calling UV subroutine: MESSAGE command limitations?

2010-06-29 Thread Womack, Adrian
and obviously having it work natively from your UV sub would be better, but if it isn't possible... Regards, Dan -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Womack, Adrian Sent: Wednesday, June 30, 2010 1:39 PM To: 'U2

Re: [U2] Creating an index

2010-05-20 Thread Womack, Adrian
This should do the trick - Create a multi-valued i-descriptor with this code: CATS(REUSE(DATE:*),CATS(CATS(PART,REUSE(*)),QTY) -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Shawn Hayes Sent: Friday, 21 May

Re: [U2] Creating an index

2010-05-20 Thread Womack, Adrian
] On Behalf Of Womack, Adrian Sent: Friday, 21 May 2010 9:53 AM To: 'U2 Users List' Subject: Re: [U2] Creating an index This should do the trick - Create a multi-valued i-descriptor with this code: CATS(REUSE(DATE:*),CATS(CATS(PART,REUSE(*)),QTY) DISCLAIMER: Disclaimer. This e-mail is private

Re: [U2] Creating an index

2010-05-20 Thread Womack, Adrian
Here's another variation on a theme: CATS(REUSE(DATE:*),SPLICE(QTY,*,PART)) I was totally unaware of the useful SPLICE function until reading David's post. Thanks David. DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended recipient, please

Re: [U2] UniData ICONV function

2010-02-09 Thread Womack, Adrian
On Universe the help for conversion code DI only specifies using DI on it's own without any trailing options (the help for the usual D however shows all the various additional options). I've tried your example and it didn't work at all - nothing was displayed. I tried changing DIMDY to just DI

Re: [U2] UniVerse RetreiVe how do I query a file for all of itscolumn's values?

2010-01-20 Thread Womack, Adrian
Here's another simple option: Use REVISE (or ENTRO, MODIFY, etc) on the file - this will automatically create an @REVISE phrase in the file's dictionary. You could then use LIST filname @REVISE to see all the fields. (Note: REVISE will only create the @REVISE phrase if you don't already have

Re: [U2] An interesting find....

2009-12-15 Thread Womack, Adrian
You may be better off using something like this instead: DIM F.FILETOUSE(2) OPEN FILE1 TO F.FILETOUSE(1) ELSE STOP NO FILE1 OPEN FILE2 TO F.FILETOUSE(2) ELSE STOP NO FILE2 then use F.FILETOUSE(X) - without the need for any conditional statements, just ensure X is assigned properly.

Re: [U2] UniData Unibasic IN function

2009-11-10 Thread Womack, Adrian
I have a routine that gets variable length keyboard input without using any naps/sleeps etc - BUT we don't have any keyboard sequences that are subsets of other sequences. eg. we don't use a single ESC character to mean anything. So I basically just keep getting characters whilst the sequence

Re: [U2] Sequentially Hashed Files

2009-10-20 Thread Womack, Adrian
Have you tried setting MINIMUM.MODULUS to a high value on your dynamic file. This prevents the file from merging below the size you've set. Although it can still split to larger than that size. You can use the CONFIGURE.FILE command to set MINIMUM.MODULUS - but it won't take effect until the

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

2009-10-08 Thread Womack, Adrian
The common blocks you've shown are not named - maybe that's your problem. Try naming them (i.e. adding a unique slash-delimited name between the word COMMON and the variable name(s). eg. COMMON /AHC1/ AHCOMMON1 COMMON /AHC2/ AHCOMMON2 That way there won't be any conflict between the two

Re: [U2] Null character causes odd UV behaviour

2009-09-16 Thread Womack, Adrian
Have you tried CONVERT @NULL.STR TO IN STATE (for info on @NULL.STR see @variables in the BASIC help file) -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of IT-Laure Hansen Sent: Thursday, 17 September 2009 8:58 AM

Re: [U2] Null character causes odd UV behaviour

2009-09-16 Thread Womack, Adrian
It may also be worth playing with the RAW.INPUT and/or RAW.OUTPUT compiler directives: eg. BASIC BP progname RAW.INPUT RAW.OUTPUT These directives alter how system delimiters are mapped (I'm not sure whether null counts as a system delimiter) DISCLAIMER: Disclaimer. This e-mail is private

Re: [U2] General guidelines on indexing

2009-07-09 Thread Womack, Adrian
The code looks fine to me. I added crt len(s) to the end of the program and it printed 10009 (that's what I'd have expected). I'm running on an HP-UX ia64 box - maybe you're on Windows? -Original Message- From: u2-users-boun...@listserver.u2ug.org

Re: [U2] General guidelines on indexing

2009-07-08 Thread Womack, Adrian
I just tried this example on Universe 10.2.6 - it took 0.0665 seconds - basically instant, can't complain about that. -Original Message- From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Martin Phillips Sent: Thursday, 9 July 2009

RE: [U2] default sort order

2009-05-19 Thread Womack, Adrian
If you're talking about LIST DICT filename and getting the dictionary items listed by @ID (instead of the default field number order) then you need to edit the @-phrase in DICT.DICT - see the long LIST DICT.DICT thread from a couple of days ago for more details. You'll find that an @ phrase

RE: [U2] Auto-updating of secondary indices.

2009-05-17 Thread Womack, Adrian
Use LIST.INDEX filename and check under the Build column, indexes usually say Not Reqd if they are updated automatically. The DISABLE.INDEX ENABLE.INDEX commands can be used to turn off/on automatic updating of the indexes. But, as Henry mentioned, if the subroutines are accessing data in

RE: [U2] Problem with report - need help

2009-05-05 Thread Womack, Adrian
Change the field length in the dictionary to 9. The field length of all fields in dictionaries defines their external (output) length - eg a date using conversion code D needs a length of 11 even though it only takes up 5 characters in internal format. -Original Message- From:

RE: [U2] UV Timed INPUT

2009-03-12 Thread Womack, Adrian
Here's my hastily hacked together solution, it allows 5 seconds for the user to enter a string. It grabs a single character at a time and builds up a string - you need to cater for special characters manually, I've coded for enter and backspace, you could just discard any others that are below

RE: [U2] XML Escape function

2009-02-25 Thread Womack, Adrian
Here's the code I use (similar to everyone else's) - but I've catalogued it globally as a user conversion subroutine - this allows it to be used with ICONV OCONV: Eg. CONV.XML = OCONV(ORIG.XML,U2XML) Note: I've included conversion for three mark characters, just in case they manage to sneak

RE: [U2][UV] EQUATEs Using System Delmiiters

2008-10-06 Thread Womack, Adrian
Try putting parentheses around the expression: eg. EQU MX TO ('ABCD':@AM:'EFGH') That will cause each of the functions to operate on the whole string rather than on a single element of the string. Although something strange is obviously going wrong. I would have expected the operations to

RE: [U2] UniObjects and setting up Common Block

2008-07-15 Thread Womack, Adrian
I dealt with this problem by writing a new subroutine that initializes the required common variables. I then created our own session class that opens a UniObjects session and calls the initialization subroutine. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On

RE: [U2] grep for @VM

2008-07-14 Thread Womack, Adrian
If you're only looking through a few files, wouldn't it be easier to write a short basic program to read every record use INDEX() on each looking for the string? eg. STRING = 12:@VM:26 SELECT filevar LOOP WHILE READNEXT ID READ REC FROM filevar,ID THEN IF INDEX(REC,STRING,1)

RE: [U2] How to tell if running a subroutine though RedBack

2008-06-25 Thread Womack, Adrian
Check the content of the @AUTHORIZATION system variable. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Doug Farmer Sent: Thursday, 26 June 2008 2:57 AM To: u2-users@listserver.u2ug.org Subject: [U2] How to tell if running a subroutine though RedBack I

RE: [U2] Press any key to continue...

2008-04-29 Thread Womack, Adrian
While INPUT ANS,1 will work most of the time, if the user decides to press the backspace key or even the ESC key, nothing will happen. An alternative is: ANS = KEYIN() CLEARINPUT Which will grab a single character (including a backspace, etc). Note: if the keystroke sends two characters (eg.

RE: [U2] Files Open

2008-04-15 Thread Womack, Adrian
PORT.STATUS doesn't need to be run from the uv account, just copy the command in to the local VOC. You can then EXECUTE the command from a program supplying your own PID, and then strip out the required file names from the displayed data. You could wrap this all up in a function and call it from

RE: [U2] INCLUDE weirdo

2008-03-04 Thread Womack, Adrian
Does anyone else think it's bad practice to have code in INCLUDES? Surely it would be much better to have the INITIATE.FEEDBACK GIVE.FEEDBACK routines written as subroutines, and then simply call them from the appropriate spots. If the code in either of those routines needs to be changed, you'll

RE: [U2] Cumulative Trouble in paradise

2008-02-25 Thread Womack, Adrian
Not sure if this solution will work in UniData (but it does in Universe): Try writing an iType using this code: @2;Qty+@ eg: SORT FLAT.SHD BY Frame_Color BREAK.ON Frame_Color TOTAL Qty EVAL @2;Qty+@ The @2 means use the 2nd value defined in the iType, but because the 2nd value hasn't been

RE: [U2] [UB] Beep Error

2008-02-14 Thread Womack, Adrian
If you use @SYS.BELL instead of CHAR(7), the bell can be turned on or off using BELL ON or BELL OFF. BELL ON/OFF - toggles the value of @SYS.BELL between CHAR(7) and . -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Brutzman, Bill Sent: Friday, 15

RE: [U2] SLEEP 60 slept only 53 seconds, or else TIMEDATE() is

2008-02-12 Thread Womack, Adrian
--- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] Deep and long indentations vs multiple exit points

2007-11-29 Thread Womack, Adrian
But this is so much easier to read (note the liberal use of blank lines making the conditions easy to spot): LOOP WHILE READNEXT ID GOSUB PROCESS.REC REPEAT RETURN PROCESS.REC: READ RECORD FROM FILE,ID ELSE RETURN IF RECORDFLD.1 NE COND1 THEN

RE: [U2] Deep and long indentations vs multiple exit points

2007-11-28 Thread Womack, Adrian
I much prefer the multiple exit point method, it makes the code a lot easier to read. Prime examples are when you are looping through a file but only want to process certain records that pass a lot of conditions, it so much easier to test each condition individually and then RETURN immediately.

RE: [U2] Good Practice?

2007-11-26 Thread Womack, Adrian
Keith said: Then, to avoid the long setup string, one has to use CONVERT (or SWAP or CHANGE). You can always hard-code value-marks: TEST = AF1}CK1}CK2}H}LHC}MP}NU1}NU2}TK1}TK2 Adrian DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended

RE: [U2] Good Practice?

2007-11-25 Thread Womack, Adrian
The original new INDEX code (as posted by Keith) was... IF INDEX(TEST,'\':F200.SCHEME.CODE:'\',1) THEN THAT = Including the delimiters at the front back of the string, which prevents any false positives (like finding CK in CK1). Personally, I like the LOCATE solution as it makes for much more

RE: [U2] OCONV Extraction Question - Good Practice

2007-11-21 Thread Womack, Adrian
Using FMT forces correct syntax use. Having the trailing formatting characters, can cause all kinds of issues with small typos in the code (especially when the compiler just takes it all in it's stride). Look at these two examples: * Accidentally inserting a space into a numeric constant A = 123

RE: [U2] OCONV Extraction Question - Good Practice

2007-11-19 Thread Womack, Adrian
IMO, the only thing wrong with your example is the use of the trailing format strings - everyone (and I mean everyone) should be using the FMT function, making your example: CRT FMT(OCONV(VAR1,MD0),R#6 ):FMT(OCONV(VAR2,MD2),R#10 ):FMT(OCONV(VAR3,MD4),R#14) The old method is a disaster waiting to

RE: [U2] What is this error??

2007-09-13 Thread Womack, Adrian
Take a look at the ED code - it's in the BP of the uvhome account, named ED.B There's a bunch of code relating to CASE, and there's this mod line at the top of the program: 06/01/03 E2835 LFD For 10.1 TCL Case Insensitivity project So, I guess you can blame someone with the initials LFD ;)

RE: [U2] [UV] - Getting the call stack trace within a program

2007-09-03 Thread Womack, Adrian
Checkout SYSTEM(9001) - this should return what you're after. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bernard Lubin Sent: Monday, 3 September 2007 3:47 PM To: u2-users@listserver.u2ug.org Subject: [U2] [UV] - Getting the call stack trace within a

RE: [U2] [UV] Speeding up a big BY.EXP select

2007-08-09 Thread Womack, Adrian
Just one thing to be aware of: SSELECT implies BY @ID so the BY @ID in your statement is redundant. To prevent sorting by @ID just use SELECT not SSELECT. So, if you are using SSELECT then you're already sorting by @ID, so I doubt you are going to make it any quicker by modifying your SELECT

RE: [U2] Logged user list

2007-07-10 Thread Womack, Adrian
Try SYSTEM(1302) - each attribute holds details about one user (no, username, pid, type) eg: USERS = SYSTEM(1302) CRT USERS1 CRT USERS2 -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of chuchi Sent: Tuesday, 10 July 2007 5:34 PM To:

[U2] [UV] Conversion code for week number

2007-07-10 Thread Womack, Adrian
Does anyone know of a conversion code that returns the week number of the year? DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended recipient, please advise us by return e-mail immediately, and delete the e-mail and any attachments without using or

RE: [U2] [UV] Conversion code for week number {unclassified}

2007-07-10 Thread Womack, Adrian
Thanks for that Mike. I'd forgotten about pickwiki. I found this function which should do the trick: http://www.pickwiki.com/cgi-bin/wiki.pl?IsoWeekNum Thanks, Adrian -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of HENDERSON MIKE, MR Sent: Wednesday,

{Blocked Content} RE: [U2] Tony Jones/WA/QBE/Insurance is out of the office.

2007-07-05 Thread Womack, Adrian
Warning: This message has had one or more attachments removed Warning: (not named). Warning: Please read the AngelicHost-Attachment-Warning.txt attachment(s) for more information. Karl, You're right about these messages being annoying - but you're wrong about 5 months. It's actually 5 days. You

{Blocked Content} RE: [U2] @VARIABLES

2007-03-24 Thread Womack, Adrian
Warning: This message has had one or more attachments removed Warning: (not named). Warning: Please read the AngelicHost-Attachment-Warning.txt attachment(s) for more information. If the includes only contain EQUATES then there is no point in using GOSUB, as EQUATES are resolved at compile time.

RE: [U2] @VARIABLES

2007-03-22 Thread Womack, Adrian
Are you guys aware of the universe supplied include: ATFUNCTIONS.INS.IBAS (or ATFUNCTIONS.H) which resides in .../uv/INCLUDE Here's an extract: EQUATE IT$CSTO -1 ;* clear screen (ANSI) EQUATE IT$CAH TO -2 ;* cursor absolute home (ANSI) EQUATE IT$CLEOS TO -3 ;*

RE: [U2] @VARIABLES

2007-03-22 Thread Womack, Adrian
for consistency. My 2 cents Mark JOhnson - Original Message - From: Womack, Adrian [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org Sent: Thursday, March 22, 2007 7:29 PM Subject: RE: [U2] @VARIABLES Are you guys aware of the universe supplied include: ATFUNCTIONS.INS.IBAS (or ATFUNCTIONS.H

RE: [U2] Help with File Pointers

2007-03-12 Thread Womack, Adrian
FILEINFO always returns the correct fully resolved path (without any double dots) under Universe on Unix. Maybe this problem only affects Windows. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Susan Joslyn Sent: Tuesday, 13 March 2007 6:40 AM To:

RE: [U2] old dog, new tricks

2007-03-08 Thread Womack, Adrian
This is more of an old trick. The reason that -1 is so much faster is because using -1 just appends to an already existing string in memory. Where using n will cause an entirely new string to be created and the old one thrown away (to be eventually garbage collected). The process gets slower

RE: [U2] [UV] Using CONV in XML output string

2007-02-21 Thread Womack, Adrian
I just tried this out - and it does let you use multiple CONVS one after the other. BUT, I would normally use FMT L#100 rather than CONV T100. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Boydell, Stuart Sent: Thursday, 22 February 2007 10:56 AM To:

RE: [U2] [UV] Using CONV in XML output string

2007-02-21 Thread Womack, Adrian
We're on UV 10.1.20 (in PI/Open flavour). The L#100 is a format not a conversion, so should be used with FMT not CONV. Eg. LIST TEMP ID.SUP F1 AS Description FMT L#100 CONV MCP TOXML Or using two CONVs: LIST TEMP ID.SUP F1 AS Description CONV T100 CONV MCP TOXML I even tried three CONVs and

RE: [U2] Saving daylight.

2007-02-05 Thread Womack, Adrian
We had a specific problem with Redback - when the OS went to daylight savings time, Universe also went to daylight savings time - BUT Redback did not. This was because the Redback ini file (rgwresp.ini) has it's own TZ parameter, which in our case was wrong. I should think you'll be OK as long as

[U2] [BB] Internal functions in Basic

2006-12-17 Thread Womack, Adrian
I'd really appreciate a way to write an internal function which can have parameters and can contain it's own local variables (although global variables would be OK). Often it's just not worth the effort to write a full blown external function that's only called a few times by one program. Perhaps

[U2] [UV/Redback] Daylight Saving

2006-12-05 Thread Womack, Adrian
I'm in Perth WA, and we're on Daylight Saving for the fist time in years (as of 2am Dec 2nd). This has caused all kinds of problems, as it was a last minute decision by the government and we had hardly any time to get the various config files setup correctly. We're running UniVerse 10.0.19

RE: [U2] Query calculating 120 days.

2006-10-25 Thread Womack, Adrian
A couple of points: Gordon's example: DATE()[EMAIL PROTECTED]6 should really be using a D-type named field instead of using @RECORDnn Jeff's example: DATE() - ICONV(*YOUR.DATE.FIELD.HERE*,D4/) - the date field should already be in internal format, so what's the point of the ICONV ? AdrianW

RE: [U2] [UV] is a file 32bit or 64bit?

2006-10-19 Thread Womack, Adrian
Well, I do think there should be a documented method of finding out whether a file is 32 or 64bit. Surely that should be added to ANALYZE.FILE. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Ray Wurlod Sent: Thursday, 19 October 2006 1:28 PM To:

RE: [U2] [UV] is a file 32bit or 64bit?

2006-10-19 Thread Womack, Adrian
Something interesting I just noticed: If I create a file and resize it to 64bit and then create alternate keys (with CREATE.INDEX) the alternate key file (I_filename/INDEX.000) is also created as 64bit. BUT, if I add the alternate keys BEFORE resizing to 64bit, the AK file is left as a 32bit

[U2] [UV] is a file 32bit or 64bit?

2006-10-18 Thread Womack, Adrian
Is there a UV tool that shows whether a file is 64bit or 32bit? I've tried the obvious ANALYZE.FILE with no success. I ended up using the unix xd command to see the file's header, but I expected there to be UV command to provide this function. First bytes of a 32 bit file: 0xACEF010C First bytes

RE: [U2] [UV] is a file 32bit or 64bit?

2006-10-18 Thread Womack, Adrian
That works well, thanks. For some reason our BASIC help file only has attributes 1-30 defined for the result of the STATUS statement. I just checked the BASIC pdf manual and that documents from right up to attribute 33. I never think of using the STATUS statement - but it certainly returns a lot

RE: [U2] [UD] Weird Logging Issue

2006-10-10 Thread Womack, Adrian
Karl, Is that a UniData thing? Because with UniVerse exactly the reverse would be true - writing to a sequential file (via CRT statements to a COMO or with WRITESEQ to a record in a directory) would be much more efficient and use less memory than performing a WRITEV (which has to read the entire

RE: [U2] [UV] How to create unix .netrc file?

2006-10-04 Thread Womack, Adrian
I wanted to do something similar (allowing a user to edit their .profile record from within UV). What I ended up doing was using a file name without a dot and then using SH to execute a unix cp to change the file's name. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL

RE: [U2][UD] UniQuery SELECT WITH Limits

2006-09-25 Thread Womack, Adrian
The OP never made it clear what he was trying to do. He may in fact be trying to select randomly numbered ID's and if that is the case, he doesn't actually need a select statement at all. Perhaps we should wait until he gives us a little more info. DISCLAIMER: Disclaimer. This e-mail is

RE: [U2] Using DICT items in basic program

2006-08-30 Thread Womack, Adrian
Assuming you're dictionary items are D-types, just read the dict item then use field 2 as a field number to extract the data from your record. Use field 3 with OCONV and use field 5 with FMT. If you want to use I-types, simply set @RECORD to the contents of your data record, and @ID to the record

RE: [U2] [UV] up-arrow w/command stack

2006-08-30 Thread Womack, Adrian
Rather than writing a program and using SYSTEM(4001) SYSTEM(4002), a slightly easier way is to use: COMMAND.EDITOR ON ALL acct name PI/Open had the COMMAND.EDITOR command years ago, and it was documented. The version in Universe is not documented and is most likely not supported. When we

RE: [U2][UV] Show Empty Fields in Vertical Listing

2006-08-29 Thread Womack, Adrian
I wonder if this problem is flavour dependent. I'm using PI/Open flavour UV 10.0.19 and ALL fields show up when listing vertically whether they are blank or not. DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended recipient, please advise us by return

RE: [U2] Need help - UV intermittent roving file open error

2006-08-25 Thread Womack, Adrian
I don't believe it - you're right! I could have sworn that using a DIM on a previously defined common array would do nothing, well I stand corrected. Maybe I'm remembering what happened under PI/Open, but it certainly does work under Universe. Sorry for the misinformation. :( -Original

RE: [U2] [UV] Continuing Long Lines

2006-08-24 Thread Womack, Adrian
The original poster was asking about a single IF statement and how to split it into several lines, I don't think using a CASE structure would solve this particular problem. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bruce Nichol Sent: Friday, 25

RE: [U2] Where's the beef??

2006-08-21 Thread Womack, Adrian
There should be a file pointer to SYSCOM in your VOC. Ours contains: 1: F 2: /opt/universe/uv/INCLUDE 3: /opt/universe/uv/D_INCLUDE Here's the bit that's relevant to SELECTINFO... * Keys for SELECTINFO function EQUATE IK$SLACTIVE TO 1 EQUATE IK$SLCOUNTTO 3 AdrianW -Original

RE: [U2] Change command prompt character

2006-08-10 Thread Womack, Adrian
It's Universe Basic. It works on UV 10.0.19 on HPUX. From: [EMAIL PROTECTED] on behalf of Tom Dodds Sent: Thu 10/08/2006 8:28 PM To: u2-users@listserver.u2ug.org Subject: RE: [U2] Change command prompt character What language is this for and upon which machine

RE: [U2] Change command prompt character

2006-08-10 Thread Womack, Adrian
Huh? That makes no sense. The ASSIGN is only done once per session, i.e. at login time. I think having your prompt showing whether there was an active select list active when you logged in, isn't really that useful ;) FWIW We have our own command editor, which shows which selectlists are active

RE: [U2] [UV] FIND vs LOCATE- speed?

2006-08-02 Thread Womack, Adrian
If you don't care about the resulting position - i.e. you just want to know if the list contains the item, then the absolute quickest method is to use INDEX(). Eg looking for JKL in ABC}DEF}GHI}JKL}MNO}PQR THE.LIST = @VM:ABC}DEF}GHI}JKL}MNO}PQR:@VM IF INDEX(THE.LIST,@VM:JKL:@VM,1) THEN found

RE: [U2] lock records

2006-07-26 Thread Womack, Adrian
We do exactly the same thing but with READU locks instead. The locks can be on non-existent records and the record names can be meaningful (eg. processname.running) - so a LIST.READU will show which phantoms are running. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL

RE: [U2] Re-Comile I-Descriptors ?

2006-06-27 Thread Womack, Adrian
Sounds like you've got INTEGER specified in field 8 (SQL Data) and MD1 specified in field 3 (Conversion) of the dictionary for the problematic field. Just removing INTEGER will fix the problem - but if you're using SQL on the file/table maybe you should replace INTEGER with the correct field

RE: [U2] [UV] User exit help?

2006-06-01 Thread Womack, Adrian
U035A exists in the file APP.PROGS (.../universe/uv/APP.PROGS) as 035A without the A. You could modify that to do what you want, or just write your own subroutine to do the same thing. IMO, you'd be better off writing your own, as the source code for that routine is atrocious (and commented in

RE: [U2] OPEN Statement DICT Default

2006-05-08 Thread Womack, Adrian
All the months order (full names): CRT OCONVS(ICONVS(1}2}3}4}5}6}7}8}9}10}11}12,DM),DMAL) Abbreviations: CRT OCONVS(ICONVS(1}2}3}4}5}6}7}8}9}10}11}12,DM),DMAL[3]) -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Mark Johnson Sent: Tuesday, 9 May

RE: [U2] RE:[UV:Redback] Automatic Garbage Collection not running

2006-03-23 Thread Womack, Adrian
PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Stevenson, Charles Sent: 22 March 2006 03:35 To: u2-users@listserver.u2ug.org Cc: Womack, Adrian Subject: [U2] RE:[UV:Redback] Automatic Garbage Collection not running We recently ran into a problem where the garbage collection (GC) process would

[U2] [UV:Redback] Automatic Garbage Collection not running

2006-03-21 Thread Womack, Adrian
We recently ran into a problem where the garbage collection (GC) process would no longer run (our WWSTATE file contained over a million records!, and the application response time was abysmal). There is a control record VERSION in the file WWCONTROL which contains a date time that GC is next due

RE: [U2] UV: tests for inequality failing. Wide0 parameter?

2006-03-01 Thread Womack, Adrian
Wide0 should have no bearing on numbers in that range. The Wide0 problem that I've encountered is when values do look (and print) the same and an equality comparison fails (not the other way around). Are you sure COST.VISIBLE is true? -Original Message- From: [EMAIL PROTECTED]

RE: [U2] Passed argument in Subroutines

2006-02-06 Thread Womack, Adrian
The arguments are passed by reference - so both RtnValue and InValue are pointing to the SAME variable in the calling routine. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bill Haskett Sent: Tuesday, 7 February 2006 7:14 AM To:

RE: [U2] [UD] Best practices

2006-01-28 Thread Womack, Adrian
Use the attribute names everywhere - the only place attribute numbers belong is in D-type entries in the dictionary and in an equate table in a single basic include file. From: [EMAIL PROTECTED] on behalf of Bill Haskett Sent: Sat 28/01/2006 4:24 AM To:

RE: [U2] detecting remote pointers in basic?

2006-01-19 Thread Womack, Adrian
Don't know about checking before the open - but look at the FILEINFO() function (see SYSCOM FILEINFO.INS.IBAS). FILEINFO(filevar, FINFO$NODENAME) should return for local files and the machine name for remote files, but this assumes the OPEN statement worked. -Original Message- From:

RE: [U2] [UD] list output when captured

2006-01-19 Thread Womack, Adrian
I haven't been following this thread - but, why don't you just LIST into the HOLD file and then get your program to read the results and delete the HOLD record? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bill Haskett Sent: Friday, 20 January 2006

RE: [U2] [UD] list output when captured

2006-01-19 Thread Womack, Adrian
If you don't want to use the HOLD file (which IMO is the easiest thing to do), how about executing TERM to change the terminal width (and height) to something really large (eg 2000), execute your list statement, and then use TERM to set the width height back to normal. -Original

RE: [U2] [UD] BASIC LOCKs

2005-12-28 Thread Womack, Adrian
We use READU locks - they're much more friendly than semaphores as they can be given meaningful names that show up with a LIST.READU. Also they are very quick and easy to test with the RECORDLOCKED() function - eg. IF NOT(RECORDLOCKED(filevar, recordname)) THEN ... AdrianW DISCLAIMER:

RE: [U2] UD: Named common

2005-12-27 Thread Womack, Adrian
I'm pretty sure everyone is talking about the named common name not the variable names (i.e. the name between the slashes in COMMON /ABC$123/ LONG.VARIABLE.NAME1, ETC The variables names defined within your common block should be able to be any length you like (perhaps restricted to 32

RE: [U2] RE: [UV] is there an equivalent to the UD ALL UniQuery keyword?

2005-12-01 Thread Womack, Adrian
An alternative to using Larry's suggestion of writing a program to create a phrase of all the D types, you can use REVISE filename which will automatically create an @REVISE phrase in the dictionary containing all the D-types. You can then just rename @REVISE to ALL. -Original Message-

RE: [U2] Sort help needed

2005-11-08 Thread Womack, Adrian
@listserver.u2ug.org Subject: RE: [U2] Sort help needed Your logic is wrong here; you are inserting whether PART.NBR is found or not. The INS should be inside the ELSE clause. -Keith Original Message From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Womack, Adrian Sent

RE: [U2] Sort help needed

2005-11-07 Thread Womack, Adrian
LOCATE PART.NBR IN RECORD14,1 BY AL SETTING POS ELSE NULL INS PART.NBR BEFORE RECORD14,POS INS related.data BEFORE related.field14,POS No need to do the second locate. Note: I've used the PI/Open syntax for the LOCATE statement (that's the only one I relate to), you may have to alter the

RE: [U2] How to Default NO.RETURN.WARN in Universe

2005-10-06 Thread Womack, Adrian
We use +$NO.RETURN.WARN (along with a bunch of other options) on the BASIC command line for ALL programs, subroutines and functions (we've actually wrapped BASIC - so no one actually types in the options). DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the

RE: [U2] Good Programming Practice Question.........

2005-09-27 Thread Womack, Adrian
We also use xnn.meaningful.name type labels. One advantage is that our editor can recognise a label and putting the cursor on a line that includes a GOSUB and pressing one function key will move the cursor directly to the correct paragraph. One thing I've never agreed with (except in COBOL) is

RE: [U2] Good Programming Practice Question.........

2005-09-27 Thread Womack, Adrian
I hope you're joking - talk about making code unreadable, comments that look like code are (IMO) a very BAD idea. The indentation level makes it perfectly clear what goes with what, and if it doesn't then change the structure of the code. IMO IF XOOS.ALL.COURSES='Y' THEN some

RE: [U2] Formatting Help

2005-08-22 Thread Womack, Adrian
Also consider using FMTS on the entire string, eg. STRING = FMTS(STRING,55T) This will perform the 55T formatting on each element of the string (in this case: each sub-value). DISCLAIMER: Disclaimer. This e-mail is private and confidential. If you are not the intended recipient, please

RE: [U2] [UV] SELECT without n records selected...

2005-08-10 Thread Womack, Adrian
How about using the COUNT.SUP keyword? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Barry Brevik Sent: Thursday, 11 August 2005 7:11 AM To: U2-users (E-mail) Subject: [U2] [UV] SELECT without n records selected... When executing SELECT from a PA, is

RE: [U2] [UV] SELECT without n records selected...

2005-08-10 Thread Womack, Adrian
Very strange that it doesn't work... I wrote a quick paragraph... 1: PA 2: SELECT VOC SAMPLE 5 COUNT.SUP and I receive no message regarding number of records selected. Is it a GET.LIST rather than a SELECT that's producing the message? COUNT.SUP doesn't seem to work with GET.LIST.

  1   2   >