[OT]:RE: RE: [U2] Roman Numerals

[Dan Fitzgerald]

16 ounces or .473 liters?


From: "Stevenson, Charles" <[EMAIL PROTECTED]>
Reply-To: u2-users@listserver.u2ug.org
To: 
Subject: RE: RE: [U2] Roman Numerals
Date: Tue, 31 Oct 2006 17:13:58 -0500

That knowledge and $3.50 US will get you a mocha latte.

> The Chinese Year has always been wrong, since it is still
> assumes 01 Jan as the start day of the year. I think I
> reported that to VMARK about 20 years ago...
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/


_
Find a local pizza place, music store, museum and morethen map the best 
route!  http://local.live.com?FORM=MGA001

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

RE: RE: [U2] Roman Numerals

[Stevenson, Charles]

That knowledge and $3.50 US will get you a mocha latte.

> The Chinese Year has always been wrong, since it is still 
> assumes 01 Jan as the start day of the year. I think I 
> reported that to VMARK about 20 years ago...
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

Re: RE: [U2] Roman Numerals

[Mark Johnson]

I recall this in the D3 manual and wondered why would anyone have such a
thing.

A=123
PRINT OCONV(A,"U0033")

yields CXXIII

I guess it was for incrementing chapters or some other formal/outline number
sequences. I don't know what the maximum number is but OCONV("25000","U0033)
yields M. 50,000 and 100,000 didn't work.

My XIV cents.
Mark Johnson




- Original Message -
From: <[EMAIL PROTECTED]>
To: 
Sent: Thursday, October 19, 2006 4:25 AM
Subject: RE: RE: [U2] Roman Numerals


> The Chinese Year has always been wrong, since it is still assumes 01 Jan
as the start day of the year. I think I reported that to VMARK about 20
years ago...
>
> Brian
>
> >David A. Green wrote:
> >>> Does any one have a Digit to Roman Numeral converter they would like
> >>> to share?
> >
> >Ron White responded:
> >> How about ICONV/OCONV with the NR function code.  Look in the
> >> Basic Reference Manual index for roman numerals.
> >
> >A search on CDP reveals a couple interesting tidbits on this.
> >
> >According to Oliver Elphick, the NR conversion in Universe "uses a change
> >of alphabetic case to represent multiplication by 1000, so v=5 but
V=5000."
> >
> >According to Tom Rauschenbach, [sic] "the author of the NR conversion
> >(someone named Hal) says
> >that there was a reason for the upper/lower case distinction, but he
can't
> >remember what it was.  He also claims that the Chinese New Year is
wrong."
> >(I have no idea what that means.)
> >
> >The D3 equivalent (as if anyone here cares) is the user exit U33.
> >And the Reality equivalent is conversion MCDR.
> >R83 had conversion MCR.
> >
> >So many standards, so little time...
> >T
> >---
> >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: RE: [U2] Roman Numerals

[brian]

The Chinese Year has always been wrong, since it is still assumes 01 Jan as the 
start day of the year. I think I reported that to VMARK about 20 years ago...

Brian

>David A. Green wrote:
>>> Does any one have a Digit to Roman Numeral converter they would like
>>> to share? 
>
>Ron White responded:
>> How about ICONV/OCONV with the NR function code.  Look in the
>> Basic Reference Manual index for roman numerals.
>
>A search on CDP reveals a couple interesting tidbits on this.
>
>According to Oliver Elphick, the NR conversion in Universe "uses a change
>of alphabetic case to represent multiplication by 1000, so v=5 but V=5000."
>
>According to Tom Rauschenbach, [sic] "the author of the NR conversion
>(someone named Hal) says 
>that there was a reason for the upper/lower case distinction, but he can't
>remember what it was.  He also claims that the Chinese New Year is wrong."
>(I have no idea what that means.)
>
>The D3 equivalent (as if anyone here cares) is the user exit U33.
>And the Reality equivalent is conversion MCDR.
>R83 had conversion MCR.
>
>So many standards, so little time...
>T
>---
>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] Roman Numerals

[Tony Gravagno]

David A. Green wrote:
>> Does any one have a Digit to Roman Numeral converter they would like
>> to share? 

Ron White responded:
> How about ICONV/OCONV with the NR function code.  Look in the
> Basic Reference Manual index for roman numerals.

A search on CDP reveals a couple interesting tidbits on this.

According to Oliver Elphick, the NR conversion in Universe "uses a change
of alphabetic case to represent multiplication by 1000, so v=5 but V=5000."

According to Tom Rauschenbach, [sic] "the author of the NR conversion
(someone named Hal) says 
that there was a reason for the upper/lower case distinction, but he can't
remember what it was.  He also claims that the Chinese New Year is wrong."
(I have no idea what that means.)

The D3 equivalent (as if anyone here cares) is the user exit U33.
And the Reality equivalent is conversion MCDR.
R83 had conversion MCR.

So many standards, so little time...
T
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] Roman Numerals

[Allen E. Elwood]

Cool, I can't wait to start putting roman numeral dates on all my projects
!



.course if I do that I'll need the reverse subr so I can tell what date
something is.

-Original Message-
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of David A. Green
Sent: Wednesday, October 18, 2006 15:45
To: u2-users@listserver.u2ug.org
Subject: RE: [U2] Roman Numerals


Kevin this works great! Except for invalid data like when NUM equals 0, null
or a negative.

I'm going to convert it to a function, which will work better for my need.

Thanks,
David A. Green
DAG Consulting
-Original Message-
>Does any one have a Digit to Roman Numeral converter they would like
to share?

How about this?  I just whipped this up on your request using
information from http://www.novaroma.org/via_romana/numbers.html .
That was kinda fun!

SUBROUTINE ROMAN.NUMERALS(NUM,ROMA)
*
* Written By:  Kevin King
* Date:18 Oct 2006
* Project: Basic Entertainment
* Description: This subroutine will convert a number (NUM) to Roman
numerals
*  (ROMA).
*
**
***
* Modifications
**
***
* Date.  Changed By.  Description of
Change..
*
DIVISORS = '1000,900,500,400,100,90,50,40,10,9,5,4,1'
NUMERALS = 'M,CM,D,CD,C,XC,L,XL,X,IX,V,IV,I'
*
THIS.NUM = NUM
ROMA = ''
*
LOOP
UNTIL (THIS.NUM EQ 0) DO
  DONE = @FALSE
  FOR DIVISOR.LOOP = 1 TO 13 UNTIL DONE
DIVISOR = FIELD(DIVISORS,',',DIVISOR.LOOP)
IF (THIS.NUM GE DIVISOR) THEN
  ROMA := FIELD(NUMERALS,',',DIVISOR.LOOP)
  THIS.NUM -= DIVISOR
  DONE = @TRUE
END
  NEXT DIVISOR.LOOP
REPEAT
*
RETURN
---
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] Roman Numerals

[David A. Green]

Kevin this works great! Except for invalid data like when NUM equals 0, null
or a negative.

I'm going to convert it to a function, which will work better for my need.

Thanks,
David A. Green
DAG Consulting
-Original Message-
>Does any one have a Digit to Roman Numeral converter they would like
to share?

How about this?  I just whipped this up on your request using
information from http://www.novaroma.org/via_romana/numbers.html .
That was kinda fun!

SUBROUTINE ROMAN.NUMERALS(NUM,ROMA)
*
* Written By:  Kevin King
* Date:18 Oct 2006
* Project: Basic Entertainment
* Description: This subroutine will convert a number (NUM) to Roman
numerals
*  (ROMA).
*
**
***
* Modifications
**
***
* Date.  Changed By.  Description of
Change..
*
DIVISORS = '1000,900,500,400,100,90,50,40,10,9,5,4,1'
NUMERALS = 'M,CM,D,CD,C,XC,L,XL,X,IX,V,IV,I'
*
THIS.NUM = NUM
ROMA = ''
*
LOOP
UNTIL (THIS.NUM EQ 0) DO
  DONE = @FALSE
  FOR DIVISOR.LOOP = 1 TO 13 UNTIL DONE
DIVISOR = FIELD(DIVISORS,',',DIVISOR.LOOP)
IF (THIS.NUM GE DIVISOR) THEN
  ROMA := FIELD(NUMERALS,',',DIVISOR.LOOP)
  THIS.NUM -= DIVISOR
  DONE = @TRUE
END
  NEXT DIVISOR.LOOP
REPEAT
*
RETURN
---
u2-users mailing list
u2-users@listserver.u2ug.org
To unsubscribe please visit http://listserver.u2ug.org/

RE: [U2] Roman Numerals

[David A. Green]

I couldn't the OCONV to work on UniData.

Thanks,
David A. Green
DAG Consulting

David A. Green wrote:
> Does any one have a Digit to Roman Numeral converter they would like to
> share?
How about ICONV/OCONV with the NR function code.  Look in the
Basic Reference Manual index for roman numerals.

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

RE: [U2] Roman Numerals

[Norman Morgan]

Must be specific to UV.  I can't find it in UD.

===
Norman Morgan <> [EMAIL PROTECTED] <> http://www.brake.com
===
There is no music so sweet as the laughter of a child.
===

 

> -Original Message-
> From: [EMAIL PROTECTED] 
> [mailto:[EMAIL PROTECTED] On Behalf Of Marc Hilbert
> Sent: Wednesday, October 18, 2006 3:45 PM
> To: u2-users@listserver.u2ug.org
> Subject: Re: [U2] Roman Numerals
> 
> What about the NR conversion?
> 
> - Original Message -
> From: "David A. Green" <[EMAIL PROTECTED]>
> To: 
> Sent: Wednesday, October 18, 2006 3:15 PM
> Subject: [U2] Roman Numerals
> 
> 
> > Does any one have a Digit to Roman Numeral converter they 
> would like to
> > share?
> > 
> > 
> > 
> > Thanks,
> > 
> > David A. Green
> > 
> > DAG Consulting <http://www.dagconsulting.com/> 
> > 
> > 480-813-1725
> > ---
> > 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] Roman Numerals

[Marc Hilbert]

What about the NR conversion?

- Original Message - 
From: "David A. Green" <[EMAIL PROTECTED]>

To: 
Sent: Wednesday, October 18, 2006 3:15 PM
Subject: [U2] Roman Numerals



Does any one have a Digit to Roman Numeral converter they would like to
share?



Thanks,

David A. Green

DAG Consulting  


480-813-1725
---
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] Roman Numerals

[Ron White]

David A. Green wrote:

Does any one have a Digit to Roman Numeral converter they would like to
share?

 


Thanks,

David A. Green

DAG Consulting  


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


  

How about ICONV/OCONV with the NR function code.  Look in the
Basic Reference Manual index for roman numerals.

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