This can be broken simply by copying the program to some other location, without changing the variables. -----Original Message----- From: Robert <[email protected]> To: U2 Users List <[email protected]> Sent: Tue, May 13, 2014 9:58 am Subject: Re: [U2] Read yourself
Awesome feature Ross that you have in your Stamina product. Is there a link to an article, example, or manual describing it in detail? That way I can forward it to any Universe client inquiring about those features. I have seen Brian Leach's source code and he has the program information embedded in a variable like this: . . . *------------------------------------------------------------------------ * Modification History * ------------------- VERDATA='' VERDATA := 'Version=001009003;' VERDATA := 'VerModVer=001000000;' VERDATA := 'VerBeta=;' VERDATA := 'VerDate=15134;' VERDATA := 'VerProd=ENTER;' VERDATA := 'VerModule=;' VERDATA := 'VerTM=;' VERDATA := 'VerCopy=2005 Brian Leach Consulting Limited;' VERDATA := 'VerCo=Brian Leach Consulting Limited;' VERDATA := 'VerDesc=ENTER Screen Entry Processor;' VERDATA := 'CatName=ENTER;' VERDATA := 'VerHist=07 JUN 09 1.9.3 auto;' . . . I am wondering if Wjhonson would be better off doing something like Brian's example above. This way the program has the program information during run-time (as a variable) and it also is available to any source code parsers (as long as he adheres to the standard). 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/13/2014 6:52 AM, Ross Ferris wrote: > We have something similar that is built into our Visage product that we call "Snippet Technology". It is totally language neutral, and at a pure programming level provides a recursive, extensible pre-compiler that can produce platform specific and optimised code from a single code base, but we also harness the facility to power things like our multi-lingual capabilities and web page generation. > > However, I still cannot see where Will has explained why/what he will do once he has program code in a variable ... what is the end game/objective? > > Ross Ferris > Stamina Software > Visage > Better by Design! > > -----Original Message----- > From: [email protected] > [mailto:[email protected]] On Behalf Of Robert > Sent: Tuesday, May 13, 2014 3:28 PM > To: U2 Users List > Subject: 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 > _______________________________________________ > 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
