RE: RE: [U2] [UV] Basic Program Scheduling Priority

2007-01-16 Thread brian
If you VLIST it, the RQM compiles to Sleep 1.

Brian

The RQM statement has not appeared in any universe documentation at
least as far back v6.  I actually had to locate some old prime manuals
to find out what this was statement was all about.  I recall reading
some blurb somewhere that although RQM is still supported by the
universe compiler it is in effect a NOP and doesn't actually do anything
on any platform.

Gerry

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Ray Wurlod
Sent: January 15, 2007 1:08 AM
To: u2-users@listserver.u2ug.org
Subject: Re: [U2] [UV] Basic Program Scheduling Priority

RQM releases the remainder of a process's timeslice on the CPU.  Not
100% certain it works on Windows platforms.  (Release QuantuM)

PERFORM CHAP DOWN will reduce the process's priority.  This works on
all platforms.  (Note: you can not CHAP UP unless you have Administrator
privileges.)  Check out HELP CHAP for more.  (CHAnge Priority)
---
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] In-Line prompting AGAIN

2007-01-16 Thread roy
Thanks,

There were items in the VOC with all of the single digits, however while
putting the quotes outside the brackets does surround the selection with
quotes, it no longer allows multiple selections by putting spaces between
them.  Hence SELECT CUSTOMER A,ENTER CUSTOMER#(s) returns an error if
7 31 is entered.  7 31 not found  

Roy


 SELECT CUSTOMER A,ENTER CUSTOMER NUMBER  WITH FLAG

There is probably an item called 7, but not one called 31 in either
DICT CUSTOMER or VOC.

Put the quote marks outside the prompt text.
  SELECT CUSTOMER A,ENTER CUSTOMER NUMBER  WITH FLAG
 

The 1st way will prompt (the quote marks literally appear):
   ENTER CUSTOMER NUMBER = 
the 2nd:
ENTER CUSTOMER NUMBER =

The 1st will execute:
  SELECT CUSTOMER 7 WITH FLAG
the 2nd:
  SELECT CUSTOMER 7 WITH FLAG
---
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] In-Line prompting AGAIN

2007-01-16 Thread David A. Green
Try using the Repeat logic, this will add   between each input.

SELECT CUSTOMER A,R( ),ENTER CUSTOMER#(s)

Thanks,
David A. Green
DAG Consulting


-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of roy
Sent: Tuesday, January 16, 2007 6:24 AM
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] In-Line prompting AGAIN

Thanks,

There were items in the VOC with all of the single digits, however while
putting the quotes outside the brackets does surround the selection with
quotes, it no longer allows multiple selections by putting spaces between
them.  Hence SELECT CUSTOMER A,ENTER CUSTOMER#(s) returns an error if
7 31 is entered.  7 31 not found  

Roy


 SELECT CUSTOMER A,ENTER CUSTOMER NUMBER  WITH FLAG

There is probably an item called 7, but not one called 31 in either
DICT CUSTOMER or VOC.

Put the quote marks outside the prompt text.
  SELECT CUSTOMER A,ENTER CUSTOMER NUMBER  WITH FLAG
 

The 1st way will prompt (the quote marks literally appear):
   ENTER CUSTOMER NUMBER = 
the 2nd:
ENTER CUSTOMER NUMBER =

The 1st will execute:
  SELECT CUSTOMER 7 WITH FLAG
the 2nd:
  SELECT CUSTOMER 7 WITH FLAG
---
---
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] In-Line prompting AGAIN

2007-01-16 Thread Stevenson, Charles
Roy, 

I can think of a few options.

1. R( ),ENTER CUSTOMER NUMBER
2. A,ENTER CUSTOMER ID  and be sure to enter quote marks - Yuck
3. I wrote a MAKE.LIST that would help in this situation.

Here is an example trying to list the voc items for LIST, SORT, 
BY:
Some variation on the theme will probably work for you.

cds

__

0. Baseline.  Results when no quote marks are used.
This one fails because what the 3 words that I really want to be
recognized as keys, RetrieVe resolves as word that can legitimately be
used in RetrieVe sentences, attempts to, but can't figure it out.
If you put quotes around words, retrieve knows to use them as keys.
Otherwise, that is a recovery position when it can't figure out what
else they might be.  (Some might say RetrieVe is too forgiving and
should require the quotes all along,  but this approach seems to be in
keeping with the original design philosophy when Vmark originally wrote
UniVerse.)


LIST VOC ENTER VOC ID
ENTER VOC ID=LIST SORT BY
RetrieVe: syntax error.  Unexpected verb.  Token was LIST.
  Scanned command was LIST VOC LIST 

_

1. Using the R (for Repeat) control in  

LIST VOC R( ),ENTER VOC ID
ENTER VOC ID=LIST
ENTER VOC ID=SORT
ENTER VOC ID=BY
ENTER VOC ID=

LIST VOC LIST SORT BY 10:17:12am  16 Jan 2007  PAGE1
NAME.. TYPE DESC..

LIST   VVerb - Invoke the RetrieVe
high-level query and report
generator
SORT   VVerb - Generate a report
sorted by record identifier
field
BY KKeyword - Introduce SORT
specifications in ascending
order

3 records listed.
___

2. ugly. requires user to use quotes in a weird way:

LIST VOC A,ENTER VOC ID
ENTER VOC ID=LIST SORT BY

LIST VOC LIST SORT BY 10:19:44am  16 Jan 2007  PAGE1
NAME.. TYPE DESC..

LIST   VVerb - Invoke the RetrieVe
high-level query and report
generator
SORT   VVerb - Generate a report
sorted by record identifier
field
BY KKeyword - Introduce SORT
specifications in ascending
order

3 records listed.
___

3. MAKE.LIST turns a command line string into a select list.
(it does a few other things, too, but not here.)

.MAKE.LIST A,ENTER VOC ID(s)
ENTER VOC ID(s)=LIST SORT BY
3 record(s) selected to select list 0.
LIST VOC REQUIRE.SELECT

LIST VOC REQUIRE.SELECT 10:23:33am  16 Jan 2007  PAGE1
NAME.. TYPE DESC..

LIST   VVerb - Invoke the RetrieVe
high-level query and report
generator
SORT   VVerb - Generate a report
sorted by record identifier
field
BY KKeyword - Introduce SORT
specifications in ascending
order

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


[U2] want to reach Adrian Womack

2007-01-16 Thread Stevenson, Charles
I am trying to reach Adrian Womack.
Maybe I havea bad email address: [EMAIL PROTECTED]
Can anyone help?
Thanks,
cds
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] In-Line prompting AGAIN

2007-01-16 Thread roy
Thanks to those who answered.  I am beginning to rethink the use of inline
prompts.  I had done something like the MAKE.LIST and I had tried the repeat
option (the client didn't like it) I think its back to basic time.

Roy


I can think of a few options.

1. R( ),ENTER CUSTOMER NUMBER
2. A,ENTER CUSTOMER ID  and be sure to enter quote marks - Yuck
3. I wrote a MAKE.LIST that would help in this situation.

Here is an example trying to list the voc items for LIST, SORT, 
BY:
Some variation on the theme will probably work for you.

cds

__

0. Baseline.  Results when no quote marks are used.
This one fails because what the 3 words that I really want to be
recognized as keys, RetrieVe resolves as word that can legitimately be
used in RetrieVe sentences, attempts to, but can't figure it out.
If you put quotes around words, retrieve knows to use them as keys.
Otherwise, that is a recovery position when it can't figure out what
else they might be.  (Some might say RetrieVe is too forgiving and
should require the quotes all along,  but this approach seems to be in
keeping with the original design philosophy when Vmark originally wrote
UniVerse.)


LIST VOC ENTER VOC ID
ENTER VOC ID=LIST SORT BY
RetrieVe: syntax error.  Unexpected verb.  Token was LIST.
  Scanned command was LIST VOC LIST 

_

1. Using the R (for Repeat) control in  

LIST VOC R( ),ENTER VOC ID
ENTER VOC ID=LIST
ENTER VOC ID=SORT
ENTER VOC ID=BY
ENTER VOC ID=

LIST VOC LIST SORT BY 10:17:12am  16 Jan 2007  PAGE1
NAME.. TYPE DESC..

LIST   VVerb - Invoke the RetrieVe
high-level query and report
generator
SORT   VVerb - Generate a report
sorted by record identifier
field
BY KKeyword - Introduce SORT
specifications in ascending
order

3 records listed.
___

2. ugly. requires user to use quotes in a weird way:

LIST VOC A,ENTER VOC ID
ENTER VOC ID=LIST SORT BY

LIST VOC LIST SORT BY 10:19:44am  16 Jan 2007  PAGE1
NAME.. TYPE DESC..

LIST   VVerb - Invoke the RetrieVe
high-level query and report
generator
SORT   VVerb - Generate a report
sorted by record identifier
field
BY KKeyword - Introduce SORT
specifications in ascending
order

3 records listed.
___

3. MAKE.LIST turns a command line string into a select list.
(it does a few other things, too, but not here.)

.MAKE.LIST A,ENTER VOC ID(s)
ENTER VOC ID(s)=LIST SORT BY
3 record(s) selected to select list 0.
LIST VOC REQUIRE.SELECT

LIST VOC REQUIRE.SELECT 10:23:33am  16 Jan 2007  PAGE1
NAME.. TYPE DESC..

LIST   VVerb - Invoke the RetrieVe
high-level query and report
generator
SORT   VVerb - Generate a report
sorted by record identifier
field
BY KKeyword - Introduce SORT
specifications in ascending
order

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


[U2] International Spectrum Long Beach 2007

2007-01-16 Thread Kevin King
I just received this from Nathan re: the Spectrum show.  Looks like
there's gonna be LOADS of cool U2 stuff this year!
 
  _  

From: Nathan Rector [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, January 16, 2007 11:30 AM
To: KEVIN KING
Subject: International Spectrum Long Beach 2007


Join Us International Spectrum's MultiValue Conference and Exhibition
March 6-9th, 2007.

International Spectrum's MultiValue Conference and Exhibition will be
providing the following sessions on IBM U2 Technologies and Solutions.

Register before Jan 30th - Save $200
http://www.intl-spectrum.com/tabid/158/Default.aspx 
Key Code: 46276-7591

Full Conference Package: $795.00 
1 Day Conference Package: $595.00 
Exhibition Only: FREE 

After Jan 30th

Full Conference Package: $995.00 
1 Day Conference Package: $695.00 
Exhibition Only: $35.00 

U2 Web Services: Entryway to Services Oriented Architecture (SOA)
Extend the flexibility and interoperability of your enterprise by
providing a Web services interface to your U2 application.   Increase
your enterprise functionality, or provide access to your clients or
customer into your inventorY or order entry systems.   Learn how to
use the IBM U2 Web Services Developer to create a SOAP server through
which you can create and expose Web services from your U2 application.

SystemBuilder 6.0 - The Revolution Begins
Microsoft .NET 3.0 will be leveraged to revolutionize the look and
feel of your IBM SystemBuilder applications with the introduction of
SBClient 6.0 and SB+ 6.0.  Come learn how we have exploited Windows
Communications   Foundation (WCF) and Windows Presentation Foundation
(WPF) to deliver a   dramatically improved user interface, while
leveraging your existing SB   resources.  In this session we will
review the architectural changes in SB 6.0; demonstrate applications
running in the new environment; and prepare you for the revolution to
come.

Valid Backup Schemes for U2
The U2 Lab Services team have run across a number of installations
that are not optimizing their backups to ensure recovery.  IBM will
present the requirements for U2 products and will examine how they
interact with
various hardware and software alternatives, including NSI Doubletake,
SAN, NAS, EMC Semmetrics, RCP Copies, BCVs, Flash Copies, and more.

Understanding U2 Disaster Recovery  High Availability Solutions
Disaster recovery and high availability solutions are becoming
increasingly critical for many of today's businesses.

Join the IBM U2 Team to learn why U2 products are uniquely qualified
in the MultiValue market to implement a high availability solution.
We will discuss the interaction   of hardware, operating systems and
the
U2 Data Servers for building robust solutions.

The Future of MultiValue Technology: An IBM Perspective
Everyone keeps asking whether or not MultiValue technology will
survive in a world where relational databases like Oracle, DB2 and SQL
Server are the accepted standard. Come hear Susie Siegesmund, IBM's
Director of U2 Data Services, present her opinion on the future of
MultiValue and why people should not worry about the longevity. Susie
will also discuss the future direction of the IBM U2 product family.

IBM U2 Certification Testing - FREE
FREE Certification Testing for IBM U2 Technologies and products will
be available for all Full Conference Attendees.  Increase your VALUE
in the U2 Marketplace by testing your knowledge, or provide more VALUE
to your employer with an IBM U2 Certification.

Developing .NET Applications on U2
IBM provides choices for .NET development, each providing a
comprehensive solution to the challenge of creating web-based
applications requiring access to IBM U2's MultiValue data servers.  We
will explore how using U2's .NET capability can improve data
integration and accessibility faced by many organizations. This is a
must see session for any serious .NET developer!

Data Encryption- Putting it all Together
This session will discuss programming techniques using U2 Encryption
Basic API and the new Automatic Column-level Encryption for U2. Come
and learn the ins and outs as well as the dos and don'ts of U2
encryption from concept and design through implementation. Learn how
to secure and protect data at rest as well as on the move.

More Information
http://www.intl-spectrum.com/tabid/158/Default.aspx

Hotel Information:

Hilton Long Beach Hotel and Executive Meeting Center
562-983-3400
Single/Double $157.00
Special Rate Cut-Off: February 13

NOTE: You are receiving this because you Opted-In to the International
Spectrum e-Xtra Mailing List. If you no longer wish to receive emails
from International Spectrum, please send an email to
[EMAIL PROTECTED] 
KeyCode: 46276-7591 
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] In-Line prompting AGAIN

2007-01-16 Thread Mecki Förthmann

Hi Roy.

you can call me old fashioned, but for simple queries like that, I would 
write a PROC or a paragraph.


Mecki

Roy wrote:

Thanks to those who answered.  I am beginning to rethink the use of inline
prompts.  I had done something like the MAKE.LIST and I had tried the repeat
option (the client didn't like it) I think its back to basic time.

Roy

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


RE: [U2] want to reach Adrian Womack

2007-01-16 Thread Williams, Trevor
Charles
He is on annual leave. Back next week.
t

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Stevenson,
Charles
Sent: Wednesday, 17 January 2007 3:37 AM
To: u2-users@listserver.u2ug.org
Subject: [U2] want to reach Adrian Womack

I am trying to reach Adrian Womack.
Maybe I havea bad email address: [EMAIL PROTECTED]
Can anyone help?
Thanks,
cds
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


DISCLAIMER:
Disclaimer.  This e-mail is private and confidential. If you are not the 
intended recipient, please advise us by return e-mail immediately, and delete 
the e-mail and any attachments without using or disclosing the contents in any 
way. The views expressed in this e-mail are those of the author, and do not 
represent those of this company unless this is clearly indicated. You should 
scan this e-mail and any attachments for viruses. This company accepts no 
liability for any direct or indirect damage or loss resulting from the use of 
any attachments to this e-mail.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] [UV] Calculate age from date of birth

2007-01-16 Thread Larry Hiscock
What units do you want it in?  Days?  Years and fractional parts of years?
Years, months  days?

Larry Hiscock
Western Computer Services
 

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Dominion
Sent: Tuesday, January 16, 2007 1:05 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] [UV] Calculate age from date of birth

Hi,
Could anyone tell me how I can calculate someones age from their date of
birth at a specific point in time? ie, age at 6 April 2006 if their date of
birth is 12 October 1967.

Thanks,

Dom
--
View this message in context:
http://www.nabble.com/-UV--Calculate-age-from-date-of-birth-tf3023501.html#a
8398858
Sent from the U2 - Users mailing list archive at Nabble.com.
---
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] Calculate age from date of birth

2007-01-16 Thread Mark Olarte
Dom,

You could ICONV both dates and subtract to get the total number of days
between the two.  6 April 2006 = 13976.  12 October 1967 = -80.
Subtracting gives you 14056.  Dividing that by 365 gives you 38.51 ...
approximately 38 years and 186 days old.  HTH.

Mark

 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of Dominion
 Sent: Tuesday, January 16, 2007 1:05 PM
 To: u2-users@listserver.u2ug.org
 Subject: [U2] [UV] Calculate age from date of birth
 
 Hi,
 Could anyone tell me how I can calculate someones age from 
 their date of birth at a specific point in time? ie, age at 6 
 April 2006 if their date of birth is 12 October 1967.
 
 Thanks,
 
 Dom
 --
 View this message in context: 
 http://www.nabble.com/-UV--Calculate-age-from-date-of-birth-tf
 3023501.html#a8398858
 Sent from the U2 - Users mailing list archive at Nabble.com.
 ---
 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] Calculate age from date of birth

2007-01-16 Thread Boydell, Stuart
http://www.pickwiki.com/cgi-bin/wiki.pl?DateUtility

param = 'GetElapsedPeriod'
call DateUtility(param,birthdate)
currentAge = param ;* (years am months am days)

-Original Message-
Hi,
Could anyone tell me how I can calculate someones age from their date
of
birth at a specific point in time? ie, age at 6 April 2006 if their
date of
birth is 12 October 1967.


 
**
This email message and any files transmitted with it are confidential and 
intended solely for the use of addressed recipient(s). If you have received 
this communication in error, please reply to this e-mail to notify the sender 
of its incorrect delivery and then delete it and your reply.  It is your 
responsibility to check this email and any attachments for viruses and defects 
before opening or sending them on. Spotless collects information about you to 
provide and market our services. For information about use, disclosure and 
access, see our privacy policy at http://www.spotless.com.au 
Please consider our environment before printing this email. 
** 
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] [UV] Calculate age from date of birth

2007-01-16 Thread dsig
Hope this isn't a trick question g

Normally you will get the internal date for both birth and 'test' date
then simply subtract.  One thing to keep in mind is that anything
before 12/31/67 will be neg as 12/31/67 is day 0

so internal bdate 10/12/67 is -80 and internal test date 4/6/2006 is
13976.

In this case we want 13976 + abs -80 = 14056/4

iBdate = abs( iconv('10/12/67','D') )
iTestDate = iconv('4/6/06','D')

iTotDays = iBdate + iTestDate

iYears = int( iTotDays/4 )


*note .. the previous does not take into account leap year etc.

DSig
David Tod Sigafoos
SigsSolutions, Inc.


  Original Message 
 Subject: [U2] [UV] Calculate age from date of birth
 From: Dominion [EMAIL PROTECTED]
 Date: Tue, January 16, 2007 1:04 pm
 To: u2-users@listserver.u2ug.org
 
 Hi,
 Could anyone tell me how I can calculate someones age from their date of
 birth at a specific point in time? ie, age at 6 April 2006 if their date of
 birth is 12 October 1967.
 
 Thanks,
 
 Dom
 -- 
 View this message in context: 
 http://www.nabble.com/-UV--Calculate-age-from-date-of-birth-tf3023501.html#a8398858
 Sent from the U2 - Users mailing list archive at Nabble.com.
 ---
 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] RE: [UV] Calculate age from date of birth

2007-01-16 Thread Dominion
Needs to be in whole years, ie, age 40 at 6 April 2006 - must be exactly
correct as this is for pension calculations so can't get it wrong due to a
rounding discrepancy!


What units do you want it in?  Days?  Years and fractional parts of years?
Years, months  days?

Larry Hiscock
Western Computer Services
 
-- 
View this message in context: 
http://www.nabble.com/-UV--Calculate-age-from-date-of-birth-tf3023501.html#a8401316
Sent from the U2 - Users mailing list archive at Nabble.com.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


[U2] RE: [UV] Calculate age from date of birth

2007-01-16 Thread Dominion
This looks like an interesting utility, but if I'm reading it correctly, it
will only give me their age now, which isn't what I'm after?
Dom.

Stuart.Boydell wrote:
 
 http://www.pickwiki.com/cgi-bin/wiki.pl?DateUtility
 
 param = 'GetElapsedPeriod'
 call DateUtility(param,birthdate)
 currentAge = param ;* (years am months am days)
 
-Original Message-
Hi,
Could anyone tell me how I can calculate someones age from their date
 of
birth at a specific point in time? ie, age at 6 April 2006 if their
 date of
birth is 12 October 1967.
 
 
  
 **
 This email message and any files transmitted with it are confidential and
 intended solely for the use of addressed recipient(s). If you have
 received this communication in error, please reply to this e-mail to
 notify the sender of its incorrect delivery and then delete it and your
 reply.  It is your responsibility to check this email and any attachments
 for viruses and defects before opening or sending them on. Spotless
 collects information about you to provide and market our services. For
 information about use, disclosure and access, see our privacy policy at
 http://www.spotless.com.au 
 Please consider our environment before printing this email. 
 ** 
 ---
 u2-users mailing list
 u2-users@listserver.u2ug.org
 To unsubscribe please visit http://listserver.u2ug.org/
 
 

-- 
View this message in context: 
http://www.nabble.com/-UV--Calculate-age-from-date-of-birth-tf3023501.html#a8401655
Sent from the U2 - Users mailing list archive at Nabble.com.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] [UV] Calculate age from date of birth

2007-01-16 Thread Allen Egerton

Mark Olarte wrote:

Dom,

You could ICONV both dates and subtract to get the total number of days
between the two.  6 April 2006 = 13976.  12 October 1967 = -80.
Subtracting gives you 14056.  Dividing that by 365 gives you 38.51 ...
approximately 38 years and 186 days old.  HTH.

Mark


Quibble - divide by 364.25, (leap year).

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


[U2] RE: [UV] Calculate age from date of birth

2007-01-16 Thread Dominion
This is not a trick question!  I need the age at the start of the UK TAX year
to calculate their pension contributions for the following year,
contributions are based on age bands - If I get this wrong I've got 3,000
factory workers out to kick my butt when they can't afford to retire!!


David Tod Sigafoos wrote:
 
 Hope this isn't a trick question g
 
 Normally you will get the internal date for both birth and 'test' date
 then simply subtract.  One thing to keep in mind is that anything
 before 12/31/67 will be neg as 12/31/67 is day 0
 
 so internal bdate 10/12/67 is -80 and internal test date 4/6/2006 is
 13976.
 
 In this case we want 13976 + abs -80 = 14056/4
 
 iBdate = abs( iconv('10/12/67','D') )
 iTestDate = iconv('4/6/06','D')
 
 iTotDays = iBdate + iTestDate
 
 iYears = int( iTotDays/4 )
 
 
 *note .. the previous does not take into account leap year etc.
 
 DSig
 David Tod Sigafoos
 SigsSolutions, Inc.
 
 
  Original Message 
 Subject: [U2] [UV] Calculate age from date of birth
 From: Dominion [EMAIL PROTECTED]
 Date: Tue, January 16, 2007 1:04 pm
 To: u2-users@listserver.u2ug.org
 
 Hi,
 Could anyone tell me how I can calculate someones age from their date of
 birth at a specific point in time? ie, age at 6 April 2006 if their date
 of
 birth is 12 October 1967.
 
 Thanks,
 
 Dom
 -- 
 View this message in context:
 http://www.nabble.com/-UV--Calculate-age-from-date-of-birth-tf3023501.html#a8398858
 Sent from the U2 - Users mailing list archive at Nabble.com.
 ---
 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/
 
 

-- 
View this message in context: 
http://www.nabble.com/-UV--Calculate-age-from-date-of-birth-tf3023501.html#a8401999
Sent from the U2 - Users mailing list archive at Nabble.com.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] RE: [UV] Calculate age from date of birth

2007-01-16 Thread Oaks, Harold
For age in whole years, this is pretty easy, just subtract the DOB year
from the current year to get age, but if the current month and day are
earlier in the year than the date of birth month and day, subtract 1
from the age.

Suppose variable DOB holds the date of birth in internal format.  This
code will give you the age today:

  DOBX = OCONV(DOB,'D4/')
  DOB.YR = DOBX[7,4]
  DOB.DA = DOBX[4,2]
  DOB.MO = DOBX[1,2]

  NOWX = OCONV(DATE(),'D4/')
  NOW.YR = NOWX[7,4]
  NOW.DA = NOWX[4,2]
  NOW.MO = NOWX[1,2]

  AGE = NOW.YR - DOB.YR
  * We will subtract 1 from age if the 'now' month  day is earlier
in the
  * year than the 'dob' month  day, otherwise not

  IF NOW.MO  DOB.MO THEN
 AGE = AGE - 1
  END ELSE
 IF NOW.MO = DOB.MO AND NOW.DA  DOB.DA THEN
AGE = AGE - 1
 END
  END

  * The variable AGE now holds their age as of the current day.


This even works if the DOB is 02/29 in some year, assuming that 02/28 in
the current year is not a person's birthday, but 03/01 is considered to
be their birthday.

Harold Oaks
Sr. Programmer/Analyst
Clark County, WA


-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] On Behalf Of Dominion
Sent: Tuesday, January 16, 2007 3:12 PM
To: u2-users@listserver.u2ug.org
Subject: [U2] RE: [UV] Calculate age from date of birth

Needs to be in whole years, ie, age 40 at 6 April 2006 - must be exactly
correct as this is for pension calculations so can't get it wrong due to
a rounding discrepancy!


What units do you want it in?  Days?  Years and fractional parts of
years?
Years, months  days?

Larry Hiscock
Western Computer Services
 
--
View this message in context:
http://www.nabble.com/-UV--Calculate-age-from-date-of-birth-tf3023501.ht
ml#a8401316
Sent from the U2 - Users mailing list archive at Nabble.com.
---
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: [UV] Calculate age from date of birth

2007-01-16 Thread Boydell, Stuart
Dom, 
That is also covered in the GetElapsedPeriod function with an extra to
date parameter. It otherwise defaults to the current date.

param = 'GetElapsedPeriod'
elapsedDates = iconv('12 October 1967','d'):@am:iconv('6 April
2006','d')
call DateUtility(param,elapsedDates)
currentAge = param ;* (years am months am days)

-Original Message-
This looks like an interesting utility, but if I'm reading it
correctly, it
will only give me their age now, which isn't what I'm after?
Dom.

Stuart.Boydell wrote:

 http://www.pickwiki.com/cgi-bin/wiki.pl?DateUtility

 param = 'GetElapsedPeriod'
 call DateUtility(param,birthdate)
 currentAge = param ;* (years am months am days)

-Original Message-
Hi,
Could anyone tell me how I can calculate someones age from their date
 of
birth at a specific point in time? ie, age at 6 April 2006 if their
 date of
birth is 12 October 1967.

 
**
This email message and any files transmitted with it are confidential and 
intended solely for the use of addressed recipient(s). If you have received 
this communication in error, please reply to this e-mail to notify the sender 
of its incorrect delivery and then delete it and your reply.  It is your 
responsibility to check this email and any attachments for viruses and defects 
before opening or sending them on. Spotless collects information about you to 
provide and market our services. For information about use, disclosure and 
access, see our privacy policy at http://www.spotless.com.au 
Please consider our environment before printing this email. 
** 
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] [UV] Calculate age from date of birth

2007-01-16 Thread Mark Olarte
Okay, to be truly accurate - divide by 365.25.  (3 * 365) + 366 = 1461
total days in a four year span including a leap year.  1461 / 4 =
365.25.

 -Original Message-
 From: [EMAIL PROTECTED] 
 [mailto:[EMAIL PROTECTED] On Behalf Of Allen Egerton
 Sent: Tuesday, January 16, 2007 3:53 PM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] [UV] Calculate age from date of birth
 
 Mark Olarte wrote:
  Dom,
  
  Dividing that by 365 gives you 38.51 ...
  approximately 38 years and 186 days old.  HTH.
  
  Mark
 
 Quibble - divide by 364.25, (leap year).
 
 --
 Allen
 ---
 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] Integration of UniVerse with Microsoft Team System 2005 {Unclassified}

2007-01-16 Thread Clifton Oliver
Be careful about getting food poisoning at that Buffet.

:-)

Do not forget that Paragraphs, Procs, and I-descriptors are also 
programming code that must be put under IT controls. I had some success 
by keeping copies of everything (yes, even individual I-descriptors) in 
a type 19 library with a composite record ID consisting of system 
name, file path, and item record ID and putting *that* under controls. 
Things get checked in and out of there. You then need a framework to 
publish these items to the proper place in UV when they are checked in 
(publish to testing) and then again when released to production, with 
the proper logging, of course. The only other way to do it (because of 
our hashed files that only things like PRC know about) is to keep all 
VOCs and DICTs as type 19, like I am told Vmark did in the early days 
when they were using the Unix utils (RCS?) to manage change control.


-- 

Regards,

Clif

~~~
W. Clifton Oliver, CCP
CLIFTON OLIVER  ASSOCIATES
Tel: +1 619 460 5678Web: www.oliver.com
~~~


On 1/16/07, author wrote:
 [ For those who have managed to avoid the advertising
 blitz, this is MS extending the Visual Studio .Net development suite
 'upwards' into Requirements  Architecture and 'downwards' into Testing
 and Database.  Yes, folks, from soup to nuts, the entire banquet can now
 be purchased at the MS Buffet.  :-)  ]
 This is a big step forward for our .Net  SQL Server people.

 My management is keen to try to integrate *all* our software design,
 development, testing, quality assurance and deployment into the same
 framework.  This includes our 'legacy' UniVerse systems development.
 We would have our documentation in the VSTS documentation repository
 (reflected in the companion SharePoint Web site), our bugs entered into
 and tracked by the VSTS OLAP database, etc. etc. and our UniBasic source
 in a VSTS SourceSafe repository (I think this might be 'interesting' as
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] Integration of UniVerse with Microsoft Team System 2005 {Unclassified}

2007-01-16 Thread Kevin King
Really, couldn't it be also argued that - along with what Clif has
mentioned - that ALL dictionaries - even phrases - are code to be
under control as well, not just I-descriptors.  If a dictionary
changes, things could get ugly.

-Kevin
[EMAIL PROTECTED]
http://www.PrecisOnline.com
 
** Check out scheduled Connect! training courses at
http://www.PrecisOnline.com/train.html.
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


RE: [U2] [UV] Calculate age from date of birth

2007-01-16 Thread Timothy Snyder
[EMAIL PROTECTED] wrote on 01/16/2007 07:36:53 PM:

 Okay, to be truly accurate - divide by 365.25.  (3 * 365) + 366 = 1461
 total days in a four year span including a leap year.  1461 / 4 =
 365.25.

Actually, this isn't 100% accurate.  There are quite a few dates for which
this will generate an age that is off by one year.  I created a
demonstration program a long time ago to prove this, because we had a
program that was using this logic.  It never seemed quite right to me, and
it is right *almost* every time.  Calculating ages as of January 16, 2007
for all dates in the last ten years will show incorrect ages for January 16
of the following years: 1997, 1998, 2001, 2002, 2005, and 2006.  For
example, January 16, 2006 shows as zero years old (365/365.25 is less than
1).

My preferred method of calculating age is to extract the month, day, and
year of both dates and calculate the age as the difference between the
years.  Then, if the target MMYY is less than the birth MMYY, subtract one
from the age.  In other words, pretty much the way you would do it in your
head - or at least the way I do it in my head. ;-)  This also handles all
leap-year rules, including those funky 100- and 400-year ones, which are
not accommodated by simply dividing by 365.25.

Tim Snyder
Consulting I/T Specialist
U2 Consulting
North American Lab Services
IBM Software Group
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] [UV] Basic Program Scheduling Priority

2007-01-16 Thread MAJ Programming
I would believe that whatever entity it was releasing circa 1975 is clearly
a non-issue now. I believe the concept was spokes on a wheel where each
slice was a user's exclusive use of the processor and the RQM caused your
pie slice to conclude and you had to wait until it went around again.

It made sense with the TIMESLICE command to increase your 'slice'.

If the concept of the processor managing the users in such a circular
fashion (albeit screamingly faster) then releasing one's 'slice' would be so
incrementally tiny that it would not even matter. One could argue that the
NULL command is equally long in its duration.

My 1 slice
Mark Johnson

This reminds me of the stupid guy who ordered a pizza and asked to have it
cut in 6 pieces because he wasn't hungry enough for 8.
- Original Message -
From: gerry-u2ug [EMAIL PROTECTED]
To: u2-users@listserver.u2ug.org
Sent: Monday, January 15, 2007 8:34 AM
Subject: RE: [U2] [UV] Basic Program Scheduling Priority


 The RQM statement has not appeared in any universe documentation at
 least as far back v6.  I actually had to locate some old prime manuals
 to find out what this was statement was all about.  I recall reading
 some blurb somewhere that although RQM is still supported by the
 universe compiler it is in effect a NOP and doesn't actually do anything
 on any platform.

 Gerry

 -Original Message-
 From: [EMAIL PROTECTED]
 [mailto:[EMAIL PROTECTED] On Behalf Of Ray Wurlod
 Sent: January 15, 2007 1:08 AM
 To: u2-users@listserver.u2ug.org
 Subject: Re: [U2] [UV] Basic Program Scheduling Priority

 RQM releases the remainder of a process's timeslice on the CPU.  Not
 100% certain it works on Windows platforms.  (Release QuantuM)

 PERFORM CHAP DOWN will reduce the process's priority.  This works on
 all platforms.  (Note: you can not CHAP UP unless you have Administrator
 privileges.)  Check out HELP CHAP for more.  (CHAnge Priority)
 ---
 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] [UV] Calculate age from date of birth

2007-01-16 Thread Timothy Snyder
OOPS!!!  I need to correct what I just posted.  In the following statement:
 Then, if the target MMYY is less than the birth MMYY, subtract one
 from the age.
both of those references should say MMDD instead of MMYY.


Tim Snyder
Consulting I/T Specialist
U2 Consulting
North American Lab Services
IBM Software Group
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


Re: [U2] Integration of UniVerse with Microsoft Team System 2005 {Unclassified}

2007-01-16 Thread Clifton Oliver
Excellent point, Kevin. Even changing the column width on a dictionary 
item can cause a production run failure. When I lock down or audit trail 
systems for SOX, I usually just sledge-hammer it and make anything that 
goes into a DICT or a VOC under IT controls. In this case, my brain was 
thinking more along procedures and expressions.


And don't forget NEWACC and DICT.DICT and the stuff in UV and the  
grin



--

Regards,

Clif

~~~
W. Clifton Oliver, CCP
CLIFTON OLIVER  ASSOCIATES
Tel: +1 619 460 5678Web: www.oliver.com
~~~



Kevin King wrote:

Really, couldn't it be also argued that - along with what Clif has
mentioned - that ALL dictionaries - even phrases - are code to be
under control as well, not just I-descriptors.  If a dictionary
changes, things could get ugly.

-Kevin
[EMAIL PROTECTED]
http://www.PrecisOnline.com
 
** Check out scheduled Connect! training courses at

http://www.PrecisOnline.com/train.html.
---
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/