George,
See my answer to Bjorn Behr when he asked the same question in April 2009.
[Begin]
This is the error you get when the I-Descriptor calls a subroutine that does a
SELECT. See this reply from Glenn Herbert to the same problem in March 2004.
Yeah. It's actually a bug in the program/itype
Richard,
You don't say what version of Universe you are on but if it is 10.n then the
default http version is 1.0 most web services I have accessed need version 1.1
so you will need to use :-
STATUS = setHTTPDefault(VERSION, 1.1)
At 11.n it looks like the default version has been changed to
Jake,
You do not say what release of UV you are running but as of 9.5.1C you really
should be using fixtool. See extracts from whitepaper below
1) Description
fixtool is the replacement for UVFIXFILE (uvfixfile from the OS shell) and was
introduced at 9.5.1C to support
both 32-bit and 64-bit
...)
You can pull the same stunt for PICK mode, just remember the extra
ntries will end up in the last element of the array.
Cheers,
ol
-Original Message-
From: andy baum andyb...@yahoo.co.uk
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Fri, May 11, 2012 6:30 am
Subject
How about :-
OPEN 'FILENAME' TO FILEVAR ELSE
STOPM 'Cannot open FILENAME'
END
DIM REC(500)
SELECT FILEVAR
LOOP
WHILE READNEXT ID
MATREADU REC FROM FILEVAR,ID THEN
MATWRITE REC TO FILEVAR,ID
END
REPEAT
END
MATWRITE trims trailing blank attributes as it writes the
Jake,
Try
TRANS(FILE,F1,1,X);IFS(NES(@,REUSE('B')),@,REUSE(''));TRIM(@,@SM)
Cheers,
Andy
From: Holt, Jake jh...@samsill.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Friday, 6 April 2012, 14:48
Subject: Re: [U2] Remove items from lsit in
LIST FILENAME WITH @ID = EVAL UPCASE('I2,Name')
Works for me.
Andy
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Wednesday, 28 March 2012, 21:09
Subject: Re: [U2] How to UPCASE in a Paragraph?
That
When UV displays the sentence it is running, all quote characters are displayed
as even \.
I've tried this on various release from 9.5 to 11.3 and various flavors (PICK,
IDEAL and INFORMATION). It seems to work in all, only caveats are in PICK
flavor the outer quotes cannot be '. INFORMATION
Scratch that, should read things more carefully, obviously 2 hours sleep is not
enough.
Cheers,
Andy
From: andy baum andyb...@yahoo.co.uk
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Thursday, 8 December 2011, 7:52
Subject: Re: [U2] End of Month
Ran Dan's test code on latest Windows PE version of Universe and got :-
9.788
1.558
1.474
3.412
Tried
NOT(MOD(YEAR,400)) OR(NOT(MOD(YEAR,4)) ANDMOD(YEAR,100)))
which took 1.423 seconds
Got the same trend, although different timings on our Solaris 10 box running
Universe 10.3.6
Cheers,
Seem to have lost a bit of last reply which should have read
Ran Dan's test code on latest Windows PE version of Universe and got :-
9.788
1.558
1.474
3.412
Tried
NOT(MOD(YEAR,400)) OR(NOT(MOD(YEAR,4)) AND MOD(YEAR,100)))
which took 2.181 seconds but the fastest I could get was
LEAP.YEAR =
This is even worse on Universe, I passed YEAR into the Function/Subroutine so
didn't have the OCONV but the results I got were
Function 13.008 seconds
Subroutine 12.889 seconds
Insert 1.455 seconds
Cheers,
Andy
From: David A. Green dgr...@dagconsulting.com
?
-Original Message-
From: andy baum andyb...@yahoo.co.uk
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Wed, Dec 7, 2011 7:25 pm
Subject: Re: [U2] End of Month date routine
Seem to have lost a bit of last reply which should have read
Ran Dan's test code on latest Windows PE version
Perry,
You need to do this by using the Dynamic Normalisation and INSERT.
INSERT INTO FILE_MVFIELD (@ID, MVFIELD) VALUES ('KEY', 'THE.NEW.VALUE')
More details can be found in the SQL User Guide Chapter 5.
HTH,
Andy
From: Perry Taylor
() will do.
However, speedy does not come to mind when I think of everything entailed in
doing this; the longer the password required, the less speedy it shall be.
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of andy baum
Sent
How about
PASSWD = ''
LOOP
CHR = KEYIN()
UNTIL CHR = CHAR(13) DO
IF CHR # CHAR(8) THEN
CRT *:
PASSWD := CHR
END ELSE
CRT CHAR(8):' ':CHAR(8):
PASSWD = PASSWD[1,LEN(PASSWD)-1]
END
Slight amendment in case your positioned in middle of screen.
PASSWD = ''
LOOP
CHR = KEYIN()
UNTIL CHR = CHAR(13) DO
BEGIN CASE
CASE CHR # CHAR(8)
CRT *:
PASSWD := CHR
CASE PASSWD # ''
John,
I'm guessing you're using a PICK account, to use numbered select lists in these
accounts you must have $OPTIONS -S in the code. Also multiple TCL commands can
be combined together just as in a PA VOC type avoiding the need for multiple
EXECUTE's so the code could look something like
Jack,
Just wrote a little program to create a list with 10,000,000 lines of 10 bytes
each and then used ED to access it, with the following results.
ED SAVEDLISTS BIG
1000 lines long.
:
0001: 0002055482
: SIZE
Size of BIG is 1000 lines and 10999 bytes (characters).
Or you can use :-
MATCHFIELD(F1,\0X'PRN='0X''0X\,3)
To directly extract the value. This works in Universe but not sure if Unidata
supports the third (\) quote symbol. If not then you can use :-
MATCHFIELD(F1,0X'PRN=:'':'0X':'':'0X,3)
Which is not quite as readable.
Cheers,
Andy
Bill,
uvfixfile has not been developed for some time now and the preferred tool is
fixtool
Options are :-
-level #- Diagnosic level between 1 and 10 (default 2)
-fix - Fix the file
-dumppath x - Where x is the path for the dumpping files
-nodump - Do not dump errored records as default
did not fix the file.
I suppose that I will try another file...
--Bill
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of andy baum
Sent: Wednesday, December 08, 2010 3:40 PM
To: U2 Users List
Subject: Re: [U2] File Copy
Tony,
This is not in the latest 7.2 manuals and when I try the following program
using
7.2.3 PE
CRT NOT(ASSIGNED(A))
A = 1
CRT
Susan,
At TCL in the remote account type LONGNAMES ON or edit the VOC entries for
CREATE.FILE, DELETE.FILE and CNAME to add a V to field 4 and put the word
LONGNAMES in field 5 therefore in a PICK flavor account they look like:
0001: V
0002: create.file
0003: E
0004: VF
0005: LONGNAMES
Chris,
In the U2 Resource pane (top left by default) open the account and then
database files, go to the source code file e.g. BP, right click and the top
option is New Basic Program. Choosing this lets you enter a name and a template
to use.
HTH,
Andy
- Original Message
From:
John,
You should look at the INDICES function it can be called either with just a
file variable or with a file variable and index name. The first form returns a
dynamic array of indices on the file and the second gives pretty much all the
info you need on the individual index.
HTH,
Andy
George,
This was possible in PI/Open using
PA
GET-LIST LISTNAME
LOOP
IF L, ID = THEN GO NEXT
RUN LIB PROGRAMNAME
DATA ID
REPEAT
NEXT:
Unfortunately this never made it in to Universe, don't know about Unidata. I
reported this when I beta tested the PI/Open to Universe migration
YES
005 RUN BP VENDORS
006 DATA ENTER MONTH
From: u2-users-boun...@listserver.u2ug.org
[u2-users-boun...@listserver.u2ug.org] On Behalf Of andy baum
[andyb...@yahoo.co.uk]
Sent: Thursday, December 10, 2009 1:06 PM
To: U2 Users List
Subject: Re: [U2] A readnext
Doug,
12729 is the process id, the - indicates it is a background job.
HTH,
Andy
- Original Message
From: Doug Chanco dcha...@sportsendeavors.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Sun, 29 November, 2009 23:59:02
Subject: [U2] errlog question
Can anyone shed any
Doug,
Should have mentioned that 040037 means Variable unassigned.
Andy
- Original Message
From: Doug Chanco dcha...@sportsendeavors.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Sun, 29 November, 2009 23:59:02
Subject: [U2] errlog question
Can anyone shed any light on
Perry,
Have you checked the well known port number has been added to the services file
it should look something like this :-
unirpc 31438/tcp#Universe RPC
This needs to be added on all machines that you wish to connect. The file is in
/etc on
Bill,
Does Unidata have the @NI variable this will be set to 1 for the first record
of any new LIST or SELECT so you should be able to change
IF comDbiUserArray = NULL$ OR comDbiUserArray = 0 THEN
To
IF comDbiUserArray = NULL$ OR comDbiUserArray = 0 OR @NI = 1 THEN
HTH
Andy
Using OCONV(RESULT,'MX0C') seems to work OK on Windows but I'm sure I had
problems with this on UV 10.2 on hp-ux. However, ICONV(RESULT,'MY') worked on
both.
Cheers,
Andy
- Original Message
From: m3p jr...@go.com
To: u2-users@listserver.u2ug.org
Sent: Tuesday, 11 August, 2009
Of andy baum
Sent: Thursday, July 16, 2009 2:52 PM
To: U2 Users List
Subject: Re: [U2] Universe Retrieve
Henry,
EVAL compiles the expression and writes the result into the dictionary, runs
the query and then deletes the dictionary item. For your test to be valid
you would need to ignore
Henry,
EVAL compiles the expression and writes the result into the dictionary, runs
the query and then deletes the dictionary item. For your test to be valid you
would need to ignore the overheads of the compile, write to and delete from
dictionary which in your example are significant
The subroutine needs to be globally cataloged and therefore its name will begin
with an asterisk.
CATALOG filename *BTPEMAILTRIGGER
CREATE TRIGGER EMAILUPDT AFTER INSERT OR UPDATE OR DELETE ON NABTP FOR EACH
ROW CALLING '*BTPEMAILTRIGGER' ;
If you are running in a PICK flavour account then
Bjorn,
This is the error you get when the I-Descriptor calls a subroutine that does a
SELECT. See this reply from Glenn Herbert to the same problem in March 2004.
Yeah. It's actually a bug in the program/itype unloading code that won't allow
you to do this. I ran upon this in May 2003 and,
Bjorn,
Glad this worked a better way would probably be to use BSCAN :-
BSCAN IND.ID, IND.REC FROM FIRST.TEST,REC.ID USING 'RECORD_ID' RESET ELSE
FIRST.ID = IND.REC1
END
If your key is exactly as you have described then you may also hit some
problems with sorting as any
Use LIKE ...'4A'... to prevent pattern matching
-Original Message-
From: owner-u2-us...@listserver.u2ug.org
[mailto:owner-u2-us...@listserver.u2ug.org] On Behalf Of Hennessey, Mark F.
Sent: 03 February 2009 21:03
To: u2-users@listserver.u2ug.org
Subject: [U2] RE: UV - Error when using
Look at MATPARSE
A11 = DCOUNT(IN.TAB,@AM)
DIM RECS(A11)
MATPARSE RECS FROM IN.TAB, @AM
FOR A1 = 1 TO A11
CUST.NUM = RECS(A1)1,1
CUST.DESC = RECS(A1)1,2
NEXT A1
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of David Laansma
Sent: 17 November 2008
Stuart,
You can do:-
SELECT LOOKUP.TABLE XYZ SAVING CODE
MERGE.LIST 0 UNION 0
MERGE.LIST is very fast even on large lists, removes duplicates and the
resultant list is sorted.
HTH
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Boydell, Stuart
Stuart,
Could also use :-
SELECT DISTINCT CODE TO SLIST 0 FROM LOOKUP.TABLE_CODE;
providing CODE is defined as multi-valued
hth
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Boydell, Stuart
Sent: 23 January 2008 06:57
To:
Augusto,
Can you change your application to use OPENPATH rather than OPEN. This does not
require a VOC entry just a path.
Cheers,
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Augusto Alonso
Sent: 28 November 2007 18:46
To:
Bill,
I think this is something to do with Multi-Threaded sorts you need to disable
it in uvconfig. I understand all issues with this are sorted at about 10.1.24
Cheers,
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Brutzman, Bill
Sent: 24
Adrian,
Take a look at VT220.IKBIND in SYS.TERMINALS, fields 22 to 103 are the
keystrokes produced by a standard VT220 terminal.
It's not clear from your email what you are trying to do but this file is only
used in conjunction with !EDIT.INPUT to cause it to beep rather than exiting
when
Bob,
Have you looked at !GET.KEY?
Also for more functioality look at !PACK.FNKEYS and !EDIT.INPUT, not quite as
good as they were in PI/Open but they work.
Cheers,
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Bob Utech
Sent: 22 March 2007 12:43
Adrian,
In $RBHOME/rgw/conf there is a file called rgwresp.ini one of the sections in
there is [Default.Environment] you need to set TZ to the appropriate timezone
setting.
HTH
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Womack, Adrian
Sent: 05
Jerry,
We had the same issues on hp-ux, try turning off multi-threaded sorts by
setting UVTSORT in uvconfig to 0 (you'll need to do a uvregen and stop and
start UV after this).
Cheers,
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of jpb
Sent: 05
P.S. We actually use this as a quick way of removing duplicates from a list,
i.e. MERGE.LIST 0 UNION 0, as it's very quick.
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Coelho, Gregory
Sent: 26 February 2006 00:55
To: u2-users@listserver.u2ug.org
Greg,
MERGE.LIST removes all duplicates and sorts the keys, it's a feature of how it
is implemented.
Cheers,
Andy
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Coelho, Gregory
Sent: 26 February 2006 00:55
To: u2-users@listserver.u2ug.org
Subject: [U2]
50 matches
Mail list logo