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 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] BDT Sluggish

2013-11-21 Thread Richard Lewis
Bill,

Most sluggish 'initial' connections that I hear about end up being a
reverse-DNS issue.  It's been awhile since I had to fix one myself, but I
believe the solution involves updating the hosts file on either the
workstation or the server or both, or modifying the rules for default
domains to use/try, etc.

Best Regards,

Richard Lewis



On Thu, Nov 21, 2013 at 2:17 PM, Bill Brutzman bi...@hkmetalcraft.comwrote:

 1. I just downloaded the latest Oct2013.
 2. As with the earlier BDT release... each time I press a key... it takes
 two seconds to appear on the screen.
 3. My PC that I am using BDT is Windows Pro 8.1... and the latest Symantec
 EndPoint Protect AntiVirus.
 4. Suggestions would be appreciated.

 --Bill

 ___
 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 Universe 11.n

2013-10-31 Thread Richard Lewis
To be fair, I'm basing my my assumption of not getting all of the
conversation on the following log entries:

Assembled Request (body omitted,length=0):
(the body of my request is empty, but apparently it isn't logged anyway.)

Response message body(may be partial) length: 1769
(and I'm most definitely _not_ getting the entire response message body
logged!)

And yes, I have logging level set at 10.

As the service deals with sensitive data, it would not be appropriate to
discuss the security situation on a public list, but there is a 'Host'
header present when using the uv functions as well as using curl.

My point, in the end, is that I spent days trying to tweak my usage of uv
functions to get the service I was hitting to recognize my request as
valid, without success, whereas I spent less than a day setting up and
using curl and achieving success.  Then I was able to spend a little time
making various invalid requests to see in detail what error conditions
would look like, and document that as well.  And the curl implementation
took about 1/10 as many lines of code.

Thanks for all the suggestions!

Sincerely Best Regards,

Richard Lewis
IBM Certified Solutions Expert -- U2 Family Application Development
IBM Certified Solutions Expert -- U2 UniVerse V10.1 Administration




On Thu, Oct 31, 2013 at 2:37 AM, Symeon Breen syme...@gmail.com wrote:

 That is interesting Richard.  I only have experience in udt with this, and
 if I set logging with protocolLogging(sym.log, ON, 10)I get the
 full
 http conversation.  Maybe there is a difference in UV ?





 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Lewis
 Sent: 30 October 2013 22:43
 To: U2 Users List
 Subject: Re: [U2] Web Services at Universe 11.n

 Yes, as I said, I've tested with curl and it works perfectly.  The problem
 I
 have is not being able to clearly/cleanly see the raw text being sent by
 the
 uv functions, in order to determine the difference in what curl sends
 (success) and what the uv functions send (failure).  There may be certain
 idiosyncratic parsing involved in the service I am trying to consume, but I
 have no control over that.  With curl I can see the entire conversation if
 the logging is set correctly.  With the uv functions, even with the highest
 logging level, it doesn't appear that the logging is actually that complete
 and exact.  I have never had the impression that it was.

 I would love to be able to do it all in uv, but I only have control over
 half of the conversation, and with the uv functions, I seem to have a bit
 less than half.

 Richard


 On Wed, Oct 30, 2013 at 2:12 PM, Symeon Breen syme...@gmail.com wrote:

  That means you where probably missing a header.   http is just a text
  conversation, if the same headers are passed as passed with curl it
  will work. You can test using curl, or even better with telnet.
 
  -Original Message-
  From: u2-users-boun...@listserver.u2ug.org
  [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard
  Lewis
  Sent: 30 October 2013 20:03
  To: U2 Users List
  Subject: Re: [U2] Web Services at Universe 11.n
 
  I've recently been tasked with accessing a webservice, and couldn't
  get a valid response from the webservice.  It kept not recognizing the
  headers that were sent, and with the maximum logging set on the uv
  side, it looked like everything was being sent just fine, but the
  webservice still failed it.  I switched to using curl, and it all worked
 perfectly.
 
  Richard Lewis
 
 
 
  On Wed, Oct 30, 2013 at 1:00 PM, Oaks, Harold
  harold.o...@clark.wa.govwrote:
 
   I've been telling my boss that if we upgraded to Universe 11.23, we can
   implement web services.   (We're currently on 10.2)
   But,  finally looking in detail at the appropriate manual  (Universe
   Web Services Developer) it seems that one can publish a web service
   easily enough so that Universe data can be gotten, but I don't see
   that the other side is implemented, where one accesses an external
   web service and brings back data into Universe.  Am I missing the
 something?
  
   What are any of you using to fully implement web services with an
   underlying Universe environment?
   Thanks-
   Harold Oaks
   Sr. Analyst/Programmer
   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] Ref: Web Services at Universe 11.n

2013-10-31 Thread Richard Lewis
We're on linux.

Richard Lewis


On Thu, Oct 31, 2013 at 2:46 PM, Oaks, Harold harold.o...@clark.wa.govwrote:

 Hi Rudy:

 We're not using any web services at present - but we'd like to.
 (Basically I'm a beginner at this and trying to learn what is possible.)

 We need to interface our current jail system with a new RMS that is coming
 in, and the vendors of it prefer web services interfaces.  So that's why.

 Unlike you, our underlying O/S is a form of unix - hpux actually - not
 Windows.  Unfortunately, I don't know anything about WSD on unix.

 You notice Richard used curl and was happy with it, but right now that is
 not available on our hpux system.
 There is a download available where we can get curl along with some other
 web tools, but my system admin is not particularly enthusiastic about that
 idea.
 Richard:  When you use curl, are you running on windows or unix (or
 something else)?

 Harold

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:
 u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
 Sent: Thursday, October 31, 2013 1:25 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] Ref: Web Services at Universe 11.n

 Could you give an example of web services you are actually using and why?








 -Original Message-
 From: Cooper, Rudy rudy.coo...@sagepub.com
 To: 'u2-users@listserver.u2ug.org' u2-users@listserver.u2ug.org
 Sent: Thu, Oct 31, 2013 1:18 pm
 Subject: [U2] Ref: Web Services at Universe 11.n


 Harold,



 We’re on a windows platform and we’ve doing web services with UV since
 10.2.
 Use the WSD for creating the soap server and and use soapui (free) for
 testing.



 We access external services from UV using the soap api that is documented
 in basicext.pdf of the uv documentation.



 The documentation from Rocket for your release, IBM U2 Web Services
 Developer,
 is very good.



 rudy





 Date: Wed, 30 Oct 2013 12:00:40 -0700

 From: Oaks, Harold harold.o...@clark.wa.govmailto:
 harold.o...@clark.wa.gov

 To: u2-users@listserver.u2ug.orgmailto:u2-users@listserver.u2ug.org

 Subject: [U2] Web Services at Universe 11.n

 Message-ID:

   e9aeaa752e89734bb39e1c6bfcddcfb804f7f...@esxvm40.clark.root.local
 mailto:e9aeaa752e89734bb39e1c6bfcddcfb804f7f...@esxvm40.clark.root.local
 

 Content-Type: text/plain; charset=us-ascii



 I've been telling my boss that if we upgraded to Universe 11.23, we can

 implement web services.   (We're currently on 10.2)

 But,  finally looking in detail at the appropriate manual  (Universe Web

 Services Developer) it seems that one can publish a web service easily

 enough so that Universe data can be gotten, but I don't see that the

 other side is implemented, where one accesses an external web service

 and brings back data into Universe.  Am I missing the something?



 What are any of you using to fully implement web services with an

 underlying Universe environment?

 Thanks-

 Harold Oaks

 Sr. Analyst/Programmer

 Clark County, WA



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






 Rudy Cooper
 Lead Applications Developer
 Sage Publications Inc.
 2455 Teller Road
 Thousand Oaks, Ca. 91320
 USA

 T:805.410.7724
 www.sagepub.com

 Los Angeles | London | New Delhi
 Singapore | Washington DC

 The natural home for authors, editors  societies

 Please consider the environment before printing this email


 Are you a fan of SAGE? Show us at www.facebook.com/SAGEPublications
 http://www.facebook.com/SAGEPublications.


 ___
 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

 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] Web Services at Universe 11.n

2013-10-30 Thread Richard Lewis
I've recently been tasked with accessing a webservice, and couldn't get a
valid response from the webservice.  It kept not recognizing the headers
that were sent, and with the maximum logging set on the uv side, it looked
like everything was being sent just fine, but the webservice still failed
it.  I switched to using curl, and it all worked perfectly.

Richard Lewis



On Wed, Oct 30, 2013 at 1:00 PM, Oaks, Harold harold.o...@clark.wa.govwrote:

 I've been telling my boss that if we upgraded to Universe 11.23, we can
 implement web services.   (We're currently on 10.2)
 But,  finally looking in detail at the appropriate manual  (Universe Web
 Services Developer) it seems that one can publish a web service easily
 enough so that Universe data can be gotten, but I don't see that the
 other side is implemented, where one accesses an external web service
 and brings back data into Universe.  Am I missing the something?

 What are any of you using to fully implement web services with an
 underlying Universe environment?
 Thanks-
 Harold Oaks
 Sr. Analyst/Programmer
 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] Web Services at Universe 11.n

2013-10-30 Thread Richard Lewis
Yes, as I said, I've tested with curl and it works perfectly.  The problem
I have is not being able to clearly/cleanly see the raw text being sent by
the uv functions, in order to determine the difference in what curl sends
(success) and what the uv functions send (failure).  There may be certain
idiosyncratic parsing involved in the service I am trying to consume, but I
have no control over that.  With curl I can see the entire conversation if
the logging is set correctly.  With the uv functions, even with the highest
logging level, it doesn't appear that the logging is actually that complete
and exact.  I have never had the impression that it was.

I would love to be able to do it all in uv, but I only have control over
half of the conversation, and with the uv functions, I seem to have a bit
less than half.

Richard


On Wed, Oct 30, 2013 at 2:12 PM, Symeon Breen syme...@gmail.com wrote:

 That means you where probably missing a header.   http is just a text
 conversation, if the same headers are passed as passed with curl it will
 work. You can test using curl, or even better with telnet.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Lewis
 Sent: 30 October 2013 20:03
 To: U2 Users List
 Subject: Re: [U2] Web Services at Universe 11.n

 I've recently been tasked with accessing a webservice, and couldn't get a
 valid response from the webservice.  It kept not recognizing the headers
 that were sent, and with the maximum logging set on the uv side, it looked
 like everything was being sent just fine, but the webservice still failed
 it.  I switched to using curl, and it all worked perfectly.

 Richard Lewis



 On Wed, Oct 30, 2013 at 1:00 PM, Oaks, Harold
 harold.o...@clark.wa.govwrote:

  I've been telling my boss that if we upgraded to Universe 11.23, we can
  implement web services.   (We're currently on 10.2)
  But,  finally looking in detail at the appropriate manual  (Universe
  Web Services Developer) it seems that one can publish a web service
  easily enough so that Universe data can be gotten, but I don't see
  that the other side is implemented, where one accesses an external web
  service and brings back data into Universe.  Am I missing the something?
 
  What are any of you using to fully implement web services with an
  underlying Universe environment?
  Thanks-
  Harold Oaks
  Sr. Analyst/Programmer
  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 Universe 11.n

2013-10-30 Thread Richard Lewis
Dan,

Where would I find documentation on the 'UDO functions'?

Thanks!
Richard Lewis



On Wed, Oct 30, 2013 at 3:24 PM, Daniel McGrath dmcgr...@rocketsoftware.com
 wrote:

 We haven't built 11.23 yet. 11.2 is the next one about to come out :)

 As others have mentioned, U2 Basic supports HTTP/HTTPS calls as well as
 SOAP. More recent improvements include the UDO functions, which makes
 handling REST/JSON web-services at lot easier.

 Regards,

 Dan McGrath
 Managing Director, U2 Servers Lab
 Rocket Software
 4600 South Ulster Street  ·  Suite 1100  ·   Denver, CO 80237 ·  USA



 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:
 u2-users-boun...@listserver.u2ug.org] On Behalf Of Oaks, Harold
 Sent: Wednesday, October 30, 2013 1:01 PM
 To: u2-users@listserver.u2ug.org
 Subject: [U2] Web Services at Universe 11.n

 I've been telling my boss that if we upgraded to Universe 11.23, we can
 implement web services.   (We're currently on 10.2)
 But,  finally looking in detail at the appropriate manual  (Universe Web
 Services Developer) it seems that one can publish a web service easily
 enough so that Universe data can be gotten, but I don't see that the other
 side is implemented, where one accesses an external web service and brings
 back data into Universe.  Am I missing the something?

 What are any of you using to fully implement web services with an
 underlying Universe environment?
 Thanks-
 Harold Oaks
 Sr. Analyst/Programmer
 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 Universe 11.n

2013-10-30 Thread Richard Lewis
Tried that already, but thanks for the suggestion.  By the way, the curl
solution doesn't require that header to get a successful response.

Richard Lewis

On Wed, Oct 30, 2013 at 5:01 PM, Rick Nuckolls r...@lynden.com wrote:

 If you have not done so yet, try adding the header for Content-Type before
 making the request.

 ie. setRequestHeader(handle, 'Content-Type', 'text/html')

 Rick Nuckolls
 Lynden

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:
 u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Lewis
 Sent: Wednesday, October 30, 2013 3:43 PM
 To: U2 Users List
 Subject: Re: [U2] Web Services at Universe 11.n

 Yes, as I said, I've tested with curl and it works perfectly.  The problem
 I have is not being able to clearly/cleanly see the raw text being sent by
 the uv functions, in order to determine the difference in what curl sends
 (success) and what the uv functions send (failure).  There may be certain
 idiosyncratic parsing involved in the service I am trying to consume, but I
 have no control over that.  With curl I can see the entire conversation if
 the logging is set correctly.  With the uv functions, even with the highest
 logging level, it doesn't appear that the logging is actually that complete
 and exact.  I have never had the impression that it was.

 I would love to be able to do it all in uv, but I only have control over
 half of the conversation, and with the uv functions, I seem to have a bit
 less than half.

 Richard


 On Wed, Oct 30, 2013 at 2:12 PM, Symeon Breen syme...@gmail.com wrote:

  That means you where probably missing a header.   http is just a text
  conversation, if the same headers are passed as passed with curl it will
  work. You can test using curl, or even better with telnet.
 
  -Original Message-
  From: u2-users-boun...@listserver.u2ug.org
  [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Lewis
  Sent: 30 October 2013 20:03
  To: U2 Users List
  Subject: Re: [U2] Web Services at Universe 11.n
 
  I've recently been tasked with accessing a webservice, and couldn't get a
  valid response from the webservice.  It kept not recognizing the headers
  that were sent, and with the maximum logging set on the uv side, it
 looked
  like everything was being sent just fine, but the webservice still failed
  it.  I switched to using curl, and it all worked perfectly.
 
  Richard Lewis
 
 
 
  On Wed, Oct 30, 2013 at 1:00 PM, Oaks, Harold
  harold.o...@clark.wa.govwrote:
 
   I've been telling my boss that if we upgraded to Universe 11.23, we can
   implement web services.   (We're currently on 10.2)
   But,  finally looking in detail at the appropriate manual  (Universe
   Web Services Developer) it seems that one can publish a web service
   easily enough so that Universe data can be gotten, but I don't see
   that the other side is implemented, where one accesses an external web
   service and brings back data into Universe.  Am I missing the
 something?
  
   What are any of you using to fully implement web services with an
   underlying Universe environment?
   Thanks-
   Harold Oaks
   Sr. Analyst/Programmer
   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

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


Re: [U2] [JOB] in Colorado ?

2013-09-17 Thread Richard Lewis
After glancing over the posting to which you linked, at the bottom I find:

To be considered for this role, please visit our website by clicking here
(Insert hyperlink to www.iqor.com under here), click the CAREERS tab at
the top of the page à United States à Universe Software Developer (New
York, NY). There, you will apply for the position by clicking the Apply
Online button at the top of this page where you will submit a cover
letter, including your salary requirements, plus your resume. Please submit
as a PDF, if possible.

Seems like perfect instructions to me.


On Tue, Sep 17, 2013 at 11:46 AM, Wjhonson wjhon...@aol.com wrote:

 I'm sure it's just me, but really if *I* were to post a job ad, I would at
 least tell people how to respond to it

 http://www.intl-spectrum.com/Multivalue_jobs.aspx


 No phone number, no address, no email, no way to actually respond.
 Unless Spectrum is now taking and forwarding resumes ?


 ___
 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] Select from one file with save-list from another file

2013-08-27 Thread Richard Lewis
Yes, because (at least on UV) it actually writes a temporary record to the
dictionary to perform the EVAL expression.


On Tue, Aug 27, 2013 at 6:37 PM, Wjhonson wjhon...@aol.com wrote:

 Are you implying that it somehow reads the permissions of the dictionary
 before allowing the use of EVAL?


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


Re: [U2] What is true

2013-08-01 Thread Sammartino, Richard
To further complicate things, I was instructed at one job to use the IF VAR 
THEN syntax as this was treated a boolean operation and executed faster than IF 
VAR # ''.  We were working on Prime Information at the time.  A few years later 
I went to work for a VAR.  I had made changes to the their programs at a 
customer site and used the IF VAR THEN construct. The code failed in testing.  
This was on an ADDS Mentor.  I went back to the office and wrote a 3 line 
program of:
 
VAR = 'ABC'
IF VAR THEN CRT 'TRUE' ELSE CRT 'FALSE'
END

I got TRUE on the Prime box and FALSE on the ADDS.  I wound up looking at a 
co-workers copy of THE PICK POCKET GUIDE. There is a chapter titled IN SEARCH 
OF THE TRUTH. It explained in detail how different PICK systems determine true 
or false. It did not explain the Prime implementation but was very helpful. I 
changed my code to read IF VAR # '' THEN and my problem went away.

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


Re: [U2] I Type Fields in Universe

2013-07-23 Thread Sammartino, Richard
Do you need to recatalog?

Rich Sammartino
- Original Message -
From: randyleesmith randyleesm...@roadrunner.com
To: u2-users@listserver.u2ug.org
Sent: Tuesday, July 23, 2013 11:25:33 AM
Subject: [U2] I Type Fields in Universe

It's been a while since I messed with these things so I need to ask.


The I type in question is a SUBR and calls code that returns the value I
want the field to have.

You compile the I type and it works fine.

I then need to change the code, compile the code and even re-compile the I
type again, it did not work.

The field acts as before the last time I compiled it.


I've found the new chances will only work after I delete attributes 16 - 20
in the I type and recompile it.


Is there a better/other way?



-
I used to be an Optimist until I knocked over the glass.
--
View this message in context: 
http://u2-universe-unidata.1073795.n5.nabble.com/I-Type-Fields-in-Universe-tp41330.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
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] History of Prime Information

2013-04-26 Thread Richard Lewis
I believe that was Informix rather than Informatics.

Richard Lewis


On Fri, Apr 26, 2013 at 7:12 PM, David Taylor da...@sysmarkinfo.com wrote:

 If I'm not mistaken, there was another company in between Vmark and IBM.

 I believe (and there may have been some smoke and mirrors in all this)
 that Informatics acquired Ardent and then assigned the CEO of Ardent as
 the President of Informatics, or something like that, to run both Ardent
 and Informatics.  And then later, IBM acquired Informatics for their
 database and just inherited Vardent almost by accident.

 Then, I believe that IBM acquired Unidata and formed the U2 product group.
 ...
 Dave Taylor
 Sysmark Information Systems, Inc.


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


Re: [U2] Searching for 'Bad' Dates

2013-01-29 Thread Richard Lewis
How about:

SELECT fname WITH MPAR.STATUS.DATE CONV  = [/]

Since you seem to know exactly the kind of erroneous data you want to find.


On Tue, Jan 29, 2013 at 3:38 PM, Greg Coelho coe...@american.edu wrote:

 All,

 Can anyone help me with a query to find instances where an external date
 has been written to a date field?  I would like to use ...WITH
 MPAR.STATUS.DATE LIKE ..
 ./... (the dates would be in the fomat: '12/16/12', but this field is set
 with external formatting so I end up bringing back everything.  Is there a
 way I can 'turn off' formatting for this field within the query?

 Thanks,

 Greg
 ___
 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] Wally Terhune

2012-12-14 Thread Sammartino, Richard
Congratulations Wally! You can remain on the list as a lurker.

Rich
- Original Message -
From: Dan Goble dan.go...@interlinebrands.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Thursday, December 13, 2012 5:03:59 PM
Subject: [U2] Wally Terhune

Congratulations on your upcoming retirement.  Thanks for all the support you 
have given us over the years for us Unidata guys.   Your breadth of knowledge 
will surely be missed.


Enjoy retirement,
-Dan



Dan Goble | Senior Systems Engineer

Interline Brands, Inc.
804 East Gate Drive Suite 100, Mount Laurel, NJ 08054
Office: 856.533.3110 | Mobile: 609.792.6855
E-mail: dan.go...@interlinebrands.com | Website: www.interlinebrands.com


This e-mail and any files transmitted with it are confidential and intended 
solely for the individual or entity to whom they are addressed.  Please notify 
the sender immediately by e-mail if you have received this e-mail in error and 
delete all copies of this message.

___
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] Scrub Hangs Up

2012-08-28 Thread Richard Wilson

Just in case I'm not missing something does HS.SCRUB
create voc entries for each dictionary?

normally there is no voc item for D_anything

and shouldnt the copy be

COPY FROM DICT INVOICE TO whereever ALL

rICH
On 8/28/2012 7:21 PM, Bill Brutzman wrote:

Good question... I looked into this earlier.

The VOC entry for D_INVOICE is blank... but... so are all of the other VOC 
entries for dictionary items.

--Bill

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Subject: Re: [U2] Scrub Hangs Up


What's the VOC entry for D_INVOICE look like?



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



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] UniQuery COPY FROM syntax error - Weird behavior

2012-08-01 Thread Richard Wilson

I dont remember is it U vs P mode in Unidata, I dont have an active install

try lower case copy so Prime information copy style should kick in

Eric Malmberg wrote:
I have encountered a strange problem after mistyping the UniQuery COPY command 
in one of our development environments. The command tried to copy the same 
record to itself and failed gracefully but subsequent attempts to properly 
copy records in this environment fail with a syntax error.


:COPY FROM APPROVALS RECORD1, RECORD1
Copying APPROVALS RECORD1 to RECORD1...
RECORD1 exists in APPROVALS, cannot overwrite
0 records copied


All copy statements now result in the message:


:COPY FROM APPROVALS RECORD1, RECORD2
-^
syntax error


We have several environments on the same server but our dev account seems to 
be the only one affected. 

Does anyone have any thoughts on what could be the problem and suggest a 
resolution. Thanks in advance.


Eric

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

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] UniVerse LIST statement question [not-secure]

2012-07-02 Thread Richard Wilson

could you setup an index based on employee number.?

then possibly use that index against employees active for June

Rich

Hennessey, Mark F. wrote:

I need to do a UniVerse LIST statement that would only populate a column if the 
contents met certain criteria.

For example, suppose we have a file with details of telephone usage and that 3 associated 
mulitvalued fields contain date call was made, duration and if the call was a toll call. 
Is it possible to limit the output of the date call made and associated 
columns to a date range without that being a select criteria? If I were to do something 
like:

LIST CALLS EMP.NAME EMP.LOCATION WITH DATE.CALL GE 2012-06-01 AND WITH DATE.CALL LE 
2012-06-30  DURATION TOLL WITH @ID EQ '123456'

I would get zero record if employee 123456 did not make any calls in June. What 
I would like to see is the employer name and location returned with the date, 
duration and toll columns empty. I'm trying to do this in a LIST statement as 
it will be run by U2 Web Services (and for the time being a subroutine is off 
the table...)

Any advice, or an authoritative NO, It can not be done would be greatly 
appreciated.

Mark Hennessey
State of Connecticut
Department of Social Services
Information Technology Services
Child Support Systems
Voice: 860-424-5261
Fax: 860-424-4813



CONFIDENTIAL INFORMATION: The information contained in this e-mail may be 
confidential and protected from general disclosure. If the recipient or reader 
of this e-mail is not the intended recipient or a person responsible to receive 
this e-mail for the intended recipient, please do not disseminate, distribute 
or copy it. If you received this e-mail in error, please notify the sender by 
replying to this message and delete this e-mail immediately. We will take 
immediate and appropriate action to see to it that this mistake is 
corrected.[*LD*]
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] User ID of a LOCKED record

2012-05-01 Thread Sammartino, Richard
In Unidata you could use the LOCKED clause followed by GETUSERNAME(STATUS()).

Richard Sammartino
- Original Message -
From: Andy Krause akra...@rammutual.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Tuesday, May 1, 2012 8:55:03 AM
Subject: Re: [U2] User ID of a LOCKED record

Thanks for all of the responses!  It looks like LIST.READU -INTERNAL
will do it.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Buss, Troy
(Contractor, Logitek Systems)
Sent: Monday, April 30, 2012 7:05 PM
To: U2 Users List
Subject: Re: [U2] User ID of a LOCKED record

Also, on UV 11.1.1 the user name portion is broken.   We had to work
around it (by reading our own PID to USER table), but I understand a
subsequent release addressed the issue.

LIST.READU -INTERNAL

Broken output:
11009371^677913942^0^2000^1^RU^ ^ ^333719*1^
1606438775^34480532^0^5224^15^RU^ ^ ^270784^
1718299426^1218558262^0^3692^15^RU^ ^ ^30742^

Original output:
814621824^1688564731^0^6896^82^RU^6896^DOMAIN\Joe.User^ZLIST.READUEX^

What they meant to say is that the USERNAME is not reported.  Pid is
there on 11.1.1.  
- - - - - - - - - - - - 
Problems Fixed in UniVerse Release 11.1.5 (Build 5757)

UNV-5010UniVerse -- Beginning at UniVerse 11.1.1, the pid number
of 
the UniVerse process holding a lock was no longer
displayed 
in the LIST.READU output. This problem as been fixed.



-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
Sent: Monday, April 30, 2012 4:28 PM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] User ID of a LOCKED record


LIST.READU -INTERNAL
you don't need the EVERY to see record locks

but how wild that -INTERNAL gives you the USER NAME !
And the regular LIST.READU does not (even though the documentation says
it will)


_
Scanned by IBM Email Security Management Services powered by
MessageLabs. For more information please visit http://www.ers.ibm.com

This email is intended only for the use of the party to which it is
addressed and may contain information that is privileged, confidential,
or protected by law.  If you are not the intended recipient you are
hereby notified that any dissemination, copying or distribution of the
email or its contents is strictly prohibited.  If you have received this
message in error, please notify us immediately, by replying to the
message and deleting it from your computer.

WARNING: Internet communications are not assured to be secure or clear
of inaccuracies as information could be intercepted, corrupted, lost,
destroyed, arrive late or incomplete, or contain viruses.  Therefore, we
do not accept responsibility for any errors or omissions that are
present in this email, or any attachment, that have arisen as a result
of e-mail transmission.

_
___
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] YYMMDD easy way?

2012-04-25 Thread Richard Lewis
Mine is on HP-UX B.11.31.

Richard

On Wed, Apr 25, 2012 at 8:07 AM, Rick Nuckolls r...@lynden.com wrote:

 If not flavor, then hardware/os?

 (Sparc/Solaris)

 -Rick

 On Apr 25, 2012, at 5:26 AM, Charles Stevenson wrote:

 
  On my UV10.2.10 it behaves properly only with [2'',2''], as Richard 
  Perry describe.
 
 OCONV( 16187, DYMD['',''] )   = 2012425
 OCONV( 16187, DYMD[2'',2''] ) = 120425
 
  Like Rick, I find flavor does not matter.
  On 4/24/2012 7:38 PM, Rick Nuckolls wrote:
  That was my thought, but the flavor does not seem to affect it on my
 version.
 
  -Rick
 
  On Apr 24, 2012, at 5:36 PM, Richard Lewis wrote:
 
  Or maybe it's my Pick flavor.
 
  Richard Lewis
 
  On Tue, Apr 24, 2012 at 6:27 PM, Rick Nuckollsr...@lynden.com
  wrote:
 
  Hmmm,
 
  That must be a change at UV 11.  10.2.x still produces 2 digit months
 and
  days without the extra 2’s.
 
  -Rick
 
 
  On Apr 24, 2012, at 5:21 PM, Richard Lewis wrote:
 
  On UV 11.1.3 this leaves single-digit months as a single digit.
 
  OCONV(TODAY, 'DYMD[2,2,2]') does the job correctly.  The brackets
  allow
  format modifiers to the parameters that follow the D conversion
 code, in
  this case, 'YMD'.  The 2's specifiy how many characters to display,
 and
  the
  empty quotes specify the 'text' with which to separate the elements.
  There's about 80 lines that describe it when you do HELP CONV D at
 TCL.
 
  Richard Lewis
 
 
  On Tue, Apr 24, 2012 at 6:08 PM, Rick Nuckollsr...@lynden.com
  wrote:
 
  Or, a bit more simply:
 
  OCONV(TODAY, D2YMD[‘’ , ’’]”)
  On Apr 24, 2012, at 4:58 PM, Perry Taylor wrote:
 
  OCONV(TODAY, 'DYMD[4,2,2]')
 
 
  - Original Message -
  From: Lunt, Bruce [mailto:bl...@shaklee.com]
  Sent: Tuesday, April 24, 2012 07:55 PM
  To: 'U2 Users List'u2-users@listserver.u2ug.org
  Subject: Re: [U2] YYMMDD easy way?
 
  On Unidata try: OCONV(TODAY,'DYMD')
 
  -Original Message-
  From: u2-users-boun...@listserver.u2ug.org
  [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of
 Wjhonson
  Sent: Tuesday, April 24, 2012 4:52 PM
  To: u2-users@listserver.u2ug.org
  Subject: [U2] YYMMDD easy way?
 
 
 
  YYMMDD = OCONV(TODAY,'DY2'):OCONV(TODAY,'DM'):OCONV(TODAY,'DD')
 
  easier way to do this?
 ___
 
 
 
  ___
  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] YYMMDD easy way?

2012-04-24 Thread Richard Lewis
On UV 11.1.3 this leaves single-digit months as a single digit.

OCONV(TODAY, 'DYMD[2,2,2]') does the job correctly.  The brackets allow
format modifiers to the parameters that follow the D conversion code, in
this case, 'YMD'.  The 2's specifiy how many characters to display, and the
empty quotes specify the 'text' with which to separate the elements.
There's about 80 lines that describe it when you do HELP CONV D at TCL.

Richard Lewis


On Tue, Apr 24, 2012 at 6:08 PM, Rick Nuckolls r...@lynden.com wrote:

 Or, a bit more simply:

 OCONV(TODAY, D2YMD[‘’ , ’’]”)
 On Apr 24, 2012, at 4:58 PM, Perry Taylor wrote:

  OCONV(TODAY, 'DYMD[4,2,2]')
 
 
  - Original Message -
  From: Lunt, Bruce [mailto:bl...@shaklee.com]
  Sent: Tuesday, April 24, 2012 07:55 PM
  To: 'U2 Users List' u2-users@listserver.u2ug.org
  Subject: Re: [U2] YYMMDD easy way?
 
  On Unidata try: OCONV(TODAY,'DYMD')
 
  -Original Message-
  From: u2-users-boun...@listserver.u2ug.org
  [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
  Sent: Tuesday, April 24, 2012 4:52 PM
  To: u2-users@listserver.u2ug.org
  Subject: [U2] YYMMDD easy way?
 
 
 
  YYMMDD = OCONV(TODAY,'DY2'):OCONV(TODAY,'DM'):OCONV(TODAY,'DD')
 
  easier way to do this? ___
  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
 
  CONFIDENTIALITY NOTICE: This e-mail message, including any
  attachments, is for the sole use of the intended recipient(s)
  and may contain confidential and privileged information.  Any
  unauthorized review, use, disclosure or distribution is
  prohibited. ZirMed, Inc. has strict policies regarding the
  content of e-mail communications, specifically Protected Health
  Information, any communications containing such material will
  be returned to the originating party with such advisement
  noted. If you are not the intended recipient, please contact
  the sender by reply e-mail and destroy all copies of the
  original message.
  ___
  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] YYMMDD easy way?

2012-04-24 Thread Richard Lewis
Or maybe it's my Pick flavor.

Richard Lewis

On Tue, Apr 24, 2012 at 6:27 PM, Rick Nuckolls r...@lynden.com wrote:

 Hmmm,

 That must be a change at UV 11.  10.2.x still produces 2 digit months and
 days without the extra 2’s.

 -Rick


 On Apr 24, 2012, at 5:21 PM, Richard Lewis wrote:

  On UV 11.1.3 this leaves single-digit months as a single digit.
 
  OCONV(TODAY, 'DYMD[2,2,2]') does the job correctly.  The brackets
 allow
  format modifiers to the parameters that follow the D conversion code, in
  this case, 'YMD'.  The 2's specifiy how many characters to display, and
 the
  empty quotes specify the 'text' with which to separate the elements.
  There's about 80 lines that describe it when you do HELP CONV D at TCL.
 
  Richard Lewis
 
 
  On Tue, Apr 24, 2012 at 6:08 PM, Rick Nuckolls r...@lynden.com wrote:
 
  Or, a bit more simply:
 
  OCONV(TODAY, D2YMD[‘’ , ’’]”)
  On Apr 24, 2012, at 4:58 PM, Perry Taylor wrote:
 
  OCONV(TODAY, 'DYMD[4,2,2]')
 
 
  - Original Message -
  From: Lunt, Bruce [mailto:bl...@shaklee.com]
  Sent: Tuesday, April 24, 2012 07:55 PM
  To: 'U2 Users List' u2-users@listserver.u2ug.org
  Subject: Re: [U2] YYMMDD easy way?
 
  On Unidata try: OCONV(TODAY,'DYMD')
 
  -Original Message-
  From: u2-users-boun...@listserver.u2ug.org
  [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Wjhonson
  Sent: Tuesday, April 24, 2012 4:52 PM
  To: u2-users@listserver.u2ug.org
  Subject: [U2] YYMMDD easy way?
 
 
 
  YYMMDD = OCONV(TODAY,'DY2'):OCONV(TODAY,'DM'):OCONV(TODAY,'DD')
 
  easier way to do this? ___
  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
 
  CONFIDENTIALITY NOTICE: This e-mail message, including any
  attachments, is for the sole use of the intended recipient(s)
  and may contain confidential and privileged information.  Any
  unauthorized review, use, disclosure or distribution is
  prohibited. ZirMed, Inc. has strict policies regarding the
  content of e-mail communications, specifically Protected Health
  Information, any communications containing such material will
  be returned to the originating party with such advisement
  noted. If you are not the intended recipient, please contact
  the sender by reply e-mail and destroy all copies of the
  original message.
  ___
  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] Case Statement with only two cases

2012-04-19 Thread Sammartino, Richard
The case statement can be faster if you put the condition with the most 
occurrences first. As soon as the 'true' condition is met, the program exits 
the case statement.  The if-then-else construct took longer to evaluate.  When 
processors were slow, there were gains to be had.

Richard Sammartino
- Original Message -
From: Wjhonson wjhon...@aol.com
To: u2-users@listserver.u2ug.org
Sent: Thursday, April 19, 2012 3:52:21 PM
Subject: [U2] Case Statement with only two cases


Is there a point in code like this

BEGIN CASE
   CASE A = TEST; GOSUB DO.SOMETHING
   CASE 1; GOSUB DO.SOMETHING.ELSE
END CASE

versus this

IF A = TEST THEN GOSUB DO.SOMETHING ELSE GOSUB DO.SOMETHING.ELSE

Personally I see no advantage in making this a  CASE

Does the rest of the *Universe* agree with me?
___
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] BETWEEN operator

2012-04-18 Thread Richard Wilson

try it in within an sql construct

my UV voc BETWEEN item shows
Keyword - SQL selection criteria
508


Wjhonson wrote:

Curious you're right.  I have a Between in my VOC
But if I do something like

LIST VOC BETWEEN
or
LIST VOC IF @ID BETWEEN 1 AND 2
or anything like that I just get an error

Unexpected symbol.  Token was BETWEEN

So I have no idea why it's in the VOC, maybe it's a left over from Prime days


-Original Message-
From: Allen Egerton aeger...@pobox.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Wed, Apr 18, 2012 12:18 pm
Subject: Re: [U2] BETWEEN operator


Universe release 10.3.7 on a Windows platform.
oc entry BETWEEN
1 K
2 508
No online help for it, and intuitive guess how to use it didn't work,
ut it's definitely there


n 4/18/2012 3:04 PM, Wjhonson wrote:
 
 The BETWEEN only exists in Unidata's Uniquery

 Not Universe, as far as I can see anyway.
 Unless they *just* put it into 11. or something
 
snip

__
2-Users mailing list
2-us...@listserver.u2ug.org
ttp://listserver.u2ug.org/mailman/listinfo/u2-users

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

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] Can I automate Wintegrate BridgeCopy?

2012-04-12 Thread Richard A. Wilson

I'm not sure what operating system you are using but
it might be simpler to just use the OS copy function if the two servers
are connected.

Rich

Beverly Wilson wrote:

Hi Folks,

I've got several files I need to transfer between our live and test 
servers. Ideally, I would write a Unibasic program to take the list of 
filenames and feed them into the RunBridgeCopy command. However, I've 
been unable to determine how to do it, if it is even possible.


I found WIN.INVOKE documented in the Wintegrate host commands manual, 
but that doesn't appear to allow for feeding in the variables I've 
assigned that hold RunBridgeCopy's options (SourceFile, TargetFile, 
etc.).


I tried doing this with ViaDuct (One-step Copy) but that bluescreens 
my PC.


Any suggestions on where I can read documentation on this, or can 
anyone tell me that it can't be done?


Regards,
--bev

Beverly Wilson
Daedalus Books  Music
Columbia, MD 21046
410.309.2700 voice
410.309.2701 fax
www.daedalusbooks.com

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



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] Detecting idle time in INPUT statement.

2012-03-27 Thread Sammartino, Richard
Don, I don't know about Universe but Unidata has the INPUT - FOR statement to 
do this. It looks like this... INPUT VAR,5_: FOR 1200 ELSE IF 
@SYSTEM.RETURN.CODE = -1 THEN VAR = '*'. It waits at the input prompt for 30 
minutes, the @SYSTEM.RETURN.CODE is set to -1 to indicate a time out condition. 
The VAR = '*' is our exit character.

Rich
- Original Message -
From: Don Robinson donr_w...@yahoo.com
To: U2 listserver u2-users@listserver.u2ug.org
Sent: Tuesday, March 27, 2012 9:26:38 AM
Subject: [U2] Detecting idle time in INPUT statement.

Hello all,
 
We are running Universe 10.1 on AIX with about 500 users. We have a problem 
with users opening up a record which puts a lock on it and just letting it sit 
at the INPUT statement for a long time.
 
Most of the locking within the application does not use the LOCKED clause so 
when a second person needs the locked record, their session waits.
 
What is the best way to detect the user hasn't typed anything for a period of 
time, say 2 minutes? This needs to be simple as we have no desire to rewrite 
the application!
 
IIRC, some other MV systems have a timeout on the INPUT but I can't find 
anything about this in the UV manual.
 
Thanks,

Don Robinson
___
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] Indexing I-Desc

2012-03-06 Thread Richard A. Wilson

as long as the data truly resides in the file then you should be fine

example

I
F11:*:F20[1,4]:*:F40
etc

Rich
Israel, John R. wrote:

I have a select that is taking too long.  Many of the fields are I-Descs.  Some 
are extracting a piece of info from the file, some are translates to other 
files, and some are running subroutines.

I understand that danger of indexing a translate or subroutine (if the source data 
changes, the index is not updated).  However, I am toying with the idea of building 
a new I-desc that in some way combines the data in the core file itself.  For 
example, if I need F11  F20[4,1] and F40, make an I-desc that combines these 
and then index that I-desc.

Just as a sanity check, does this sound like a reasonable thing to do so that I 
can at least grab a subset of the data I need prior to actually plowing through 
the translates and subroutines?

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

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] Universe 10.2 to 11.1

2012-03-06 Thread Richard Lewis
Some time ago we upgraded our development server to 11.1.1 (hpux) and ran
into a couple of bugs involving indexes.  Our development server is
currently on 11.1.3 with those bugs completely wiped out.  We haven't yet
been able (schedule-wise, etc.) to get our production server updated, so it
is still running 10.3.2.

Our sys admin isn't here at the moment, but didn't report any extra
difficulties or delays compared to any previous upgrades.

Best Regards,

Richard Lewis

On Tue, Mar 6, 2012 at 12:34 PM, Oaks, Harold harold.o...@clark.wa.govwrote:

 All:

 Who has upgraded Universe 10.2 to 11.1?  Difficult or not?  Costs? Time?
 More generally, I'm addressing anyone using Universe 11.1 coming from
 any other place.

 On their website, Rocket states:
 UniVerse V11.1 adds powerful high availability, interoperability,
 administration and security capabilities to the solid extended
 relational database.


 EDA (Extended Data Architecture) sounds quite interesting (this is under
 interoperability):

 External Database Access (EDA) External database access (EDA) provides
 the flexibility to store some or all of your data in either UniVerse
 files or an external database such as Microsoft SQL Server, Oracle and
 IBM DB2.
 EDA provides the ability to transparently access and update data from an
 existing UniVerse application. Graphical tools ease schema mapping and
 configuration management.


 Has 11.1 been a happy choice for you?

 Thanks for any advice and opinions-
 Harold Oaks
 Clark County





 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] mvToolbox--digression about why anyone would want telnet-based tools

2012-02-20 Thread Richard
--- On Sat, 18/2/12, Symeon Breen syme...@gmail.com wrote:
 I seriously believe most MV people
 are not programming in ED on telnet (or
 ssh)   and that they are using some form of
 GUI editor. 

With respect, I disagree. I work alongside dozens of UniVerse developers and I 
am in a very small minority who use a GUI based editor. The vast majority use 
our own custom editor, which runs on a ubiquitous 'green-screen' terminal 
emulator. Even those like myself who favour editing in a GUI still do all other 
tasks through command line.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Building an Excel File

2012-02-07 Thread Richard A. Wilson

Rev G2b was released in 1986 so it is truely Dos based

once Unidata has written the .TXT or .CSV file I assume you'll start up some
command shell that would be provided by accuterm or whatever

I have used the same type of program for both  of the U2's in a windows 
server

environment

Rich



Israel, John R. wrote:

You said this was written for Revelation.  Isn't Revelation a Windows based 
version of PICK, and thus the .bat file it builds will be running Excel which 
must be loaded on the server?

I have a UNIX box which will not have Excel, thus this solution does not appear 
like it will work for me.

If I have missed something, let me know.

John



-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard A. Wilson
Sent: Monday, February 06, 2012 4:50 PM
To: U2 Users List
Subject: Re: [U2] Building an Excel File

try this subroutine. Note it is written for an old Revelation G2b application 
so change as needed

Rich

  SUBROUTINE
EXCEL_SCRIPTS_SUBR(RESULT,PROCESS,FROM.FILE,TO.FILE,EXTRA.INFORMATION)
*
*
* Purpose: Create Excel Vbs Scripts
*
* Date:01-24-12
*
* Author:  Richard A. Wilson
*  Lakeside Systems
*  4 Myers Street
*  Smithfield, RI  02917-1821
*  Email: rwil...@lakeside-systems.com
*
*
*
* M o d i f i c a t i o n s
*
* Date By  Description
* 02-06-12 RAW Saving as XLS doesnt require file format
*  Infact it will cause save as vbs error
*
*
* Note from and to files require complete path L:\RES\etc
*
  RESULT = ''
  BEGIN CASE
 CASE PROCESS EQ 'XLSTOTAB'
FILE.FORMAT = -4158
EXTENSION = 'TXT'
 CASE PROCESS EQ 'XLSTOCSV'
FILE.FORMAT = 6
EXTENSION = 'CSV'
 CASE PROCESS EQ 'CSVTOXLS'
FILE.FORMAT = 56
EXTENSION = 'XLS'
  END CASE
*
  COMMA.CNT = COUNT(FROM.FILE,'.')
  PART1 = FIELD(FROM.FILE,'.',1,COMMA.CNT)
*
  IF TO.FILE EQ  THEN
 TO.FILE = PART1:'.':EXTENSION
  END
*
* Quote the file names just incase spaces might exist and cause issues
*
  QUOTED.FROM.FILE = '':FROM.FILE:''
  QUOTED.TO.FILE = '':TO.FILE:''
*
  SCRIPT = ''
  SCRIPT-1 = '
  SCRIPT-1 = ' 01-23-12 Found this script at technet.microsoft.com
  SCRIPT-1 = '
  SCRIPT-1 = if WScript.Arguments.Count  2 Then
  SCRIPT-1 = 'WScript.Echo Error! Please specify the source 
path and the destination. Usage: XlsToCsv SourcePath.xls Destination.csv'

  SCRIPT-1 = Wscript.Quit
  SCRIPT-1 = End If
  SCRIPT-1 = Dim oExcel
  SCRIPT-1 = 'Set oExcel = CreateObject(Excel.Application)'
  SCRIPT-1 = Dim oBook
  SCRIPT-1 = Set oBook =
oExcel.Workbooks.Open(Wscript.Arguments.Item(0))
  SCRIPT-1 = '
  SCRIPT-1 = ' following disables overwrite popup
  SCRIPT-1 = '
  SCRIPT-1 = oExcel.DisplayAlerts = False
*
* 02-06-12 following IF logic
*
  IF EXTENSION EQ 'XLS' THEN
 SCRIPT-1 = oBook.SaveAs WScript.Arguments.Item(1)
  END ELSE
 SCRIPT-1 = oBook.SaveAs WScript.Arguments.Item(1), :FILE.FORMAT
  END
*
  SCRIPT-1 = oBook.Close False
  SCRIPT-1 = oExcel.Quit
  SCRIPT-1 = '
  SCRIPT-1 = ':' 01-23-12 comment out Done'
  SCRIPT-1 = '
  SCRIPT-1 = ':' WScript.Echo Done'
*
  CONVERT @FM TO CHAR(10) IN SCRIPT
  OSWRITE SCRIPT ON 'C:\BATFILES.WRK\':PROCESS:'.VBS'
*
* Execute script
*
  CMD = 'C:\BATFILES.WRK\':PROCESS:'.VBS '
  CMD := QUOTED.FROM.FILE:' '
  CMD := QUOTED.TO.FILE
  BAT.NAME = 'REN':TIME()
  CONVERT '.' TO '' IN BAT.NAME
  BAT.NAME = '\BATFILES.WRK\':BAT.NAME[1,8]:'.BAT'
  OSWRITE CMD ON BAT.NAME
  OSCLOSE BAT.NAME
  PCPERFORM 'CMD.EXE /C ':BAT.NAME
  PCPERFORM 'ERASE ':BAT.NAME
  IF EXTRA.INFORMATION EQ 'DELETE_FROM.FILE' THEN
 PCPERFORM 'CMD.EXE /C ERASE ':FROM.FILE
  END
*
  RETURN
   END




Israel, John R. wrote:
  

We are running UniData on a UNIX platform.  We create tab-delimited txt files 
(and tab delimited txt files with xls extensions) all the time that users open 
with Excel.  Many of these jobs are run in the middle of the night or in a 
trigger program.  In all cases, there is no direct user interaction building 
these files.

We also have some XML files that are coded so that Excel opens them with 
formatting, colors, filters, etc.

Unfortunately, our BB users and iPhone users can not open these files up in a 
meaningful way.

Is there a way to build a TRUE Excel file without any user intervention from 
UniData or UNIX?

John





John Israel
Senior ERP Developer

Dayton Superior Corporation
1125 Byers Rd  Miamisburg, OH 45342
Office: 937-866-0711 x44380
Fax

Re: [U2] Building an Excel File

2012-02-06 Thread Richard A. Wilson
try this subroutine. Note it is written for an old Revelation G2b 
application

so change as needed

Rich

 SUBROUTINE 
EXCEL_SCRIPTS_SUBR(RESULT,PROCESS,FROM.FILE,TO.FILE,EXTRA.INFORMATION)

*
*
* Purpose: Create Excel Vbs Scripts
*
* Date:01-24-12
*
* Author:  Richard A. Wilson
*  Lakeside Systems
*  4 Myers Street
*  Smithfield, RI  02917-1821
*  Email: rwil...@lakeside-systems.com
*
*
*
* M o d i f i c a t i o n s
*
* Date By  Description
* 02-06-12 RAW Saving as XLS doesnt require file format
*  Infact it will cause save as vbs error
*
*
* Note from and to files require complete path L:\RES\etc
*
 RESULT = ''
 BEGIN CASE
CASE PROCESS EQ 'XLSTOTAB'
   FILE.FORMAT = -4158
   EXTENSION = 'TXT'
CASE PROCESS EQ 'XLSTOCSV'
   FILE.FORMAT = 6
   EXTENSION = 'CSV'
CASE PROCESS EQ 'CSVTOXLS'
   FILE.FORMAT = 56
   EXTENSION = 'XLS'
 END CASE
*
 COMMA.CNT = COUNT(FROM.FILE,'.')
 PART1 = FIELD(FROM.FILE,'.',1,COMMA.CNT)
*
 IF TO.FILE EQ  THEN
TO.FILE = PART1:'.':EXTENSION
 END
*
* Quote the file names just incase spaces might exist and cause issues
*
 QUOTED.FROM.FILE = '':FROM.FILE:''
 QUOTED.TO.FILE = '':TO.FILE:''
*
 SCRIPT = ''
 SCRIPT-1 = '
 SCRIPT-1 = ' 01-23-12 Found this script at technet.microsoft.com
 SCRIPT-1 = '
 SCRIPT-1 = if WScript.Arguments.Count  2 Then
 SCRIPT-1 = 'WScript.Echo Error! Please specify the source 
path and the destination. Usage: XlsToCsv SourcePath.xls Destination.csv'

 SCRIPT-1 = Wscript.Quit
 SCRIPT-1 = End If
 SCRIPT-1 = Dim oExcel
 SCRIPT-1 = 'Set oExcel = CreateObject(Excel.Application)'
 SCRIPT-1 = Dim oBook
 SCRIPT-1 = Set oBook = 
oExcel.Workbooks.Open(Wscript.Arguments.Item(0))

 SCRIPT-1 = '
 SCRIPT-1 = ' following disables overwrite popup
 SCRIPT-1 = '
 SCRIPT-1 = oExcel.DisplayAlerts = False
*
* 02-06-12 following IF logic
*
 IF EXTENSION EQ 'XLS' THEN
SCRIPT-1 = oBook.SaveAs WScript.Arguments.Item(1)
 END ELSE
SCRIPT-1 = oBook.SaveAs WScript.Arguments.Item(1), :FILE.FORMAT
 END
*
 SCRIPT-1 = oBook.Close False
 SCRIPT-1 = oExcel.Quit
 SCRIPT-1 = '
 SCRIPT-1 = ':' 01-23-12 comment out Done'
 SCRIPT-1 = '
 SCRIPT-1 = ':' WScript.Echo Done'
*
 CONVERT @FM TO CHAR(10) IN SCRIPT
 OSWRITE SCRIPT ON 'C:\BATFILES.WRK\':PROCESS:'.VBS'
*
* Execute script
*
 CMD = 'C:\BATFILES.WRK\':PROCESS:'.VBS '
 CMD := QUOTED.FROM.FILE:' '
 CMD := QUOTED.TO.FILE
 BAT.NAME = 'REN':TIME()
 CONVERT '.' TO '' IN BAT.NAME
 BAT.NAME = '\BATFILES.WRK\':BAT.NAME[1,8]:'.BAT'
 OSWRITE CMD ON BAT.NAME
 OSCLOSE BAT.NAME
 PCPERFORM 'CMD.EXE /C ':BAT.NAME
 PCPERFORM 'ERASE ':BAT.NAME
 IF EXTRA.INFORMATION EQ 'DELETE_FROM.FILE' THEN
PCPERFORM 'CMD.EXE /C ERASE ':FROM.FILE
 END
*
 RETURN
  END




Israel, John R. wrote:

We are running UniData on a UNIX platform.  We create tab-delimited txt files 
(and tab delimited txt files with xls extensions) all the time that users open 
with Excel.  Many of these jobs are run in the middle of the night or in a 
trigger program.  In all cases, there is no direct user interaction building 
these files.

We also have some XML files that are coded so that Excel opens them with 
formatting, colors, filters, etc.

Unfortunately, our BB users and iPhone users can not open these files up in a 
meaningful way.

Is there a way to build a TRUE Excel file without any user intervention from 
UniData or UNIX?

John





John Israel
Senior ERP Developer

Dayton Superior Corporation
1125 Byers Rd  Miamisburg, OH 45342
Office: 937-866-0711 x44380
Fax: 937-865-9182

johnisr...@daytonsuperior.com

This message w/attachments (message) is intended solely for the use of the 
intended recipient(s) and may contain information that is privileged, 
confidential or proprietary. If you are not an intended recipient, please 
notify the sender, and then please delete and destroy all copies and 
attachments, and be advised that any review or dissemination of, or the taking 
of any action in reliance on, the information contained in or attached to this 
message is prohibited.




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

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] Passing by Value

2012-01-26 Thread Richard A. Wilson

I think that code started out in Either Bellevue or Denver right?

any calls to the PCD (prompt control definition)

yep, still supporting and actively enhancing for a couple of clients

Rich

John Hester wrote:

We still maintain some AR code written in 1979 which I will put up
against anything as one of the best examples of a poorly written
maintenance minefield.  Here's a snippet:

0150: 100:  Z=1
0151:   CALL INPUT.VERIFY(Q,PCD(1))
0152: 110:  IF Q='' THEN
0153:  IF CUST='END' THEN RETURN
0154:  Q=CUST
0155:   END
0156:   IF Q='END' THEN RETURN
0157:   IF LEN(Q) = '11' THEN
0158:  READV Q FROM FILE.SI,Q,1 ELSE NULL
0159:   END
0160: *
0161: * 
0162: * Added locked clause for CR read

0163: *
0164: * READU CR.ITEM FROM FILE.CR, Q ELSE
0165: 115: *
0166:   READU CR.ITEM FROM FILE.CR, Q LOCKED
0167:  CALL PGMDP0940('AR1245','CR',Q,FILE.CR) ; GO 115
0168:   END ELSE
0169:  RELEASE FILE.CR, Q
0170:  LOCATE(Q,EXCEPTIONS;POSN) ELSE
0171: IF NUM(Q) THEN INPUTCLEAR ; PRINTERR CHAR(7):Q:ERR(13)
; GO 100
0172: LENGTH=3
0173: AMC=CR$S.NM
0174: K=CR$ADDR1
0175: CALL PGMAR3245(K,X)
0176: CUST='' ; SAVE.NAME='' ; CR.ITEM=''
0177: GOSUB 9
0178: IF Q='END' OR Q='' THEN GO 100
0179: GO 110
0180:  END
0181:  GOSUB 99900
0182:  GO 100
0183:   END
0184:   RELEASE FILE.CR, Q

Need to figure out where Q, Z, X, or K get assigned or what they're for?
No need to bother.  They get used over and over again throughout 5
different subroutines and never for the same thing twice.  The original
author dared to sign his name at the top of the code, but I'm too nice a
guy to post it.  Hopefully he got out of the business long ago.
Fortunately these 5 were the only programs on our system he wrote.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Doug Averch
Sent: Thursday, January 26, 2012 2:12 PM
To: U2 Users List
Subject: Re: [U2] Passing by Value

I posted a partial copy of a program written many 25 years ago that we
still maintain with a wonderful variables named like BIT.  Not sure what
it does except you set it zero or one and it referenced all over the
place.
 This program has other gems like ATT which are screen positions and
plethora of GOTO's and their labels:  Enjoy:
http://www.u2logic.com/images1/XLr8EditorOutline.jpg

Regards,
Doug
www.u2logic.com

On Thu, Jan 26, 2012 at 2:56 PM, Mecki Foerthmann mec...@gmx.net
wrote:

  

Not to mention L ;A= and L ;A =


___
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

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] Passing by Value

2012-01-26 Thread Richard A. Wilson

Probably Escom MRP or one of the offshoots

and yes back then 32k was an issue Q stands for Question

:-)  Ricy

John Hester wrote:

Wow, you're right.  I'm guessing Bellevue.  We used to be a division of
big conglomerate and inherited a lot of their legacy code.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard A.
Wilson
Sent: Thursday, January 26, 2012 3:03 PM
To: U2 Users List
Subject: Re: [U2] Passing by Value

I think that code started out in Either Bellevue or Denver right?

any calls to the PCD (prompt control definition)

yep, still supporting and actively enhancing for a couple of clients

Rich

John Hester wrote:
  
We still maintain some AR code written in 1979 which I will put up 
against anything as one of the best examples of a poorly written 
maintenance minefield.  Here's a snippet:


0150: 100:  Z=1
0151:   CALL INPUT.VERIFY(Q,PCD(1))
0152: 110:  IF Q='' THEN
0153:  IF CUST='END' THEN RETURN
0154:  Q=CUST
0155:   END
0156:   IF Q='END' THEN RETURN
0157:   IF LEN(Q) = '11' THEN
0158:  READV Q FROM FILE.SI,Q,1 ELSE NULL
0159:   END
0160: *
0161: *
0162: * Added locked clause for CR read
0163: *
0164: * READU CR.ITEM FROM FILE.CR, Q ELSE
0165: 115: *
0166:   READU CR.ITEM FROM FILE.CR, Q LOCKED
0167:  CALL PGMDP0940('AR1245','CR',Q,FILE.CR) ; GO 115
0168:   END ELSE
0169:  RELEASE FILE.CR, Q
0170:  LOCATE(Q,EXCEPTIONS;POSN) ELSE
0171: IF NUM(Q) THEN INPUTCLEAR ; PRINTERR


CHAR(7):Q:ERR(13)
  

; GO 100
0172: LENGTH=3
0173: AMC=CR$S.NM
0174: K=CR$ADDR1
0175: CALL PGMAR3245(K,X)
0176: CUST='' ; SAVE.NAME='' ; CR.ITEM=''
0177: GOSUB 9
0178: IF Q='END' OR Q='' THEN GO 100
0179: GO 110
0180:  END
0181:  GOSUB 99900
0182:  GO 100
0183:   END
0184:   RELEASE FILE.CR, Q

Need to figure out where Q, Z, X, or K get assigned or what they're


for?
  
No need to bother.  They get used over and over again throughout 5 
different subroutines and never for the same thing twice.  The 
original author dared to sign his name at the top of the code, but I'm



  

too nice a guy to post it.  Hopefully he got out of the business long


ago.
  

Fortunately these 5 were the only programs on our system he wrote.

-John

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Doug Averch
Sent: Thursday, January 26, 2012 2:12 PM
To: U2 Users List
Subject: Re: [U2] Passing by Value

I posted a partial copy of a program written many 25 years ago that we



  
still maintain with a wonderful variables named like BIT.  Not sure 
what it does except you set it zero or one and it referenced all over 
the place.
 This program has other gems like ATT which are screen positions and 
plethora of GOTO's and their labels:  Enjoy:

http://www.u2logic.com/images1/XLr8EditorOutline.jpg

Regards,
Doug
www.u2logic.com

On Thu, Jan 26, 2012 at 2:56 PM, Mecki Foerthmann mec...@gmx.net
wrote:

  


Not to mention L ;A= and L ;A =

  

___
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

  



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

___
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

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] [UV] Strange mask behavior

2012-01-25 Thread Richard A. Wilson

add L or R or T before the 1st (

Left or Right  or Text justification

Rich

Jacques G. wrote:

Hello,


I had this small test program on UV 11.1.3:

 A = 5143546011
 CRT A (###) ###-
 CRT FMT(A,(###) ###-)

I was expecting to have:  (514) 654-6011   (North American formatted phone)

However I am getting:

514) 354-6011
514) 354-6011

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

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] UniVerse over Solaris Logon Question.

2012-01-12 Thread Sammartino, Richard
We ran Unidata on Solaris.  Try checking /etc/passwd.  This is where the login 
account was stored on our configuration.

Rich
- Original Message -
From: John Varney jvar...@soft-target-tech.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Thursday, January 12, 2012 9:04:52 AM
Subject: Re: [U2] UniVerse over Solaris Logon Question.

I recently went to work for a company that is running UniVerse over Solaris.
This seems to be working really well. 

We are running ManFact and are setting up multi-plant operations. As part of
the upgrade we are changing the live account from MANLIVE to something else.
I'm not doing the upgrade as I kinda walked into the middle of it, and the
person who is doing it seems very well versed in ManFact so no worries
there.

My question is where do we change the default login account? Come next
Monday, people should not be logging into MANLIVE. We looked at the initial
login script on Solaris but that just starts a uv session. Any ideas?




___
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] Pegasus Publishing Systems, Inc

2012-01-03 Thread Richard A. Wilson

you might want to add the following to your google search
I show they were looking for analyst back in 1995

Rich

NEW BRUNSWICK NJ

Symeon Breen wrote:

Anyone know anyone who used to work on this at all - a friend of mine has an
old PEGASUS accounting system that needs some work and i was wondering if it
is still around, or what skill sets there are around to work on it.

 

 


Thanks

Symeon.

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

  


--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] Unidata 7.1.20 Pick Flavor Selecting Multi-Values

2011-11-14 Thread Sammartino, Richard
Have you looked at SORT.TYPE?

Rich
- Original Message -
From: Al DeWitt adew...@stylmark.com
To: u2-users@listserver.u2ug.org
Sent: Thursday, November 10, 2011 3:52:12 PM
Subject: [U2] Unidata 7.1.20  Pick Flavor  Selecting Multi-Values

I'm am trying to help out my users by helping them make sense of what they have 
done to themselves.  The field in question, Bin Number, is alphanumeric.  About 
three quarters of the entries are all numeric and one quarter are alphanumeric. 
 Below is a perfect example of my issue.

 

LIST INVWHS 27814*001 F1 F2 F3 12:43:18 NOV 10 2011 1   

CPN*WH Qty On Hand Shipping Qty Bin Number

  

27814*001  158 070300 

SO76127   

 

My users want all the numeric sorted from lowest value to highest value as if 
the field was actually numeric.  My thought was to add to V-desc fields.  One 
that determines if the value is numeric or not (ALD.NUM.BIN)  and the other is 
the length of the field(ALD.BIN.LN).  This would sort based on the length of 
the value.  The greater the length the greater the value.  So the 10001 should 
print after  and not in the vicinity of 1000 as it's doing now.

 

My first question is:  How do I make ALD.NUM.BIN report the condition of both 
values.  As you can see below it only shows the first value.  I'm thinking I 
need a -SUBR statement but can't find a list of them in the Unidata manuals.

 

LIST INVWHS 27814*001 F3 ALD.NUM.BIN ALD.BIN.LN 12:45:51 NOV 10 2011 1   

CPN*WH Bin Number Num Bin Bin Ln   

   

27814*001  703001  5   

   SO76127 7   

 

Here is the dictionary item (it was built using System Builder):

 

Top of ALD.NUM.BIN in DICT INVWHS, 9 lines, 215 characters. 

001: I  

002: SUBR(SB.SMART.QUERY,'MK':@FM:'E;@1;C3;@6;X;Z#;I2;C1;J1;C0',@ID,@RECORD,@F

ILE.NAME,@NV)   

003:

004: Num Bin

005: 1R 

006: MV 

007:

 

Assuming everything works correctly I need to modify my select statement:

Before I change:

SELECT INVWHS WITH WHS = 001 BY.EXP BIN

Followed up with READNEXT CPN.WHS,BIN.LOCATION

 

After I change my select to:

SELECT INVWHS WITH WHS = 001 BY.EXP ALD.NUM.BIN BY.EXP ALD.BIN.LN BY.EXP BIN

 

Which results in:

Top of ALD.TEST004 in SAVEDLISTS, 1,657 lines, 33,139 characters. 

*---: L   

1322: 27814*001ý1ü1ý-5ü-5 

 

Top of ALD.TEST005 in SAVEDLISTS, 1,330 lines, 26,939 characters.

*---: L  

0447: 27814*001ý1ü2ý-5ü-5

 

How should I modify my READNEXT statement so that BIN.LOCATION returns the 
correct value for each value?

 

 

Thanks.

___
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] [UV] LIST.READU EVERY's waiters when there are writes w/o explicit readu.

2011-10-25 Thread Sammartino, Richard
What if you were writing to an empty file?

Rich
- Original Message -
From: Mecki Foerthmann mec...@gmx.net
To: u2-users@listserver.u2ug.org
Sent: Monday, October 24, 2011 6:30:08 PM
Subject: Re: [U2] [UV] LIST.READU EVERY's waiters when there are writes w/o 
explicit readu.

Now why would anybody want to use a WRITE without a READU?
I can possibly understand that somebody would want to do it with a 
WRITEV (i.e writing a flag on a record) but WRITE?
And WRITE totally ignoring locking would be outright stupid.

On 24/10/2011 22:28, Woodward, Bob wrote:
 I would think that because you are not trying to obtain the lock in a
 WRITE statement, it would not be classified as a waiter.  True, it's
 waiting because of the lock but by not trying to obtain the lock, it's
 only waiting for the blockage to clear.  If it were to be classified as
 a waiter then I would expect to see a LOCKED clause on the WRITE
 statement like there is on the READU.  For that matter, I'd expect to
 see a WRITEU command as well and the standard WRITE to completely ignore
 locking.

 Just my guess, though.

 BobW

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Charles
 Stevenson
 Sent: Monday, October 24, 2011 2:12 PM
 To: U2 Users List
 Subject: [U2] [UV] LIST.READU EVERY's waiters when there are writes
 w/o explicit readu.

 UV 10.2.10 on Windows is behaving differently from what I recall.
 Are my expectations out of line?

 Suppose Session A holds a readu lock; and Session B attempts a WRITE to
 same record withOUT!!! 1st explicitly getting the readu lock.
 Session B waits for Session A to release the lock before writing the
 record.

 While Session B is waiting,  does it show up as a waiter in LIST.READU

 EVERY?
 I expected so,  but it doesn't.


 Session A   Session B
 _   ___
 1A. ED VOC DUMMY
  (this sets the readu lock.)

 2A. (stay in editor)2B. run this:
   01:OPEN 'VOC' TO F ELSE STOPM
 'nope'
   02: ***READU REC FROM F, 'DUMMY'
 ELSE NULL
   03:WRITE '' TO F, 'DUMMY'

 3A. Within ED:
   XEQ LIST.READU EVERY


 If I UN-comment line 2, LIST.READU EVERY shows something like this:

   Active Read Waiters:  Owner   Waiter
   Device  Inode Userno  Userno
   746117947232860913  61163396


 But when I comment out line 2, LIST.READU is silent.
 I have not yet explored what the deadlock daemon does.

 TIA,
 cds


 P.S. Yes, yes, Bad Form, Legacy Software, 20 min wait is
 configurable, . . . we can talk later.

 ___
 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] Simple FMT question

2011-07-08 Thread Richard A. Wilson

try this syntax

 F17 = FMT(STL.AMT,'R(0)#13')


Rich

Bob Woodward wrote:

Hi Group,

 


I don't know why this is kicking my butt but I'm trying to do a simple X
= FMT(X,4\0R) statement, straight out of the HELP UNIBASIC listing and
I can't seem to get it to work.  The problem is the fill character, in
this case the number zero, but what I get back is just the letter R,
without the quote marks.  I get pretty much the same result no matter
what fill character I use.  I simply want to format a number to be 4
characters long with leading zeros.  If X=1, then it should result in
X=0001, or so I've been lead to believe.

 


I know that X = (:X)[4] works to get my results but FMT should
work, too.  The major benefit is that if the number is more than 4
digits, FMT won't truncate it.  I hope.

 


Environment is UniData 6.1 on a Windows server.   Comments anyone?

 


Thanks,

 


BobW

 


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



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Found something interesting.....Bug or No Bug....that is my question?

2011-07-07 Thread Richard A. Wilson

Prime information also returned a hit anytime
the following syntax was used

I'm guessing UV tried to emulate prime whenever possible

SELECT filename recordid

perhaps a different flavor would yield different
results

Rich



Dianne Ackerman wrote:

Yikes, not what I would have expected.  Also happens on 10.2.7
-Dianne

On 7/7/2011 11:02 AM, George Gallen wrote:

UV on Unix - Version 10.0.1

If you do:
SELECT FILENAME WITH FIELD = SOMETHING
And you want to know if ITEM 1234 is in that list
SELECT FILENAME 1234
Will always return a hit (unless it doesn't exist in the FILE) and 
ignores the active list


whereas

SELECT FILENAME WITH FIELD = SOMETHING
SELECT FIELNAME WITH @ID = 1234
Will return a zero if it's not in the active list

Soif you don't specify a WITH qualifier, it will ignore any 
active list and treat it

as if it's a new SELECTion

moral of the story, don't get used to omitting the WITH @ID when doing 
selects

otherwise, it will bite you if your working with an active list.



George Gallen
Senior Programmer/Analyst
Accounting/Data Division, EDI Administrator
ggal...@wyanokegroup.com
ph:856.848.9005 Ext 220
The Wyanoke Group
http://www.wyanokegroup.com



___


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



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] uppercase

2011-06-23 Thread Richard Lewis
I understand matrix operations well enough to use them frequently, and
in light of this discussion, the following question popped into my
mind:

Is there any difference between:

X = OCONV(X,'MCU')

and:

X = OCONVS(X,'MCU')

Has anyone experienced the results being different?

Thanks!

Richard Lewis


On Wed, Jun 22, 2011 at 9:08 AM, George Gallen ggal...@wyanokegroup.com wrote:
 UPCASE() will also function as OCONVS()

 If you put in a dynamic array into UPCASE(), it will upcase the entire string 
 and
   leave the @VM, @AM... untouched.

 I use this on UV when reading items, especially for searching, I'll upcase 
 the entire
 dynamic array, then proceed to do my indexes or locates.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
 boun...@listserver.u2ug.org] On Behalf Of Martin Phillips
 Sent: Wednesday, June 22, 2011 6:32 AM
 To: U2 Users List
 Subject: Re: [U2] uppercase

 Hi Jeff,

 The difference is probably only one of performance. Using OCONV
 requires the
 conversion code to be decoded in order to work out what to do. Using
 UPCASE() can go straight off to do the real work without any additional
 decoding.

 I suspect not, but there may be some difference of interpretation if
 you
 have NLS installed.


 Martin Phillips
 Ladybridge Systems Ltd
 17b Coldstream Lane, Hardingstone, Northampton NN4 6DB, England
 +44 (0)1604-709200

 - Original Message -
 From: Jeff Butera jbut...@hampshire.edu
 To: u2-users@listserver.u2ug.org
 Sent: Wednesday, June 22, 2011 11:24 AM
 Subject: [U2] uppercase


  On unidata, can anyone shed light on the differences between
 UPCASE(...)
  and OCONV(...,'MCU')?
 
  I know OCONVS(...,'MCU') will preserve @VM and other unidata
 delimiters,
  but for single valued data is their any difference in the above?
 
 
  --
  Jeff Butera, PhD
  Manager of ERP Systems
  Hampshire College
  413-559-5556
 
  ___
  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] Conversion Documentation

2011-06-15 Thread Richard A. Wilson

check out FMT, the format you are displaying is more pure Pick

FMT has it's roots in Prime information

Rich

jjuser ud2 wrote:

Good afternoon,

Which piece of documentation covers things like

VARIABLEONE = VARIABLEL(#33)

and

VARIABLETWO = VARIABLER(%9)

please?  I can find OCONV documentation left and right, but I can't
seem to find a reference that says what the equivalent of these
statements is.  I've used them in the past, but I'd like to know what
exactly it is that I'm doing when I use them rather than just blindly
following examples that I've seen to produce results I want.
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] [UV] Obtaining a file creation date and time without locking it

2011-06-02 Thread Sammartino, Richard
Someone posted a program to do this a couple of years ago.  I can post my 
version if needed.

Rich

Richard Sammartino
Systems Analyst
School District of Philadelphia
440 N Broad Street
Philadelphia, PA  19130
Phone (215) 400-5086
Fax (215) 400-4411

- Original Message -
From: Jacques G. jacque...@yahoo.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Thursday, June 2, 2011 1:50:03 PM
Subject: [U2] [UV] Obtaining a file creation date and time without locking it


Hello,

Currently I have code that does something like this:

EQU TM.LIMIT TO 3 ;* File useable if created less than TM.LIMIT seconds ago.


OPENSEQ PATH.HOUSE:ipcs.txt TO F.IPCS ELSE RETURN
STATUS STAT FROM F.IPCS THEN
   CLOSESEQ F.IPCS
   IPCS.TM = STAT15
   IPCS.DT = STAT16
   SEC.PASSED = (DATE() - IPCS.DT) * 86400
   SEC.PASSED += (TIME() - IPCS.TM)
   IF SEC.PASSED  TM.LIMIT THEN RETURN ;* Too old can't use it
END

The problem with this approach, is that in order to query the file's internal 
date and time, I have to do an OPENSEQ which locks the file.   This means that 
another process that may need to perform the same check has to wait for the 
lock 
to be released.

Any way to open the file in a ReadOnly mode in UV so that It won't get locked ?

Jacques

___
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] uv 2 ud

2011-05-28 Thread Richard A. Wilson

I believe it would be quicker for you to pick up UV then converting to UD

The little differences will take much more time to deal with.

Rich

Symeon Breen wrote:

Here is a strange one - i have a friend with a uv system that he cannot
maintain - so he has asked me to do this. It needs transferring to a new
machine and some changes making and maintained over the coming years.
However my team has worked exclusively in ud for 10 years, so uv is rather
rusty to say the least, and would not fit with our existing portfolio- what
would people recommend, stick with it on uv and hopefully not make too many
mistakes and try to learn fast, or convert the app to run on ud ?  His uv
livence is long out of maintenance so there is no financial reason to stick
with uv.

 

 


Thanks

 


Symeon.

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



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Simple UniQuery Question

2011-05-19 Thread Richard A. Wilson

you will probably need an itype using REUSE

Doug Farmer wrote:

For some reason, in all the years I have been doing this, I don't ever
remember being asked this.

A user asked me, if I have a UniQuery report listing a single value and
a multi value, how can I repeat the single value for every multi value.

For example

CustomerInvoice
100012345
12389
13101
200014000
14001

Would become

CustomerInvoice
100012345
100012389
100013101
200014000
200014001

I can probably do it with a I Desc subroutine, but is there any UniQuery
command to do the same thing without having to create many more
dictionary items?

Thanks in advance,

Doug


This e-mail is for the use of the intended recipient(s) only. If you have 
received this e-mail in error, please notify the sender immediately and then 
delete it. If you are not the intended recipient, you must not use, disclose or 
distribute this e-mail without the author's prior permission. We have taken 
precautions to minimize the risk of transmitting software viruses, but we 
advise you to carry out your own virus checks on any attachment to this 
message. We cannot accept liability for any loss or damage caused by software 
viruses. Any views and/or opinions expressed in this e-mail are of the author 
only and do not represent the views of Epicor Software Corporation or any other 
company within its group.


This message has been scanned for malware by Websense. www.websense.com
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] Multi char delimiter in DICT item

2011-05-19 Thread Richard A. Wilson

how about INDEX then you should be able to use C0L1 COL2 logic

or what I did years ago for CONVERT since it wasnt allowed to
be used in an Itype was create a generic subroutine that could
be used as a SUBR where ever I needed it

something like
SUBR('*CONVERT.SUBR',@RECORD1,from delim,to delim)

Rich

Bob Woodward wrote:

Hi folks,

I'm in Unidata 6.1 and I'm trying to find a way to use a multi character
value as a delimiter for a parsing function in an I-desc dict item.  I'm
working with Bartender label data records and I'm trying to parse the
first line on the /PRN= value, without the quote marks.  FIELD only
lets me use a single character.

What I have so far in the DICT item is:
001: I   
002: F1;FIELD(@1,'PRN=',2);FIELD(@2,'',2)   
003: 
004: PRN 
005: 15L 
006: S   


This works great until a capital P is in the label name before the PRN.
Field is taking the first character and ignoring the RN=.  I do NOT want
to make a subroutine if I can avoid it.  I've tried using CHANGE to swap
out PRN= with a single character but apparently that's not an allowed
command in the DICT items.

Thanks for any help you can offer.

BobW

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



--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


[U2] Accessing Pervasive SQL database from Universe

2011-04-08 Thread Richard A. Wilson

One of my clients who has been on Prime Information/Universe since
the mid 80's is moving to a new package called Timberline (job costing etc)

I would like to continue using some of the reports/rules/etc that
reside in Universe.

Mapping of the data might be much quicker that reworking the rules
in a new environment

The question is, what would be the best, most efficient way
to access that sql data.

I have searched the web for a couple of hours and most all related
articles are connecting to Universe.

thanks, Rich
--
Richard A Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064

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


Re: [U2] [UV] Uvsh exit status and @SYSTEM.RETURN.CODE

2011-03-17 Thread Sammartino, Richard
Phil, maybe you should try @USER.RETURN.CODE.  I don't know if you can control 
the values in @SYSTEM.RETURN.CODE.

Rich

Richard Sammartino
Systems Analyst
School District of Philadelphia
440 N Broad Street
Philadelphia, PA  19130
Phone (215) 400-5086
Fax (215) 400-4411

- Original Message -
From: Phil Walker p...@gnosys.co.nz
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Wednesday, March 16, 2011 5:01:41 PM
Subject: [U2] [UV] Uvsh exit status and @SYSTEM.RETURN.CODE

Hi all,

I am trying to detect the success of failure of a BASIC program when running 
from UNIX. I was going to use @SYSTEM.RETURN.CODE setting to do this, hoping 
that the exit status of uvsh would reflect the value set for 
@SYSTEM.RETURN.CODE but it appears this is not the case. Does anyone know if 
this works and I am just missing something silly?

Possibly VOC entry process mode setting or something?

e.g.

uvsh MYBASICPROGRAM SUCCESS would return exit status of 0

uvsh MYBASICPROGRAM FAILURE would return exit status 1

uvsh MYBASICPROGRAM would return 9

SUBROUTINE MYBASICPROGRAM
@SYSTEM.RETURN.CODE = 9
Get(Arg.) EXITSTATUS ELSE STOP
BEGIN CASE
CASE EXITSTATUS = 'SUCCESS'
   @SYSTEM.RETURN.CODE = 0
CASE EXITSTATUS = FAILURE'
  @SYSTEM.RETURN.CODE = 1
END CASE
RETURN

This is a contrived example, but shows what I am trying to do with 
@SYSTEM.RETURN.CODE.

Cheers

Phil.


___
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] Scripps Networking Services - softwaresearch.com

2011-02-24 Thread Richard Brown
I have worked with Larry and Software Search for 20+ years.  He is active in 
the AAPUG group in Atlanta.  A good guy and company to work with.


Richard Brown

- Original Message - 
From: DavidJMurray (mvdbs.com) nab...@mvdbs.com

To: u2-users@listserver.u2ug.org
Sent: Thursday, February 24, 2011 6:08 PM
Subject: Re: [U2] Scripps Networking Services - softwaresearch.com




As a side but related - has anyone had dealings with softwaresearch.com -
Larry Okeson?

I'm on the job hunt and am trying to identify the good from the bad.

Cheers,

djm


Bessel, Karen wrote:


Has anybody heard about a job opportunity with this company, contact 
names

Dan Maxwell and/or Jenna Wade?





-

Learn and Do
Excel and Share


http://mvdbs.com http://mvdbs.com
--
View this message in context: 
http://old.nabble.com/Scripps-Networking-Services-tp30839704p31008805.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 


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


Re: [U2] Purging and Indexing

2011-02-16 Thread Sammartino, Richard
In Unidata, the index would be build for the 10 million records.  The purge 
would run a little longer as the index has be updated with every record 
removal.  The size of the index file does not shrink with the purge of the 
records.  From my experience, I would purge the file and then build the index.  
Make sure the file is not opened by anyone during the indexing otherwise your 
indexes could be corrupted.

Rich

Richard Sammartino
Systems Analyst
School District of Philadelphia
440 N Broad Street
Philadelphia, PA  19130
Phone (215) 400-5086
Fax (215) 400-4411

- Original Message -
From: Gordon Glorfield gglorfi...@vertisinc.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Wednesday, February 16, 2011 10:07:44 AM
Subject: [U2] Purging and Indexing

Good Morning,

Looking for opinions and experiences here.  We are trying to do some system 
cleanups.  We found that our PO file has over 10 million records dating back 
some 7 years.  We've decided that 2 years of PO history is plenty to keep on 
file.

Currently there are no indices on this file.  Our question is would it be 
quicker to do a select and delete of the older records before building an index 
on invoice date or would it be quicker to build the index first to use in the 
select for the purge?  This index has been identified as being needed for some 
reporting.

My thinking is that while the select for the purge may go quicker, if the index 
is in place prior to the purge then the delete process not only has to delete 
the selected records it also has to update the index on the fly.

TIA,
Gordon

Gordon J Glorfield | Software Application Developer | Vertis Communications
250 W. Pratt Street, Suite 1800 | Baltimore, MD, 21201
T 410-361-8664 | M 443-280-7093
gglorfi...@vertisinc.com | http://www.vertisinc.com

Vertis Communications is a results-driven marketing communications company that 
delivers inventive advertising, direct marketing and interactive solutions to 
prominent brands across North America. Our deep industry knowledge and 
extensive range of offerings-including integrated data solutions, digital 
program management systems, creative services, world-class print and mail 
production, logistics, out-of-home and business process outsourcing-are used to 
deliver superior program performance that drives bottom line results for our 
clients. With 100 strategically positioned locations and more than 5,000 
dedicated professionals, we deliver impeccable quality and fast turn-around to 
any market.

___
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] How to Clear Empty VM marks in Field

2011-01-31 Thread Sammartino, Richard
One solution is

MAXV = DCOUNT(FXI,@VM)

FOR I = MAXV TO 1 STEP -1
IF FXI1,I = '' THEN
   DEL FXI1,I
NEXT I

This handles embedded nulls as well as leading and trailing nulls.  This would 
also give you a value if there are associated fields that would need to be 
removed.

Rich

Richard Sammartino
Systems Analyst
School District of Philadelphia
440 N Broad Street
Philadelphia, PA  19130
Phone (215) 400-5086
Fax (215) 400-4411

- Original Message -
From: Garry Smith gar...@charlesmcmurray.com
To: U2 Users List u2-users@listserver.u2ug.org
Sent: Friday, January 28, 2011 7:29:48 PM
Subject: [U2] How to Clear Empty VM marks in Field

FXI  = 1ýý

 DCount(FXI,VM) returns 3 
Is there function to clear the blank value marks so that FXI = 1 and then 
DCOUNT would return 1

TIA

Garry L. Smith
Dir Info Systems
Charles McMurray Company
V# 559-292-5782   F# 559-346-6169

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


Re: [U2] How to Clear Empty VM marks in Field

2011-01-28 Thread Richard Lewis
Garry,

Since you described a simple situation, I'll provide a simple solution.

FXI  = 1ýý

DCOUNT(TRIM(FXI,@VM),@VM) should return 1.

Best Regards,
Richard Lewis


On Fri, Jan 28, 2011 at 5:29 PM, Garry Smith gar...@charlesmcmurray.comwrote:

 FXI  = 1ýý

  DCount(FXI,VM) returns 3
 Is there function to clear the blank value marks so that FXI = 1 and
 then DCOUNT would return 1

 TIA

 Garry L. Smith
 Dir Info Systems
 Charles McMurray Company
 V# 559-292-5782   F# 559-346-6169


 ___
 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] Data in Dict

2011-01-25 Thread Richard Lewis
At a previous employer, we used a single file similar to what Jeff suggests,
and it was a very neat and tidy little file.  The only problem we ran into
was when we started getting larger sites, and had trouble with throughput.
It turned out that with 20 or so next-item counters in one frame, the lock
table became a bottleneck.  We had to radically over-size the file to spread
the items into more groups so that group update locks didn't hamper
performance.  So our neat and tidy modulo 7 or 11 file went to a modulo of
around 101.  Still relatively small with a separation of 1.  With disk as
cheap as it is these days, it's a very easy solution, once you know.

Richard Lewis


On Tue, Jan 25, 2011 at 10:49 AM, Allen Egerton aeger...@pobox.com wrote:

 Jeff,

 That's a nice simple solution, I'd just add don't forget to right
 justify the @ID Dict item in the file that's being selected by.dsnd  ;)

 Allen


 On 1/25/2011 11:37 AM, Jeff Schasny wrote:
  My preference is to have a data file specifically for next key records
  with the item id being the filename and field 1 being the next available
  key. As far as restoring it should it become corrupted a fairly simple
  Uvbasic program which is fed a list of filenames,
  selects each file BY.DSND @ID,
  readnext,
  add 1 to the first key,
  write that as the next key for the file,
  next filename
  should be able to restore your next key file in a couple minutes if not
  less.
 
  George Gallen wrote:
  The one down side I can think of to not keeping 'next' values in the
  DICT and in a separate file, is if you have to restore the file, you
  will also have to restore the NEXT-FILE as well. It's not one neat
  package.
 
  But I have to admit, when I was setting up a MySQL structure and
  needed to implement a 'next' value, I went with a separate file and
  each row had two values, key and value, where the key was the filename
  and the value being the next value, and used this one file for all my
  'next' placeholders, instead of writing it to the DICT, I used the
  filename as the key.
 
  Although, keeping all your nexts in one basket could be a problem if
  that file ever was corrupted, it would be difficult to reset them
  all to the correct values. Other than that, seems a bit of overhead
  to have a separate next file for each file you want to keep one on
  to avoid losing all your keys with one file issue.
 
  What other methods are people using to track next ID?
 
 
  -Original Message-
  From: u2-users-boun...@listserver.u2ug.org [mailto:u2-users-
  boun...@listserver.u2ug.org] On Behalf Of Bill Haskett
  Sent: Monday, January 24, 2011 7:55 PM
  To: U2 Users List
  Subject: Re: [U2] Data in Dict
 
  Kate:
 
  It seems to me that this is very tidy!  :-)
 
  Bill
 
  ---
  -
  Kate Stanton said the following on 1/24/2011 1:27 PM:
 
  Hi David,
 
  The reason we use dictionaries for data entry, reports, queries and
  forms is so we can use the same dictionary item for all activities,
  thus using the dictionary as designed with a little more.
 
  So, if part ID is changed at a site to be 6 numbers, then changing
 
  the
 
  dict item in a file once means the same change applies to all other
  activities.
 
  We think this is very tidy, and the unused portion of dictionaries
  have been used like this for a long, long time (over 30 years to our
  knowledge).
 
  Cheers, Kate
 
  Kate Stanton
  Walstan Systems Ltd,
  4 Kelmarna Ave, Herne Bay, Auckland 1011, New Zealand
  Phone: +64 9 360 5310  mobile: + 64 21 400 486  fax: + 64 9 367 0750
  Email: k...@walstan.com
 
  On 25 January 2011 03:53, David A. Greendgr...@dagconsulting.com
 
  wrote:
 
  All this talk about using the Dictionary item to store extra data
 
  has
 
  prompted this post.
 
  I realize in the past when the limit to the number of Opened Files
 
  in a
 
  Basic program was a programming challenge, that doing creative data
 
  storage
 
  might have been an necessity.  But I would like to suggest we leave
 
  the
 
  Dictionary alone, let the database use it the way it wants to and
 
  let us
 
  create our own storage device for dictionary related data.
 
  Thoughts?
 
  David A. Green
  (480) 813-1725
  DAG Consulting
 
  ___
  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] UV User Logout

2011-01-12 Thread Richard Lewis
Bill,

It looks like it's trying to write out maryann's command stack.
SAVEDLISTS is apparently setup as a Type 1 file, and since maryann's stack
key is longer, it's trying to create a sub-directory and write into it.  It
looks like maryann doesn't have appropriate prviileges to create the
sub-directory in the SAVEDLISTS directory.

You could resize the SAVEDLISTS file as a Type 19, or fix the owner /or
group of SAVEDLISTS, or just turn STACK.WRITE off.

Without looking, that's what I would guess.

Best Regards,

Richard Lewis


On Wed, Jan 12, 2011 at 2:15 PM, Bill Brutzman bi...@hkmetalcraft.comwrote:

 When one user here logs out via Dynamic Connect on HP-Ux 11i v2 running UV
 10.3.6, she gets the following  screenful...

 mkpath: SAVEDLISTS/S.maryann.13 is not a directory
 mkpath: SAVEDLISTS/S.maryann.13 is not a directory
 .
 .
 mkpath: SAVEDLISTS/S.maryann.13 is not a directory

 MaryAnn is setup like most everybody else.  Clarification on the
 significance of this message would be appreciated.

 --Bill
 ___
 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] UV 11.1 and HP Itanium

2011-01-11 Thread Richard Lewis
Our sysadmin would like me to ask:

How many out there are running UV 11.1 on Itanium?


Have any of you on UV 11.1 on Itanium had any issues with shared memory?

Thanks!

Richard Lewis
IBM Certified Solutions Expert
___
U2-Users mailing list
U2-Users@listserver.u2ug.org
http://listserver.u2ug.org/mailman/listinfo/u2-users


Re: [U2] UV 11.1 and HP Itanium

2011-01-11 Thread Richard Lewis
Not a problem.  Thanks for responding!

On Tue, Jan 11, 2011 at 6:15 PM, Bill Brutzman bi...@hkmetalcraft.comwrote:

 Two months ago, we upgraded to 10.3.6.

 In the original message, I dislexed Ux 11i and UV 11.1.

 I am considering upgrading to UV 11.1.

 --Bill

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org [mailto:
 u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Lewis
 Sent: Tuesday, January 11, 2011 7:05 PM
 To: U2 Users List
 Subject: Re: [U2] UV 11.1 and HP Itanium

 And what version of UV are you running?
 Richard

 On Tue, Jan 11, 2011 at 4:49 PM, Bill Brutzman bi...@hkmetalcraft.com
 wrote:

  We are running HP-Ux 11i v2 Itanium.
 
  We have not had any memory issues at all.
 
  --Bill
 
  -Original Message-
  From: u2-users-boun...@listserver.u2ug.org [mailto:
  u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Lewis
  Sent: Tuesday, January 11, 2011 6:10 PM
  To: U2 Users List
  Subject: [U2] UV 11.1 and HP Itanium
 
  Our sysadmin would like me to ask:
 
  How many out there are running UV 11.1 on Itanium?
 
 
  Have any of you on UV 11.1 on Itanium had any issues with shared memory?
 
  Thanks!
 
  Richard Lewis
  IBM Certified Solutions Expert
  ___
  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] Sparse array population in Pick

2010-12-09 Thread Richard Lewis
Will,

I used the second model (originally about 20 years ago) with the initial
empty value.  Neither model is really very simple, but with the second model
we created one or two I-descriptor subroutines that can allow dictionaries
to be tailored to any tag you want to look for and select for all values
associated with that tag quite nicely.  Display routines are also not too
daunting.

There are certainly worse file structures to deal with than the second
model.  But maybe I'm biased, I 'invented' its use at a previous company,
and I and the rest of the company worked with it for at least 15 years.

Best Regards,

Richard Lewis



On Thu, Dec 9, 2010 at 3:09 PM, fft2...@aol.com wrote:

 Years ago I had written a system, far predating XML, where the element-tags
 were unpredictable.  Essentially the user was allowed to create any tags
 they wished, and any number of tags they wished, attached to another item.

 Each tag had an associated value.  So far example
   Zip Code = 95062

 You could not however predict what tags a person would use, they were all
 free-form and user-supplied, but you still had to store the tag with their
 associated value.

 At the time I developed two ideas for how to do this in a Pick item

 TAGS1052
 001 Make = Chrysler
 002 Model = LeBaron
 003 Age = 7 years and 3 days

 TAGS1052
 001 Make]Model]Age
 002 Chrysler
 003 LeBaron
 004 7 years and 3 days

 The first model is clear.  Anyone with no programming background at all,
 can easily understand it, and also easily edit it.  It suffers from
 requiring
 more elaborate programming than the second model, as you have to parse
 every
 element.

 The second model is not quite as clear.  You determine the attibute
 position of the value by locate the tag in attribute 1 and then adding 1
 to it.
 That gives you the attribute number where the value lives.  Alternately you
 could simply pre-fill attribute 1 with an initial null to push everything
 forward 1 place, then you wouldn't have to add 1 after your locate.

 Comments?  Critiques?  Nasty cat-calls and grimaces?

 Will Johnson


 ___
 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] Upgrading and Migrating from Unix to Windows

2010-11-11 Thread Richard Conway
Thanks for this. Unidata for Windows does come with some 
transitioning/migration tools which check for path errors and problems caused 
by the loss of case-sensitivity, and so on.

Many thanks,

Richard

- Original Message -
From: Robert Houben robert.hou...@fwic.net
To:   Richard Conway rich...@rlcnet.co.uk, U2 Users List 
u2-users@listserver.u2ug.org
Sent: Tuesday Tuesday 09 November 2010 23:25:49
Subject: [U2] Upgrading and Migrating from Unix to Windows

Hi Richard,

We have both a Relational Data Access Server and a Direct Data Access Server 
that are written in fairly generic PICK/BASIC but with specific subroutines to 
do platform-specific stuff.  We run on pretty well all MV platforms including 
Unidata, Universe, PI/Open and even some very old Universe versions, both on 
Windows and *nix (Unidata on Dec Vax, even.)  We do this with a single code 
base for all platforms.

Until you decide that you want to know a specific process number, work with 
pipes and O/S files and other things like that, the BASIC code is not only 
interoperable, but if the version is even remotely close, you don't normally 
have to even compile.  That said, I'd compile just to be safe.

Check your code for any place where you run a command shell program or call an 
O/S specific function.  Also check for any pattern in a string that contains 
forward slashes.

Your peripherals are a different matter altogether...

Good luck!

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Conway
Sent: Tuesday, November 09, 2010 3:15 PM
To: 'U2 Users List'
Subject: Re: [U2] Upgrading and Migrating from Unix to Windows

Thanks for that, I hadn't actually downloaded it at that point and I didn't see 
it elsewhere on their web site.

My main concern is how the existing data and programs written in Unibasic 
actually handle the move from a Unix environment to a Windows one. I know there 
is at least one call to a Unix function that will fail, but I'm not sure about 
generally how interoperable the two environments are.

Has anyone tried anything like this? If so, what are the most likely/obvious 
pitfalls?

Richard

- Original Message -
From: Glorfield, Gordon gglorfi...@vertisinc.com
To:   'U2 Users List' u2-users@listserver.u2ug.org
Sent: Monday Monday 08 November 2010 19:23:21
Subject: [U2] Upgrading and Migrating from Unix to Windows

Along with being limited to two users, the UniData and UniVerse Personal 
Editions also have an eight-process limit and a limitation of modulo 10007 
assigned to a file. Also, the following add-ons do not function: Connection 
Pooling, EDA, NFA, RFS, UV/Net.

Right off of Rocket's U2 downloads page.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bob Woodward
Sent: Monday, November 08, 2010 2:08 PM
To: Richard Conway; U2 Users List
Subject: Re: [U2] Upgrading and Migrating from Unix to Windows

I think the size limit is something like a modulo of 10009 or there abouts, if 
memory serves me right.  It's been a long time.  You should be able to get the 
limitations from Rocket.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Conway
Sent: Monday, November 08, 2010 10:30 AM
To: U2 Users List
Subject: Re: [U2] Upgrading and Migrating from Unix to Windows

What are the file size restrictions with PE? Is there a comprehensive list of 
the restrictions present in PE anywhere that I can read/download?

Richard

- Original Message -
From: Bob Woodward bob_woodw...@k2sports.com
To:   Richard Conway rich...@rlcnet.co.uk, U2 Users List
u2-users@listserver.u2ug.org
Sent: Monday Monday 08 November 2010 18:20:24
Subject: [U2] Upgrading and Migrating from Unix to Windows

I think, at the very least, you're probably going to have an issue with the PE 
version limiting your file sizes.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Conway
Sent: Monday, November 08, 2010 5:00 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Upgrading and Migrating from Unix to Windows

I am about to try to upgrade an old Unidata server running Unidata 3.x on SGI 
Irix, to another machine running Windows Server 2003. I am going to set up the 
Windows box with Unidata 7.2.7 PE initially.

Has anyone tried such a drastic move? What is the best upgrade path to try? 
Unidata 3.x on Irix to Unidata 7 on Linux, then on to Unidata 7 on Windows? Or 
would a single jump upgrade actually work, with the help of vocupgrade and 
PATHSUB?

Richard

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

___
U2-Users mailing list
U2-Users

Re: [U2] Upgrading and Migrating from Unix to Windows

2010-11-11 Thread Richard Conway
Thanks very much for this. I feel better armed now.

Best regards,

Richard

- Original Message -
From: Jeff Schasny jscha...@gmail.com
To:   Richard Conway rich...@rlcnet.co.uk, U2 Users List 
u2-users@listserver.u2ug.org
Sent: Wednesday Wednesday 10 November 2010 15:17:14
Subject: [U2] Upgrading and Migrating from Unix to Windows

I have converted a number of Universe applications from various flavors 
of Unix/Linux to Windows (and vice versa) and each one presented its own 
challenges, but in general:

Use uvbackup/uvrestore to do the actual transfer of the application. 
This takes care of all the big vs little endian insanity and other file 
system level things that you don't want to deal with anyway. You will 
still have to reset all of your indexes using SET.INDEX.

Recompiling everything is easy. BASIC BP * (or whatever your basic 
source file(s) may be). Deciding what and how to to re-catalog things 
may be a bit more complex. Look at the VOC pointers for cataloged 
programs and create select lists of globally and locally cataloged 
programs then create a paragraph to re-catalog everything.

Any Unix level commands/scripts/programs will have to be recreated as 
windows commands/batch files/programs. Try running the SEARCH command on 
all of your UvBasic program source files and look for SH -c to find 
things executing shell commands. Speaking of which., save this list 
because you will need to change all instances SH -c to DOS /C. You 
may want to look into Microsoft Windows Services For Unix which among 
other things implements a very nice Korn  C shell on your Windows 
machine. More info here: 
http://technet.microsoft.com/en-us/library/bb463212.aspx

Printers. Universe automatically creates a spooler for each printer set 
up in windows however the SETPTR command does not like printer names 
with spaces in them. You will also want to look through your Unibasic 
source code for the SETPTR command and change printer names accordingly. 
Again SEARCH is your friend.

Check your VOC for file pointers which have pathnames to other 
directories. These will have to be changed to windows paths. SEARCH (I'm 
noticing a trend here) for things with an F as the first character in 
attribute 1 and a '/' as the first character on line 2.

Those are the biggest things that come to mind right now. You will 
undoubtedly encounter more. Feel free to send me a question if you get stuck

Richard Conway wrote:
 Thanks for that, I hadn't actually downloaded it at that point and I didn't 
 see it elsewhere on their web site.

 My main concern is how the existing data and programs written in Unibasic 
 actually handle the move from a Unix environment to a Windows one. I know 
 there is at least one call to a Unix function that will fail, but I'm not 
 sure about generally how interoperable the two environments are.

 Has anyone tried anything like this? If so, what are the most likely/obvious 
 pitfalls?

 Richard

 - Original Message -
 From: Glorfield, Gordon gglorfi...@vertisinc.com
 To:   'U2 Users List' u2-users@listserver.u2ug.org
 Sent: Monday Monday 08 November 2010 19:23:21
 Subject: [U2] Upgrading and Migrating from Unix to Windows

 Along with being limited to two users, the UniData and UniVerse Personal 
 Editions also have an eight-process limit and a limitation of modulo 10007 
 assigned to a file. Also, the following add-ons do not function: Connection 
 Pooling, EDA, NFA, RFS, UV/Net.

 Right off of Rocket's U2 downloads page.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org 
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bob Woodward
 Sent: Monday, November 08, 2010 2:08 PM
 To: Richard Conway; U2 Users List
 Subject: Re: [U2] Upgrading and Migrating from Unix to Windows

 I think the size limit is something like a modulo of 10009 or there
 abouts, if memory serves me right.  It's been a long time.  You should
 be able to get the limitations from Rocket.  

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard
 Conway
 Sent: Monday, November 08, 2010 10:30 AM
 To: U2 Users List
 Subject: Re: [U2] Upgrading and Migrating from Unix to Windows

 What are the file size restrictions with PE? Is there a comprehensive
 list of the restrictions present in PE anywhere that I can
 read/download?

 Richard

 - Original Message -
 From: Bob Woodward bob_woodw...@k2sports.com
 To:   Richard Conway rich...@rlcnet.co.uk, U2 Users List
 u2-users@listserver.u2ug.org
 Sent: Monday Monday 08 November 2010 18:20:24
 Subject: [U2] Upgrading and Migrating from Unix to Windows

 I think, at the very least, you're probably going to have an issue with
 the PE version limiting your file sizes.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard
 Conway
 Sent: Monday, November 08, 2010 5:00 AM

Re: [U2] Upgrading and Migrating from Unix to Windows

2010-11-09 Thread Richard Conway
Thanks for that, I hadn't actually downloaded it at that point and I didn't see 
it elsewhere on their web site.

My main concern is how the existing data and programs written in Unibasic 
actually handle the move from a Unix environment to a Windows one. I know there 
is at least one call to a Unix function that will fail, but I'm not sure about 
generally how interoperable the two environments are.

Has anyone tried anything like this? If so, what are the most likely/obvious 
pitfalls?

Richard

- Original Message -
From: Glorfield, Gordon gglorfi...@vertisinc.com
To:   'U2 Users List' u2-users@listserver.u2ug.org
Sent: Monday Monday 08 November 2010 19:23:21
Subject: [U2] Upgrading and Migrating from Unix to Windows

Along with being limited to two users, the UniData and UniVerse Personal 
Editions also have an eight-process limit and a limitation of modulo 10007 
assigned to a file. Also, the following add-ons do not function: Connection 
Pooling, EDA, NFA, RFS, UV/Net.

Right off of Rocket's U2 downloads page.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org 
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Bob Woodward
Sent: Monday, November 08, 2010 2:08 PM
To: Richard Conway; U2 Users List
Subject: Re: [U2] Upgrading and Migrating from Unix to Windows

I think the size limit is something like a modulo of 10009 or there
abouts, if memory serves me right.  It's been a long time.  You should
be able to get the limitations from Rocket.  

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard
Conway
Sent: Monday, November 08, 2010 10:30 AM
To: U2 Users List
Subject: Re: [U2] Upgrading and Migrating from Unix to Windows

What are the file size restrictions with PE? Is there a comprehensive
list of the restrictions present in PE anywhere that I can
read/download?

Richard

- Original Message -
From: Bob Woodward bob_woodw...@k2sports.com
To:   Richard Conway rich...@rlcnet.co.uk, U2 Users List
u2-users@listserver.u2ug.org
Sent: Monday Monday 08 November 2010 18:20:24
Subject: [U2] Upgrading and Migrating from Unix to Windows

I think, at the very least, you're probably going to have an issue with
the PE version limiting your file sizes.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard
Conway
Sent: Monday, November 08, 2010 5:00 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Upgrading and Migrating from Unix to Windows

I am about to try to upgrade an old Unidata server running Unidata 3.x
on SGI Irix, to another machine running Windows Server 2003. I am going
to set up the Windows box with Unidata 7.2.7 PE initially.

Has anyone tried such a drastic move? What is the best upgrade path to
try? Unidata 3.x on Irix to Unidata 7 on Linux, then on to Unidata 7 on
Windows? Or would a single jump upgrade actually work, with the help of
vocupgrade and PATHSUB?

Richard

___
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


[U2] Upgrading and Migrating from Unix to Windows

2010-11-08 Thread Richard Conway
I am about to try to upgrade an old Unidata server running Unidata 3.x on SGI 
Irix, to another machine running Windows Server 2003. I am going to set up the 
Windows box with Unidata 7.2.7 PE initially.

Has anyone tried such a drastic move? What is the best upgrade path to try? 
Unidata 3.x on Irix to Unidata 7 on Linux, then on to Unidata 7 on Windows? Or 
would a single jump upgrade actually work, with the help of vocupgrade and 
PATHSUB?

Richard

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


Re: [U2] Upgrading and Migrating from Unix to Windows

2010-11-08 Thread Richard Conway
What are the file size restrictions with PE? Is there a comprehensive list of 
the restrictions present in PE anywhere that I can read/download?

Richard

- Original Message -
From: Bob Woodward bob_woodw...@k2sports.com
To:   Richard Conway rich...@rlcnet.co.uk, U2 Users List 
u2-users@listserver.u2ug.org
Sent: Monday Monday 08 November 2010 18:20:24
Subject: [U2] Upgrading and Migrating from Unix to Windows

I think, at the very least, you're probably going to have an issue with the PE 
version limiting your file sizes.

-Original Message-
From: u2-users-boun...@listserver.u2ug.org
[mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard
Conway
Sent: Monday, November 08, 2010 5:00 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] Upgrading and Migrating from Unix to Windows

I am about to try to upgrade an old Unidata server running Unidata 3.x
on SGI Irix, to another machine running Windows Server 2003. I am going to set 
up the Windows box with Unidata 7.2.7 PE initially.

Has anyone tried such a drastic move? What is the best upgrade path to
try? Unidata 3.x on Irix to Unidata 7 on Linux, then on to Unidata 7 on 
Windows? Or would a single jump upgrade actually work, with the help of 
vocupgrade and PATHSUB?

Richard

___
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] UV index with duplicate nodes

2010-10-01 Thread Richard Brown
Look for a space or non printing character in the data.  That would make it 
look the same but actually be unique.



- Original Message - 
From: Richard Lewis rbl...@gmail.com

To: U2-Users@listserver.u2ug.org
Sent: Thursday, September 30, 2010 8:47 PM
Subject: [U2] UV index with duplicate nodes



We've just uncovered a rather unusual and unsettling situation.  We have a
file with a single index that has somehow gotten nodes with duplicate 
keys.
A simple example would be having an index on ZIPCODE in a address 
database,

and finding that there are _two_ nodes (records) in the index for ZIPCODE
12345, for example.  The source records referred to in the nodes are not
duplicated, but since most operations find the 'first' node, any source
records referred to in the duplicate node appear to not exist in the 
index.



LIST.INDEX fname ALL

Alternate Key Index Summary for file fname
File... fname
Indices 1 (1 A-type, 0 C-type, 0 D-type, 0 I-type, 0 SQL, 0 
S-type)

Index Updates.. Enabled, No updates pending

Index name  Type  BuildNulls  In DICT  S/M  Just Unique Field
num/I-type
fieldnameANot Reqd  YesYes  ML N2


The file contains 6,539,233 records, with 574,547 unique values in 
fieldname

(which is actually a single-valued field, and has been verified that each
record's fieldname contains one and only one value).  We found that 9 
source

records appear to have not been included in the index, but upon further
research found the nodes with duplicate keys.  We created an F-pointer to
the index file itself (not normally recommended, but useful), then got the
results like the following:

LIST indexfile WITH @ID = 12345] F1 F2

fname. F1 F2
12345  987654 876543
12345-6789 765432 543219
12345  654321

We are having our UniVerse administrator ask our dealer for assistance, 
but
were interested if any other users have had any recent similar 
experiences,

or advice.


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


Re: [U2] UV index with duplicate nodes

2010-10-01 Thread Richard Lewis
 into determining exactly how long a rebuild of this particular
index will take, as that seems like the best work-around for us at the
moment.

We are in the process of formalizing the steps we use to identify the
problem, and codifying that in a process that can be run on every index we
have, so that we can at least identify the scope of our issues and, if
rebuild is the only remedy, make plans to schedule them regularly.

If you would like to check your indexes, here are the steps we have found to
be reliable:

1.Create an F-pointer to the index directly, named indexfile, with the
Dict pointing to the dict of the data/source file.
2.SSELECT indexfile
3.SAVE.LIST XX
4.Create a DICT fname DUP dictionary item like this:
a.0001: I
b.0002: @2;@ID;@1...@2
c.0003:
d.0004:
e.0005: 3R
f.0006: S
5.GET.LIST XX
6.LIST indexfile WITH DUP # “0” DUP
7.Note the ID’s listed (dup_id1, dup_id2, etc.).  Use them as listing
criteria as follows:
a.LIST indexfile WITH @ID = “dup_id1]””dup_id2]” (etc.) F1 F2

Building a program to perform these tasks will be one of our next immediate
steps.  Any further suggestions or comments are most welcome!

Sincerely Best Regards,

Richard


On Fri, Oct 1, 2010 at 7:39 AM, David Wolverton dwolv...@flash.net wrote:

 This has been our issue in the past -- unless you look at that data with a
 HexEditor, it's not obvious.  If you use the UniData AE Editor (now
 included with UniVerse) you can type a ^ (Shift 6 - Caret) and see
 non-printable characters.  Once you know the culprit, you fix the source
 data and the index heals itself.

 David W.

 -Original Message-
 From: u2-users-boun...@listserver.u2ug.org
 [mailto:u2-users-boun...@listserver.u2ug.org] On Behalf Of Richard Brown
 Sent: Friday, October 01, 2010 6:02 AM
 To: U2 Users List
 Subject: Re: [U2] UV index with duplicate nodes

 Look for a space or non printing character in the data.  That would make it
 look the same but actually be unique.


 - Original Message -
 From: Richard Lewis rbl...@gmail.com
 To: U2-Users@listserver.u2ug.org
 Sent: Thursday, September 30, 2010 8:47 PM
 Subject: [U2] UV index with duplicate nodes


  We've just uncovered a rather unusual and unsettling situation.  We have
 a
  file with a single index that has somehow gotten nodes with duplicate
  keys.
  A simple example would be having an index on ZIPCODE in a address
  database,
  and finding that there are _two_ nodes (records) in the index for ZIPCODE
  12345, for example.  The source records referred to in the nodes are not
  duplicated, but since most operations find the 'first' node, any source
  records referred to in the duplicate node appear to not exist in the
  index.
 
 LIST.INDEX fname ALL
  Alternate Key Index Summary for file fname
  File... fname
  Indices 1 (1 A-type, 0 C-type, 0 D-type, 0 I-type, 0 SQL, 0
  S-type)
  Index Updates.. Enabled, No updates pending
 
  Index name  Type  BuildNulls  In DICT  S/M  Just Unique Field
  num/I-type
  fieldnameANot Reqd  YesYes  ML N2
 
 
  The file contains 6,539,233 records, with 574,547 unique values in
  fieldname
  (which is actually a single-valued field, and has been verified that each
  record's fieldname contains one and only one value).  We found that 9
  source
  records appear to have not been included in the index, but upon further
  research found the nodes with duplicate keys.  We created an F-pointer to
  the index file itself (not normally recommended, but useful), then got
 the
  results like the following:
 
  LIST indexfile WITH @ID = 12345] F1 F2
 
  fname. F1 F2
  12345  987654 876543
  12345-6789 765432 543219
  12345  654321
 
  We are having our UniVerse administrator ask our dealer for assistance,
  but
  were interested if any other users have had any recent similar
  experiences,
  or advice.

 ___
 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] UV index with duplicate nodes

2010-10-01 Thread Richard Lewis
Oh, I forgot to mention that we are on UV 10.3.2, HP-UX B.11.23 U.

Thanks!

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


[U2] UV index with duplicate nodes

2010-09-30 Thread Richard Lewis
We've just uncovered a rather unusual and unsettling situation.  We have a
file with a single index that has somehow gotten nodes with duplicate keys.
A simple example would be having an index on ZIPCODE in a address database,
and finding that there are _two_ nodes (records) in the index for ZIPCODE
12345, for example.  The source records referred to in the nodes are not
duplicated, but since most operations find the 'first' node, any source
records referred to in the duplicate node appear to not exist in the index.

LIST.INDEX fname ALL
Alternate Key Index Summary for file fname
File... fname
Indices 1 (1 A-type, 0 C-type, 0 D-type, 0 I-type, 0 SQL, 0 S-type)
Index Updates.. Enabled, No updates pending

Index name  Type  BuildNulls  In DICT  S/M  Just Unique Field
num/I-type
fieldnameANot Reqd  YesYes  ML N2


The file contains 6,539,233 records, with 574,547 unique values in fieldname
(which is actually a single-valued field, and has been verified that each
record's fieldname contains one and only one value).  We found that 9 source
records appear to have not been included in the index, but upon further
research found the nodes with duplicate keys.  We created an F-pointer to
the index file itself (not normally recommended, but useful), then got the
results like the following:

LIST indexfile WITH @ID = 12345] F1 F2

fname. F1 F2
12345  987654 876543
12345-6789 765432 543219
12345  654321

We are having our UniVerse administrator ask our dealer for assistance, but
were interested if any other users have had any recent similar experiences,
or advice.

Sincerely Best Regards,

Richard Lewis
IBM Certified Solutions Expert

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


Re: [U2] Escom MRP Consultant

2010-07-06 Thread Richard A. Wilson

What type of development/support are you seeking?

I have been supporting various version of Escom Mrp since 1979

Actually my last user is converting from Escom Job shop to Timberline
this summer


Thanks, Rich


Bryan Evans wrote:

I am looking for someone who has experience with Escom's MRP software
package as a short term consultant (off site or on-site in Salt Lake
City UT).  This is the package that was written back in 1995.  Please
contact me for more details if interested.

Thanks,

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




--
Richard A. Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
rwil...@lakeside-systems.com
www.lakeside-systems.com


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


Re: [U2] TRANSLATING LAST VALUE FROM A SINGLE VALUE

2010-05-22 Thread Richard Lewis
Try:

LIST FILE1 EVAL TRANS(FILE2,@RECORD1,DCOUNT(@RECORD1,@VM),'12','X')

Richard Lewis


On Fri, May 21, 2010 at 10:15 AM, James Patrick Volkman 
jamesvolk...@yahoo.com wrote:

 I'm attempting to do a translate and was wondering if anyone might have a
 suggestion.

 Attribute (or Field) 1 of File1 is a multi-valued foreign key to the
 Primary Key in File2. File2 contains a Date in Attribute 12. I want the
 latest date in Attribute 12 of File2 of all the values of Attribute 1 in
 File1.


 This is pulling 1 record from Attribute 1 of File1. How can I display the
 Date (Attribute 12 of File2)?

 LIST FILE1 1 EVAL @RECORD1,DCOUNT(TRANS(FILE2,@RECORD1,'12','X'),@VM)


  Jim Volkman
 http://www.linkedin.com/in/jamesvolkman




 ___
 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] The opposite of Export is.. sometimes not Import...

2010-01-21 Thread Richard Lewis
I would probably start by making an index on the Part Number, based on an
I-descriptor with an expression like this:

CONVERT(OCONV(OCONV(PartNumber,'MC/N'),'MC/A'),'',PartNumber)

where PartNumber is a D-pointer to the raw data field that is the Part
Number.  This will strip out all the non-alphanumeric characters.

You could then easily access by Part Number no matter how many dashes, dots,
etc. were entered on either system, via the index.

Best Regards,
Richard Lewis
Nu Skin Enterprises


On Thu, Jan 21, 2010 at 1:33 PM, John J. Wahl jw...@joseph.com wrote:


Off Topic but has anyone else noticed the Trend for the last three
 months is Help my boss, customer, friend wants to get ALL his columns, all
 his data or all his junk out of U2, and I'm not worried about getting it
 back in...  I'm in the opposite boat, I want to leave it in there, and I'm
 VERY comfortable with SQL Server, I'd rather they work together than choose
 one technology over the other.

My Question today is, if I'm writing a quick view in SQL Server I
 can write a nice little function to strip a field to just it's alpha numeric
 characters.  Then I'll be using this on a webpage to strip the Input of it's
 non-alphanumeric characters as well, thus showing more matches when values
 are entered for (in this case) part numbers were entered in an odd fashion.

Example:  User enters  1-2-3-4

 My data for a Part Number, might have

1-2-34
12-34
 AND
123-4

My systems on the Intranet (Employees only) would say no matches
 found I'm not ok with this response.  I think a direct match should be done
 first, but THEN additional searches are done, I even have a fuzzy one off
 Search using the SQL single Char replace (using _ based on the LEN of the
 input) and then a massive union query.  However I want to do this in our
 UniVerse system instead, as that's where the data truly resides, and so I
 would hope would be the fastest place to run this type of search.

I have no idea how to write an I type or Paragraph or Subroutine
 that will take a string in as the Variable and then pass back another string
 stripped to the AlphaNumeric only response so that I can search it.  I'm
 assuming a Subroutine would do the trick and then I can use that Sub in an
 Dict Entry as an Type I, no?  Where to begin?  .

 Thanks for your time,
 -
 John J. Wahl
 Employee Owner
 Programmer / Analyst (Born in Microsoft, but now a U2 lover...)
 Tel:   (330) 528-0091 Ext. 120
 Fax:   (330) 655-8458
 Email: jw...@joseph.com
 Web:  http://www.Joseph.com/


 If the ship is not sinking why are you all jumping off?

 ___
 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] Capturing output from a Command line program?

2009-10-22 Thread Richard Blackman

Hi All, 

I am trying to capture the output from an EXECUTE statement on a command
line program but nothing is being captured, even though I know there is some
output.

Here is the command

 CMD = 'C:\usr\lib\sendmail -t  ':EMAIL.TEMPFILE:''
 EXECUTE DOS /c:CMD CAPTURING TRASH

Cheers,

Richard Blackman

-- 
View this message in context: 
http://www.nabble.com/Capturing-output-from-a-Command-line-program--tp26021253p26021253.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] UD: Executing small part of subroutine code once from dictionary call

2009-08-20 Thread Richard Lewis
Bill,

A little while ago there was a thread about running totals, and the same
problem of initialization came up.  It's apparently solved by using an
additional named commons variable that saves the date and time last
initialized compared to the current date and time of 'this' LIST/etc.
statement.  Here's a post that used that method:

http://www.mail-archive.com/u2-users%40listserver.u2ug.org/msg30268.html

Best Regards,

Richard Lewis

On Thu, Aug 20, 2009 at 3:28 PM, Bill Haskett wphask...@advantos.netwrote:


  I have a UD dictionary that calls a subroutine.  The subroutine selects a
 small file and saves the data into a reformatted array, which is returned as
 a passed variable.

 I want to only execute this select code once in the subroutine then
 continue with the reset of the subroutines business rule(s) for subsequent
 items processed.  When I create a named common variable for the built data
 array the array is set once and when I alter the data in the selected file
 (small) it never is updated when I run a subsequent selects or sorts.

 UniData doesn't seem to be able to inform me when the first item is
 processed, in order to initialize, read, and build the configuration array.
  How is this done?

 E.g. I want to know what accounts a user has access to (we run an ASP with
 50-100 accounts on it and our users file is global).  The dictionary builds
 an array of users on our system as follows:

 001 mv'd list of user names
 002 mv'd list of upper-cased user names
 003 mv'd list of account paths each user has access to

 A user can have access to multiple account paths.  When I do the following
 (in PICK mode):

 :sort SECUSERS BY USERID ID-SUPP USERID ACCTUSER AUTHACCTS

 ...I get the following list of users and account paths they have access
 to:

 UserId. C. AuthAccts.

 PUBLICUSER   1 E:\UDAccounts\AsiPublic
   E:\DataTrust\Dev
   E:\DataTrust\Demo
 DOTNETUSER   1 E:\DataTrust\Demo
   E:\Advantos\Intel
   E:\DataTrust\Dev
 MYUSER   1 E:\DataTrust\Dev
   E:\DataTrust\Demo
   E:\Advantos\Intel


 The dictionary of AUTHACCTS looks like:

 Top of AUTHACCTS in DICT SECUSERS, 6 lines, 113 characters.
 *--: P
 001: I The authorized accounts this user has access to (a DBIUSERS value)
 002: SUBR( D.AUTHACCTS, @ID )
 003:
 004: AuthAccts
 005: 30L
 006: M
 Bottom.
 *--:


 ...and the subroutine looks like:

 *
 ** Initialize common program variables
 $INCLUDE DTABP,INCLUDES SET.COMMON
 *
 ** Initialize local common
 COMMON /dbUserc/ comDbiUserArray
 *
 ** Initialize null because we're calling from a dictionary and SET.INIT
 ** hasn't run yet (besides NULL$ isn't named common).
 NULL$ = ''
 *
 ** Initialize return value
 OutValue = NULL$
 *
 ** Make sure we're dealing with a user record key
 IF UserID = NULL$ THEN GOTO END.OF.PROGRAM
 *
 ** Get the list of DB users
 IF comDbiUserArray = NULL$ OR comDbiUserArray = 0 THEN
   CALL GET.DBIUSERS ( DbiUserArray )
   comDbiUserArray = DbiUserArray
 END
 *
 **---**
 **   **
 **   R U N   P R O G R A M   **
 **   **
 **---**
 *
 ** Assign the names Id  intialize variable to pass back
 UCDbiUserList = comDbiUserArray2
 DbiUserPaths  = comDbiUserArray3
 UserID= OCONV(UserID, 'MCU')
 LOCATE(UserID, UCDbiUserList, 1; Pos) THEN
   OutValue = RAISE(DbiUserPaths1,Pos)
 END


 The problem is once I run the query the contents of the array
 comDbiUserArray will never change until I log off.  How can I force the
 array to be initialized without logging off?

 Any help would be appreciated.

 Thanks,

 Bill Haskett
 Advantos Systems, Inc.

 ___
 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] I Descriptor for long filename in type 1 file

2009-06-22 Thread Richard Brown

I don't have a system to check this on but how about
0001: I
0002: OCONV(FIELD(@ID,'_',2),'D2.')
0003:
0004: DATE
0005: 8R
0006: S


- Original Message - 
From: Norman, David (Health) david.nor...@health.sa.gov.au

To: u2-users@listserver.u2ug.org
Sent: Monday, June 22, 2009 9:46 PM
Subject: [U2] I Descriptor for long filename in type 1 file



UV 10.2.16 HP-UX 11i
UFD is a type 1 file by default. I have some files in UFD with long 
filenames that go down 1 level. I have created an I-type to extract 
delimited fields within the @ID which either spans the 2 levels, or is 
wholly in the 2nd level.
Using this I-type to display in a LIST works perfectly. However, as soon 
as a WITH references this field, nothing is returned. E.g.:


LIST UFD WITH @ID LIKE ...as... SAMPLE 5 DATE2 11:10:14  23-06-09  PAGE 
1

OS filename...DATE
LOG.as13713_15125_49176   29.05.09
LOG.as13713_15125_58659   29.05.09
LOG.as13713_15125_59104   29.05.09
LOG.as13713_15125_59132   29.05.09
LOG.as13713_15125_60631   29.05.09

Sample of 5 records listed.


::LIST UFD WITH DATE2 = 29.5.09
0 records listed.

The DICT of DATE2 is:
0001: I
0002: FIELD(@ID,'_',2)
0003: D2.
0004: DATE
0005: 8R
0006: S

I don't want to resize UFD to type 19 on this mission-critical 24x7 
system - how else can I get WITH to use these fields ???



David Norman
Senior Software Engineer - SA Ambulance Service

ICT Services
SA Health
Government of South Australia

Box 3, GPO
Adelaide, South Australia 5001
*+61 8 8274 0384
* fax +61 8 8271 4844
* norman.da...@saambulance.com.aumailto:norman.da...@saambulance.com.au


This e-mail may contain confidential information, which also may be 
legally privileged. Only the intended recipient(s) may access, use, 
distribute or copy this e-mail. If this e-mail is received in error, 
please inform the sender by return e-mail and delete the original. If 
there are doubts about the validity of this message, please contact the 
sender by telephone. It is the recipient's responsibility to check the 
e-mail and any attached files for viruses.




___
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] [UV] Type 30 Semaphore Stuck - HELP!!!

2009-05-01 Thread Richard Nuckolls

Scott,

If you have UVNET, there is a work around that I came up with:  Create  
a shadow account with all file pointers that go to dynamically  
hashed files repointed to the network version of the file name, ie  
myserver!/diskpath.  Then repoint your UniObjects to the shadow  
account.


The UVNET version of the rpc mechanism does not have the same problem  
closing dynamic files as UniObjects.


-Rick


On Apr 30, 2009, at 3:43 PM, iggch...@comcast.net wrote:


Thanks for the info Rick.B  I'll give it a look.




- Original Message -
From: Richard Nuckolls r...@lynden.com
To: u2-users@listserver.u2ug.org
Sent: Thursday, April 30, 2009 11:35:49 AM GMT -06:00 US/Canada  
Central

Subject: Re: [U2] [UV] Type 30 Semaphore Stuck - HELP!!!

If, by chance, you are using UniObjects, there is a bug in it, fixed B
at 10.2.22, that can cause this problem when a session times out or B
otherwise exits in a less than optimal manner.

I think that a corrupt file or index can also cause this problem

Alternately, you might check to see if there is anything in {uvhome}/
errlog.

Rick Nuckolls
Lynden Inc

On Apr 29, 2009, at 11:38 AM, iggch...@comcast.net wrote:


Hi All,



UV10.2.7 Pick

HPUX 11.11



Someone (ok me) decided to resize a file today from dynamic to B
static.B
ShortlyB a fter that, the system came to a halt because the type 30 B
semaphore
flag was stuck.B B Can anyone tell me how/why this happened? The  
file B

I resized
is fine.B B I've been using the CONCURRENT flag with the resize B
lately B and
haven't encountered any issues.B B However, I've never (and will B
never again)
change from dynamic to static with otherB usersB on the system. B B  
I B

did clear
the lock (UNOCK T30LOCK SEMAPHORE) but about an hour later it got B
stuck
again.B B I found the users that had the file open using /etc/fuser B
pathname
and had them log out.B B Is there anythingB B I can check to find  
out B

why this
keeps happening?



Also, any inside knowledge on how the resize using the concurrent B
option
actually works would be appreciated.



Thanks muchB in advance,



Scott
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] UniObjects for Java on Ubuntu anyone?

2009-02-13 Thread Richard Nuckolls
I have not used Ubuntu, but try optioning Java with - 
Dfile.encoding=iso8859-1
If you are were tomcat, this would go in the CATALINA_OPTS environment  
variable. (setenv.sh)


-Rick




On Feb 13, 2009, at 2:34 PM, Jeff Powell wrote:


The LANG variable issue takes a new twist with Ubuntu Server 8.10.
Neither LANG=C (IBM recommended) or LANG=en_US.iso885915 (must use for
RedHat) will work. The value marks are wrongly used as field marks.  
And

in case you're  wondering no, LANG=en_US.UTF-8 also does not work.

Has anyone made UniObjects for java work on Ubuntu?

Thanks.

Jeff
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] English phrases

2008-07-24 Thread Richard A. Wilson

everything in field2 seperated by spaces should do it
PH
F1 F2 F3 F4 etc

Rich
Boyd Parks wrote:

I am trying to use the same phrase in Universe as I use in jBASE, but it is
not working properly on our Universe systems.

The beginning of my definitions on both jBASE and Universe look like this:


ED DICT DH CA.ATTRS

DICT DH CA.ATTRS (BACS)
Top
.P

001 PH
002 PHONE-CHECK
003 COLL.SCORE
004 CA.AVAILCR
005 SSN.DECEASED
006 SSN.DOD
007 292
008 CA.BK7
009 CA.BK11
010 CA.BK13

The problem with the phrase is that it only lists the first definition in the
phrase.  I just tested by
removing PHONE-CHECK (it is a Basic subroutine call, whereas all the others
are normal, local
definitions), but that is not the issue.  Here is the output:

LIST DH 6793700 CA.ATTRS 10:36:09am  18 Jul 2008  PAGE1
DEBHIST... COLLECTABILITY

6793700   592

1 records listed.
Many more attributes should have been listed.

Any ideas?


Boyd Parks
HOV Services
CUBS Software Engineering
O: 678-229-5002
C: 770-975-3303
Any technology distinguishable from magic is insufficiently advanced.
--Larry Niven's Corollary to Clarke's 3rd Law.

[cid:image001.jpg@01C8ED87.ACA82E10]
The information contained in this message, including any attachments, is
privileged and/or confidential information intended only for the use of the
individual or entity named as addressee. The review, dissemination,
distribution, or copying of this communication by or to anyone other than the
intended addressee is strictly prohibited. If you have received this
communication in error, please immediately notify the sender by replying to
the message and destroy all copies of the original message








The information contained in this message, including any attachments, is
attorney privileged and/or confidential information intended only for the use
of the individual or entity named as addressee. The review, dissemination,
distribution or copying of this communication by or to anyone other than the
intended addressee is strictly prohibited. If you have received this
communication in error, please immediately notify the sender by replying to
the message and destroy all copies of the original message.

[demime 1.01d removed an attachment of type image/jpeg which had a name of 
image001.jpg]
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/




--
Richard A. Wilson
Lakeside Systems
Smithfield, RI, USA
Voice 401-231-3959
Fax   206-202-2064
[EMAIL PROTECTED]
www.lakeside-systems.com
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Multiple columns from a LIST statement?

2008-07-16 Thread Richard Sammartino
You didn't say if you are on windows or unix but I addressed this issue using 
the split and paste commands from unix and sending the output to _HOLD_. The 
report was just a list of id numbers. Below is a sample. You may have to 
wrestle with lists that are more than 1 segment. I hope this helps. 

EXECUTE 'SSELECT FILENAME WITH @ID LIKE WHATEVER 
EXECUTE 'SAVE.LIST LISTNAME' 
[EMAIL PROTECTED] 
VAR=INT(VAR/4) + 1 
PCPERFORM 'split -':VAR:' ./SAVEDLISTS/LISTNAME000 
PCPERFORM 'paste DCaa DCab DCac DCad  ./_HOLD_/DC.TXT' 

Rich 

Richard Sammartino 
Systems Analyst 
School District of Philadelphia 
440 N Broad Street 
Philadelphia, PA 19130 
Phone (215) 400-5086 
Fax (215) 400-4411 

- Original Message - 
From: Edward Brown [EMAIL PROTECTED] 
To: u2-users@listserver.u2ug.org 
Sent: Wednesday, July 16, 2008 7:34:32 AM GMT -05:00 US/Canada Eastern 
Subject: [U2] Multiple columns from a LIST statement? 

Hello, 

This is a unidata (7.1) reporting question, and I'm asking because 
although I can't find the answer in the documentation, I do think I've 
seen it once on another developer's screen. 

Suppose I list a file with a command like LIST ACCOUNTS. I'd get a list 
of the IDs down the left hand side of the page but a lot of wasted space 
elsewhere - and a maximum of 22 / 60ish records per screen / A4 page. So 
what I'm wondering is if there's a way to have the report make use of 
multiple columns, using the horizontal space available before jumping to 
the next page? 

Thanks 

Edward 

- 
-- 
Please remember to recycle wherever possible. 
Reduce, reuse, recycle, think do you need to print this e-mail? 
- 
-- 
This e-mail and any attachment(s), is confidential and may be legally 
privileged. It is intended solely for the addressee. If you are not the 
addressee, dissemination, copying or use of this e-mail or any of its content 
is prohibited and may be unlawful. If you are not the intended recipient 
please inform the sender immediately and destroy the e-mail, any attachment(s) 
and any copies. All liability for viruses is excluded to the fullest extent 
permitted by law. It is your responsibility to scan or otherwise check this 
email and any attachment(s). Unless otherwise stated (i) views expressed in 
this message are those of the individual sender (ii) no contract may be 
construed by this e-mail. Emails may be monitored and you are taken to consent 
to this monitoring. 

Civica Services Limited, Company No. 02374268; Civica UK Limited, Company No. 
01628868 
Both companies are registered in England and Wales and each has its registered 
office at 2 Burston Road, Putney, London, SW15 6AR. 
- 
-- 
--- 
u2-users mailing list 
u2-users@listserver.u2ug.org 
To unsubscribe please visit http://listserver.u2ug.org/ 
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Re: ODBC Connection Hanging Around

2008-05-28 Thread Richard Taylor
Kevin,

It sounds as though the server is seeing the disconnects, but the client is
not getting the response back to recognize that it is truly disconnected.
Therefore the object is waiting on  a response.   I am not sure if the
driver is thread safe, but I would not count on it.

I might suggest putting all your communications code in a separate module
and subroutine.  Also don't wait on the response since it seems like the
closing is actually happening.  Make all the object variables local to that
module/subroutine so that when that routine exits they will fall out of
scope and should get cleaned up.

Rich Taylor | Senior Programmer/Analyst| VERTIS
250 W. Pratt Street | Baltimore, MD 21201
P 410.361.8688 | F 410.454.8392
[EMAIL PROTECTED] | http://www.vertisinc.com

Vertis is the premier provider of targeted advertising, media, and
marketing services that drive consumers to marketers more effectively.

The more they complicate the plumbing
  the easier it is to stop up the drain

- Montgomery Scott NCC-1701
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Record Locking Problems

2008-05-08 Thread Richard Taylor
I assume that the SUB.LOCKED.SOH.RO is called to do the lock and then
returns.

The problem is that you open the file in this routine to do the locking
against.  Once this subroutine ends that file handle will go out of scope
(it was defined local to this subroutine) and the file is closed.  That
releases the lock.

The best way would be to pass in an open file handle.  If that is not
possible for some reason then open the file to a variable defined in named
common and test to see if it is already open using FILEINFO() before
attempting to do the open.

such as:

COMMON /MY.FILE.HANDLES/ F.THIS.FILE

IF FILEINFO(F.THIS.FILE,0) = 0 THEN
OPEN .
END


I would prefer passing in the open file handle myself if possible.  Named
common is very useful, but care needs to be taken in it's use.  For example
the common memory defined is associated to the process and not the account.
Therefore if you logto another account without first exiting U2 the file
handle would still be open, BUT pointed at the file in the account where it
was opened.   You would need to have logic in the logins to test for this
or add additional checks (using FILEINFO again for the path where the file
is located)

Rich Taylor | Senior Programmer/Analyst| VERTIS
250 W. Pratt Street | Baltimore, MD 21201
P 410.361.8688 | F 410.454.8392
[EMAIL PROTECTED] | http://www.vertisinc.com

Vertis is the premier provider of targeted advertising, media, and
marketing services that drive consumers to marketers more effectively.

The more they complicate the plumbing
  the easier it is to stop up the drain

- Montgomery Scott NCC-1701



   
 Brutzman, Bill  
 [EMAIL PROTECTED] 
 ft.comTo 
 Sent by:  'u2-users@listserver.u2ug.org'
 [EMAIL PROTECTED] u2-users@listserver.u2ug.org  
 stserver.u2ug.org  cc 
   
   Subject 
 05/07/2008 12:02  [U2] Record Locking Problems
 PM
   
   
 Please respond to 
 [EMAIL PROTECTED] 
er.u2ug.org
   
   




I am trying to make sure that if one Customer.Service rep is updating a
Sales Order, then the other Cust.Svc rep is
blocked from accessing the same record.

The following code will indicates that the record is locked but when the
2nd
user goes in (in an independent session), the second user gets in no
problem.

Since it does not seem to do what I think that it should, [1] I am
wondering
if I am missing something.  [2] I am inclined to create a file to handle
this (brute force) with multivalues for user, port, time, date, program,
file, record.

Comments would be appreciated.

--Bill



  SUBROUTINE SUB.LOCK.SOH.R0 ( Record.ID, Error.Code )

  prompt ''

  open 'SOH' to F.This.File  else  gosub  Error.Opening.File

  gosub Lock.And.Hold

  goThe.End

*---

--
*---

--
Lock.And.Hold:

  Lock.Test = recordlocked (F.This.File, Record.ID)

 crt '**11 Lock.Test ' : Lock.Test : '  [] '
 input Ans

  begin case
case Lock.Test =  0  ;  recordlocku F.This.File, Record.ID
case 1   ;  gosub Error.Record.Locked
  end   case

 Lock.Test = recordlocked (F.This.File, Record.ID)

 crt '**12 Lock.Test ' : Lock.Test : '  [] '
 input Ans

return

*---

---
Error.Record.Locked:

  Lock.Test = recordlocked (F.This.File, Record.ID)

  crt '**13 Lock.Test ' : Lock.Test : '  [] '
  input Ans

  Error.Code = 'E'

  crt @(-1)
  crt @(-5)

  crt
  crt
  crt
  crt
  crt
  crt
  crt
  crt
  crt
  crt '' : @(-6)
  crt
  crt ' ___  '
  crt ' \  \ '
  crt '  \   Error, Record Locked   \'
  crt '   \__\Try Later  '
  crt ' 

Re: [U2] Indexes have disappeared

2008-04-23 Thread Richard Nuckolls
Are the file systems truly identical, or are you using symbolic links  
to make them look the same?


Use SET.INDEX filename INFORM

to see where your index is really pointing.

-Rick

On Apr 22, 2008, at 3:12 PM, Louie Bergsagel wrote:

We use flashcopy to move data from one computer to another, and  
recently
noticed that UniVerse is no longer recognizing the indexes even  
though they

are copied along with the files.

We recently upgraded to UniVerse 10.2.7 (Pick syntax)

Has anybody heard of this weirdness?

-- Louie in Seattle
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Richard Taylor/VERTIS is on vacation

2008-03-18 Thread Richard Taylor
I will be out of the office starting  03/18/2008 and will not return until
03/27/2008.

I will respond to your message when I return.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2][UV] Type 18 File Hashing Algorithm

2008-02-13 Thread Richard Sammartino
Perry, in Unidata there is the RECORD command which will return the group
number to which a record will hash. Unidata does not support type 18 files
so I don't know what you will have access to in Universe. If the command
exists, you could create and empty file with the appropriate modulo and then
execute the RECORD command against this file with whatever aid you choose to
use. I can't speak for the overhead in executing this command repeatedly.

Rich Sammartino
 
Richard Sammartino
Systems Analyst
School District of Philadelphia
440 N Broad Street
Philadelphia,  Pa 19130
Phone: (215) 400-5086
Fax:   (215) 400-4411 


-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Perry Taylor
Sent: Wednesday, February 13, 2008 9:00 AM
To: u2-users@listserver.u2ug.org
Subject: [U2][UV] Type 18 File Hashing Algorithm

I need to come up with an equivalent in BASIC to UniVerse's type 18 file
hashing algorithm.  I understand that IBM treats this as proprietary but
I was hoping someone could shed some light on how I might pull this off
in BASIC.  The following code works fine until the length of the ID
exceeds eight characters 


GROUP = 0
LEN.ID = LEN(ID)

FOR NC = 1 TO LEN.ID

GROUP = GROUP * 10 + SEQ(ID[NC, 1])

NEXT NC

IF GROUP THEN GROUP = MOD(GROUP, FILE.MODULUS) + 1


Thanks.

Perry Taylor
Zirmed, Inc.

CONFIDENTIALITY NOTICE: This e-mail message, including any attachments, is
for
the sole use of the intended recipient(s) and may contain confidential and
privileged information.  Any unauthorized review, use, disclosure or
distribution is prohibited. ZirMed, Inc. has strict policies regarding the
content of e-mail communications, specifically Protected Health Information,
any communications containing such material will be returned to the
originating party with such advisement noted. If you are not the intended
recipient, please contact the sender by reply e-mail and destroy all copies
of
the original message.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] UV Autologout Quirks

2008-02-12 Thread Richard Nuckolls
I would guess that the result of autologout on Unix or Linux may  
depend on how Universe was invoked.


If it was invoked from a Unix shell, such as ksh, as a command then  
autologout probably just exits Universe, leaving the user back in the  
shell.


On the other hand, if the original .profile, or a script masking the  
uv command uses exec uv to start Universe instead, then the user  
should be completely out of the system after being logged out of  
Universe.


-Rick Nuckolls
Lynden Inc.

On Feb 12, 2008, at 7:26 AM, Kevin King wrote:

A typical user with a 30 minute logout
time shows up to 14+ hours of idle (via who -u in Linux) and yet  
according

to their autologout time they should have been gone hours earlier.

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] UniObjects error 30105 Unable to load subroutine on server

2008-02-05 Thread Richard Nuckolls
Okay,  but do you reset the routine name before each call?  This  
should not be necessary, but I think that that is what the error  
message is implying is wrong.


-Rick Nuckolls

On Feb 2, 2008, at 2:44 PM, Anthony W. Youngman wrote:


And all the arguments are assigned in my VB app before I call it

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] Slave Printing Problem

2008-01-22 Thread Richard Sammartino
Karen, when we sent output to a slave printer we check to see if the
emulator is using a VT100 or WYSE 60 setting. For the VT100, we send
CHAR(27):[5i. This turns transparency on. When we are done we send
CHAR(27):[4i. For the WYSE 60 we send CHAR(18) to turn on and CHAR(20) to
turn it off. I also found some code that used at one time CHAR(27):d%  and
CHAR(27):d#. I hope this helps.

Rich

Richard Sammartino
Systems Analyst
School District of Philadelphia
440 N Broad Street
Philadelphia,  Pa 19130
Phone: (215) 400-5086
Fax:   (215) 400-4411 




---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Uniobjects for Java

2008-01-22 Thread Richard Nuckolls
You need to set your classpath, which indicates where you need to  
look for code.
In your case, were you are probably executing javac in the same  
location that you have placed the test program, try


set CLASSPATH=C:\IBM\UniDK\uojsdk\asjava.zip;.

Note the period after the semicolon which indicates that you are  
including the current directory.


See

http://java.sun.com/j2se/1.3/docs/tooldocs/win32/classpath.html

for a write up.

-Rick


=
Richard Nuckolls
Lynden, Inc.


On Jan 22, 2008, at 8:34 AM, [EMAIL PROTECTED] wrote:

I am checking out Uniobjects for Java and am putting together a  
test app.

I include the line

import asjava.uniobjects.*;

 outside of the Class, but get a message The import asjava cannot be
resolved.

The Uniobjects software from the client disc is installed at
C:\IBM\UniDK\uojsdk.  Do I need to register the library, or provide  
the

full path to the lib?

Charles Shaffer
Senior Analyst
NTN-Bower Corporation
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Universe usa hangs

2008-01-11 Thread Richard Nuckolls

This is a known bug in 10.2.x

The solution is to get the 10.2.0 version of the usa/usm/usp binary.

-Rick

=
Richard Nuckolls
Lynden Inc.


On Jan 11, 2008, at 6:38 AM, Kevin King wrote:


I'm assisting with getting UV10.2 up on a SuSE 10.1 box, and there's a
couple of things that are disturbing me.  First, the /usr/bin/disable
command doesn't seem to want to disable a print queue, but more
importantly when issuing this command from bash:

usa -p printer -F form

...where printer and form are a valid printer and form name, usa
does not return to the $ prompt.  If you press Ctrl-C and check the
printer via:

usa -p printer

...it does in fact show the form name as mounted on the printer.  But
I would think this should not require a Ctrl-C.  Any clues?

-Kevin
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] testing

2007-12-24 Thread Richard Brown

Check the PH file.

Richard

- Original Message - 
From: Doug Chanco [EMAIL PROTECTED]

To: u2-users@listserver.u2ug.org
Sent: Monday, December 24, 2007 11:39 AM
Subject: RE: [U2] testing



A wonderous and happy holidays to all!

If anyone happens to be reading this list , I do have one universe
phantom question 


Is there anyway to see what a phantom did?  At my last job there was a
way to see phantom output (it wrote to a phantom log file, if you
started the phantom with logging)

Hopefully there is something similar in universe (10.1)

Thanks,

Dougc

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of gerry-u2ug
Sent: Monday, December 24, 2007 10:34 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] testing

hohoho
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

--
This message has been scanned for viruses and
dangerous content by SecureMail, and is
believed to be clean.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] IBM web site

2007-12-20 Thread Richard Nuckolls
I cannot say that it is on the front page, but I had no trouble  
finding it in menus at the ProductsSoftwareSoftware by Catagory  
Data  Database Management Tools Page. :-D


-Rick Nuckolls
Lynden Inc


On Dec 20, 2007, at 8:00 AM, Martin Phillips wrote:

Hopefully nothing sinister here but has anyone else noticed that  
the U2
products appear to have vanished from IBM's product list on their  
web site.
Support and training are still available but I cannot find any  
reference in

the areas one would visit as a prospective purchaser.

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] locked file help in U2 VER 9 NT 4

2007-11-29 Thread Richard Nuckolls
I have seen this happen when a file gets an inconsistent state flag  
set.  Are you doing Transaction Logging?


Try

RECOVERY.CONSISTENT pathname

to reset the flag.
=
Richard Nuckolls
Lynden Inc.
[EMAIL PROTECTED]


On Nov 30, 2007, at 12:46 AM, Dave R wrote:

My inventory file is locked and will not allow updates (writes or  
ed/fi) it
hangs and then logs me out. I looked at UVFIXFILE but was unsure of  
what flags

to run.
I tried CLEAR ALL that cleared 2 locks but didn't release the file.
I rebooted and that server and still no release.
I then created a bu-inv file and copied the records into the new file.
I tried in windows to rename the old file and windows said there is  
a sharing

violation.
I eventual set the Voc to point to the back up file so every one  
could go back

to work.
I am will shut down the Universe services this week end and try to  
rectify the

problem un less some has a hot solution.
Any suggestions would be usefully.

Dave R

e Fax (815)4259364
P.O. Box 17811, Irvine CA 92623-7811
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


[U2] Richard Taylor/VERTIS is out of the office.

2007-11-20 Thread Richard Taylor
I will be out of the office starting Tue 07/17/2007 and will not return
until Mon 11/26/2007.

I will respond to your message when I return.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Putting Universe on a SAN

2007-11-09 Thread Richard Nuckolls

re SAN's and Universe:

DELETE.FILE and RESIZE.FILE will not work on dynamic files that are  
NFS mounted. (Universe keeps the DATA.30 file open while trying to  
delete the enclosing directory.  This will fail on an nfs mounted  
directory.) Override the VOC entry with your own version.


Do not access a snapshot of a file from the same mount as the  
original.  At least on NetApps, the inode of the snapshot will  be  
the same as the inode of the original.  Universe will confuse the data.


Besides the usual caveats about making sure that a single machine  
controls locks for any given file, it is also worthwhile to keep the  
NFS under a set folders(4-6 or so) and then give each of these  
folders its own mount point on the host machine. Effectively creating  
multiple devices under UV.


Of course: do not try this without a good UPS.  Most SAN's have one  
built in too.


Corruption of a group is still possible, but our experience has been  
good.


My advice would be to replicate snapshots rather than live data  
(Unless you are using Uv Replication).  With snapshots, you can  
temporarily suspend IO, take a snapshot, and continue.


If you are doing live replication at the SAN level, then a major  
problem (an errant DELETE.FILE, for instance) will be replicated on  
your backup SAN.  Also, suspending IO will avoid catching files in  
transitional states.


Good Luck!

-Rick Nuckolls
Lynden, Inc

On Nov 9, 2007, at 11:01 AM, Jerry Banker wrote:

 Does anyone know if the problems they were having were fixed or  
could be fixed?


Not at 10.2.2 for those mentioned above.  I have not used Uv Data  
Replication.

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] [UV] Installing UniObjects

2007-11-08 Thread Richard Nuckolls
The unirpcd is the only thing that is necessary on the server side,  
and this comes with 10  above.  asjava.zip needs to be in the  
classpath on the client.


You will ultimately be better off, I think, if you do two things:

Create wrapper classes around the primary asjava classes so that you  
can modify their behavior.
Plan on using middleware, such as servlets,  for actually accessing  
Universe in a production situation.


The list could extend for quite a ways.  There are enough booby traps  
there to keep you entertained for a while.


More advice:

Use subroutines as much as reasonably possible.
Create a UvSession interface, and program to it rather than to  
UniSession.  This will help in many ways in the long run.
Use a UV subroutine that opens files to common on the back end and  
hands out the index to the location.  (You can only open a small,  
arbitrary number of UniFiles simultaneously, so the common will allow  
you to extend that number.)
Try to do as much conversion as you can on the host, prior to moving  
data to the client.  The asjava routines do conversions by calling  
back to the host, which is terrible inefficient.  (Or, if you are  
slightly nuts, you can re-implement the common conversions in Java.   
Hmmm, maybe I was nuts a while back.)


The innards of UniObjects can be confusing at points.  If you try to  
access UV delimited strings outside of the UniDynArray class, you  
will eventually stumble on character encoding issues, wherein the  
delimiters are improperly mapped.  The problem is that some platforms  
default to UTF-8 for converting between bytes and characters.  The  
asjava classes could easily deal with this, but they have not.  This  
can be mitigated by using the following option on the Java executable:


-Dfile.encoding=iso8859-1

There was an issue, #8776, that was finally fixed in 10.1.22 ( I  
think), and also in 10.2.1, that can affect Universe adversely if a  
client session times out or otherwise terminates abruptly.  If you  
are running any client software (UCI, UniObjects for Java, or the  
other kind), and use dynamic files, then move to a version without  
this issue.  Dangling group locks can be irksome.


Good luck!
-Rick



On Nov 8, 2007, at 6:43 PM, Ray Wurlod wrote:

As far as I'm aware (in version 10) it's just there - you don't  
need to install anything.

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] UV - 10.2.2 [not-secure]

2007-11-06 Thread Richard Nuckolls

Clifton,

usa, usm, usp (all the same executable) hang when trying certain  
operations.  They problem evidently started with  10.2.1, and fixed  
at 10.2.6 (not available for Solaris yet)


usa -o -pr0

for instance.  Note that uvadmin, the admin menu, etc all execute  
these and will hang when disabling printers or changing forms.  They  
actually take the appropriate action, it is just that you have to  
break or or kill the task.


The IBM solution seems to be to wait until you open a case, and then  
send out a copy of usa rev 10.2.0, which works with 10.2.2 usd.  I  
wasted a few hours trying to figure out what I'd done wrong with the  
spooler in our upgrade.


The release notes for 10.2.6 are available for some platforms from  
the TechConnect availability matrix.  Too bad I did not think of that  
first.


-Rick Nuckolls
Lynden, Inc


On Nov 6, 2007, at 1:41 PM, Clifton Oliver wrote:


Mark,

Would you mind giving just a brief description of what you mean by
broken please? Not in detail (unless you want to grin) but enough
to let the rest of us know what to watch out for.

Thanks.


On Nov 6, 2007, at 12:43 , Hennessey, Mark F. wrote:


Also, usa is broken at 10.2.2

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] UV - 10.2.2 [not-secure]

2007-11-06 Thread Richard Nuckolls
You will need to check with IBM for the answer, but I suspect that it  
is true on a number of platforms.  Who knows about Windows.

It is definitely true on Solaris.

-Rick

On Nov 6, 2007, at 4:49 PM, Clifton Oliver wrote:


I am interpreting that to mean this is on those releases on all
platforms (AIX) not just Solaris, correct?

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] [UD] Possible causes of corrupt data on a UniData static file

2007-11-02 Thread Richard Sammartino
Ed, I have dealt with UniData file corruption in the past and it can be
quite difficult to get a handle on it. I have seen files get corrupted by
memory failures, processor failures, and disk failures. If this is not due
to a hardware issue a file can be corrupted,(or at least used to be
corrupted depend on your release) by performing a unix copy (cp -rp) on a
file that is being updated, and running guide against a file that me be in
use. There could be more issues that haven't been listed. 

I have also found that running guide against a corrupt file does not always
fix the file. In some cases a second check against a file by guide has
turned up more errors. There are times when a file has been corrupted, guide
can't fix it. I usually make a copy of the file, clear it, and copy the
records into it, and run guide against this file.

The fact that AE will let you access a record only means the editor can read
the record. If you try to change something in the record and file it, you
will see errors.

We don't use triggers, so I can't comment on that.

Rich

Richard Sammartino
Systems Analyst
School District of Philadelphia
440 N Broad Street
Philadelphia,  Pa 19130
Phone: (215) 400-5086
Fax:   (215) 400-4411 
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] [UD] Possible causes of corrupt data on a UniData static file

2007-11-02 Thread Kryka, Richard
[demime could not interpret encoding quoted-printable  - treating as plain text]
My guess is that you have real records with real Ids that you can
access.  Then you have other records that appear to have the same Ids
but really don't.  It sounds like these other records are hashed into
the wrong groups - hence your inability to access them. 

I would try creating another file with a different modulo then copy the
records from the current file to this new one.  They should re-hash, and
then maybe you can get to them.

Dick Kryka | Director of Applications
CCCS of Greater Denver | Paragon Financial Services
a Division of Money Management International
10065 East Harvard Avenue | Suite 210
Denver, CO 80231
D: 303-632-2226 | F: 303-632-2101 | M: 303-907-1907
[EMAIL PROTECTED]
 

-Original Message-

I wish it were that easy.  READNEXT and READ can't get it's hands on
these records.


The information in this email is intended only for the personal and confiden=
tial use of the designated recipient above.  If the reader of this message i=
s not the intended recipient or an agent responsible for delivering it to th=
e intended recipient, you are hereby notified that you have received this do=
cument in error, and that any review, dissemination, distribution or copying=
 of the message is strictly prohibited.  If you are not the intended recipie=
nt, please contact the sender immediately by reply e-mail and destroy all co=
pies of the original message.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] curious EQUATE issue - SOLVED Just want to know if anyone understands WHY?

2007-10-23 Thread Richard Nuckolls

regarding the example below:


EQU VALID.CC.TYPES TO CHANGE('A.B.D.M.S.V','.',@VM)


The problem with this is that the CHANGE within the  EQU will get  
evaluated at run time, so it will be done repeatedly if placed within  
a LOOP or FOR structure.


You would be better off with the earlier suggestion of

EQU VALID.CC.TYPES TO ('A':@VM:'B':@VM:'D':@VM:'M':@VM:'S':@VM:'V')

The concatenation will be done by the compiler, and the parenthesis  
will protect the LOCATE field designator, 1,1 from being  
interpreted as an extraction.  This does compile, by the way.


-Rick

On Oct 23, 2007, at 2:04 PM, Rex Gozar wrote:


Allen,

EQU VALID.CC.TYPES TO CHANGE('A.B.D.M.S.V','.',@VM)

does compile and it will protect the value of VALID.CC.TYPES from  
being unintentionally changed -- which is the reason for using EQU  
to declare constants in the code.


I just wanted to remind people that equating to a variable does not  
set an unchanging, constant value; this can be a source of hard-to- 
find bugs.


rex
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] curious EQUATE issue - SOLVED Just want to know if anyone understands WHY?

2007-10-22 Thread Richard Nuckolls
When the new version of the equate was compiled under Information  
flavor, the compiler warned that it was a Reality style LOCATE.

To its credit, the compiler defers the evaluation of the EQU until it  
is used, at which point, it evaluates it in context, so the compiler  
is evaluating VALID.CC.TYPES1,1
as
A':@VM:'B':@VM:'D':@VM:'M':@VM:'S':@VM:'V'1,1

The vlist output below gives a good hint as to what is going on.   
Notice that the field,value is being applied to the last value of  
the EQU string prior to doing the build with the rest of the codes.   
In the Reality format, it is legitimate to omit the field,value  
specifier, in which case the program will do a field level search  
rather than a value level search.

This quirk would only show up with the use of an EQUATE rather than a  
variable assignment.  If you feel compelled to use an EQUATE for the  
codes, you could overcome the issue with a temporary assignment such as

EQU VALID.CC.TYPES TO 'A':@VM:'B':@VM:'D':@VM:'M':@VM:'S':@VM:'V'
...
CC.TYPES = VALID.CC.TYPES
LOCATE X IN CC.TYPES1,1 ...

- VLIST of LOCATE on original equate --

5:  LOCATE X IN VALID.CC.TYPES1,1 BY 'AL' SETTING LP THEN
Press any key to continue...
5 E : 060 dyn_extractV 1 1 0  = $R0
5 0001A : 03A concat A}B}D}M}S} $R0  = $R1
5 00022 : 0D4 locate X $R1 1 0 0 AL  = LP
5 00032 : 0C4 jumpf
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] How does one safely validate that a session is connected in UniObjects (VB VB.Net)

2007-10-04 Thread Kryka, Richard
Jef Lee wrote:  I believe the IsActive property is not entirely
accurate...

From my tests, you are right about IsActive - it is the results of the
last connection (I think) and has nothing to do with the current state.
I added a timer function to our VB front end that runs every 60 seconds
and just opens a file.  If the connection has been lost, the open is
unsuccessful.  We display a message informing the user that the
connection is broken and they need to log on again.

This function has almost no overhead and keeps users from spending
several minutes or more on a form, then discovering that nothing was
saved.  It also solved the timeout issue where people would go into a
meeting or out to lunch and their connection would be timed out for
inactivity.  The function runs from only from 6am to 8pm, their local
time.  If users go home at night without logging out, their connection
is still logged out for inactivity instead of being connected all night.

Dick Kryka
Director of Applications
Paragon Financial Services
a Division of Money Management International
303-632-2226
[EMAIL PROTECTED]
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


  1   2   3   >