On 02/07/2011 11:16 PM, Glen B wrote:
On 2/7/2011 3:58 PM, Tony Gravagno wrote:
From: Charles_Shaffer
You will never be able to go completely away from
UniBASIC while keeping a U2 database. I don't think
that's possible.
We use Uniobjects on our web servers to access our
Unidata servers. Tech
On 2/7/2011 3:58 PM, Tony Gravagno wrote:
From: Charles_Shaffer
You will never be able to go completely away from
UniBASIC while keeping a U2 database. I don't think
that's possible.
We use Uniobjects on our web servers to access our
Unidata servers. Technically we could avoid UniBasic
with Un
I started on a P300 that I think might have been running Primos 3,
then we got a 400 running Primos 4. I think it was either the upgrade
to Primos 5 or 7 (details are too blurry at this point) when we had
significant issues with a upgrade, not the least of which was that the
cobol compiler was brok
Jerry:
I also worked for Victor tech, as a contractor in about '82, but that was after
they sold the computer division to Tandy. I maintained an Arev application for
about 5 years for a company that sold, and is still selling, the calculators.
Sent from my iPhone
Tom Dodds
t...@ix.netcom.com
6
I also started in 1972 on point of sale systems at Victor Comptometer
Corporation. At the time we were a US manufacturing facility for Noxdorf
Computers. I didn't get into a Pick flavor until 1980 when I started
work at Prime Computers. I think at tat time Primos was 16 something and
Prime Info
My first Pick job was in 1985 on a Honeywell Ultimate. Our programming
language was RPL from Systems Management, Inc. I still have my RPL81 manual
in a three ring binder.
Steve
- Original Message -
From:
To:
Sent: Monday, February 07, 2011 5:03 PM
Subject: Re: [U2] RPL was Pick Hi
Uh... and ?
I didn't ask you Tony. I have no idea why you want to be smart.
The history of Pick is not OT for a U2 group.
So cool your jets.
-Original Message-
From: Tony Gravagno <3xk547...@sneakemail.com>
To: u2-users
Sent: Mon, Feb 7, 2011 5:07 pm
Subject: Re: [U2] RPL was
No more OT digressions, please? I'm quite familiar with RPL. The
owner is my client. I do RPL/assembler work for them. I know it's
history and where it's actually sold and supported now. But I
don't want to discuss this in the U2 forum or any other forum
really. Thanks.
> From: Will
> I'm thinking
That isn't always the case, although I always advocate writing maintainable
code over needlessly optimising.
An example would be our system for which does some fairly heavy lifting that
can handle just over 10 requests a second. Within this year we must scale it to
55 and to 500 within 5 years.
We used to try to write machine-efficient code.
Now machines are so fast, our emphasis is on people-efficient, ie
easier to maintain.
On 8 February 2011 12:58, Dan McGrath wrote:
> I had many months ago as part of a project I'm working on (performance
> pre-processor for UniBasic).
>
> I've recr
Ah. I think we have a terminology mix up. I was referring to the
internal subroutine, not an external subroutine (why did they have to
call the external code a subroutine as well!)
Yes, external subroutines do invoke a much larger overhead. From my
testing previously, I believe it first checks the
Have a look at Antler - http://www.antlr.org/ and
http://pragprog.com/titles/tpdsl/language-implementation-patterns
I have also looking into this as a method to extend UniBasic with a
pre-processor.
djm
slestak wrote:
>
>
> I think I will be tinkering with this soon. I have to believe Inter
Dan,
Interesting stuff. How was the subroutine cataloged? At all?
Is there not a hierarchical system that UniBasic goes through attempting to
find the subroutine?
I would have thought the search would have taken significantly more effort
as it may have to read from multiple files; the current B
RPL was a new language binding, which developed from PROC. It was a fully
extended language, capable of replacing BASIC in all regards. I wonder if
anyone is still running an RPL system anywhere?
Another note, per Ian Sandler, writing in or just before 1989, which might be
seen as humorous
I had many months ago as part of a project I'm working on (performance
pre-processor for UniBasic).
I've recreated a (no-scientific) test to get some rough numbers.
X=0
LOOPS = 99
STIME = SYSTEM(9)
FOR I = 1 TO LOOPS
X += 1
NEXT I
CRT SYSTEM(9) - STIME
X=0
STIME
I've often wished for some sort of block syntax in basic as well. Usually I use
LOOP with an exit, like you do, or a gosub, but when I migrate code to Cache
mvbasic there is a nice construct--the TRY/CATCH block:
TRY
block code
block code
if condition then THROW exception
block code
if
Has anyone measured the overheads of the various methods of subroutine calls
within UniBasic?
Is it of significance?
djm
Kate Stanton wrote:
>
> Why not use a subroutine?
> Personally, I like subroutines!
>
>
-
Learn and Do
Excel and Share
http://mvdbs.com http://mvdbs.com
--
V
UniBasic, at times really, does need a try/except statement.
Most modern programming languages have some variation on:
TRY
stuff
stuff
EXCEPT
stuff
stuff
ELSE
stuff
stuff
FINALLY
It should not be that difficult to implement; maybe a request to Rocket
might get it added to uniBasic?
I'm thinking it might be good to write up an article about RPL.
If any of you has knowledge of the history of the language, the company, etc.
you can email me, and we can collaborate on getting it all laid out... straight.
Will
___
U2-Users mailing l
In Henry speak, 20-30 minutes is about average for questions of a binary
nature.
How many times he said Orthogonal is Orthogonal to the answer.
Only 20 minutes!? How many times did he say "Orthogonal"? The best part of
comp.databases.pick was teasing meaning from Henry's posts. It was always
I can easily make this a very trivial program, *if* you will allow me to use a
control record :)
-Original Message-
From: George Gallen
To: U2 Users List
Sent: Mon, Feb 7, 2011 2:08 pm
Subject: Re: [U2] Does UV have a "BLOCK" command
That should accomplish the goal, althou
I like this idea.
EQU BLOCKSTART LOOP
EQU BLOCKSTOP EXIT ; REPEAT
BLOCKSTART
SOME CODE
IF CONDITION THEN EXIT
SOME CODE
BLOCKSTOP
Thanks
George
> -Original Message-
> From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
> boun...@listserver.u2ug.org] On Behalf Of Drew W
That should accomplish the goal, although it brings
in a lot of logic checks that confuse the issue of the program.
Again, it's the readability that I'm after in this case and
the flexibility to move the code.
If you needed to step through the code (not with the debugger)
with your eyes, there
Tony I'm not sure this could be true about RPL "which is now only available for
D3 with variants in jBase and Reality"
RPL was written initially I believe for the Reality, but was ported as well to
Ultimate and *I believe* to MvBase as well.
You can still, as far as I can see, get a new Ultimate
George,
Another option, though not anywhere close to perfect!, would be to make use of
the EQU statement. You could equate BLOCKSTART and BLOCKEND to LOOP and
REPEAT, respectively. The (major) downside: you don't get the auto-indenting
you get with LOOP and REPEAT (unless you're using an IDE
George, if I understand your requirement, and your addenda then may I present a
solution, which
1) allows ignoring all subsequent actions at any point; and
2) is completely re-arrangeable at whim; and
3) allows any number of conditional testing to be done at any random point
within the entire blo
In this particular program, I will be rearranging the blocks of code
into different orders, and it's easiest to read the logic of the program
top down.
If I used subroutines, In order to keep that top down logic, every time
I move a subroutine reference in the main code to a new location,
I'd
It is also a way of breaking code up into understandable, single purpose
blocks of code. This increases the chance someone will fully comprehend
it quickly.
Large runs of code, even if they do not have sections that a reused are
someone else's nightmare in 5 years time.
-Original Message-
On 2/7/2011 4:20 PM, George Gallen wrote:
My main aversion to the subroutine method is that to me, I think
of subroutines as code that used in multiple places, if it's only
used once, why not put in the main code.
Yes, it can be used onceand still be a subroutine...
George
/listserver
My main aversion to the subroutine method is that to me, I think
of subroutines as code that used in multiple places, if it's only
used once, why not put in the main code.
Yes, it can be used onceand still be a subroutine...
George
> -Original Message-
> From: u2-users-boun...@li
No reason, other than I wanted to avoid a bunch of labels. Basically
I'm going to have about 20 mini blocks. If it were just one or two
I would most likely have gone with the gosub route.
> -Original Message-
> From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
> boun...@li
Why not use a subroutine? You say you don't want to, then describe
just what a subroutine is: a block of code for a specific purpose
(hopefully documented at the top), with RETURN to get out back to the
main code.
Personally, I like subroutines!
--
Kate Stanton
Walstan Systems Ltd
4 Kelmarna Ave
On 2/7/2011 4:14 PM, George Gallen wrote:
indenting looks nice with short commands like "block command" but when
you start adding in PRINTs, or longer commands that are close to line's
length, it starts to get really hard to follow with line wrapping.
I also thought about using subrouti
yes, it is cosmetic. It (the BLOCK command if it had one) would compile
into a GOTO Label, where the system would have to put a label for NOP
at the end of the block.
Using the Loop/Repeat with the EXIT before the repeat works well, but
functionally it's confusing by it's name.
indentin
I know you said no subroutines, but really, what is the issue with the
following
GOSUB CodeBlockThatDoesX
...
CodeBlockThatDoesX:
block code
block code
if condition then RETURN
block code
RETURN ;* End CodeBlockThatDoesX
-Original Message-
From: u2-users-boun...@listserver
Small world! We owned the AIMS source code too (ah, that huge PEOPLE
file), and I also had the 9955-II in between the other systems. I liked
using Primos, and learned to write code in InfoBasic early on. Very stable
systems!
It was sad to see it all go away at the time. I changed jobs during i
I have to agree with Steve on this one, to my knowledge you're going to
have to use either indented IF/THEN/END or GOTO.
That is unless there is a different syntactical statement set available.
The thing is they all likely decompile to the same instructions, so
we're debating cosmetics here.
Per
On 2/7/2011 3:58 PM, Tony Gravagno wrote:
From: Charles_Shaffer
You will never be able to go completely away from
UniBASIC while keeping a U2 database. I don't think
that's possible.
We use Uniobjects on our web servers to access our
Unidata servers. Technically we could avoid UniBasic
with Un
Hehe...how could I forget the ADDS Viewpoints!
Our last two systems were the 6550 for our administrative system, and a 9955-II
for academics (into which we installed two 880MB drives, I think, that cost us
about $28K apiece!)
We migrated our ERP application (we owned source code: AIMS) to Unive
> From: Charles_Shaffer
> >>You will never be able to go completely away from
> >>UniBASIC while keeping a U2 database. I don't think
> >>that's possible.
>
> We use Uniobjects on our web servers to access our
> Unidata servers. Technically we could avoid UniBasic
> with Uniobjects, although
On 2/7/2011 3:48 PM, Larry Hiscock wrote:
If you're not really repeating the loop (i.e. the EXIT just before the
repeat), why do you need a loop/repeat?
What's wrong with:
code
code
IF NOT(condition) THEN
more code
END
Larry Hiscock
Western Computer Services
-Orig
If you're not really repeating the loop (i.e. the EXIT just before the
repeat), why do you need a loop/repeat?
What's wrong with:
code
code
IF NOT(condition) THEN
more code
END
Larry Hiscock
Western Computer Services
-Original Message-
From: u2-users-boun...@listserv
> -Original Message-
> From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
> boun...@listserver.u2ug.org] On Behalf Of Steve Romanow
> Sent: Monday, February 07, 2011 3:42 PM
> To: u2-users@listserver.u2ug.org
> Subject: Re: [U2] Does UV have a "BLOCK" command
>
> On 2/7/2011 3:
On 2/7/2011 3:39 PM, George Gallen wrote:
LOOP
block code
block code
if condition then EXIT
block code
EXIT
REPEAT
Would be nice if
BEGIN BLOCK
block code
block code
if condition then EXIT
block code
END BLOCK
Why not just
block code
block code
if no
EXIT works just as well as the UNTIL flag and CONTINUE
I just didn't want to setup a LOOP structure that wasn't
really meant to LOOP, just to get the Blocking structure
and the ability to use EXIT without having to setup labels.
It works...yes, but a year from now, I'm going to scratch my
h
Check out the CONTINUE command.
IMDONE=''
LOOP UNTIL IMDONE
Block code
Block code
IF condition THEN
IMDONE=1
CONTINUE
END
REPEAT
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of George Gallen
Sent: Mon
I want to setup a block of commands, and be able to exit out of the block if
needed.
Right now I use a LOOP/REPEAT with an EXIT statement before the REPEAT.
I'd rather not use labels (or subroutines).
The Loop/Repeat works, it just looks weird since it isn't really a loop...
I tried using an IF
My first experience was with a Wicat, which ran a version of PICK, in the mid
1980's. I didn't have a clue about the software as I was solely hardware in
that lifetime. But, people would seem to get upset if you turned the machine
off at the wall...
My actual first time was with an ADD's. (Why do
I remember getting a genuine IBM PC XT with a 10 MB hard drive in 1985. The
company bought it in return for me developing a program, eventually called PK
Harmony (based on PC-Harmony for Business BASIC, which in turn came from a
conversion from an MAI BASIC IV system to a Microdata 1600), to all
"I started on a Microdata in 1972, first system in Seattle,Wa - Sent
from my iPhone" my how times have changed :)
On Mon, Feb 7, 2011 at 1:48 PM, Steve Romanow wrote:
> Earliest we've seen yet. Awesome! You early adopter!
>
> On 2/7/2011 1:45 PM, Tom wrote:
>>
>> I started on a Microdata in 197
Earliest we've seen yet. Awesome! You early adopter!
On 2/7/2011 1:45 PM, Tom wrote:
I started on a Microdata in 1972, first system in Seattle,Wa
Sent from my iPhone
Tom Dodds
t...@ix.netcom.com
630.235.2975
On Feb 7, 2011, at 10:56, "Peter S. Goldberger" wrote:
Started in 1984 on an ADD
I started on a Microdata in 1972, first system in Seattle,Wa
Sent from my iPhone
Tom Dodds
t...@ix.netcom.com
630.235.2975
On Feb 7, 2011, at 10:56, "Peter S. Goldberger" wrote:
> Started in 1984 on an ADDS Mentor with a 40 Mb hard disk and 12" tape
>
> George Gallen wrote:
>> and we had to w
Only 20 minutes!? How many times did he say "Orthogonal"? The best part of
comp.databases.pick was teasing meaning from Henry's posts. It was always
worth the effort, but often required a dictionary ;-)
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun
I stand corrected... Pr1me : )
And yes, Dataproducts 300lpm's and one 600lpm now that you mention them.
Let's not forget the one piece ADDS Regent 40 terminals. They were fun to
lug around to different departments. I remember being SO excited when we
went with Viewpoint 60s.
The last Prime s
Sounds familiar!
One of my first projects in 1985 was to make program adjustments for how the
SETPTR statement changed at PI 5.4.1, on a Pr1me 750 running Primos 18. I
think we only had two drivesI used to have one of the 300MB disk packs
around here somewhere (used to use 'em for class to
I started right out of college working at Microdata for their customer
support division. We had 4 1600's that were named: Lucy, Linus, Beethoven &
Peanuts. This was 1979. One "fun" memory was when I gave my notice that I
was leaving and on my last day the office plan to take me out to lunch.
Well,
My first job was at TAB books on two Ultimate Honeywell level 6. I used
to stay all night when we had GFE's truncating groups in the system
debugger, changing pointers and all that other fun stuff. We never called
Ultimate for help with GFEs.
Bruce M Neylon
Health Care Management Group
>>You will never be able to go completely away from UniBASIC while keeping
a
>>U2 database. I don't think that's possible.
We use Uniobjects on our web servers to access our Unidata servers.
Technically we could avoid UniBasic with Uniobjects, although I don't
recommend it. It has makes more
Everybody loved cold starts... the equivalent of Ctl-Alt-Del
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Roy Beard
Sent: Monday, February 07, 2011 8:56 AM
To: 'U2 Users List'
Subject: Re: [U2] Pick Dinosaurs
I re
Started in 1984 on an ADDS Mentor with a 40 Mb hard disk and 12" tape
George Gallen wrote:
and we had to walk to work in bare feet uphill both ways!
-Original Message-
From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
boun...@listserver.u2ug.org] On Behalf Of charles_shaf
I really miss the GFEs and Ultimate's answer to everything " Do a cold
start and let us know if it happens again"
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of George Gallen
Sent: Monday, February 07, 2011 11:51 AM
Started in 1984 as a Computer Operator on a Prime 750 running Primos 18.?
and Information 5.4. Three loud line printers and a big "band" printer.
Two reel to reels for backups, which took 18 reels for a Full off of four
300MB washtub drives. Carrying them, 9 on an arm to our offsite location
was
and we had to walk to work in bare feet uphill both ways!
> -Original Message-
> From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
> boun...@listserver.u2ug.org] On Behalf Of charles_shaf...@ntn-bower.com
> Sent: Monday, February 07, 2011 11:52 AM
> To: U2 Users List
> Subject:
>>I started on Microdata systems back in 1982. Same big 'ol "washtub"
drives,
>>1/2" reel tapes and Interrupt-Reset-Interrupt or
>>Interrupt-Reset-Clock-Interrupt paddle-switch sequences.
>>The first machine I worked on was a Microdata 1600 with 4 50 MB
Winchester
>>"washtub" drives. It ran 16
I started on Microdata systems back in 1982. Same big 'ol "washtub" drives,
1/2" reel tapes and Interrupt-Reset-Interrupt or
Interrupt-Reset-Clock-Interrupt paddle-switch sequences.
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org]
The first machine I worked on was a Microdata 1600 with 4 50 MB Winchester
"washtub" drives. It ran 16 users on 64K of core memory. That was back in
1981.
-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of
charles_
>>I started in 1988, as a technical support representative for a
subsidiary of the Ultimate Corp.
>>We had a computer room with several big old machines with "reel"
tapesBack in the days of GFEs and all of those good things. Wow, those
were the >>days.
I also started in 1988 on an Ultimate
Boy, I really miss those GFE'sNOT.
But I do miss the M/D Spirit Machine (Reality). It was really something else in
it's day. I really like the feature that if there was a power failure, it would
write memory to disk, then shutdown, and when the power came back up, it
restored memory from di
That is about the time I started in Pick also. As a computer operator on an
Ultimate Honeywell Bull box with reel to reel tapes. I remember when it was
replaced with an AIX box running UniData. That box was tiny compared with the
Ultimate. Now it would be huge compared to what AIX runs on to
I started in 1988, as a technical support representative for a subsidiary of
the Ultimate Corp.
We had a computer room with several big old machines with "reel" tapesBack
in the days of GFEs and all of those good things. Wow, those were the days.
Karen Bessel
Developer
Tyler Technologies
70 matches
Mail list logo