RE: [U2] UV Version

2006-04-18 Thread Pingilley, Ron
.L RELLEVEL That will display the item RELLEVEL stored in the VOC of the account you're logged to. Or at least the version used to *create* that account, if the VOC hasn't been updated after subsequent updates/upgrades. --Ron P. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL

RE: [U2] UV Bug?

2006-04-18 Thread Pingilley, Ron
Jerry, You're saying that the "DM" is in <3> of the D-descriptor? I think the problem is that the "real" data is an internal date, the external data in your TCL statements is an integer month number, and there is no way for the "DM" conversion to make meta-data that would match. What wou

RE: [U2] UV I-descriptor

2006-02-06 Thread Pingilley, Ron
Chuck, Thanks for extending the usefulness of that i-descr. I tend to favor i-descr's without @n references so that they can be used as a reference in another i-descr. The @n references and semicolons sure make it more readable, but you are then limited to replicating the logic in anothe

RE: [U2] Justification for removal of savedlists

2006-02-06 Thread Pingilley, Ron
Try "Savedlists do not contain data. They are collections of record keys selected for processing as a group (reports, postings, etc.), and deleting them does not change or delete the actual data. The records pointed to by the keys still exist as-is in their original files/tables. Keeping them doe

RE: [U2] UV I-descriptor - slight correction

2006-02-03 Thread Pingilley, Ron
Bob, Went brain dead on the <5> and <9> in your FILE2. The corrected I-descr should read: 0001 I 0002 SUM(MULS(EQS(RAISE(TRANS("FILE2",OCONV(@ID,"G1*1"),5,"X")),REUSE(OCONV(@ ID,"G3*1"))),RAISE(TRANS("FILE2",OCONV(@ID,"G1*1"),9,"X" 0003 0004 0005 10L 0006 M --Ron P. --- u2-user

RE: [U2] UV I-descriptor

2006-02-03 Thread Pingilley, Ron
Bob, Hey, that was fun! I got this one to work: U2UG.TEST 0001 I 0002 SUM(MULS(EQS(RAISE(TRANS("FILE2",OCONV(@ID,"G1*1"),1,"X")),REUSE(OCONV(@ ID,"G3*1"))),RAISE(TRANS("FILE2",OCONV(@ID,"G1*1"),2,"X" 0003 0004 0005 10L 0006 M It gets <1> from file2, using "G1*1" of t

RE: [U2] Creating a Folder

2006-01-27 Thread Pingilley, Ron
Bill, After you did the mkdir in Unix, did you put an F-pointer in the VOC of the account from which you want to access the new folder/program source code directory? 0001 F 0002 /u2/SOFTWARE/NEW.BP 0003 make a new one with CREATE.FILE DICT NEW.BP -or- use the same one as AP.BP?

RE: [U2] PROC question

2006-01-25 Thread Pingilley, Ron
Bob, Does the called PROC have an "RI" in it by any chance? That would clear the input buffers and leave nothing for the original PROC to use in the "IF A" statement. --Ron P. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bob Woodward Sent: We

RE: [U2] eval question

2006-01-25 Thread Pingilley, Ron
Jeff, For the "something.else" use @RECORD. You could even use OCONV(@RECORD,"correlative") if the something.else requires formatting before being added to the output string. list thisfile eval "prod.num:'|':pck.qty:'|':@RECORD<###>" fmt "255l" -OR- list thisfile eval "prod.num:'|':pc

RE: [U2] UltPlus to UV

2006-01-20 Thread Pingilley, Ron
Tom, READLIST sounds like the BASIC statement you're looking for: READLIST dynarray FROM listnumber THEN/ELSE But it does seem to require a list number rather than a list variable name. If you leave out the FROM listnumber clause, it will use the active list #0. If your EXECUT

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

2006-01-20 Thread Pingilley, Ron
Bill, Whenever I'm doing output capture like this, I always issue TERM 32767,32767 first. Gives me the max term size UV will support, and only 1 set of HEADING lines (unless the report's REALLY long), and very little chance the report will line-wrap. You could do a TERM 80,24 when you're

RE: [U2] Alternate Indexes

2005-12-01 Thread Pingilley, Ron
Try SET.INDEX to update the file's header to point to where the I_ file is on the new W2K box. --Ron P. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Mark Waldron Sent: Thursday, December 01, 2005 10:23 AM To: u2-users@listserver.u2ug.org Subject: [U2]

RE: [U2] Is there a way to associate "un-associated" multi-value fields on the fly?

2005-11-28 Thread Pingilley, Ron
Mick, UniVerse has ASSOC and ASSOC.WITH, look for them in UniData, or something with a similar name... Both can be used on-the-fly. --Ron P. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Gahan, Mick Sent: Monday, November 28, 2005 2:29 PM To:

[U2] unsubscribe

2005-11-18 Thread Pingilley, Ron
unsubscribe u2-users unsubscribe u2-community --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] Sorting By Price

2005-11-10 Thread Pingilley, Ron
Slight correction to previous e-mail: This.HK.PN = Val.Array<2,R.This><<-- I had attr. #'s swapped here This.Ext = Val.Array<1,R.This><<-- This.Bin = Val.Array<3,R.This> --- u2-users mailing list u2-users@listserver.u2ug.org To unsubscribe please visi

RE: [U2] Sorting By Price

2005-11-10 Thread Pingilley, Ron
Bill, I think you're going to have to transpose your array (swap columns for rows), or create a stand-alone array to hold just the dollar amount, in order to make this work. The thing you're trying to LOCATE is a 3-value dynamic array itself (1 attribute, 3 values), so it's not a number,

RE: [U2] Shell Dispatch Quoting

2005-11-09 Thread Pingilley, Ron
Don, Try using single quotes or backslashes around your command: SH -c \mpack -s "this is the subject" -d body.file attachement.pdf emailname\ Works on UniVerse, not sure about UD... --Ron P. -Original Message- From: Don Kibbey Sent: Wednesday, November 09, 2005 11:16

RE: [U2] Help with BREAK-ON & TOTAL

2005-05-26 Thread Pingilley, Ron
Peter, I didn't find any "grand total suppress" keywords available on our UniVerse system, UD may have one. But if all else fails, try GRAND.TOTAL "'P'" That will make the grand total blurb print on the next page to be thrown away. --Ron P. -Origin

RE: [U2] Integer Conversion Codes

2005-05-06 Thread Pingilley, Ron
Bill, "UniVerse/SQL" <-- there's your issue. SQL is enforcing an INTEGER data type on the SETUP field. You'd have to convert that DICT item to NUMERIC[1] (I think?) in <8> of an I/D-type or <6> of an A/S-type. That would define the column as a 1-decimal-place number for SQL purposes. I

RE: [U2] Run a program in "Silent" mode

2005-04-27 Thread Pingilley, Ron
Ed, Try HUSH. Here's the "help" for it: HUSH statement _

RE: [U2] Clarification on FOR...NEXT loops

2005-04-18 Thread Pingilley, Ron
Jeff, UV/UD do not keep track of which multi-value was last accessed. Only the attribute. Each iteration of the For-Next had to start counting from the beginning of attribute 1 according to your notes below. If you re-run your test with FOR/NEXT/ (instead of <1,I>) you should see a signi

RE: [U2] Complicated Select

2005-04-12 Thread Pingilley, Ron
John, Does the RECORD_A field in FILE_A contain item-id's from FILE_B? A "foreign key" into FILE_B in SQL parlance? I'm on UV, so sorry if this doesn't work for UD SELECT FILE_A WITH NOT EACH RECORD_A "AA""BB""CC" AND WITH A_IN_B Where the Dictionary item A_IN_B woul

RE: [U2] Weird looking record

2005-03-31 Thread Pingilley, Ron
Does "import" in field 16 mean this record was imported from some other DB? Mayhap that field got some funky characters in it (like a left-arrow, or backspace) on that other system, and was not cleaned up during import to your U2 system. Turn on up-arrow mode in ED, and then look at attribute 14

RE: [U2] Include Equate record Errors Compiler

2005-03-14 Thread Pingilley, Ron
The compiler is a C-routine, right? Maybe if the text editor doesn't get the right end-of-file character in there, then the compiler never sees the end-of-string \0 character in the C string array, so it just keeps parsing in the next character off into the never-ending ether At least until it

RE: [U2] Unique Ids

2005-03-08 Thread Pingilley, Ron
David, If you added a new part to an existing distributed file, and the new part already had records in it, you could potentially have records in this new part whose item-id should be in another part based on the partitioning algorithm. Then you could create that item-id in the proper pa

RE: [U2] Getting CR instead of @ at colon prompt

2005-03-04 Thread Pingilley, Ron
Or leaving off the quotes? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Kevin King Sent: Friday, March 04, 2005 5:17 PM To: u2-users@listserver.u2ug.org Subject: RE: [U2] Getting CR instead of @ at colon prompt You might try pressing Ctrl-X instead of

RE: [U2] [UV] making 00001 our of 1 - THANKS AND SORRY

2005-03-03 Thread Pingilley, Ron
Folks, " refer to themselves in the third person (ie. "the brain"). Or... Did I misunderstand yet another e-mail. Haha JK " Did ya notice the "Haha JK" (as in just kidding)? He was intentionally "misunderstanding" so as to be funny. --Ron P. P.S. an End-of-thread is probabl

RE: [U2] [UV] making 00001 our of 1

2005-03-02 Thread Pingilley, Ron
I've seen: ("0":VARNAME)[5] on UniVerse to do that. Ugly, but works. --Ron P. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of [EMAIL PROTECTED] Sent: Wednesday, March 02, 2005 3:30 PM To: u2-Users Subject: [U2] [UV] making 1 our of 1 H

RE: [U2] Using an I descriptor in a UniBasic program

2005-03-01 Thread Pingilley, Ron
Bill, Welcome to the U2 family! Let me make sure I understand what you're trying to do. Are you trying to read a "virtual column" worth of data out of a file in one shot, a la SQL? Or are you wanting to get a hold of the actual I-descriptor itself? Maybe if you flesh o

RE: [U2] EVAL keyword -- was: uv pe

2005-02-18 Thread Pingilley, Ron
John, Per the Unidata 6.1 manual on the IBM web site: EVAL Syntax EVAL "expression" Description --- The UniQuery EVAL keyword allows you to define a virtual attribute expression for the current execution of a UniQuery statement only. expression can be any expression valid in a

RE: [U2] Printing different

2005-02-11 Thread Pingilley, Ron
Harold, You can include PCL escape codes directly in the print stream. PRINT "This will be in the normal font. ": PRINT CHAR(27): codes-for-font-and-pitch: PRINT "This will be in BIG letters" PRINT CHAR(27): back-to-regular-

RE: [U2] GE and LE question

2005-02-11 Thread Pingilley, Ron
Brenda, UV did a left-justified string comparison because one element was non-numeric: "1" < "1X" < "40" Had SEL been a numeric, the comparison probably would have stayed right-justified and given the results you expected. --Ron P. -Original Message- Fr

RE: [U2] GE and LE question

2005-02-11 Thread Pingilley, Ron
Brenda, Suggestion: put IF NOT(NUM(SEL)) OR SEL="" THEN . Before your CASE block. That should trap any "interesting" user input before you get to the comparisons. --Ron P. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On B

RE: [U2] Unidata core dumps

2005-02-04 Thread Pingilley, Ron
I used to experience lots of core dumps on UV 8 and 9 (DG/ux) when running TCL selects/sorts that had I-descriptors. I think it was someone on this list that suggested we look to see if the I-desc's had COMMON blocks in them. Sure enough, they did. We removed the COMMON blocks, recompiled the

RE: [U2] [UV] Transaction Compile Failure

2005-02-01 Thread Pingilley, Ron
Perry, You probably won't be able to have multiple END TRANSACTION statements. One BEGIN TRANSACTION where you have it, and one END TRANSACTION at the bottom of the LOOP structure, should suffice. Then just put a ROLLBACK and CONTINUE within each IF-, READ-, and WRITE-THEN-ELS

RE: [U2] BREAK-ON help

2005-01-31 Thread Pingilley, Ron
Peter, Try adding: GRAND.TOTAL "'P'" to your statement. --Ron P. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Behalf Of Peter Gonzalez Sent: Monday, January 31, 2005 11:26 AM To: u2-users@listserver.u2ug.org Subject: [U2] BREAK-ON

RE: [U2] K = K

2005-01-19 Thread Pingilley, Ron
UniVerse also provides something they call "field level caching", which behaves very much like REMOVE, but happens automatically when you do an extract on a dynamic array. This code snippet: FOR I = 1 TO MAX.ATTR CRT DYN.ARRAY NEXT I runs a ton faster today with field level caching than it

RE: [U2] [UV]Strange But True

2005-01-13 Thread Pingilley, Ron
One BIG caveat on that one: MATCHES expects the 2nd operand to be a pattern matching string. If the contents of VAL2 are a valid pattern matching expression, it will be treated as such, not as just any old string. For example: RPTEST 0001 CRT TIMEDATE() 0002 VAL1 = "1234567" 0003 VAL2 =

RE: [U2] Header Trick Needed

2005-01-12 Thread Pingilley, Ron
Bill, You can use the backslash (\) as a delimiter within BASIC: execute \SORT SALES.ANALYSIS BY CUST HEADING " 'Year-To-Date Sales ':This.Date.F " \ note the backslashes surround the entire command to be "executed". Or you could build the command in a variable, piece

RE: [U2] How to "exit" out mulitple loops?

2005-01-10 Thread Pingilley, Ron
>>>Any other ideas? >>>George If you don't mind the additional overhead of a GOSUB, you could modularize the code as such: . . . FOR T=1 TO 10 GOSUB INNER.LOOP NEXT T . . . INNER.LOOP: * two additional loops FOR Q=1 TO 6 FOR X=1 TO 9 IF CONDITION THEN RETURN

RE: [U2] How to set 'delete' key action in UniVerse

2004-11-30 Thread Pingilley, Ron
Peter, Make sure your emulator is sending the same ASCII sequence your term type is expecting. Even if you change your terminfo's, and use TERM/PTERM/etc. to use ASCII 8 (backspace), your emulator may still be sending DEL (which often shows up as ^? when it's not interpreted and trappe

RE: [U2] broken up SELECTS

2004-11-11 Thread Pingilley, Ron
The UV keyword REQUIRE.SELECT makes this a possibility. On the Mentor and Ultimate systems I cut my teeth on, if the 1st select returned zero records, then the second select would select against the entire file. Once I moved to UV, and learned about REQUIRE.SELECT, then breaking out SELECT sta

RE: [U2] [UD] Files from UD Unix to UD Windows

2004-11-03 Thread Pingilley, Ron
Bruce, Did you try an ascii transfer? That probably won't work on a hashed UD file. Try a binary ftp. UV has a tool called format.conv for byte-swapping. Not sure what UD calls it. You may have to use that tool on the file after it's transferred over. --Ron P. -Original Messag

RE: [U2] READU ... THEN _or_ ELSE but not both?

2004-10-29 Thread Pingilley, Ron
Wendy, We're on UV 10.1.2, on AIX. We have the READU..LOCKED..THEN..ELSE logic in MANY of our programs: READU dyn.arr FROM F.FILE1,rec.id LOCKED ***handle the locked condition END THEN * do the update END ELSE * type in the right item-id, dude! END If you have an examp

RE: [U2] $<50>

2004-10-28 Thread Pingilley, Ron
I've seen this sort of thing a lot when emulators don't emulate the original *exactly*. We used to get $<20> after a @(-1) in ProComm Plus doing a Wy50 emulation. When we looked in the terminfo library, sure enough, there was the clear-screen escape sequence followed by "$<20>". An actual Wy5

RE: [U2] [UD] running a subroutine

2004-10-20 Thread Pingilley, Ron
Mark, How about allowing 2 usage forms: PRINT ; stmts {; morestmts} -or- PRINT If no "stmts" are supplied at the command line, then LOOP for input, building a dynamic array, then write that out as the temporary program. That would allow you to build something more complex on

RE: [U2] UniVerse File Types

2004-10-14 Thread Pingilley, Ron
David, A type-1 directory file splits item-id's at 14 characters, which I believe was based on the old Unix file name limit. If a record's ID is longer than 13 characters, a new subdirectory is created to contain the "rest" of the name. If the "rest" of the name is also longer than 13

RE: [U2] gvim on UD

2004-10-07 Thread Pingilley, Ron
Shawn, I just started using gVim last week, UV 10.1 on AIX. I have the Windows client side stuff loaded & running on my PC, and use FTP to get the source code and write it back to the UV server. Nothing running on the UV side. I do a :edit ftp://server/path/program.name to get

RE: [U2] Numeric rounding - UV 9.4 & 10.1

2004-09-20 Thread Pingilley, Ron
Mark, I'm on UV 10.1.2. The 1st value for Y didn't change after uncommenting the 2nd set of statements. It came back 1235 both times. What did you observe, and did you run this on UV 10.1.0? --Ron Pingilley -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROT

RE: [U2] [UV] How to return 'column' from dyn array?

2004-08-19 Thread Pingilley, Ron
Allen, From what I've seen in UV literature, they tend to officially call CHAR(253) @FM for "field mark", but use @AM "attribute mark" for compatibility with other PICK-like implementations. --Ron P. -Original Message- From: Allen E. Elwood (CA) [mailto:[EMAIL PROTECTED] Sent: Th

RE: [U2] EVAL formatting

2004-08-16 Thread Pingilley, Ron
Kevin, Tried this on my UV system, and it works just fine: LIST INVOICE 16 17 WITH 16 > "0.00" AND WITH 17 > 16 EVAL "(@RECORD<16> / @RECORD<17>) * "1"" CONV "MD2" FMT "14R" COL.HDG "Tax % of Gross" 05:28:17pm 16 Aug 2004 PAGE1 INVOICE... Tax Amount Net Invoice... Tax % of

RE: [U2] How do we get unique records from Universe file(Table)

2004-08-12 Thread Pingilley, Ron
What are the attribute numbers in the ORDERS file where the MFG.NO and PART.NO are stored? Let's say it's 4 and 18, respectively. : SELECT ORDERS SAVING UNIQUE EVAL "@RECORD<4>:'*':@RECORD<18>" should do it. The "Illegal attribute name for sort: MFG.NO:'*':PART.NO" error message may be saying t

RE: [U2] How do we get unique records from Universe file(Table)

2004-08-12 Thread Pingilley, Ron
"tax in advance" -- sounds like the US Government! :) If you're doing a SELECT at tcl, try adding SAVING UNIQUE to your statement. Here's an example: > SELECT ORDERS WITH ORDER.DATE > "8/1" PART.NUMBER ...10456 items selected >> SELECT INVENTORY SAVING UNIQUE @ID ...395 items selected >> SAVE

RE: [U2] Question on Unidata tables access speeds

2004-08-09 Thread Pingilley, Ron
AFAIK = acronym for As Far As I Know -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Monday, August 09, 2004 11:30 AM To: [EMAIL PROTECTED] Subject: Re: [U2] Question on Unidata tables access speeds I am doing select with BRANCH = "0616" "0844" AND LEASE_TY

RE: [U2] OT: Ardent.com

2004-08-06 Thread Pingilley, Ron
The properties on the photo say "bob_zurek.jpg", so looks like Bob from Account Temps is to blame :) -Original Message- From: Karl L Pearson [mailto:[EMAIL PROTECTED] Sent: Friday, August 06, 2004 12:45 PM To: u2-users Subject: [U2] OT: Ardent.com Just for those who remember, check out w

RE: [U2] What is &UFD& ????

2004-07-19 Thread Pingilley, Ron
Joe, &UFD&, as to my understanding, points to the home directory of the account you are in, where the VOC resides. So you are actually looking at the Windows/Unix level information. A type-18 file, for example, is just one big file/record to Unix or Windows, and would look mammoth! PLEA

RE: [U2] [OT] SAP

2004-07-15 Thread Pingilley, Ron
Scott, SAP is written mostly in German :) Seriously, being developed by a German company, the underlying table names, column names, etc., are German or abbreviations of German words. The main programming language is ABAP. --Ron P. -Original Message- From: [EMAIL

RE: [U2] UV Read failure

2004-07-01 Thread Pingilley, Ron
Sara, That error message looks like there is a: STOP 201,"CONTRACT" or STOP 201,FILE.NAME.VAR at that point in the program, probably in the ELSE clause of an OPEN statement. Can you post the top 20 lines or so of source code for that pro

RE: [U2] [UV] INPUT madness

2004-05-14 Thread Pingilley, Ron
Barry, The INPUT @ is the only UV BASIC command that will display the contents of the variable, and preserve the contents if you only hit RTN. If you could look at the code behind your 3rd party app. you'll probably find: A.STRING = 'HELLO WORLD' PRINT @(00,02): A.STRING: @(00,02

RE: [U2] My Sincere Condolences

2004-05-04 Thread Pingilley, Ron
-Original Message- From: Hanwell, David [mailto:[EMAIL PROTECTED] Sent: Tuesday, May 04, 2004 11:18 AM To: [EMAIL PROTECTED] Subject: RE: [U2] My Sincere Condolences ><<"Our son's hamster died this AM. He doesn't know yet.">> "But I'm not dead yet" >"Behold I am become Death, >the s