I've never used UD so I don't know what SYSTEM(49) returns.
But give SYSTEM(9001) a try on UV. I think it was added at 10.0.4.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED]
Sent: Tuesday, 22 June 2004 01:32
To: [EMAIL PROTECTED]
Subject: [U2] SYSTEM(49) on UV
Use the AS keyword:
eg.
LIST FILE EVAL PRICE * QTY AS AMNT EVAL AMNT * .1
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Stuart Boydell
Sent: Monday, 19 July 2004 10:00
To: U2-Users
Subject: [U2] [UV] EVAL how-to question
Is there a way to use the
That'd be the Hardware Abstraction Layer
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bruce Nichol
Sent: Tuesday, 28 September 2004 12:09 PM
To: [EMAIL PROTECTED]
Subject: Re: [U2] Comparison Unidata and Universe
Goo'day,
IIRC, isn't there a HAL
Sean W Ferguson wrote:
Wait, people actually do all their programming with ED?
Yes, unbelievable isn't it. And from reading some recent messages here
it seems like others even use vi!
---
u2-users mailing list
[EMAIL PROTECTED]
To unsubscribe please visit http://listserver.u2ug.org/
We do this very thing in a number of our utility programs.
We catalog the program and then append a K to the characters that
appear in field 4 of the generated VOC entry.
So field 4 is BNK (in our case) - the K means Keep any select list
active.
Eg. One of ours looks like this:
0001: V
0002:
We've just upgraded one of our HPUX machines and have started receiving
an intermittent unix error, I assume this is caused by an incorrectly
set tunable somewhere.
We have a number of programs the use !SET.PTR to define print unit 1 (or
even 0) with mode 3 (print to HOLD) with a banner.
The
Try:
TERM 80, 32000
followed by your LIST statement.
TERM without any options will display the current settings, the first
two are page width page depth. So with the settings in my example
you'll get a heading every 32,000 lines!
There seems to be a limit of 32767 for page depth though.
2004 9:42 AM
To: [EMAIL PROTECTED]
Subject: Re: [U2] [UV] Term settings for capture and no extra headings
Add a NO.PAGE to the end of the query.
- Original Message -
From: Womack, Adrian [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Thursday, October 28, 2004 8:47 PM
Subject: RE: [U2] [UV
I've just found the MFILE.HIST option on the PORT.STATUS verb. But I
can't find any decent documentation about the data it displays. Can any
one point me at documentation for this option?
The only statement about this option (that I could find) was in the User
Reference Guide and states: Use with
Thanks for the reply Ray,
I guess all this is pointing to the fact that our current setting of
MFILES is too low - BUT as far as we can tell everything is flying along
(and much faster than normal due to our new box). Will increasing MFILES
to a more reasonable level show a noticeable performance
You shouldn't be reading the record in the subroutine - it does not yet
exist in the file.
You should ALWAYS use @RECORD to refer to the current record and @ID
to refer to the current key.
You should either directly refer to @RECORD in your subroutine (and
remove the READ statement) or
I'm not sure why you'd want to use a dimensioned array in this
particular case. But how about just adding the new elements to the end
of the array and keeping a list of pointers in a small dynamic array.
Then you can use this dynamic array to access the dimensioned array
later.
Eg.
LAST.POS += 1
We've just started experimenting with Redback and according to the
documentation the Redback account needs to be Pick flavour. Is this
correct? or can another flavour be used?
All our user and development accounts are PI/Open flavour. Assuming the
redback account has to be Pick then is it safe to
with
VOC pointer for only the files I plan on using with my web apps. You
then
create modules in that account for your programs, RBOs, etc.
Hope this helps,
Mike Randall
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Womack, Adrian
Sent: Thursday
Another question from a Redback newbie.
There's a file WWUSERS that contains a list of redback user names (eg.
RBADMIN). I can create new users in this file and assign them a
password.
Using the RBOScope examples supplied, I can connect using one of these
user names password.
I've created a
Reading a dynamic array from SAVEDLISTS isn't necessarily platform
independent. PI/Open used to split the list up and end each part with a
sequential number (so you may get 2 records named MYLIST001 MYLIST002
for instance).
The easier (and platform independent) method would be to use READLIST to
Here's a quicksort routine that I (iirc) adapted slightly from one
posted here by Tony Gravagno...
SUBROUTINE SR.QSORT(MAT KEYS, MAT EXTRAS, START.AT, END.AT,
ASCENDING)
*
*
*
* Arguments:
*
* KEYS(n)(I/O) Array
As others have pointed out the routine is !EXIST - look in APP.PROGS,
the code is there. All it does is open GLOBAL.CATDIR and attempts to
read a record keyed on the subroutine.name.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Stevenson,
Charles
Sent:
We have some code that is calculating distances between points, using
SIN(), COS() and ACOS().
Occasionally we get the error: Argument domain error in arc-cosine,
zero returned
This seems to be occurring when two floating point numbers are added
together and the result is exactly 1 (or at least
Mike,
You say there is no select list active - but you are performing a LIST
statement, isn't that an implied active select list.
You shouldn't do anything in an i-type that could affect selectlist 0
(or use it up), and shelling out to perform a select would be very
in-efficient (one
Mats,
Check out the NO.RETURN.WARN compiler option.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Mats Carlid
Sent: Friday, 20 May 2005 2:18 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Include Vs Call - Software Maintenance
We use functions
You can create accounts on Windows just like on Unix - create a
directory and run the uv command while attached to the directory, it
will prompt asking whether to create a new account and which flavour you
require.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On
Well, I haven't seen any replies so far...
The answer is No you can't tell. This information is not stored
anywhere. All the data in a type 30 file (or any of the static hashed
files as well) is stored inside a single OS file (ignoring overflow
etc). So the OS date time stamps are of no use.
If
When we were still on PI/Open I'd always use var = var to reset a
REMOVE pointer to the beginning of a dynamic array.
REMOVE can also be used on elements of a dimensioned array, eg. REMOVE
var FROM arr(x) SETTING...
When we moved to UniVerse and the SETREM statement became available, I
started
through a dynamic array).
It was partially fixed at 9.6 or 10.0 (I forget when), but not quite.
The list archives should cough up a post by me re. REVREMOVE.
Thanks,
cds
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Womack, Adrian
Sent: Wednesday, June
Changing the second DUMMY variable to DUMMY2 makes no difference.
I tried the same code in a PICK flavour account and it worked
properly! I checked VLIST on the SETREM statement and the code produced
in PICK flavour is different to that produced in PI/Open flavour!
So, maybe it's a PI/Open
Checkout the COMPARE() function in HELP
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of HENDERSON MIKE,
MR
Sent: Wednesday, 6 July 2005 9:56 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] String compare anomaly {Unclassified}
When I do a compare, 0
Mark, I don't like your example...
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Mark Johnson
PRODS=ORD15
C.PRODS=DCOUNT(PRODS,CHAR(253))
FOR I=1 TO C.PRODS
PROD=PRODS1,I
NEXT I
I'd *much* prefer that written as...
LOOP
REMOVE PROD FROM
Using RBOScope for testing - if I press enter to get a new line in a text box
and then call a validation routine which returns an error - the new line in
the text box has magically transformed into a } character. When the data
arrives in my universe subroutine the new line is a value-mark (which
Try this:
IFS(EQS(SUBSTRINGS(A2,1,1),REUSE(-)),REUSE(N/STOCK),A2)
(works on UniVerse not sure about UniData)
Adrian
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Morawa, Hans
Sent: Monday, 18 July 2005 2:24 PM
To: u2-users@listserver.u2ug.org
Craig,
Check the SET.INDEX command - it's lets you change the path to the index
in the main file's header. Which is all you'd need to do after copying
the file indices.
Adrian
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Craig Bennett
Sent: Monday,
I'm pretty sure COMMAND.EDITOR is unsupported and undocumented with this
release. It also doesn't work as expected. You'd be better off
rolling-your-own.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Ron Hutchings
Sent: Wednesday, 3 August 2005 5:06 AM
We're still newbies with redback and are just setting up our first
production account to use it.
When we start redback, with startrgw, one or more responders (I
assume these are basically phantoms) are started on the box with the
username redback. For these processes to work correctly they
How about using the COUNT.SUP keyword?
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Barry Brevik
Sent: Thursday, 11 August 2005 7:11 AM
To: U2-users (E-mail)
Subject: [U2] [UV] SELECT without n records selected...
When executing SELECT from a PA, is
Very strange that it doesn't work...
I wrote a quick paragraph...
1: PA
2: SELECT VOC SAMPLE 5 COUNT.SUP
and I receive no message regarding number of records selected.
Is it a GET.LIST rather than a SELECT that's producing the message?
COUNT.SUP doesn't seem to work with GET.LIST.
Also consider using FMTS on the entire string, eg. STRING =
FMTS(STRING,55T)
This will perform the 55T formatting on each element of the string (in
this case: each sub-value).
DISCLAIMER:
Disclaimer. This e-mail is private and confidential. If you are not the
intended recipient, please
We also use xnn.meaningful.name type labels. One advantage is that our
editor can recognise a label and putting the cursor on a line that
includes a GOSUB and pressing one function key will move the cursor
directly to the correct paragraph.
One thing I've never agreed with (except in COBOL) is
I hope you're joking - talk about making code unreadable, comments that
look like code are (IMO) a very BAD idea. The indentation level makes it
perfectly clear what goes with what, and if it doesn't then change the
structure of the code.
IMO
IF XOOS.ALL.COURSES='Y' THEN
some
We use +$NO.RETURN.WARN (along with a bunch of other options) on the
BASIC command line for ALL programs, subroutines and functions (we've
actually wrapped BASIC - so no one actually types in the options).
DISCLAIMER:
Disclaimer. This e-mail is private and confidential. If you are not the
LOCATE PART.NBR IN RECORD14,1 BY AL SETTING POS
ELSE NULL
INS PART.NBR BEFORE RECORD14,POS
INS related.data BEFORE related.field14,POS
No need to do the second locate.
Note: I've used the PI/Open syntax for the LOCATE statement (that's the
only one I relate to), you may have to alter the
@listserver.u2ug.org
Subject: RE: [U2] Sort help needed
Your logic is wrong here; you are inserting whether PART.NBR is found or
not. The INS should be inside the ELSE clause.
-Keith
Original Message
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of
Womack, Adrian
Sent
An alternative to using Larry's suggestion of writing a program to
create a phrase of all the D types, you can use REVISE filename which
will automatically create an @REVISE phrase in the dictionary containing
all the D-types. You can then just rename @REVISE to ALL.
-Original Message-
I'm pretty sure everyone is talking about the named common name not the
variable names (i.e. the name between the slashes in COMMON /ABC$123/
LONG.VARIABLE.NAME1, ETC
The variables names defined within your common block should be able to be any
length you like (perhaps restricted to 32
We use READU locks - they're much more friendly than semaphores as they can be
given meaningful names that show up with a LIST.READU.
Also they are very quick and easy to test with the RECORDLOCKED() function -
eg.
IF NOT(RECORDLOCKED(filevar, recordname)) THEN ...
AdrianW
DISCLAIMER:
Don't know about checking before the open - but look at the FILEINFO()
function (see SYSCOM FILEINFO.INS.IBAS).
FILEINFO(filevar, FINFO$NODENAME) should return for local files and
the machine name for remote files, but this assumes the OPEN statement
worked.
-Original Message-
From:
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
If you don't want to use the HOLD file (which IMO is the easiest thing
to do), how about executing TERM to change the terminal width (and
height) to something really large (eg 2000), execute your list
statement, and then use TERM to set the width height back to normal.
-Original
Use the attribute names everywhere - the only place attribute numbers belong
is in D-type entries in the dictionary and in an equate table in a single
basic include file.
From: [EMAIL PROTECTED] on behalf of Bill Haskett
Sent: Sat 28/01/2006 4:24 AM
To:
The arguments are passed by reference - so both RtnValue and InValue are
pointing to the SAME variable in the calling routine.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bill Haskett
Sent: Tuesday, 7 February 2006 7:14 AM
To:
Wide0 should have no bearing on numbers in that range. The Wide0
problem that I've encountered is when values do look (and print) the
same and an equality comparison fails (not the other way around).
Are you sure COST.VISIBLE is true?
-Original Message-
From: [EMAIL PROTECTED]
We recently ran into a problem where the garbage collection (GC) process
would no longer run (our WWSTATE file contained over a million records!,
and the application response time was abysmal).
There is a control record VERSION in the file WWCONTROL which contains a
date time that GC is next due
PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Stevenson,
Charles
Sent: 22 March 2006 03:35
To: u2-users@listserver.u2ug.org
Cc: Womack, Adrian
Subject: [U2] RE:[UV:Redback] Automatic Garbage Collection not running
We recently ran into a problem where the garbage collection
(GC) process would
All the months order (full names):
CRT OCONVS(ICONVS(1}2}3}4}5}6}7}8}9}10}11}12,DM),DMAL)
Abbreviations:
CRT OCONVS(ICONVS(1}2}3}4}5}6}7}8}9}10}11}12,DM),DMAL[3])
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Mark Johnson
Sent: Tuesday, 9 May
U035A exists in the file APP.PROGS (.../universe/uv/APP.PROGS) as 035A
without the A.
You could modify that to do what you want, or just write your own
subroutine to do the same thing.
IMO, you'd be better off writing your own, as the source code for that
routine is atrocious (and commented in
Sounds like you've got INTEGER specified in field 8 (SQL Data) and
MD1 specified in field 3 (Conversion) of the dictionary for the
problematic field.
Just removing INTEGER will fix the problem - but if you're using SQL
on the file/table maybe you should replace INTEGER with the correct
field
We do exactly the same thing but with READU locks instead. The locks can
be on non-existent records and the record names can be meaningful (eg.
processname.running) - so a LIST.READU will show which phantoms are
running.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL
If you don't care about the resulting position - i.e. you just want to
know if the list contains the item, then the absolute quickest method is
to use INDEX().
Eg looking for JKL in ABC}DEF}GHI}JKL}MNO}PQR
THE.LIST = @VM:ABC}DEF}GHI}JKL}MNO}PQR:@VM
IF INDEX(THE.LIST,@VM:JKL:@VM,1) THEN found
It's Universe Basic. It works on UV 10.0.19 on HPUX.
From: [EMAIL PROTECTED] on behalf of Tom Dodds
Sent: Thu 10/08/2006 8:28 PM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] Change command prompt character
What language is this for and upon which machine
Huh? That makes no sense.
The ASSIGN is only done once per session, i.e. at login time. I think
having your prompt showing whether there was an active select list
active when you logged in, isn't really that useful ;)
FWIW
We have our own command editor, which shows which selectlists are active
There should be a file pointer to SYSCOM in your VOC. Ours contains:
1: F
2: /opt/universe/uv/INCLUDE
3: /opt/universe/uv/D_INCLUDE
Here's the bit that's relevant to SELECTINFO...
* Keys for SELECTINFO function
EQUATE IK$SLACTIVE TO 1
EQUATE IK$SLCOUNTTO 3
AdrianW
-Original
The original poster was asking about a single IF statement and how to
split it into several lines, I don't think using a CASE structure would
solve this particular problem.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bruce Nichol
Sent: Friday, 25
I don't believe it - you're right!
I could have sworn that using a DIM on a previously defined common array
would do nothing, well I stand corrected.
Maybe I'm remembering what happened under PI/Open, but it certainly does
work under Universe.
Sorry for the misinformation. :(
-Original
I wonder if this problem is flavour dependent. I'm using PI/Open flavour
UV 10.0.19 and ALL fields show up when listing vertically whether they
are blank or not.
DISCLAIMER:
Disclaimer. This e-mail is private and confidential. If you are not the
intended recipient, please advise us by return
Assuming you're dictionary items are D-types, just read the dict item
then use field 2 as a field number to extract the data from your record.
Use field 3 with OCONV and use field 5 with FMT.
If you want to use I-types, simply set @RECORD to the contents of your
data record, and @ID to the record
Rather than writing a program and using SYSTEM(4001) SYSTEM(4002), a
slightly easier way is to use:
COMMAND.EDITOR ON ALL acct name
PI/Open had the COMMAND.EDITOR command years ago, and it was documented.
The version in Universe is not documented and is most likely not
supported. When we
The OP never made it clear what he was trying to do.
He may in fact be trying to select randomly numbered ID's and if that is
the case, he doesn't actually need a select statement at all.
Perhaps we should wait until he gives us a little more info.
DISCLAIMER:
Disclaimer. This e-mail is
I wanted to do something similar (allowing a user to edit their .profile
record from within UV). What I ended up doing was using a file name
without a dot and then using SH to execute a unix cp to change the
file's name.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL
Karl,
Is that a UniData thing? Because with UniVerse exactly the reverse would
be true - writing to a sequential file (via CRT statements to a COMO or
with WRITESEQ to a record in a directory) would be much more efficient
and use less memory than performing a WRITEV (which has to read the
entire
Is there a UV tool that shows whether a file is 64bit or 32bit? I've
tried the obvious ANALYZE.FILE with no success.
I ended up using the unix xd command to see the file's header, but I
expected there to be UV command to provide this function.
First bytes of a 32 bit file: 0xACEF010C
First bytes
That works well, thanks.
For some reason our BASIC help file only has attributes 1-30 defined for
the result of the STATUS statement. I just checked the BASIC pdf manual
and that documents from right up to attribute 33.
I never think of using the STATUS statement - but it certainly returns a
lot
Well, I do think there should be a documented method of finding out
whether a file is 32 or 64bit. Surely that should be added to
ANALYZE.FILE.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Ray Wurlod
Sent: Thursday, 19 October 2006 1:28 PM
To:
Something interesting I just noticed:
If I create a file and resize it to 64bit and then create alternate keys
(with CREATE.INDEX) the alternate key file (I_filename/INDEX.000) is
also created as 64bit.
BUT, if I add the alternate keys BEFORE resizing to 64bit, the AK file
is left as a 32bit
A couple of points:
Gordon's example: DATE()[EMAIL PROTECTED]6 should really be using a D-type
named field instead of using @RECORDnn
Jeff's example: DATE() - ICONV(*YOUR.DATE.FIELD.HERE*,D4/) - the date
field should already be in internal format, so what's the point of the
ICONV ?
AdrianW
I'm in Perth WA, and we're on Daylight Saving for the fist time in years
(as of 2am Dec 2nd). This has caused all kinds of problems, as it was a
last minute decision by the government and we had hardly any time to get
the various config files setup correctly.
We're running UniVerse 10.0.19
I'd really appreciate a way to write an internal function which can have
parameters and can contain it's own local variables (although global
variables would be OK). Often it's just not worth the effort to write a
full blown external function that's only called a few times by one
program.
Perhaps
We had a specific problem with Redback - when the OS went to daylight
savings time, Universe also went to daylight savings time - BUT Redback
did not.
This was because the Redback ini file (rgwresp.ini) has it's own TZ
parameter, which in our case was wrong. I should think you'll be OK as
long as
I just tried this out - and it does let you use multiple CONVS one after
the other. BUT, I would normally use FMT L#100 rather than CONV
T100.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Boydell, Stuart
Sent: Thursday, 22 February 2007 10:56 AM
To:
We're on UV 10.1.20 (in PI/Open flavour).
The L#100 is a format not a conversion, so should be used with FMT
not CONV.
Eg. LIST TEMP ID.SUP F1 AS Description FMT L#100 CONV MCP TOXML
Or using two CONVs:
LIST TEMP ID.SUP F1 AS Description CONV T100 CONV MCP TOXML
I even tried three CONVs and
This is more of an old trick.
The reason that -1 is so much faster is because using -1 just
appends to an already existing string in memory. Where using n will
cause an entirely new string to be created and the old one thrown away
(to be eventually garbage collected). The process gets slower
FILEINFO always returns the correct fully resolved path (without any
double dots) under Universe on Unix. Maybe this problem only affects
Windows.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Susan Joslyn
Sent: Tuesday, 13 March 2007 6:40 AM
To:
Are you guys aware of the universe supplied include:
ATFUNCTIONS.INS.IBAS (or ATFUNCTIONS.H) which resides in .../uv/INCLUDE
Here's an extract:
EQUATE IT$CSTO -1 ;* clear screen (ANSI)
EQUATE IT$CAH TO -2 ;* cursor absolute home (ANSI)
EQUATE IT$CLEOS TO -3 ;*
for consistency.
My 2 cents
Mark JOhnson
- Original Message -
From: Womack, Adrian [EMAIL PROTECTED]
To: u2-users@listserver.u2ug.org
Sent: Thursday, March 22, 2007 7:29 PM
Subject: RE: [U2] @VARIABLES
Are you guys aware of the universe supplied include:
ATFUNCTIONS.INS.IBAS (or ATFUNCTIONS.H
Warning: This message has had one or more attachments removed
Warning: (not named).
Warning: Please read the AngelicHost-Attachment-Warning.txt attachment(s)
for more information.
If the includes only contain EQUATES then there is no point in using GOSUB, as
EQUATES are resolved at compile time.
Warning: This message has had one or more attachments removed
Warning: (not named).
Warning: Please read the AngelicHost-Attachment-Warning.txt attachment(s)
for more information.
Karl,
You're right about these messages being annoying - but you're wrong about 5
months. It's actually 5 days. You
Try SYSTEM(1302) - each attribute holds details about one user (no,
username, pid, type) eg:
USERS = SYSTEM(1302)
CRT USERS1
CRT USERS2
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of chuchi
Sent: Tuesday, 10 July 2007 5:34 PM
To:
Does anyone know of a conversion code that returns the week number of
the year?
DISCLAIMER:
Disclaimer. This e-mail is private and confidential. If you are not the
intended recipient, please advise us by return e-mail immediately, and delete
the e-mail and any attachments without using or
Thanks for that Mike. I'd forgotten about pickwiki.
I found this function which should do the trick:
http://www.pickwiki.com/cgi-bin/wiki.pl?IsoWeekNum
Thanks,
Adrian
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of HENDERSON MIKE,
MR
Sent: Wednesday,
Just one thing to be aware of: SSELECT implies BY @ID so the BY @ID
in your statement is redundant.
To prevent sorting by @ID just use SELECT not SSELECT.
So, if you are using SSELECT then you're already sorting by @ID, so I
doubt you are going to make it any quicker by modifying your SELECT
Checkout SYSTEM(9001) - this should return what you're after.
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Bernard Lubin
Sent: Monday, 3 September 2007 3:47 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] [UV] - Getting the call stack trace within a
Take a look at the ED code - it's in the BP of the uvhome account, named
ED.B
There's a bunch of code relating to CASE, and there's this mod line at
the top of the program:
06/01/03 E2835 LFD For 10.1 TCL Case Insensitivity project
So, I guess you can blame someone with the initials LFD ;)
IMO, the only thing wrong with your example is the use of the trailing
format strings - everyone (and I mean everyone) should be using the FMT
function, making your example:
CRT FMT(OCONV(VAR1,MD0),R#6 ):FMT(OCONV(VAR2,MD2),R#10
):FMT(OCONV(VAR3,MD4),R#14)
The old method is a disaster waiting to
Using FMT forces correct syntax use. Having the trailing formatting
characters, can cause all kinds of issues with small typos in the code
(especially when the compiler just takes it all in it's stride).
Look at these two examples:
* Accidentally inserting a space into a numeric constant
A = 123
The original new INDEX code (as posted by Keith) was...
IF INDEX(TEST,'\':F200.SCHEME.CODE:'\',1) THEN THAT =
Including the delimiters at the front back of the string, which
prevents any false positives (like finding CK in CK1).
Personally, I like the LOCATE solution as it makes for much more
Keith said:
Then, to avoid the long setup string, one has to use CONVERT (or SWAP
or CHANGE).
You can always hard-code value-marks:
TEST = AF1}CK1}CK2}H}LHC}MP}NU1}NU2}TK1}TK2
Adrian
DISCLAIMER:
Disclaimer. This e-mail is private and confidential. If you are not the
intended
I much prefer the multiple exit point method, it makes the code a lot
easier to read.
Prime examples are when you are looping through a file but only want to
process certain records that pass a lot of conditions, it so much easier
to test each condition individually and then RETURN immediately.
But this is so much easier to read (note the liberal use of blank lines
making the conditions easy to spot):
LOOP
WHILE READNEXT ID
GOSUB PROCESS.REC
REPEAT
RETURN
PROCESS.REC:
READ RECORD FROM FILE,ID
ELSE RETURN
IF RECORDFLD.1 NE COND1
THEN
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
If you use @SYS.BELL instead of CHAR(7), the bell can be turned on or
off using BELL ON or BELL OFF.
BELL ON/OFF - toggles the value of @SYS.BELL between CHAR(7) and .
-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Brutzman, Bill
Sent: Friday, 15
Not sure if this solution will work in UniData (but it does in
Universe):
Try writing an iType using this code: @2;Qty+@
eg: SORT FLAT.SHD BY Frame_Color BREAK.ON Frame_Color TOTAL Qty EVAL
@2;Qty+@
The @2 means use the 2nd value defined in the iType, but because the
2nd value hasn't been
Does anyone else think it's bad practice to have code in INCLUDES?
Surely it would be much better to have the INITIATE.FEEDBACK
GIVE.FEEDBACK routines written as subroutines, and then simply call them
from the appropriate spots.
If the code in either of those routines needs to be changed, you'll
1 - 100 of 133 matches
Mail list logo
