[Oorexx-devel] LOSTDIGITS

2012-12-05 Thread Walter Pachl
This little program: Signal On Lostdigits x=7 Do i=1 To 5 x=x+1 say x End Exit lostdigits: Say 'This is what SIZE is in PL/I' shows this output: 8 9 1.E+9 1.E+9 1.E+9 I have expected that the lostdigits condition is trapped. It ain't!!.

Re: [Oorexx-devel] LOSTDIGITS

2012-12-05 Thread Rick McGuire
From the documentation: LOSTDIGITS raised if a number used in an arithmetic operation has more digits than the current setting of NUMERIC DIGITS. Leading zeros are not counted in this comparison. LOSTDIGITS only applies to the values used at the start of the calculation, not with rounding

Re: [Oorexx-devel] LOSTDIGITS

2012-12-05 Thread Walter Pachl
Can I trap this in any other way? This came to mind but does not work either Numeric Digits 30 x=x+1 Say x Numeric Digits 9 z=x+0 Say z Rick McGuire object.r...@gmail.com schrieb: From the documentation: LOSTDIGITS raised if a number used in an arithmetic operation has more

[Oorexx-devel] oodialog - can anyone help with little effort?

2012-12-05 Thread Walter Pachl
I am working on this: I want to implement this little and simple program using oodialog: Do Until wordlist='' word=subword(wordlist,random...) display screen 1 upon enter display screen 2 If respone=F1 Then drop the word End Say bye or display Bye bye

Re: [Oorexx-devel] oodialog - can anyone help with little effort?

2012-12-05 Thread Mark Miesfeld
I can help you with this, give me a little bit of time to put something together. -- Mark Miesfeld On Wed, Dec 5, 2012 at 1:34 PM, Walter Pachl christel.u.w.pa...@chello.atwrote: I am working on this: I want to implement this little and simple program using oodialog: Do Until wordlist=''

Re: [Oorexx-devel] LOSTDIGITS

2012-12-05 Thread Walter Pachl
On Wed, Dec 5, 2012 at 4:30 PM, Walter Pachl christel.u.w.pa...@chello.at wrote: And how about x=11 Do i=1 To 5 Numeric dIGITS 30 x=x+1 - 12 Say x Numeric Digits 9 z=x+0 - 1.E+9 Say z End I THINK you started by sending me a private mail :-(

Re: [Oorexx-devel] oodialog - can anyone help with little effort?

2012-12-05 Thread Walter Pachl
I knew xou would! THANKS in advance Walter Mark Miesfeld miesf...@gmail.com schrieb: I can help you with this, give me a little bit of time to put something -- LogMeIn Rescue: Anywhere, Anytime Remote support for

Re: [Oorexx-devel] LOSTDIGITS

2012-12-05 Thread Rick McGuire
Looks like a boundary condition bug. The condition is raised for lengths of digits+2, but not digits+1. Rick On Wed, Dec 5, 2012 at 5:18 PM, Walter Pachl christel.u.w.pa...@chello.atwrote: On Wed, Dec 5, 2012 at 4:30 PM, Walter Pachl christel.u.w.pa...@chello.at wrote: And how about

Re: [Oorexx-devel] LOSTDIGITS

2012-12-05 Thread Walter Pachl
A I shall enter a but! Glad to have helped :-) Walter Rick McGuire object.r...@gmail.com schrieb: Looks like a boundary condition bug. The condition is raised for lengths of digits+2, but not digits+1. Rick On Wed, Dec 5, 2012 at 5:18 PM, Walter Pachl

Re: [Oorexx-devel] oodialog - can anyone help with little effort?

2012-12-05 Thread Mark Miesfeld
On Wed, Dec 5, 2012 at 2:03 PM, Mark Miesfeld miesf...@gmail.com wrote: I can help you with this, give me a little bit of time to put something together. Walter, Here's a simple start of a program. I used the '-' line continuation character so that lines won't wrap. I'm sure you will have

Re: [Oorexx-devel] oodialog - can anyone help with little effort?

2012-12-05 Thread Mark Miesfeld
On Wed, Dec 5, 2012 at 4:24 PM, Mark Miesfeld miesf...@gmail.com wrote: On Wed, Dec 5, 2012 at 2:03 PM, Mark Miesfeld miesf...@gmail.com wrote: I can help you with this, give me a little bit of time to put something together. Here's a simple start of a program. I used the '-' line

Re: [Oorexx-devel] oodialog - can anyone help with little effort?

2012-12-05 Thread Walter Pachl
Thanks a million! Works like a charm. Two points though: Rexx version says Version REXX-ooRexx_4.1.1(MT) 6.03 16 May 2012 Should it not say 4.2.0 ?? And germanWords = .array~of('Vater', 'Matter', 'Gutan','Tag') should be germanWords = .array~of('Vater', 'Mutter', 'Guten','Tag')

Re: [Oorexx-devel] oodialog - can anyone help with little effort?

2012-12-05 Thread Mark Miesfeld
On Wed, Dec 5, 2012 at 7:33 PM, Walter Pachl christel.u.w.pa...@chello.atwrote: Thanks a million! ** ** Works like a charm. Two points though: Rexx version says Version REXX-ooRexx_4.1.1(MT) 6.03 16 May 2012 Should it not say 4.2.0 ?? That is the correct version of

Re: [Oorexx-devel] oodialog - can anyone help with little effort?

2012-12-05 Thread Walter Pachl
Thanks for clarification of 4.1.1. Ah one question: why woud it not work on earlier ooRexx version(s)?? now: which is a ,new' feature? (WAS a questionI) For one, it uses the new C++ native extension mechanism, so it could not work on any ooRexx before 4.0.0. But, it also uses two API