Re: [U2] Read yourself

I saw on one PICK system, a precompiler language. It was the same as 
PICK/BASIC, but had a preprocessor to it.

So, for example to get the user number on a Universe system you would 
use [email protected]

On a PICK system, it would be USER.NO=OCONV(0,'U50BB')

Rather than write it into the program to check what system it is on 
(since sometimes it could be different functions or statements used that 
never even compile), then would do something like:

USER.NO=%GET USERNO%

The precompiler would look at the control table and translate the '%GET 
USERNO%' to the appropriate statement, then compile.

I've seen software that was so generic it would run on any version of 
Multivalue system and sometimes even non-Multivalue systems.

Robert Norman

ROBERT NORMAN AND ASSOCIATES
23441 Golden Springs Dr., #289, Diamond Bar, CA 91765
(323) 285-7272, (951) 541-1668
[email protected]
http://universe-basic-programming.webstarts.com/index.html
http://users.keyway.net/~ice/
http://www.affordablemultivalueprogramming.i8.com/
Computer programming & software development in Universe BASIC for Rocket 
Universe, in PICK/BASIC for Rocket D3, in UNIBASIC
for Rocket Unidata, in R/BASIC (REVELATION BASIC) for REVELATION 
TECHOLOGIES REVELATION, in JBASIC (JBC or JBASE BASIC) for
TEMENOS JBASE, in DATA/BASIC for Northgate REALITY, in MV BASIC 
(Multivalue Basic) for Intersystems Cache Multivalue, and
QMBASIC for Ladybridge OPENQM (QM).

On 5/12/2014 4:33 PM, Adrian Overs wrote:
> What problem are you trying to solve by doing so?
> After all it's not rocket science (pardon the pun) to
> OPEN "BP" TO BP.FV THEN
> READ R.PROG FROM BP.FV, PROG.ID ELSE ... Whatever
> END
>
> Sent from my iPad
>
> On 13 May 2014, at 6:54 am, Wjhonson <[email protected]> wrote:
>
>
> Does anyone have a BASIC program, that will open it's own code in a variable ?
> So something like this
>
> GOSUB RETURN.A.LOCAL.FILE.AND.KEY.FOR.ME
>
> READ THIS.PROGRAM FROM F.LOCALFILENAME, K.PROGRAMKEY ....
>
> the program reads itself.
>
> Does anyone have a program like that?
>
>
> _______________________________________________
> U2-Users mailing list
> [email protected]
> http://listserver.u2ug.org/mailman/listinfo/u2-users
> _______________________________________________
> U2-Users mailing list
> [email protected]
> http://listserver.u2ug.org/mailman/listinfo/u2-users
>

_______________________________________________
U2-Users mailing list
[email protected]
http://listserver.u2ug.org/mailman/listinfo/u2-users