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 would 12 be as an internal date?

This would probably work if you put the DM code in 2 as an
OCONV(~,DM).  That would make it data which could be directly
compared to the 12 in your TCL statement.  Then you're not fooling
with conversions  meta-data.

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Jerry Banker
Sent: Tuesday, April 18, 2006 9:06 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] UV Bug?

This came from the U2Ug website Better and Better Enhancement Forum, I
tried it and they are correct. Is this a bug or is there something wrong
with the way it is being done?



rayg wrote at Apr 18, 2006 - 09:11 AM

-



UNIVERSE  BUG:



I found a bug where if a dictionary item is created for a multivalued
field holding internal dates, and the dictionary item has a DM

conversion (yielding the number of the month), and it is used to report
on data known to exist, Retrieve reports that no items are present.  I
reported on a file that I knew had data for a certain month.  MONTH is
a dict item (D in attr 1) with the DM conversion.  I used the

statements:



LIST FILE WHEN MONTH = 12



and



SELECT FILE BY-EXP MONTH WHEN MONTH = 12



In both cases, no items or values were returned, and the appropriate
message was issued.  This worked fine when the conversion was 'D2/', but
consistently failed with 'DM'.  Investigation revealed that the dict
item seemed to fail in some ways to do the conversion, and did selection
and returned values based on the internal date, not the number of the
month.  At my office we are interested in and concerned about this.  We
appreciate any input on this, and feel that it is obviously important.
Thank you.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 PROTECTED] On Behalf Of Ray Buchner
Sent: Tuesday, April 18, 2006 3:29 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] UV Version

What is the command to see the current version of Universe a server is
running?  I forget.

TIA

-Ray
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 does not add value to the system, as the records
represented by the keys in the saved list may no longer exist in the
file, or may have been updated since the saved list was created..

--Ron P. 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bill Pizer
Sent: Monday, February 06, 2006 8:33 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Justification for removal of savedlists

I wrote a small routine that will go through Savedlists, HOLD files,
ST.PPROCES records, etc. and selectively delete the records that are no
longer needed but I have been stopped by my VP.  

She wants justification for the process.  I don't have the knowledge to
be able to give her what she wants.  I've tried the following arguments
with no luck:

Savedlists can be outdated as soon as they are created.
Taking up too much server room.

Any one have any others to try?

- Bill Pizer
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 another i-descr rather than just referencing the original one.

But that may be what Bob's actually looking for, trying to limit
reuse of the logic...?

--Ron P.

snip

Now let's generalize it a bit.  Suppose the final answer is a string
instead of numeric.
You can replace the outer
  02: SUM(MULS(...))
with
  o2: CONVERT(@VM,'',IFS(...,'')
as follows:
snip

Of course, we're still left with the problem of maintainability.

Chuck Stevenson
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 the key from file 1,
compares the multivalues to G3*1 of the file1 key, which results in a
MV'd list of 0 and 1, with the only 1 corresponding to the MV in
file21 that matches.  Then gets 2 from file2, and MULS them
together, and sums the results.  What you get is 1 * the matching
qty-per-uom value from file2.

Give it a whirl, and see if it works for you.  It's pretty nasty
to modify, so a program may be a better solution in the end

--Ron Pingilley

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bob Woodward
Sent: Friday, February 03, 2006 2:19 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] UV I-descriptor

Hi Peoples,

snip

FILE1 @ID = 01*11223344*W1*EA

FILE2 @ID = 11223344
  5 = CS^SP^EA
  9 = 1^2^12

I'm needing to get 12 back to the I-DESC in FILE1, again, hopefully
without having to resort to a called basic program.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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?

When you first try to compile a program in NEW.BP UV will create
the .O file to hold the object code.

--Ron P.

-Original Message-
/u2/SOFTWARE/...

AP.BP/
  APP.1
  APP.2
PUR.BP/
  APP.98
APP.99 
NEW.BP


Without luck, I tried it brute-force in Unix; UV did not recognize it.

I tried CREATE.FILE; I need a folder, not a file.

Suggestions would be appreciated.

--Bill
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] eval question

2006-01-25 Thread Pingilley, Ron
Jeff,

 For the something.else use @RECORDattrnumber.  You could
even use OCONV(@RECORDnnn,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:'|':pck.qty:'|':OCONV(@RECORD###,'MR%5')
fmt 255l

--Ron P.

-Original Message-
list thisfile eval prod.num:'|':pck.qty:'|':something.else fmt 255l
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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: Wednesday, January 25, 2006 1:54 PM
To: U2-Users List
Subject: [U2] PROC question

Hi folks,

My problem is when I come back from one of the PROGxx.PROC's, I'm not
getting the menu choice value back to execute the G 10 command.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 done, or get a little more fancy and record the TERM settings
before you start, and restore them when finished.

--Ron P. 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bill Haskett
Sent: Thursday, January 19, 2006 10:32 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] [UD] list output when captured

Thanks Adrian.

With all the things to do, I make it a point to keep all things simple.
:-)

I can still simply execute the AQL query into the captured variable and
parse that...plain and simple.  We're just scrolling output that one
would normally want to view on the screen.  This is a simple, yet
effective solution.  It appears I need to monitor when the total column
width equals the term width and make sure I work around that.

Thanks again.

Bill
 

 -Original Message-
 From: [EMAIL PROTECTED]
 [mailto:[EMAIL PROTECTED] On Behalf Of Womack, 
 Adrian
 Sent: Thursday, January 19, 2006 5:05 PM
 To: u2-users@listserver.u2ug.org
 Subject: RE: [U2] [UD] list output when captured
 
 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 8:15 AM
 To: u2-users@listserver.u2ug.org
 Subject: RE: [U2] [UD] list output when captured
 
 David:
 
 Thanks...because I need the heading.  :-)
 
 A SCROLL program takes the results of a query and simply pages it so 
 the user can move around the report (up, down, all around, and 
 search).  We need the heading passed into the program (assuming one 
 is).
 
 Bill
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 EXECUTE statement can be modified to use
list numbers, you could then use the READLIST statement to suck the
unused contents of the list into a dynamic array.

SENT = SELECT filename . TO 4
EXECUTE SENT ,//IN.INPUT.DATA ,//SELECT.INPUT.LIST ,//OUT.OUT.DATA
{no ,//SELECT. clause}
.
.
READLIST OUTPUT.LIST FROM 4 ELSE .

Not exactly a straight-forward port, but should duplicate the
functionality.

One caveat:  READLIST behaves quite differently in PICK,
REALITY, and IN2 flavors.

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Tom Dodds
Sent: Friday, January 20, 2006 1:42 PM
To: Userr group U2
Subject: [U2] UltPlus to UV

We are migrating a system from UltPlus to UniVerse 10.1.14.  In the
EXECUTE statement, when using the RTNLIST or the PASSLIST function the
resultant list is a list.varialble or cursor and not a simple variable.
In the UltPlus system it is both or can be used as both.  I am using
RTNLIST and PASSLIST as the generic word for the variety of keywords to
represent that functionality. 
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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] Alternate Indexes

Copying from DG/UX to W2k Universe version 10.1.1 using uvbackup and
then restoring under UniAdmin restore function.  Files and programs
doing great.

My problem is I_ Files do not restore (for whatever reason) so my
Alternate indexes are locked so that I can't do a Create.index on a file
that had indexes on the DG. I get a message Unable to open index map
e:\filename for read/write .  It will work fine on a file that did not
have previous indexes.  I have a work around by creating an index on
another file then renaming it to the file I need then adding the indexes
to it.  But thought there may be and explanation from the group that
could tell me why and how to make it work correctly.  Wasn't there a way
to edit the position of the indexes or something of that nature?  I
can't remember. I have searched the Help to no help.
Thanks ahead for the assistance.

Mark Waldron
City of Salem, Va
Email  [EMAIL PROTECTED]

---
[This E-mail scanned for viruses by Declude Virus]
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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-users@listserver.u2ug.org
Subject: [U2] Is there a way to associate un-associated multi-value
fields on the fly?

I thought I read somewhere that Unidata allowed a user to associate
un-associated multi-value fields on the fly within a LIST or SORT
statement.

However, never having used it - nor being able to find it in any
documentation, I'm wondering if I simply dreamed it up.

This on the fly association would allow you to override the contents
of field 7 of a dictionary, much like FMT allows you to override field 5
or CNV allows you to override field 3 of the dictionary.

Does this on-the-fly association even exist?  If not, is there a
simple workaround?

This would be for Unidata 6.09 on top of HPUX 11.11.

TIA

Mick



Mick Gahan
Director, MIS
Metropolitan Community College
Omaha, NE
(402) 457-2402
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
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
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, but rather a string.

If you make Val.Array1 hold the extended amounts, Val.Array2
hold the part#'s, and 3 hold the bin locations, then you have all your
dollar amounts in one attribute, and you can LOCATE Extended.F within
that attribute, and then do 3 inserts at the located value position.

Then change your extracts accordingly  See below

--Ron P. 

Loop through part info
   R.Valuation  = Extended.F   : VM
 R.Valuation := Part.Nbr : VM 
 R.Valuation := Bin.Location 

 locate Extended.F   in  Val.Array1by 'DR' setting
posn else  null
 insExtended.F   before  Val.Array1,posn
 insPart.Nbr   before  Val.Array2,posn
 insBin.Location   before  Val.Array3,posn
Repeat

*---printing section

 for R.This = 1 to Total.Items

This.HK.PN = Val.Array1,R.This
  This.Ext   = Val.Array2,R.This
  This.Bin   = Val.Array3,R.This   

This.Ext.F = field(This.Ext, '.', 1)  ;* To remove
pennies

Prn.Str  = '  '  
  Prn.Str := This.HK.PN 'L#9'
  Prn.Str := This.Ext.F 'R#11' : '  '
  Prn.Str := This.Bin   'R#6' 

  print Prn.Str
 
  next R.This
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Shell Dispatch Quoting

I'm attempting to make use of a program called mpack which requires
some command line arguments to be quoted.  While doing this, I'm getting
some over quoting and things are not worked as they should. 
Is there another character or technique (aside from writing the command
out as a script and executing it that way) which can be used to get
around this?
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Peter Gonzalez
Sent: Thursday, May 26, 2005 1:38 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] Help with BREAK-ON  TOTAL

Hello,

I need a little help on a statement. I'm working with multiple
currencies dollar amounts in the same file. I'm trying to do the
following.

SORT BY FCURR.CD BREAK-ON FCURR.CD TOTAL INV.AMT

The problem, as you can imagine is that after all currencies are added
and displayed, an additional row displays with ALL currencies added.
This last row has no meaning at all, since they are the sum of all
currencies.  Is there a way to not print that last row?

system is Unidata 6.0 on Unix.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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.  If it says INTEGER there now, that would be
incompatible with a conversion code of MD1.

Did that UV file get converted into an SQL table?  Or are you
using an SQL query against that file, where you would normally use a
RetrieVe statement?  If nothing's changed on your end, it is possible
that UV is now enforcing some SQL constraints that they gave you a pass
on before.

--Ron P

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Brutzman, Bill
Sent: Friday, May 06, 2005 9:43 AM
To: 'u2-users@listserver.u2ug.org'
Subject: RE: [U2] Integer Conversion Codes

The problem happens when I try to run a paragraph with an embedded
UniBasic program that uses a data dictionary with an MD1 in it.

The error is...

UniVerse/SQL: Conversion MD1 is incompatible with an INTEGER datatype
snip
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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   
 
_
 
 
SYNTAX   
 
  HUSH {ON | OFF | expression} [SETTING status]  
 
 
DESCRIPTION  
 
Use the HUSH statement to suppress the display of  all  output
normally  sent  to  a  terminal  during  processing. HUSH also
suppresses output to a COMO file or TANDEM display.   
 
SETTING status sets the value of a variable to  the  value  of
the  HUSH state before the HUSH statement was executed. It can
be used instead of the STATUS function to save  the  state  so
that  it can be restored later. STATUS has a value of 1 if the
previous state was HUSH ON or a value of  0  if  the  previous
state was HUSH OFF. 

--Ron P.  

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Burwell, Edward
Sent: Wednesday, April 27, 2005 12:22 PM
To: 'u2-users@listserver.u2ug.org'
Subject: [U2] Run a program in Silent mode

Hello,

Is there a simple UniBasic command (kinda like ECHO OFF) that would
cause all PRINT @(x,y) statements to be suppressed?

snip
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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/I (instead of 1,I) you
should see a significant improvement in the For-Next time.

--Ron P. 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: Saturday, April 16, 2005 9:53 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Clarification on FOR...NEXT loops

Taking advice from others on this list, I wrote a small program to
compare the execution time of extracting 1 elements from an MV list
using FOR/NEXT loop with 1,I delimiters verus using LOOP/WHILE with
REMOVE.  I should note this was done on Unidata 6.0.3.

All the previous comments are still valid - the LOOP/WHILE with REMOVE
beats a FOR/NEXT loop dramatically.  That is, on an MV list with 1
elements, FOR/NEXT took about 6500 milliseconds while LOOP/WHILE took 15
milliseconds (that's not a typo).

I ran the test 10+ times, I reversed the order of the tests and the
result was the same every time.

So if you need to loop over all elements in an MV list, the
LOOP/WHILE/REMOVE structure seems inherently more efficient than the
FOR/NEXT/1,I notation.

Jeff Butera, Ph.D.
Administrative Systems
Hampshire College
[EMAIL PROTECTED]
413-559-5556

...our behavior matters more than the beliefs that we profess.
Elizabeth Deutsch Earle
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 AABBCC AND WITH A_IN_B

Where the Dictionary item A_IN_B would look like this if single
valued:

 A_IN_B
0001 I
0002 TRANS(FILE_B,RECORD_A,0,X)
0003 
0004 FILE_B key
0005 L
0006 10
0007 S

If it's multi-valued, you'd have to write a cataloged subroutine
and make line 2 of the DICT item a SUBR call.

This statement would then exclude any FILE_A records if they had
AA, BB, or CC in the RECORD_A field (works for both single and
multi-valued fields), and if the A_IN_B dict item found that the foreign
key in the RECORD_A field existed in FILE_B.

Play with it and see what you get

--Ron P.

-Original Message-
From: Aherne, John

Hi all,
   I want to do a complicated select statement in UD. 
Basically, I have a list of items AA, BB, CC. I want to do a 
select along these
lines:

SELECT FILE_A WITH RECORD_A IN (SELECT FILE_B WITH NO @ID = AA BB
CC)

RECORD_A is MV


Is there a way to do this in UD?

TIA,
John Aherne
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 again.  That
will show you the decimal values of any non-printable characters.

--Ron P. 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Shawn Waldie
Sent: Thursday, March 31, 2005 1:00 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] Weird looking record

Notice field #14 below.  What would cause it to display like that?

AE PERSON 177

Top of 177 in PERSON, 141 lines, 393 characters.

*--: P

001:
002:
003:
004:
005:
006: 162
007:

008:
009:
010:
011:
012: F
013:
//4:
015:
016: import
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 creates some sort of memory addressing error

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: Monday, March 14, 2005 12:30 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] Include Equate record Errors Compiler

Adrian ..

thanks .. i have gone through the equates and put a blank line on them
.. it appears to be ok now.

Not sure why this should ever happen .. even to the point of hanging the
seesion during the compile BUT as long as I know.

thanks again

DSig
David Tod Sigafoos
SigsSolutions, Inc.


  Original Message 
 Subject: RE: [U2] Include Equate record Errors Compiler
 From: Adrian Matthews [EMAIL PROTECTED]
 Date: Mon, March 14, 2005 9:32 am
 To: u2-users@listserver.u2ug.org
 
 Make sure that the record SQL_DEFAULT_CONNECTION_INFO_INCLUDE.MV (or 
 whatever the last include in your program is) has a correct 
 end-of-marker.
 
 Editing and putting a blank line on the end will do it.
 
 Might not be your problem but I've had this several times in the past 
 and the description you give fits exactly.
 
 -Original Message-
 From: [EMAIL PROTECTED]
 [mailto:[EMAIL PROTECTED] On Behalf Of 
 [EMAIL PROTECTED]
 Sent: 14 March 2005 16:25
 To: U2 Users List
 Subject: [U2] Include Equate record Errors Compiler
 
 Okay .. this one has got me ..
 
 The program below will not compile.  It compiler responds with ..
 
 *--
 01 basic DAVES.BP DEMO.MV


 Compiling: Source = 'DAVES.BP/DEMO.MV', Object = 'DAVES.BP.O/DEMO.MV'

 **
 **
 ?
   
 49if not(assigned(odbcName)) then odbcName = ''

  ^


 End of Line unexpected, Was expecting: '!', '=', AND, OR, LT,
 LE,   
 GT, GE, NE, EQ, MATCH, ELSE





 1 Errors detected, No Object Code Produced. 
 *--
 
 In the program you will see 2 equates .. 
 
 $INCLUDE DAVES.BP SQL_ERRORS_EQUATES.MV $include DAVES.BP 
 SQL_DEFAULT_CONNECTION_INFO_INCLUDE.MV
 
 If these two equates are commented out and their associated lines 
 (immediently below them) are uncommented .. it works.  Note that the 
 ODBC.H include works.  Also the SQL_COMMON_INCLUDE is ok (simple label

 common  common /sql_common/
 comBaseEnv,comConnEnv,comSqlEnv,comErrorCheckEnv)
 
 Once again .. if either of these two equates are 'included' the 
 program fails compile.
 
 I really cant see what could be causing this.  The 'equ' below the 
 includes are cut and paste of the include files
 
 Anyone see what could be going on here?
 
 **
 **
 ***
 function SQL_INITENV(odbcName, odbcUser, odbcPass)
 *
 $INCLUDE DAVES.BP SQL_COMMON_INCLUDE
 
 EQU TRUE$ to 1
 EQU FALSE$ to 0
 EQU NULL$ to ''
 
 * UNIVERSES INCLUDE FOR DEALING WITH ODBC
 $INCLUDE UNIVERSE.INCLUDE ODBC.H
 
 * LOCAL INCLUDES .. 
 $INCLUDE DAVES.BP SQL_ERRORS_EQUATES.MV
 **
 **Errors returned from the function (sql_write, sql_Read etc) will
 return
 **with MV list of errors.  mv1 will contain one of these codes
 **
 **NOTE: return will be NULL if ok .. else .. 
 **
 *EQU CONNECTION_ERROR$ TO -99
 *EQU UNABLE_TO_BIND_PARAMETERS$ TO -98 *EQU UNABLE_TO_BIND_COLUMNS$ TO

 -97 *EQU UNABLE_TO_PREPARE$ TO -96 *EQU UNABLE_TO_READ$ TO -95 *EQU 
 UNABLE_TO_WRITE$ TO -94 *EQU UNABLE_TO_FETCH$ TO -93 *EQU 
 UNABLE_TO_FREE_ENV$ TO -92 *EQU INVALID_PARAMETER_PASSED$ TO -91 *EQU 
 CRITICAL_ERROR_CHECK$ TO -90
 
 
 $include DAVES.BP SQL_DEFAULT_CONNECTION_INFO_INCLUDE.MV
 **
 **abstract:   Simply holds the default login connection through
 **odbc.
 **
 **author: dsig (David Tod Sigafoos)
 **date:   03mar05
 **
 **
 *DEFAULTODBCNAME$ = 'FOOBAR'
 *DEFAULTODBCUSER$ = 'FOOBAR'
 *DEFAULTODBCPASS$ = 'FOOBAR'
 
 
 * make sure it is assigned something ..
 if not(assigned(odbcName)) then odbcName = NULL$ if 
 not(assigned(odbcUser)) then odbcUser = NULL$ if 
 not(assigned(odbcPass)) then odbcPass = NULL$
 
 * set to default if necessary (see
 SQL_DEFAULT_CONNECTION_INFO_INCLUDE)
 if odbcName = NULL$ then odbcName = DEFAULTODBCNAME$ if odbcUser = 
 NULL$ then odbcUser = DEFAULTODBCUSER$ if odbcPass = NULL$ then 
 odbcPass = DEFAULTODBCPASS$
 
 
 initErrors = NULL$
 *
 *
 return (initErrors)
 
 
 
 
 
 
 
 
 
 
 DSig
 David Tod Sigafoos
 SigsSolutions, Inc.
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
 
 
 The information contained in this email is strictly confidential and
for the use of the addressee only, 

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 part (or maybe it already exists there, too!).  Now you have 2
records with the exact same item-id, in 2 different parts of the
distributed file.  If you ED or READ, you'd get the record that was in
the proper part.  But if you LIST/SORT you could get both records
selected and on a report.

Good catch, Jerry!

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: Tuesday, March 08, 2005 4:14 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] Unique Ids

How would you 'create' the part file to begin with having a non-unique
key.

If you are talking about say .. a csv file that is imported .. the csv
could have duplicate keys .. but i bet after the import the 'mv' table
will not have any duplicate keys.  

DSig
David Tod Sigafoos
SigsSolutions, Inc.

snip
 
 Now you could have a situation where you brought a part file online 
 that had a duplicate key.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 typing ^X. 

Kevin King wrote:
 You might also try (to fix):
 PTERM -KILL ^X 
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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

2005-03-03 Thread Pingilley, Ron
Folks,

snip  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 probably in order :)

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Marilyn Hilb
Sent: Thursday, March 03, 2005 12:20 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] [UV] making 1 our of 1 - THANKS AND SORRY

I don't think he was referring to himself. He was just stating what the
research on this issue determined.. referring to the brain as simply the
human brain. Not his in particular. :). 

Thanks,

Marilyn A. Hilb
Value Part, Inc
Direct: 847-918-6099
Fax: 847-367-1892
[EMAIL PROTECTED]
www.valuepart.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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

Hi all,

I have a need to search through our program files for any code that
format a number from 1 through 9 with leading 0's.
I have always used R%5 but I may miss programs that use other
techniques to arrive at the same result.  Can someone give me examples
that they have seen for changing 1 to 1?

Thanks much,

Scott
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 virtual attribute. You must
enclose expression in single or double quotation marks.

Note: UniQuery only supports the EVAL keyword in ECLTYPE U.

--

You could do something like this (at least in UniVerse :)

SELECT blah WITH EVAL UPCASE(@RECORDattribute number) LIKE
...HELLO...

That would create an on-the-fly virtual field for the
comparison.

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Aherne, John
Sent: Thursday, February 17, 2005 6:29 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] uv pe

snip
 converts criteria into caps for comparison. E.g.
SELECT blah WITH UPCASE(x) LIKE ...HELLO...
snip
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 Behalf Of Brenda Price
Sent: Friday, February 11, 2005 9:25 AM
To: U2-Users (E-mail)
Subject: [U2] GE and LE question

We have several programs that have been writing non-numeric when numeric
required errors to the system log.  The user inputs the value for each
program.

INPUT SEL
BEGIN CASE
 CASE SEL GE 1 AND LE MX.VALS ; * passes this line
  VAL1 = RECORDSEL ; * line that gets the error.

I've found out what is causing the error.  The users have been inputting
a number plus X.  While testing my fix, I entered 2Q that also past
the GE and LE test but errored at the VAL1 line.

Brenda
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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-size:
PRINT And back to normal...

Take a look at an HP PCL manual, or a web site like
http://www.nefec.org/UPM/ccPCLfrm.htm to get the exact escape sequences
you're looking for...

--Ron P. 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Oaks, Harold
Sent: Friday, February 11, 2005 2:12 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] Printing different

Does anyone know if there is an 'easy' way to create a print file, sent
to a standard HP laser priner, and get the printer to print various
fonts and sizes when desired.  What I really would like is to have the
output be normal size, then include very large letters when desired in,
say, Arial font size 24, then revert back. Obviously Word etc. can send
some string to the printer from which it understands to print the next
characters in the desired font and size.  Is there some string
Esc-something-something-something... which I can embed in the file
which will make this happen?  I am running under pi/open.  

Thanks-

Harold D. Oaks
Sr. Analyst/Programmer
Office of the Budget and Information Systems Clark County, Washington
ph: (360) 397-6121 x4132
fax: (360) 397-2342
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 I-descriptors, 
and had no further problems.

Not sure if UD, or UV10 for that matter, have that glitch, but it might be 
worth a look...

--Ron P.

-Original Message-

At 11:08 AM 02/03/05, you wrote:
Is anyone experiencing sporadic core dumps and have any suggestions to
eliminate them?
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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-ELSE error trap.

It looks like the compiler treats the BEGIN TRANSACTION--END 
TRANSACTION like it does BEGIN CASE--END CASE as far as imposing a top-down 
coding structure.  It's not like a PRINTER ON/OFF toggle that you can set at 
will, as if it were TRANSACTION ON/OFF.  But you are right that it does force 
you to code the TRANSACTION in a specific top-down style.  Makes it tricky to 
add transaction processing to old code :)

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Perry Taylor
Sent: Tuesday, February 01, 2005 12:54 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] [UV] Transaction Compile Failure


Logically there *is* an END TRANSACTION at two places.  One at the
bottom of the loop..

COMMIT
END TRANSACTION

And the other at the top of the loop...

IF @TRANSACTION THEN
ROLLBACK
END TRANSACTION
END

This being the case it would seem to me that the compiler cannot deal
with a transaction not being in purely straight-line code.  The only
alternative I see at this point is to put an explicit ROLLBACK / END
TRANSACTION at every point along the loop where I would need to bail out
of the transaction.  Seems to reduce the usefulness of @TRANSACTION and
structured programming.  

Any other suggestion?

Perry
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 = 0X
0004 VAL3 = ABCDE
0005 *
0006 IF (VAL1 MATCHES VAL2) THEN CRT VAL1 -- VAL2
0007 IF (VAL3 MATCHES VAL2) THEN CRT VAL3 -- VAL2

RPTEST
16:55:38 13 JAN 2005
VAL1 -- VAL2
VAL3 -- VAL2


The string 0X (zero + 'X') means match any number of any sort of character 
(alpha, num, etc.).

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Rex Gozar
Sent: Thursday, January 13, 2005 4:18 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] [UV]Strange But True


FYI - MATCH does a string comparison too.  e.g.

   VAL1 = 43008E-112 
   VAL2 = 43008E-108 
   IF (VAL1 MATCHES VAL2) THEN
  CRT THIS IS STRANGE
   END

does not print the message either.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 by piece, then 
EXECUTE TCL.CMD

--Ron P.
  
original e-mail
snip
  execute SORT SALES.ANALYSIS BY CUSTHEADING  'Year-To-Date Sales ' :
This.Date.F  

Perhaps more than the two standard quote chararacters, ['] and [] are
available.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


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 trapped by UV as the backspace 
key).  See if your emulator allows you to set what ASCII sequence it sends when 
you hit the backspace key on your PC keyboard

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of
[EMAIL PROTECTED]
Sent: Tuesday, November 30, 2004 9:34 AM
To: [EMAIL PROTECTED]
Subject: Re: [U2] How to set 'delete' key action in UniVerse


Peter,

 
 Hola -
 
 I've got a request from my programmer to set the delete key 
 to act as the backspace key does inside UniVerse 

Check out the TERM command.
TERM ,nn where nn is the ASCII number of the key to use for back
space.

E.g. 

TERM ,65 will make a capital A act as back space.

Brian
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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 statements made 
more sense.

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Adrian Matthews
Sent: Thursday, November 11, 2004 9:27 AM
To: [EMAIL PROTECTED]
Subject: RE: [U2] broken up SELECTS


It's something I've always done over the last twenty years. The select
processor in theory should apply optimisiation but I always break my
statements down to reduce the working record set and to increase readability.

Makes very little difference on smaller amount of records but makes a huge
difference when record counts get into the millions, especially on distributed
files or selects which work on a mixture of non-indexed and indexed fields.
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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 Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: Wednesday, November 03, 2004 12:26 PM
To: [EMAIL PROTECTED]
Subject: [U2] [UD] Files from UD Unix to UD Windows


Is there a way to use files ftp'ed from UD on UNIX to UD on Windows XP?

I'm not going to bore you with why other than I want to know if I can do

it.   I ftp the file, set up the voc pointer and I get the message File

D_FILE.837 does not belong to current language group 

Any ideas?

Bruce M Neylon
Health Care Management Group 
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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 Wy50 green-screen processed that extra 
text, and didn't display it.  The ProComm Plus emulation just spat the $20 out to 
the screen.

After modifying the source, and doing the tic and uvtic to compile it, the $20 went 
away.

Had to do some mods to the vt100 terminfo source on our new AIX box.  Our emulator 
(Reflection) had trouble with the keypad, arrow keys, and a few other things.  Our dba 
did the mods, put them in a new terminal type, did the uvtic stuff, and now it works 
like a champ!

So try copying  pasting a new term-type into the terminfo source, getting rid of the 
extra text that's showing up in your emulator, and doing the tic  uvtic.  Then use 
TERM or SET.TERM.TYPE to select that new one, and see if you get the behavior you want 
without the offending $20

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Ray Wurlod
Sent: Thursday, October 28, 2004 3:58 PM
To: [EMAIL PROTECTED]
Subject: [U2] $50


UniVerse does not use termcap, it uses a pair of terminfo databases - the UNIX one and 
another one, in the UV home account, primarily to support the @() function.
When these tokens appear, it means that somehow the terminal definition has not been 
able to be retrieved (perhaps because the TERM environment variable could not be 
evaluated).
The first thing to try is to set the terminal type, for example using the 
SET.TERM.TYPE command.
If the symptom persists, a UV administrator can recompile the terminfo databases.  In 
the UV home directory there is a sample terminfo database source file.  Use uvtic -a  
sample/terminfo.src to recompile.
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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-the-fly, if a one-liner didn't fit the bill.

--Ron P.


-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Mark Johnson
Sent: Wednesday, October 20, 2004 7:54 AM
To: [EMAIL PROTECTED]
Subject: Re: [U2] [UD] running a subroutine


Biased as I may be, but my PRINT example program will handle any of this and
much, much more instead of writing (and forgetting about) miscellaneous
procs and other small, limited use programs. It will give you more.

A problem with sending stuff to a proc is knowing how many parameters are
necessary as they all get slotted in A1, A2, A3 etc. If the values in the
subroutine contain (or allow) spaces, then this proc is useless. Plus, you
would have to test for n number of parameters before closing the
parenthesis.

Clearly typing this at tcl is better:

PRINT ; CALL SUBNAME(VAL1, VAL2, VAL3)

Later in the day you could type:

PRINT ; CALL ANOTHERSUB(VAL1, VAL2, VAL3, VAL4, VAL5, X) ; PRINT X

and not have to write another proc.

In fact, I welcome any criticisms or limitations anyone would have against
establishing this PRINT command to handle everything. I know of 2 limits: 1)
No hanging ELSE or THENs. 2) Cannot use READNEXT. Other than that I'm all
ears.

My 3 cents.

- Original Message -
From: Peter Olson [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Tuesday, October 19, 2004 8:43 AM
Subject: RE: [U2] [UD] running a subroutine


 but i want more!

 found it!

 0001: PQ
 0002: HSELECT
 0003: H EVAL SUBR('
 0004: A\2
 0005: H',
 0006: A3
 0007: H ) FROM VOC FIRST 1;
 0008: P

 now it's

 tclTS AGE.DATE -2224,42

 Cool thanks!


 This e-mail, including attachments, may include confidential and/or
 proprietary information, and may be used only by the person or entity to
 which it is addressed. If the reader of this e-mail is not the intended
 recipient or his or her authorized agent, the reader is hereby notified
 that any dissemination, distribution or copying of this e-mail is
 prohibited. If you have received this e-mail in error, please notify the
 sender by replying to this message and delete this e-mail immediately.
 ---
 u2-users mailing list
 [EMAIL PROTECTED]
 To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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 characters, yet another subdirectory is created.

The TCL command UNIX.PATH simulates this:

UNIX.PATH 123456789012345678901234567890
12345678901234/56789012345678/90

So if you said ED TYPE1FILE 123456789012345678901234567890 and filed that 
item, the body of the record would reside at:

/.../TYPE1FILE/12345678901234/56789012345678/90

If you had typed ED TYPE1FILE 12345678901234 you would get:

/.../TYPE1FILE/12345678901234/?

Which is a real PAIN to deal with at the Unix level, since ? is a special 
character.

I MUCH prefer type-19 files, which don't do any subdirectory stuff.  As long 
as your underlying OS can handle the item-id, you're good to go...

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of David Wolverton
Sent: Thursday, October 14, 2004 3:59 PM
To: [EMAIL PROTECTED]
Subject: [U2] UniVerse File Types


This question has been posed before, but when I do a search on 'FILE TYPE'
in my U2 email folder, and get 1700 hits. Yikes!  So here it is, probably
again...

What is the difference in TYPE 1 and TYPE 19 files?

And where can I find this documented?  I just downloaded the current
UniVerse docs, and only the CREATE.FILE command seems to talk about it, but
not what the implications are of the types.

I find 'File Types' defined, but again, it doesn't tell me what the choices
of 2 - 18 involve, or why one is better/worse/different. As well, I know 1
and 19 are diretory, but why are there two of them?  I know it must be based
on the key structure, but WHERE do I find those defintions?
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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 the code, and :w or ZZ to 
write it back, and it all works quite well.  When I first started, I used :Nread  
to get the source code, which introduced a blank line at the top of the file.  If 
that's what you are experiencing, try using :edit instead of :Nread.

How do you have your gVim set up?

--Ron P.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Shawn Waldie
Sent: Thursday, October 07, 2004 2:23 PM
To: [EMAIL PROTECTED]
Subject: [U2] gvim on UD


I modified a program using gvim (for the first time) this morning, but
the compiler returns several errors, the first of which is due to a line
with nothing but a CR.  I obviously need to tweak something.  Has anyone
out here encountered this?


* Shawn WaldieSan Juan College *
* Programmer/Analyst 4601 College Blvd *
* Phone: (505)566-3072   Farmington, NM  87402 *
*  email: [EMAIL PROTECTED]   *
*  *
* HP-UX 11.11   UniData 6.0.4Colleague R17 *

---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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 PROTECTED] Behalf Of Daly, Mark
Sent: Monday, September 20, 2004 9:25 AM
To: '[EMAIL PROTECTED]'
Subject: RE: [U2] Numeric rounding - UV 9.4  10.1


Quick follow up:  One of the guys discovered this:

Run the following pgm, then uncomment out the last 2 lines and run it
again.
Watch what happens to the first value for Y
 

X = 1234.78
Y = X 0
CRT X
CRT Y
  
* Y = XR#0
* CRT Y


 

-Original Message-
From: Daly, Mark 
Sent: Monday, September 20, 2004 9:28 AM
To: '[EMAIL PROTECTED]'
Subject: [U2] Numeric rounding - UV 9.4  10.1

I have a habbit of using the following syntax to round numbers to a
certain
number of decimal places:

X = 1.623
CRT X '2'
CRT X '0'

Yields:

1.62
2

It's always worked fine. Until we did an upgrade to 10.1. Now it has
been
deemed un-reliable because it produced an undesirable result (an empty
string) in a rather sensitive program.

So, first question is:  Is this a bad habbit I've had all these years?

Second question:  Has anyone else experienced a problem with this method
of
rounding? Is it a known bug?
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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: Thursday, August 19, 2004 4:28 PM
To: [EMAIL PROTECTED]
Subject: RE: [U2] [UV] How to return 'column' from dyn array?

snip
All the documentation I've seen before refers to TM, SVM, VM and AM.  I've
never seen FM before except on the radio.:)  Is this the Universe method of
notation?  I've only worked with native pick and U2.
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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 (@RECORD16 /
@RECORD17) * 1   CONV MD2 FMT 14R COL.HDG Tax % of Gross
05:28:17pm  16 Aug 2004  PAGE1
INVOICE... Tax Amount Net Invoice... Tax % of Gross

394407  30.19 555.19   5.44
788813   5.17  91.35   5.66
788814   7.33 101.85   7.20
788815   5.82  80.88   7.20

The values stored in attributes 16 and 17 are scalar integers with
virtual decimals, so had to do the * 1 to make the decimals come out
right

--Ron P.

-Original Message-
From: Kevin Michaelsen [mailto:[EMAIL PROTECTED]
Sent: Monday, August 16, 2004 4:02 PM
To: [EMAIL PROTECTED]
Subject: [U2] EVAL formatting


I had one of my IT folks look at this one and I don't want to belive them. 
They said you cannot display a decimal when using the EVAL command. I think 
there is got to be a way. That's why I put this out. The current EVAL 
statement displays 1 or 0. Any ideas??

LIST CS.2004 H.HCG.AWARDED.ALL H.TOTAL.AWARD EVAL 
H.HCG.AWARDED.ALL/H.TOTAL.AWARD


kevin
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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 @RECORD4:'*':@RECORD18

should do it.

The Illegal attribute name for sort: MFG.NO:'*':PART.NO error message may
be saying that you don't have an I-descriptor or D-descriptor in DICT ORDERS
named MFG.NO or PART.NO.  Using @RECORDnnn will work without having to
have an existing I- or D- descriptor in place.

Here's what I get in a similar test on my system (Universe):

SELECT VENDOR SAVING UNIQUE EVAL @RECORD3:'*':@RECORD4
@RECORD  3  : * : @RECORD  4   

1263 record(s) selected to SELECT list #0.
SAVE.LIST VEND.TEST

1263 record(s) SAVEd to SELECT list VEND.TEST.


--Ron P.

-Original Message-
From: Chauhan, Savita [mailto:[EMAIL PROTECTED]
Sent: Thursday, August 12, 2004 2:53 PM
To: [EMAIL PROTECTED]
Subject: RE: [U2] How do we get unique records from Universe file(Table)


Yes, I am trying to build a key to another file.
snip
It gives me following error:
: Illegal attribute name for sort: MFG.NO:'*':PART.NO
snip
Savita Chauhan, 
Programmer/Analyst
x:1754 Central Texas College.
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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_TYPE # RA

Also What is AFAIK, how do we set it up for multiple connections ?
thanks



 

  Brian Leach

  [EMAIL PROTECTED]To:
[EMAIL PROTECTED]

  o.uk  cc:

  Sent by:   Subject:  Re: [U2]
Question on Unidata tables access speeds 
  [EMAIL PROTECTED]

  er.u2ug.org

 

 

  08/09/2004 10:18 AM

  Please respond to

  u2-users

 

 





That might explain why one query takes so long, but not the time for the
four queries
(unless he is out of resource).

UniData can run multiple queries concurrently, but AFAIK only one per
connection. So I
guess the question is how DataStage is connecting to UniData, as it looks
like DataStage
is scheduling these sequentially.

Brian

On Mon, 9 Aug 2004 10:35:01 -0400
 [EMAIL PROTECTED] wrote:
You may want to try FILE.STAT and see if your file is properly sized.  If
not, then use
the RESIZE command.

Just my $0.001 worth.

Grant

-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Monday, August 09, 2004 10:09 AM
To: [EMAIL PROTECTED]
Subject: RE: [U2] Question on Unidata tables access speeds


It is indexed on the key column, even then if I run the run the job
(query)
4 times in parallel, I am not getting advange of the parallel query. Is
Unidata not good for the parallel query ?, or is there any tuning method ?
thanks






  Kevin King



  [EMAIL PROTECTED]To:
  [EMAIL PROTECTED]

cc:


  Sent by:   Subject:  RE: [U2]
Question on
Unidata tables access speeds
  [EMAIL PROTECTED]



  er.u2ug.org









  08/08/2004 06:09 PM



  Please respond to



  u2-users













Is anything indexed?  Sounds like you could probably benefit from
adding some indexes on fields used for the selection. That would make
a BIG difference.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
[EMAIL PROTECTED]
Sent: Sunday, August 08, 2004 3:57 PM
To: [EMAIL PROTECTED]
Subject: [U2] Question on Unidata tables access speeds

 Hi ,
Project  data warehouse, Sources are  Unidata tables, tool  Datastage.
Performance issue,
while dumping in to hash file(Allowing stage write cash). It is
searching
5.5 million
rows and fetching 2.6 million rows and taking 2.5 hours. There is only
one key column in the ouput. When I remove select caluse(I mean select
all rows) and put that filter in my tool, it is ok, but not great.
After that When I run parallel jobs , I mean select the data by 4 jobs
for different ranges(all at the same time), it is taking
4 times than normal time . In other words, I am not getting
performance like Oracle or other data bases. I am new to Unidata, is
there any method where I can get good access speeds on Unidata.Any
help will be highly appreciated.

thanks
pbr


--

Electronic Privacy Notice. This e-mail, and any attachments, contains
information that is, or may be, covered by the Electronic
Communications Privacy Act, 18 U.S.C. 2510-2521, and is also
confidential and proprietary in nature. If you are not the intended
recipient, please be advised that you are legally prohibited from
retaining, using, copying, distributing, or otherwise disclosing this
information in any manner. Instead, please reply to the sender that
you have received this communication in error, and then immediately
delete it. Thank you in advance for your cooperation.
==

---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/





---
---

Electronic Privacy Notice. This e-mail, and any attachments, contains
information that
is, or may be, covered by the Electronic Communications Privacy Act, 18
U.S.C.
2510-2521, and is also confidential and proprietary in nature. If you are
not the
intended recipient, please be advised that you are legally prohibited from
retaining,
using, copying, distributing, or otherwise disclosing this information in
any manner.
Instead, please reply to the 

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!  PLEASE be
careful dinking around with UFD as you could mess up or delete your
files!!!

--Ron Pingilley

-Original Message-
From: Joe Walter [mailto:[EMAIL PROTECTED]
Sent: Monday, July 19, 2004 12:22 PM
To: [EMAIL PROTECTED]
Subject: [U2] What is UFD 


Just got word from tech support to create an empty record named ERRLOG in
UFD file. I've discovered UFD voc entry really points to the file D_UV
in the universe home directory and there are many, many, many records in
this file - some of the huge in terms of number of attributes.

Can anyone shed some light on what this file is all about?

Thanks much,
joey

Joe Walter
Fax/Voice mail: 1.435.514.5132

We are living in a world today where lemonade is made from
artificial flavors and furniture polish is made from real lemons.
---Alfred E. Newman
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/


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
program?  If it is a STOP statement generating the error text, the string
being passed for display may not have anything to do with the real file name
which the program is trying to OPEN.

e.g.  OPEN WORKORDERS TO F.WKORD ELSE STOP 201,CONTRACT

is a perfectly valid statement for syntax, but EXTREMELY misleading
at run time!!!

--Ron P.

-Original Message-
From: Sara Burns [mailto:[EMAIL PROTECTED]
Sent: Thursday, July 01, 2004 7:21 PM
To: U2 List ([EMAIL PROTECTED])
Subject: [U2] UV Read failure


SNIP  
0079 TRAN*y   15  
0080 Program PTREVBRB: Line 15, Read operation failure.  [EFAULT] Bad
address
0081 [201] 'CONTRACT' IS NOT A FILE NAME 
 
CONTRACT was being used a few seconds before.
SNIP
 
AIX 5.2, UV 10.0.11 
 
Sara Burns
 
Sara Burns (SEB) 
Development Team Leader

Public Trust 
Phone: +64 (04) 474-3841 (DDI) 

Mobile: 027 457 5974
 mailto:[EMAIL PROTECTED] mailto:[EMAIL PROTECTED]

Information contained in this communication is confidential. If you are not
the intended recipient the information should not be used, disclosed, copied
or commercialised. The information is not necessarily the views nor the
official communication of Public Trust. No guarantee or representation is
made that the communication is free of errors, virus or interference.
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/