RE: RE: [U2] Roman Numerals
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/
[OT]:RE: RE: [U2] Roman Numerals
16 ounces or .473 liters? From: Stevenson, Charles [EMAIL PROTECTED] Reply-To: u2-users@listserver.u2ug.org To: u2-users@listserver.u2ug.org 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
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: RE: [U2] Roman Numerals
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: u2-users@listserver.u2ug.org 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: [U2] Roman Numerals
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 http://www.dagconsulting.com/ 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/
Re: [U2] Roman Numerals
What about the NR conversion? - Original Message - From: David A. Green [EMAIL PROTECTED] To: u2-users@listserver.u2ug.org 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/
RE: [U2] Roman Numerals
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: u2-users@listserver.u2ug.org 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
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
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
Cool, I can't wait to start putting roman numeral dates on all my projects ! evil grin .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 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/