Re: [U2] Read yourself

2014-05-13 Thread Ross Ferris
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: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] 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 
USER.NO=@USER.NO

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
i...@keyway.net
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 wjhon...@aol.com 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
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread Robert

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=00100;'
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
i...@keyway.net
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: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] 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 
USER.NO=@USER.NO

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
i...@keyway.net
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 wjhon...@aol.com 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
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org

[U2] Web services at 11.x

2014-05-13 Thread Oaks, Harold

I have been telling my manager (an Oracle-centric guy) that with Universe 11+  
(we have 10.2 now) the web services will truly allow us to do input and output 
interfacing with other web services.  I need to make sure this is a correct 
understanding.

It is clear from the Web Services manual that one can create a web service (a 
SOAP service) which will allow outside queries and return data.  I write to 
this list to ask those of you who know that it is possible to do the other way, 
that from Universe you are able to connect to outside web services, send 
queries to them, and get back responses.  Because I don't see this in the Web 
manual.   

If the latter is not possible via the Web services capabilities built into 
Universe, how are any of you doing it?  Do you need a 3rd-party product?

Here is the data need:  We are to interface our Jail system to another system 
via an ESB (electronic services bus) via 'web services', passing XML.  

Thanks-
Harold Oaks
Clark County, WA

-- 
This e-mail and related attachments and any response may be subject to public 
disclosure under state law.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread Wjhonson

This can be broken simply by copying the program to some other location, 
without changing the variables.
 
 
 
-Original Message-
From: Robert i...@keyway.net
To: U2 Users List u2-users@listserver.u2ug.org
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=00100;'
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
i...@keyway.net
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: u2-users-boun...@listserver.u2ug.org 
 [mailto:u2-users-boun...@listserver.u2ug.org] 
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 
USER.NO=@USER.NO

 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
 i...@keyway.net
 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 wjhon...@aol.com 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 

 

Re: [U2] Read yourself

2014-05-13 Thread George Gallen
Then you would need to write another program that scans the programs and checks 
if the VERDATA element
For the program name matches the @ID in the program file - if not email someone 
to fix it.

Then have it run nightly - so if it did get cloned without changing, it 
wouldn't be that way 
For long.

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:13 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


This can be broken simply by copying the program to some other location, 
without changing the variables.
 
 
 
-Original Message-
From: Robert i...@keyway.net
To: U2 Users List u2-users@listserver.u2ug.org
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=00100;'
VERDATA := 'VerBeta=;'
VERDATA := 'VerDate=15134;'
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread Wjhonson

Well do you see any problem in just using the SYSTEM(9001) and ignoring 
embedding this information ?
 
 
 
 
-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:27 am
Subject: Re: [U2] Read yourself


Then you would need to write another program that scans the programs and checks 
if the VERDATA element
For the program name matches the @ID in the program file - if not email someone 
to fix it.

Then have it run nightly - so if it did get cloned without changing, it 
wouldn't 
be that way 
For long.

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] 
On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:13 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


This can be broken simply by copying the program to some other location, 
without 
changing the variables.
 
 
 
-Original Message-
From: Robert i...@keyway.net
To: U2 Users List u2-users@listserver.u2ug.org
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=00100;'
VERDATA := 'VerBeta=;'
VERDATA := 'VerDate=15134;'
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread Nancy Fisher
We query outside services for information via soap.
Universe 10.3.

Nancy Fisher
Federal Way, Washington

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 10:21 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Web services at 11.x


https://en.wikipedia.org/wiki/Enterprise_service_bus
 
 
 
 
-Original Message-
From: Oaks, Harold harold.o...@clark.wa.gov
To: U2 Users List (u2-users@listserver.u2ug.org)
u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:11 am
Subject: [U2] Web services at 11.x



I have been telling my manager (an Oracle-centric guy) that with Universe
11+ (we have 10.2 now) the web services will truly allow us to do input and
output interfacing with other web services.  I need to make sure this is a
correct understanding.

It is clear from the Web Services manual that one can create a web service
(a SOAP service) which will allow outside queries and return data.  I write
to this list to ask those of you who know that it is possible to do the
other way, that from Universe you are able to connect to outside web
services, send queries to 
them, and get back responses.  Because I don't see this in the Web manual.


If the latter is not possible via the Web services capabilities built into
Universe, how are any of you doing it?  Do you need a 3rd-party product?

Here is the data need:  We are to interface our Jail system to another
system via an ESB (electronic services bus) via 'web services', passing XML.


Thanks-
Harold Oaks
Clark County, WA

--
This e-mail and related attachments and any response may be subject to
public disclosure under state law.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread George Gallen
Does the 9001 call work for subroutines, or just the main program?

Also, it's platform specific

It all depends on what your trying to do, if the 9001 call works, great, if not 
figure something else out.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:31 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


Well do you see any problem in just using the SYSTEM(9001) and ignoring 
embedding this information ?
 
 
 
 
-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:27 am
Subject: Re: [U2] Read yourself


Then you would need to write another program that scans the programs and checks 
if the VERDATA element
For the program name matches the @ID in the program file - if not email someone 
to fix it.

Then have it run nightly - so if it did get cloned without changing, it 
wouldn't 
be that way 
For long.

George


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread Richard Lewis
We have been using a SOAP interface on 10.2 or 10.3 (I forget now which)
and are now on 11.1.  We have also successfully used curl to from within UV
to interact with a web service on 11.1, on linux.

Richard Lewis



On Tue, May 13, 2014 at 11:10 AM, Oaks, Harold harold.o...@clark.wa.govwrote:


 I have been telling my manager (an Oracle-centric guy) that with Universe
 11+  (we have 10.2 now) the web services will truly allow us to do input
 and output interfacing with other web services.  I need to make sure this
 is a correct understanding.

 It is clear from the Web Services manual that one can create a web service
 (a SOAP service) which will allow outside queries and return data.  I write
 to this list to ask those of you who know that it is possible to do the
 other way, that from Universe you are able to connect to outside web
 services, send queries to them, and get back responses.  Because I don't
 see this in the Web manual.

 If the latter is not possible via the Web services capabilities built into
 Universe, how are any of you doing it?  Do you need a 3rd-party product?

 Here is the data need:  We are to interface our Jail system to another
 system via an ESB (electronic services bus) via 'web services', passing XML.

 Thanks-
 Harold Oaks
 Clark County, WA

 --
 This e-mail and related attachments and any response may be subject to
 public disclosure under state law.
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread Wjhonson

I had posted an update, that I had tried it (it returns the program stack)
Its System(9001), and it will return the subroutine names in the stack as well 
as the main program (on Universe 11 anyway)
 
Someone has to try this on Unidata, and on D3 to make sure it also returns the 
subroutine name.
 
What it returns is the absolute path, so you would still need a program to 
translate this into a LOCAL file name and program id, which is, to what, I'm 
trying to get.
 
Like I mentioned, I'm sure there is a way to do it, it's just a question of 
whether someone has a routine which *does* this already, and the answer is 
apparently not, so if I have to roll my own.
 
 
-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:40 am
Subject: Re: [U2] Read yourself


Does the 9001 call work for subroutines, or just the main program?

Also, it's platform specific

It all depends on what your trying to do, if the 9001 call works, great, if not 
figure something else out.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] 
On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:31 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


Well do you see any problem in just using the SYSTEM(9001) and ignoring 
embedding this information ?
 
 
 
 
-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:27 am
Subject: Re: [U2] Read yourself


Then you would need to write another program that scans the programs and checks 
if the VERDATA element
For the program name matches the @ID in the program file - if not email someone 
to fix it.

Then have it run nightly - so if it did get cloned without changing, it 
wouldn't 

be that way 
For long.

George


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread Wjhonson

Wget however only works to pull pages in correct?
You can't actually communicate both ways.
 
 
 
-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:56 am
Subject: Re: [U2] Web services at 11.x


We use wget on 10.0.2 / linux  - works but setting up the header lines
Is kludgy.  But since it works we havn't migrated to curl yet.

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] 
On Behalf Of Richard Lewis
Sent: Tuesday, May 13, 2014 1:53 PM
To: U2 Users List
Subject: Re: [U2] Web services at 11.x

We have been using a SOAP interface on 10.2 or 10.3 (I forget now which)
and are now on 11.1.  We have also successfully used curl to from within UV
to interact with a web service on 11.1, on linux.

Richard Lewis



On Tue, May 13, 2014 at 11:10 AM, Oaks, Harold harold.o...@clark.wa.govwrote:


 I have been telling my manager (an Oracle-centric guy) that with Universe
 11+  (we have 10.2 now) the web services will truly allow us to do input
 and output interfacing with other web services.  I need to make sure this
 is a correct understanding.

 It is clear from the Web Services manual that one can create a web service
 (a SOAP service) which will allow outside queries and return data.  I write
 to this list to ask those of you who know that it is possible to do the
 other way, that from Universe you are able to connect to outside web
 services, send queries to them, and get back responses.  Because I don't
 see this in the Web manual.

 If the latter is not possible via the Web services capabilities built into
 Universe, how are any of you doing it?  Do you need a 3rd-party product?

 Here is the data need:  We are to interface our Jail system to another
 system via an ESB (electronic services bus) via 'web services', passing XML.

 Thanks-
 Harold Oaks
 Clark County, WA

 --
 This e-mail and related attachments and any response may be subject to
 public disclosure under state law.
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread George Gallen
Unless I'm doing it wrongdidn't look it up.

For me - on UV 10.0.2

PRINT SYSTEM(9001)
STOP
END

Outputs

RUN LIB TEST
0

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:55 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


I had posted an update, that I had tried it (it returns the program stack)
Its System(9001), and it will return the subroutine names in the stack as well 
as the main program (on Universe 11 anyway)
 
Someone has to try this on Unidata, and on D3 to make sure it also returns the 
subroutine name.
 
What it returns is the absolute path, so you would still need a program to 
translate this into a LOCAL file name and program id, which is, to what, I'm 
trying to get.
 
Like I mentioned, I'm sure there is a way to do it, it's just a question of 
whether someone has a routine which *does* this already, and the answer is 
apparently not, so if I have to roll my own.
 
 
-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:40 am
Subject: Re: [U2] Read yourself


Does the 9001 call work for subroutines, or just the main program?

Also, it's platform specific

It all depends on what your trying to do, if the 9001 call works, great, if not 
figure something else out.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] 
On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:31 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


Well do you see any problem in just using the SYSTEM(9001) and ignoring 
embedding this information ?
 
 
 
 
-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:27 am
Subject: Re: [U2] Read yourself


Then you would need to write another program that scans the programs and checks 
if the VERDATA element
For the program name matches the @ID in the program file - if not email someone 
to fix it.

Then have it run nightly - so if it did get cloned without changing, it 
wouldn't 

be that way 
For long.

George


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread George Gallen
We use wget on 10.0.2 / linux  - works but setting up the header lines
Is kludgy.  But since it works we havn't migrated to curl yet.

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Lewis
Sent: Tuesday, May 13, 2014 1:53 PM
To: U2 Users List
Subject: Re: [U2] Web services at 11.x

We have been using a SOAP interface on 10.2 or 10.3 (I forget now which)
and are now on 11.1.  We have also successfully used curl to from within UV
to interact with a web service on 11.1, on linux.

Richard Lewis



On Tue, May 13, 2014 at 11:10 AM, Oaks, Harold harold.o...@clark.wa.govwrote:


 I have been telling my manager (an Oracle-centric guy) that with Universe
 11+  (we have 10.2 now) the web services will truly allow us to do input
 and output interfacing with other web services.  I need to make sure this
 is a correct understanding.

 It is clear from the Web Services manual that one can create a web service
 (a SOAP service) which will allow outside queries and return data.  I write
 to this list to ask those of you who know that it is possible to do the
 other way, that from Universe you are able to connect to outside web
 services, send queries to them, and get back responses.  Because I don't
 see this in the Web manual.

 If the latter is not possible via the Web services capabilities built into
 Universe, how are any of you doing it?  Do you need a 3rd-party product?

 Here is the data need:  We are to interface our Jail system to another
 system via an ESB (electronic services bus) via 'web services', passing XML.

 Thanks-
 Harold Oaks
 Clark County, WA

 --
 This e-mail and related attachments and any response may be subject to
 public disclosure under state law.
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread George Gallen
As far as I know - it's just consumes.

We use a different system for serving - which is XML based and a combination of 
PERL and linux script.

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:59 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Web services at 11.x


Wget however only works to pull pages in correct?
You can't actually communicate both ways.
 
 
 
-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:56 am
Subject: Re: [U2] Web services at 11.x


We use wget on 10.0.2 / linux  - works but setting up the header lines
Is kludgy.  But since it works we havn't migrated to curl yet.

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] 
On Behalf Of Richard Lewis
Sent: Tuesday, May 13, 2014 1:53 PM
To: U2 Users List
Subject: Re: [U2] Web services at 11.x

We have been using a SOAP interface on 10.2 or 10.3 (I forget now which)
and are now on 11.1.  We have also successfully used curl to from within UV
to interact with a web service on 11.1, on linux.

Richard Lewis



On Tue, May 13, 2014 at 11:10 AM, Oaks, Harold harold.o...@clark.wa.govwrote:


 I have been telling my manager (an Oracle-centric guy) that with Universe
 11+  (we have 10.2 now) the web services will truly allow us to do input
 and output interfacing with other web services.  I need to make sure this
 is a correct understanding.

 It is clear from the Web Services manual that one can create a web service
 (a SOAP service) which will allow outside queries and return data.  I write
 to this list to ask those of you who know that it is possible to do the
 other way, that from Universe you are able to connect to outside web
 services, send queries to them, and get back responses.  Because I don't
 see this in the Web manual.

 If the latter is not possible via the Web services capabilities built into
 Universe, how are any of you doing it?  Do you need a 3rd-party product?

 Here is the data need:  We are to interface our Jail system to another
 system via an ESB (electronic services bus) via 'web services', passing XML.

 Thanks-
 Harold Oaks
 Clark County, WA

 --
 This e-mail and related attachments and any response may be subject to
 public disclosure under state law.
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread Oaks, Harold
Nancy:
Great!  Is there any possibility of you sending me some sample code?  I may not 
be able to make it work at 10.2, but it would be instructive to try.  If there 
are security or proprietary issues, or just your time issues, I understand.
Thanks-
Harold

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Nancy Fisher
Sent: Tuesday, May 13, 2014 10:33 AM
To: 'U2 Users List'
Subject: Re: [U2] Web services at 11.x

We query outside services for information via soap.
Universe 10.3.

Nancy Fisher
Federal Way, Washington

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 10:21 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Web services at 11.x


https://en.wikipedia.org/wiki/Enterprise_service_bus
 
 
 
 
-Original Message-
From: Oaks, Harold harold.o...@clark.wa.gov
To: U2 Users List (u2-users@listserver.u2ug.org) u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:11 am
Subject: [U2] Web services at 11.x



I have been telling my manager (an Oracle-centric guy) that with Universe
11+ (we have 10.2 now) the web services will truly allow us to do input 
11+ and
output interfacing with other web services.  I need to make sure this is a 
correct understanding.

It is clear from the Web Services manual that one can create a web service (a 
SOAP service) which will allow outside queries and return data.  I write to 
this list to ask those of you who know that it is possible to do the other way, 
that from Universe you are able to connect to outside web services, send 
queries to them, and get back responses.  Because I don't see this in the Web 
manual.


If the latter is not possible via the Web services capabilities built into
Universe, how are any of you doing it?  Do you need a 3rd-party product?

Here is the data need:  We are to interface our Jail system to another
system via an ESB (electronic services bus) via 'web services', passing XML.


Thanks-
Harold Oaks
Clark County, WA

--
This e-mail and related attachments and any response may be subject to
public disclosure under state law.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread Oaks, Harold
Right, Enterprise Service Bus.  Thanks.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 10:21 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Web services at 11.x


https://en.wikipedia.org/wiki/Enterprise_service_bus
 
 
 
 
-Original Message-
From: Oaks, Harold harold.o...@clark.wa.gov
To: U2 Users List (u2-users@listserver.u2ug.org) u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:11 am
Subject: [U2] Web services at 11.x



I have been telling my manager (an Oracle-centric guy) that with Universe 11+ 
(we have 10.2 now) the web services will truly allow us to do input and output 
interfacing with other web services.  I need to make sure this is a correct 
understanding.

It is clear from the Web Services manual that one can create a web service (a 
SOAP service) which will allow outside queries and return data.  I write to 
this list to ask those of you who know that it is possible to do the other way, 
that from Universe you are able to connect to outside web services, send 
queries to 
them, and get back responses.  Because I don't see this in the Web manual.   

If the latter is not possible via the Web services capabilities built into 
Universe, how are any of you doing it?  Do you need a 3rd-party product?

Here is the data need:  We are to interface our Jail system to another system 
via an ESB (electronic services bus) via 'web services', passing XML.  

Thanks-
Harold Oaks
Clark County, WA

--
This e-mail and related attachments and any response may be subject to public 
disclosure under state law.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread John Hester
You could definitely do that.  I wrote a utility nearly 20 years ago that still 
does something similar to all our BPs on a weekly basis.  We were about to 
convert from Ulitimate to UV in '96 and needed to avoid wasting time modifying 
programs that weren't being used.  I needed something to log every program's 
recent execution times by program name.  The utility goes through all the BPs 
and makes sure there's a call to a subroutine named TRACKER at the beginning 
that passes the program's name as an argument.  It also makes sure that if the 
call is already there, it is referencing the correct program name, insuring a 
copied program will log itself correctly.  Here's the section of code that 
installs the call:

0058: IF ADD OR RPLC THEN
0059:   LINE = CALL TRACKER(':PROG.NO:')
0060:   IF ADD THEN
0061: INS LINE BEFORE ITEM.BPLINE.NO
0062:   END ELSE
0063: ITEM.BPLINE.NO = LINE
0064:   END
0065:   WRITE ITEM.BP ON FILE.BP, PROG.NO
0066:   RECOMPILE.LIST-1 = PROG.NO
0067: END

The TRACKER subroutine logs the 40 most recent executions both by program and 
by user.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of George Gallen
Sent: Tuesday, May 13, 2014 10:29 AM
To: U2 Users List
Subject: Re: [U2] Read yourself

Actually, expounding on that. You could have a program insert the program and 
file name into a program

Not recompile - just the source

Then as you get a chance to modify each program to become self aware (the first 
step to Activating the MATRIX) then you would compile/catalog.

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of George Gallen
Sent: Tuesday, May 13, 2014 1:27 PM
To: U2 Users List
Subject: Re: [U2] Read yourself

Then you would need to write another program that scans the programs and checks 
if the VERDATA element For the program name matches the @ID in the program file 
- if not email someone to fix it.

Then have it run nightly - so if it did get cloned without changing, it 
wouldn't be that way For long.

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:13 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


This can be broken simply by copying the program to some other location, 
without changing the variables.
 
 
 
-Original Message-
From: Robert i...@keyway.net
To: U2 Users List u2-users@listserver.u2ug.org
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=00100;'
VERDATA := 'VerBeta=;'
VERDATA := 'VerDate=15134;'
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread Bill Haskett

Harold:

Maybe you'd be interested in:

https://u2devzone.rocketsoftware.com/accelerate/resources/videos/rest

HTH,

Bill

Untitled Page

- Original Message -
*From:* harold.o...@clark.wa.gov
*To:* 'U2 Users List' u2-users@listserver.u2ug.org
*Date:* 5/13/2014 11:20 AM
*Subject:* Re: [U2] Web services at 11.x

Right, Enterprise Service Bus.  Thanks.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 10:21 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Web services at 11.x


https://en.wikipedia.org/wiki/Enterprise_service_bus

  
-Original Message-

From: Oaks, Harold harold.o...@clark.wa.gov
To: U2 Users List (u2-users@listserver.u2ug.org) u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:11 am
Subject: [U2] Web services at 11.x

I have been telling my manager (an Oracle-centric guy) that with Universe 11+ 
(we have 10.2 now) the web services will truly allow us to do input and output 
interfacing with other web services.  I need to make sure this is a correct 
understanding.

It is clear from the Web Services manual that one can create a web service (a 
SOAP service) which will allow outside queries and return data.  I write to 
this list to ask those of you who know that it is possible to do the other way, 
that from Universe you are able to connect to outside web services, send 
queries to
them, and get back responses.  Because I don't see this in the Web manual.

If the latter is not possible via the Web services capabilities built into 
Universe, how are any of you doing it?  Do you need a 3rd-party product?

Here is the data need:  We are to interface our Jail system to another system 
via an ESB (electronic services bus) via 'web services', passing XML.

Thanks-
Harold Oaks
Clark County, WA

--
This e-mail and related attachments and any response may be subject to public 
disclosure under state law.
___


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread Will Johnson

I'm not trying to active the Matrix George.
Just writing a worm which can survive inside the Matrix and keep my 
consciousness intact long enough until Neo shows up.
 
 
 
 
-Original Message-
From: George Gallen-2 [via U2 (UniVerse  UniData)] 
ml-node+s1073795n43076...@n5.nabble.com
To: Will Johnson wjhon...@aol.com
Sent: Tue, May 13, 2014 1:41 pm
Subject: Re: Read yourself


Actually, expounding on that. You could have a program insert the 
program and file name into a program

Not recompile - just the source

Then as you get a chance to modify each program to become self aware (the first 
step to 
Activating the MATRIX) then you would compile/catalog.

George

-Original Message-
From: [hidden email] [mailto:[hidden email]] On Behalf Of George Gallen
Sent: Tuesday, May 13, 2014 1:27 PM
To: U2 Users List
Subject: Re: [U2] Read yourself

Then you would need to write another program that scans the programs and checks 
if the VERDATA element
For the program name matches the @ID in the program file - if not email someone 
to fix it.

Then have it run nightly - so if it did get cloned without changing, it 
wouldn't be that way 
For long.

George

-Original Message-
From: [hidden email] [mailto:[hidden email]] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:13 PM
To: [hidden email]
Subject: Re: [U2] Read yourself


This can be broken simply by copying the program to some other location, 
without changing the variables.
 
 
 
-Original Message-
From: Robert [hidden email]
To: U2 Users List [hidden email]
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=00100;'
VERDATA := 'VerBeta=;'
VERDATA := 'VerDate=15134;'
___
U2-Users mailing list
[hidden email]
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
[hidden email]
http://listserver.u2ug.org/mailman/listinfo/u2-users





If you reply to this email, your message will be added to the discussion below:

http://u2-universe-unidata.1073795.n5.nabble.com/Read-yourself-tp43052p43076.html
   

To start a new topic under U2 - Users, email 
ml-node+s1073795n3...@n5.nabble.com 
To unsubscribe from U2 (UniVerse  UniData), click here.
NAML





--
View this message in context: 
http://u2-universe-unidata.1073795.n5.nabble.com/Read-yourself-tp43052p43090.html
Sent from the U2 - Users mailing list archive at Nabble.com.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread Richard Lewis
George,

It's better illustrated by multiple call levels.  A colleague here wrote
these specifically to test this:

 STACK.1
SUBROUTINE STACK.1
CRT ||
CRT CHANGE(SYSTEM(9001), @AM, CHAR(13):CHAR(10))
CRT ||
RETURN

 STACK.2
SUBROUTINE STACK.2
  CALL STACK.1
RETURN

 STACK.WRAP
CRT @(-1)
CALL STACK.2

And here's the results:


||
3ý/(absolute path)/BP.O/STACK.1ý0x6
2ý/(absolute path)/BP.O/STACK.2ý0x0
1ý/(absolute path)/BP.O/STACK.WRAPý0xe

||

Best Regards,
Richard Lewis


On Tue, May 13, 2014 at 11:59 AM, George Gallen ggal...@wyanokegroup.comwrote:

 Unless I'm doing it wrongdidn't look it up.

 For me - on UV 10.0.2

 PRINT SYSTEM(9001)
 STOP
 END

 Outputs

 RUN LIB TEST
 0

 George

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:
 u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
 Sent: Tuesday, May 13, 2014 1:55 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] Read yourself


 I had posted an update, that I had tried it (it returns the program stack)
 Its System(9001), and it will return the subroutine names in the stack as
 well as the main program (on Universe 11 anyway)

 Someone has to try this on Unidata, and on D3 to make sure it also returns
 the subroutine name.

 What it returns is the absolute path, so you would still need a program to
 translate this into a LOCAL file name and program id, which is, to what,
 I'm trying to get.

 Like I mentioned, I'm sure there is a way to do it, it's just a question
 of whether someone has a routine which *does* this already, and the answer
 is apparently not, so if I have to roll my own.


 -Original Message-
 From: George Gallen ggal...@wyanokegroup.com
 To: U2 Users List u2-users@listserver.u2ug.org
 Sent: Tue, May 13, 2014 10:40 am
 Subject: Re: [U2] Read yourself


 Does the 9001 call work for subroutines, or just the main program?

 Also, it's platform specific

 It all depends on what your trying to do, if the 9001 call works, great,
 if not
 figure something else out.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:
 u2-users-boun...@listserver.u2ug.org]
 On Behalf Of Wjhonson
 Sent: Tuesday, May 13, 2014 1:31 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] Read yourself


 Well do you see any problem in just using the SYSTEM(9001) and ignoring
 embedding this information ?




 -Original Message-
 From: George Gallen ggal...@wyanokegroup.com
 To: U2 Users List u2-users@listserver.u2ug.org
 Sent: Tue, May 13, 2014 10:27 am
 Subject: Re: [U2] Read yourself


 Then you would need to write another program that scans the programs and
 checks
 if the VERDATA element
 For the program name matches the @ID in the program file - if not email
 someone
 to fix it.

 Then have it run nightly - so if it did get cloned without changing, it
 wouldn't

 be that way
 For long.

 George


 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users


 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread Wjhonson

Its entirely possible this feature did not exist on UV 10.0 
 
 
 
-Original Message-
From: Richard Lewis rbl...@gmail.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 1:46 pm
Subject: Re: [U2] Read yourself


George,

It's better illustrated by multiple call levels.  A colleague here wrote
these specifically to test this:

 STACK.1
SUBROUTINE STACK.1
CRT ||
CRT CHANGE(SYSTEM(9001), @AM, CHAR(13):CHAR(10))
CRT ||
RETURN

 STACK.2
SUBROUTINE STACK.2
  CALL STACK.1
RETURN

 STACK.WRAP
CRT @(-1)
CALL STACK.2

And here's the results:


||
3ý/(absolute path)/BP.O/STACK.1ý0x6
2ý/(absolute path)/BP.O/STACK.2ý0x0
1ý/(absolute path)/BP.O/STACK.WRAPý0xe

||

Best Regards,
Richard Lewis


On Tue, May 13, 2014 at 11:59 AM, George Gallen ggal...@wyanokegroup.comwrote:

 Unless I'm doing it wrongdidn't look it up.

 For me - on UV 10.0.2

 PRINT SYSTEM(9001)
 STOP
 END

 Outputs

 RUN LIB TEST
 0

 George

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:
 u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
 Sent: Tuesday, May 13, 2014 1:55 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] Read yourself


 I had posted an update, that I had tried it (it returns the program stack)
 Its System(9001), and it will return the subroutine names in the stack as
 well as the main program (on Universe 11 anyway)

 Someone has to try this on Unidata, and on D3 to make sure it also returns
 the subroutine name.

 What it returns is the absolute path, so you would still need a program to
 translate this into a LOCAL file name and program id, which is, to what,
 I'm trying to get.

 Like I mentioned, I'm sure there is a way to do it, it's just a question
 of whether someone has a routine which *does* this already, and the answer
 is apparently not, so if I have to roll my own.


 -Original Message-
 From: George Gallen ggal...@wyanokegroup.com
 To: U2 Users List u2-users@listserver.u2ug.org
 Sent: Tue, May 13, 2014 10:40 am
 Subject: Re: [U2] Read yourself


 Does the 9001 call work for subroutines, or just the main program?

 Also, it's platform specific

 It all depends on what your trying to do, if the 9001 call works, great,
 if not
 figure something else out.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:
 u2-users-boun...@listserver.u2ug.org]
 On Behalf Of Wjhonson
 Sent: Tuesday, May 13, 2014 1:31 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] Read yourself


 Well do you see any problem in just using the SYSTEM(9001) and ignoring
 embedding this information ?




 -Original Message-
 From: George Gallen ggal...@wyanokegroup.com
 To: U2 Users List u2-users@listserver.u2ug.org
 Sent: Tue, May 13, 2014 10:27 am
 Subject: Re: [U2] Read yourself


 Then you would need to write another program that scans the programs and
 checks
 if the VERDATA element
 For the program name matches the @ID in the program file - if not email
 someone
 to fix it.

 Then have it run nightly - so if it did get cloned without changing, it
 wouldn't

 be that way
 For long.

 George


 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users


 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


 
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread Oaks, Harold
Thanks Bill.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bill Haskett
Sent: Tuesday, May 13, 2014 1:37 PM
To: U2 Users List
Subject: Re: [U2] Web services at 11.x

Harold:

Maybe you'd be interested in:

https://u2devzone.rocketsoftware.com/accelerate/resources/videos/rest

HTH,

Bill

Untitled Page

- Original Message -
*From:* harold.o...@clark.wa.gov
*To:* 'U2 Users List' u2-users@listserver.u2ug.org
*Date:* 5/13/2014 11:20 AM
*Subject:* Re: [U2] Web services at 11.x
 Right, Enterprise Service Bus.  Thanks.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org 
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
 Sent: Tuesday, May 13, 2014 10:21 AM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] Web services at 11.x


 https://en.wikipedia.org/wiki/Enterprise_service_bus

   
 -Original Message-
 From: Oaks, Harold harold.o...@clark.wa.gov
 To: U2 Users List (u2-users@listserver.u2ug.org) 
 u2-users@listserver.u2ug.org
 Sent: Tue, May 13, 2014 10:11 am
 Subject: [U2] Web services at 11.x

 I have been telling my manager (an Oracle-centric guy) that with Universe 11+ 
 (we have 10.2 now) the web services will truly allow us to do input and 
 output interfacing with other web services.  I need to make sure this is a 
 correct understanding.

 It is clear from the Web Services manual that one can create a web 
 service (a SOAP service) which will allow outside queries and return data.  I 
 write to this list to ask those of you who know that it is possible to do the 
 other way, that from Universe you are able to connect to outside web 
 services, send queries to them, and get back responses.  Because I don't see 
 this in the Web manual.

 If the latter is not possible via the Web services capabilities built into 
 Universe, how are any of you doing it?  Do you need a 3rd-party product?

 Here is the data need:  We are to interface our Jail system to another system 
 via an ESB (electronic services bus) via 'web services', passing XML.

 Thanks-
 Harold Oaks
 Clark County, WA

 --
 This e-mail and related attachments and any response may be subject to public 
 disclosure under state law.
 ___

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Read yourself

2014-05-13 Thread Bill Haskett

Richard:

This is exactly what appears in UniData's SYSTEM(49) function call, 
although in reverse order.


5 Dev (0)- BPTEST CRT SYSTEM(49) ; END

Compiling Unibasic: SAVEDLISTS\BpTest_332397981 in mode 'p'.
compilation finished

1²E:\AboEnterprise\Abo\BP\BP\_START.STACK²32■2²E:\AboEnterprise\Abo\BP\BP\_TCL.SHELL²1161■3²E:\AboEnterprise\Abo\BP\BP\_BPTEST²104■4²SAVEDLISTS\_BpTest_332397981²1■

Bill
Untitled Page


- Original Message -
*From:* rbl...@gmail.com
*To:* U2 Users List u2-users@listserver.u2ug.org
*Date:* 5/13/2014 1:46 PM
*Subject:* Re: [U2] Read yourself

George,

It's better illustrated by multiple call levels.  A colleague here wrote
these specifically to test this:

  STACK.1
SUBROUTINE STACK.1
CRT ||
CRT CHANGE(SYSTEM(9001), @AM, CHAR(13):CHAR(10))
CRT ||
RETURN

  STACK.2
SUBROUTINE STACK.2
   CALL STACK.1
RETURN

  STACK.WRAP
CRT @(-1)
CALL STACK.2

And here's the results:


||
3ý/(absolute path)/BP.O/STACK.1ý0x6
2ý/(absolute path)/BP.O/STACK.2ý0x0
1ý/(absolute path)/BP.O/STACK.WRAPý0xe

||

Best Regards,
Richard Lewis


On Tue, May 13, 2014 at 11:59 AM, George Gallen ggal...@wyanokegroup.comwrote:


Unless I'm doing it wrongdidn't look it up.

For me - on UV 10.0.2

PRINT SYSTEM(9001)
STOP
END

Outputs


RUN LIB TEST

0

George

-Original Message-
From: u2-users-boun...@listserver.u2ug.org [mailto:
u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:55 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


I had posted an update, that I had tried it (it returns the program stack)
Its System(9001), and it will return the subroutine names in the stack as
well as the main program (on Universe 11 anyway)

Someone has to try this on Unidata, and on D3 to make sure it also returns
the subroutine name.

What it returns is the absolute path, so you would still need a program to
translate this into a LOCAL file name and program id, which is, to what,
I'm trying to get.

Like I mentioned, I'm sure there is a way to do it, it's just a question
of whether someone has a routine which *does* this already, and the answer
is apparently not, so if I have to roll my own.


-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:40 am
Subject: Re: [U2] Read yourself


Does the 9001 call work for subroutines, or just the main program?

Also, it's platform specific

It all depends on what your trying to do, if the 9001 call works, great,
if not
figure something else out.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org [mailto:
u2-users-boun...@listserver.u2ug.org]
On Behalf Of Wjhonson
Sent: Tuesday, May 13, 2014 1:31 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] Read yourself


Well do you see any problem in just using the SYSTEM(9001) and ignoring
embedding this information ?




-Original Message-
From: George Gallen ggal...@wyanokegroup.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tue, May 13, 2014 10:27 am
Subject: Re: [U2] Read yourself


Then you would need to write another program that scans the programs and
checks
if the VERDATA element
For the program name matches the @ID in the program file - if not email
someone
to fix it.

Then have it run nightly - so if it did get cloned without changing, it
wouldn't

be that way
For long.

George


___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Web services at 11.x

2014-05-13 Thread Larry Hiscock
Consuming webservices from the outside world is relatively trivial in UV 11
(and 10.x).  Look in the Basic Extensions manual for details.  

Larry Hiscock
Western Computer Services

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Oaks, Harold
Sent: Tuesday, May 13, 2014 10:11 AM
To: U2 Users List (u2-users@listserver.u2ug.org)
Subject: [U2] Web services at 11.x


I have been telling my manager (an Oracle-centric guy) that with Universe
11+  (we have 10.2 now) the web services will truly allow us to do input and
output interfacing with other web services.  I need to make sure this is a
correct understanding.

It is clear from the Web Services manual that one can create a web service
(a SOAP service) which will allow outside queries and return data.  I write
to this list to ask those of you who know that it is possible to do the
other way, that from Universe you are able to connect to outside web
services, send queries to them, and get back responses.  Because I don't see
this in the Web manual.   

If the latter is not possible via the Web services capabilities built into
Universe, how are any of you doing it?  Do you need a 3rd-party product?

Here is the data need:  We are to interface our Jail system to another
system via an ESB (electronic services bus) via 'web services', passing XML.


Thanks-
Harold Oaks
Clark County, WA

-- 
This e-mail and related attachments and any response may be subject to
public disclosure under state law.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


[U2] PERL regular expression interpreter in UV Basic?

2014-05-13 Thread Ken Ford
Hello U2 Users.
I have been using a UV Basic function I call REGEXP that takes a text string 
and a PERL formatted regular expression and executes a PERL script and returns 
a matched string if found.  The problem is that it can't handle some of the 
things in strings that are passed to it and PERL bombs.
Because of this, I am in the midst of writing a UV Basic interpreter of PERL 
regular expressions, which is an interesting challenge.  I checked via google 
search for any such UV Basic program already out there, but found none.  So I 
am curious to know if anyone has done this, and if so, would care to share the 
code.
Thanks to anyone who can assist.

Ken Ford.
Firstmac Ltd
Brisbane, Australia.

 ---
Note: 
This email (inc all attachments) is for the use of the intended recipient(s) 
only.
Privileged or confidential information may be contained in this communication. 
If you have received this email in error, please notify the sender immediately 
and then delete all copies of this message from your computer network. If you 
are not the intended recipient, you must not keep, use, disclose, copy or 
distribute this email without the author's prior permission. If you are the 
intended recipient and you do not wish to receive similar electronic messages 
from us in future, then please respond to the sender to this effect. 
We have taken precautions to minimise the risk of transmitting software 
viruses, but advise you to carry out your own virus checks on this email and 
its attachments. We do not accept liability for any loss or damage caused by 
software viruses and do not represent that this transmission is free from 
viruses or other defects. 
Firstmac Limited (ABN 59 094 145 963) (AFSL 290600) 
 ---___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] PERL regular expression interpreter in UV Basic?

2014-05-13 Thread George Gallen
Have you considered just trying to do your regexp through AWK or PHP? 

 On May 13, 2014, at 6:05 PM, Ken Ford ken.f...@firstmac.com.au wrote:
 
 Hello U2 Users.
 I have been using a UV Basic function I call REGEXP that takes a text string 
 and a PERL formatted regular expression and executes a PERL script and 
 returns a matched string if found.  The problem is that it can't handle some 
 of the things in strings that are passed to it and PERL bombs.
 Because of this, I am in the midst of writing a UV Basic interpreter of PERL 
 regular expressions, which is an interesting challenge.  I checked via google 
 search for any such UV Basic program already out there, but found none.  So I 
 am curious to know if anyone has done this, and if so, would care to share 
 the code.
 Thanks to anyone who can assist.
 
 Ken Ford.
 Firstmac Ltd
 Brisbane, Australia.
 
 ---
 Note: 
 This email (inc all attachments) is for the use of the intended recipient(s) 
 only.
 Privileged or confidential information may be contained in this 
 communication. If you have received this email in error, please notify the 
 sender immediately and then delete all copies of this message from your 
 computer network. If you are not the intended recipient, you must not keep, 
 use, disclose, copy or distribute this email without the author's prior 
 permission. If you are the intended recipient and you do not wish to receive 
 similar electronic messages from us in future, then please respond to the 
 sender to this effect. 
 We have taken precautions to minimise the risk of transmitting software 
 viruses, but advise you to carry out your own virus checks on this email and 
 its attachments. We do not accept liability for any loss or damage caused by 
 software viruses and do not represent that this transmission is free from 
 viruses or other defects. 
 Firstmac Limited (ABN 59 094 145 963) (AFSL 290600) 
 ---
 ___
 U2-Users mailing list
 U2-Users@listserver.u2ug.org
 http://listserver.u2ug.org/mailman/listinfo/u2-users
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users