HDTenEightyP/NetNews huggingface dataset:
From: rh@rtgx.hanse.de (Ruediger Hoppe)
Newsgroups: comp.lang.rexx
Subject: REXX string handling question
Date: 22 Jul 92 09:55:35 GMT
Organization: none

Hi netters,

I'm using REXX with OS/2 2.0. My first approach to learn REXX was writing
a program that collects parts of uuencoded ftpmailed binaries (I know 
there are such programs, but I needed a special one and wanted to try REXX).
As I work with an 486 and 10MB Ram I thought I choose a straight-forward 
approach: collect the lines of all text-files necessary in one array, than 
scan through it and write the complete uuencoded file.

That program took me about 3 hours and after that I liked REXX a lot,
although the online documentation with OS/2 is'nt very helpfull in 
various aspects.
All worked well, until I confronted the program with the problem it was
'designed' for. Most of the 70 parts of the ftpmailed gnu g++ compiler 
(which wasn't delivered due to 2MB ulimit of my mailfile, bounced twice 
by nnadmin and smail (?) and rescued from the spool directory by 
hand (arggh) had at least two subject lines and more to annoy normal 
grab programs.

My REXX program started to load the files (together about 65000 
lines, 3,5MB). After a while the swapfile (size onscreen displayed) 
started to grow (with 10 MB Ram?), the disk was really busy.
A few minutes later (swapfile was 10MB then) system response was less 
than lame. 115 minutes later ('in the heat of the night' with Sidney 
Poitier and Rod Steiger) my new multitasking didn't task anymore.
17MB swapfile, out of swap space, no warning, dead, reboot. The 65000
lines not loaded. Uuencoded Gnu c++ not written :(

After this my simple question is: why? 
I could think myself of some better approach collecting the files, 
but what does REXX do with arrays that consumes that much memory?
It's not the fault of REXX that OS/2 died, but how can one store 
a somewhat bigger array of text without degrading system performance 
to unusable?

BTW, I'm looking for a nice book about REXX for OS/2 2.0. Is IBM's 
'OS/2 Procedures Language 2/REXX Reference' any good?

Thanks in advance
    Ruediger
--
Ruediger Hoppe        | Putting fear beside him, he trusts in beauty blind
rh@rtgx.hanse.de      | He slips into the nectar,
Pinneberg, Germany    | Leaving his shredded clothes behind.
+49 4101 67278        | (The Lamia, Genesis)
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
X-Delivery-Notice:  SMTP MAIL FROM does not correspond to sender.
Newsgroups: comp.lang.rexx
Date:         Thu, 23 Jul 1992 14:13:52 EST
From:         "Scott (nmi) Mattes" <COTRSSM@SEA04VM.NAVSEA.NAVY.MIL>
Subject:      Re: Silencing DMT messages and/or others
Comments: To: General REXX Language Discussion List
              <REXXLIST@ucf1vm.cc.ucf.edu>

On Wed, 22 Jul 1992 10:55:18 CDT Mike Oswald said:
>Is there a way to silence or shut off unwanted RSCS messages after
>issuing a print command?  We are operating under VM/XA and I would
>like to shut these types of messages off.  With other guest systems
>SET CMSTYPE HT seems to work fine.

  On later versions of RSCS you can pass parms on the TAG info to tell
it to not send messages.

  Below is what you have to set the tag to, I think the columns are
important.

GDDMPRT  SYSTEM   50 ( SENTMSG=NO  FINALMSG=NO  ENQMSG=NO  )

Scott       | No success can compensate for failure in the home. David O. McKay
Mattes      | President 1951-70, Church of Jesus Christ of Latter-day Saints
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Newsgroups: comp.lang.rexx
Date:         Tue, 21 Jul 1992 11:45:08 DST
From:         "BJ VanDewater" <BJVANDE@VABVM1.VNET.IBM.COM>
Subject:      REXX compiler on MVS/ESA 3.1.3
Comments: To: REXXLIST%UGA.BITNET@cunyvm.cuny.edu

     The Compiler for REXX/370 will run on MVS 3.1.3, but it will only
support messages in the English language.  The pre-requisite for MVS 4
is due to the use of MMS message services to support languages other
that English. (This is a tested fact, not a hypothesis)
     The Library for REXX/370 requires TSO/E 2.3.1, which requires
MVS 4.  I do not know what would happen if someone installed TSO/E
2.3.1 on an MVS 3.1.3 system.  If TSO/E didn't fail, then the Library
for REXX/370 would probably also not fail. (Hypothesis, not tested fact)

          BJ VanDewater  REXX Compiler Development
                         Vienna Software Development Laboratory
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Newsgroups: comp.lang.rexx
Date:         Tue, 21 Jul 1992 12:33:15 IST
From:         Michael Cohen <P85016@BARILVM.BITNET>
Subject:      REXX compiler on MVS/ESA 3.1.3
Comments: To: ibm-main@dearn.BITNET, rexxcomp@ucf1vm.BITNET

  We are planning to install the REXX Compiler under MVS/ESA.
(REXX/370 1.1.0 Compiler)

  Our problem is that we are currently running MVS/ESA 3.1.3 and
the installation manual states that you require MVS/ESA V4 to
run the REXX Compiler.

  Does anyone have the REXX Compiler running under MVS/ESA 3.1.3?

  Thanks,
Michael Cohen       BITNET:   P85016@BARILVM
                    INTERNET: P85016@VM.BIU.AC.IL
Newsgroups: comp.lang.rexx
From: raitano@ocoee.cs.ucf.edu (Tony Raitano )
Subject: rexx n'th root function
Organization: University of Central Florida, Orlando
Date: Wed, 29 Jul 1992 03:57:17 GMT

/* calc n'th root */
/* this uses the standard square root finding method by taking the */
/* average of the initial guess and the number/guess, and refines  */
/* the guess each time, but THIS procedure divides the guess (n-1) */
/* times, and averages that value with the guess.  The convergance */
/* is a little faster for larger roots.  If the number of          */
/* iterations gets too high, it simply returns a 0.  NOTE this is  */
/* in exec form - to create a function, change the 'say' commands  */
/* to 'return' commands, and take out the error messages, if needed*/
/* written by michael campbell - released into public domain       */
/* July 20, 1992.  Knock yourselves out. =)                        */



parse arg number base
if base <> format(base,,0) | base < 0 then do
   say 'root must be positive integer'
   return 1
end

if number < 0 then do
   say 'number must be positive'
   return 1
end

lps = 0
guess = number / base
div = number / (guess ** (base - 1))
delta = abs(div - guess)
do while delta > .0000001     /* this can be changed for greater */
                              /* or lesser accuracy              */
   guess = (guess * (base - 1) + div) / base
   div = number / (guess ** (base - 1)) /* divide guess n-1 times */
   lps = lps + 1
   delta = abs(div - guess)
   if lps > 100 then do    /* number of iterations way too high */
      say 0
      exit
   end
end
say guess
exit
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Newsgroups: comp.lang.rexx
Date:         Wed, 22 Jul 1992 10:55:18 CDT
From:         Mike Oswald <MOSWALD@UNMCVM.BITNET>
Subject:      Silencing DMT messages and/or others

Is there a way to silence or shut off unwanted RSCS messages after
issuing a print command?  We are operating under VM/XA and I would
like to shut these types of messages off.  With other guest systems
SET CMSTYPE HT seems to work fine.

Thanks.
Newsgroups: comp.lang.rexx,comp.os.os2.programmer
From: bcmatusz@vela.acs.oakland.edu (Brian Matusz)
Subject: Programming OS/2 2.0 ...
Organization: Oakland University, Rochester MI.
Date: Mon, 27 Jul 1992 17:37:18 GMT

I am coming off of programming for Windows 3.0/3.1 in C and C++,
and would like now to start doing some heavy duty programming in OS2.
I have downloaded gcc, and will be getting my upgrade for Borland C++
when it is finished porting to OS/2. 

When programming for Windows, I picked up the Petzold book ... is there
something comparable for OS/2?  I will most likely get the RedBooks
from IBM, but I don't even know where to start getting programming
books for OS/2, as our antiquated book store says "OS Who?"

Thanks for the information ...

Please respond via Email!
Brad Wilson (via a friend's account)

--
People who agree with me need HELP!


Newsgroups: comp.lang.rexx
From: m-lp9966@JED.CS.NYU.EDU (Lewis Perin)
Subject: REXX mode in Emacs?
Organization: New York University
Distribution: comp.lang.rexx
Date: Mon, 27 Jul 1992 18:21:23 GMT

Does anyone know if there's a rexx-mode.el for GNU Emacs?  (For those
who don't know but would care, full GNU Emacs has been ported quite
successfully to OS/2 2.0)

Thanks very much, Lew
From: pmuellr@VNET.IBM.COM ("Pat Mueller")
Newsgroups: comp.lang.rexx
Subject: Re: OS/2 REXX/Presentation Manager Interface?
Date: 30 Jul 92 15:17:22 GMT
Article-I.D.: ucbvax.9207301556.AA20704

I have asking about PM-rexx interfaces on our internal news system,
and have some additional information.

Borland sells a product called ObjectVision which supposedly has a
rexx interface.  No other info regarding capabilities.

IBM sells a product called Personal AS, which supposedly has a rexx
interface and can do some level of PM programming.  When I get more
info on this, I'll post something about's it's capabilities.

Patrick Mueller
pmuellr@vnet.ibm.com
Programming Systems, IBM Cary, NC
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Newsgroups: comp.lang.rexx
Date:         Tue, 28 Jul 1992 14:29:21 CDT
From:         Todd Shook <DPTS@SIUEMUS.BITNET>
Subject:      Coding question

    Hello REXX-L,


     I have a Rexx coding question that somebody on the list
might be able to help with.  I'm trying to write a Rexx program that
will create the following output.  My input looks like the following.

              variable
              --------
record1:      out=c1
record2:      out=c2
record3:      out=c3
record4:      out=c4
   .            .
   .            .
   .            .



I want to read these input records and create the following string.


      SET C1 C2 C3 C4 . . .  until all records have been read.

Any help on how I can create this string would be appreciated.


                       Thanks Todd







+----------------------------------------------------------------------+
| Todd Shook                       |     ____   __  __  __  ____       |
| Data Processing Analyst III      |    / ___| |  | ||  || |  __|      |
| Southern Illinois University     |   ( (      ||  ||  || | |_        |
|     at Edwardsville              |     \ \    ||  ||  || |  _|       |
| Edwardsville, IL 62026-1068      |    ___) )  ||  ||__|| | |__       |
| (618) 692-3742                   |   |____/  |__|  \__/  |____|      |
| Bitnet: DPTS@SIUEMUS             |                                   |
+----------------------------------------------------------------------+
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Newsgroups: comp.lang.rexx
Date:         Thu, 23 Jul 1992 08:30:22 CDT
From:         Mike Oswald <MOSWALD@UNMCVM.BITNET>
Subject:      RE: Operating System Specific ?'s For REXX

>In article <REXXLIST%92072211593588@UGA.CC.UGA.EDU> you write:
>>Is there a way to silence or shut off unwanted RSCS messages after
>>issuing a print command?  We are operating under VM/XA and I would
>>like to shut these types of messages off.  With other guest systems
>>SET CMSTYPE HT seems to work fine.
>>
>>Thanks.
>
>Enter 'CP QUERY SET',
>and then 'CP SET MSG OFF', and/or 'CP SET IMSG OFF'.
>-----------------------------
>Date: Wed, 22 Jul 92 22:03:54 -0400
>From: al@stanley.cis.brown.edu (Andre Lehovich)
>
>Please, this list is for _rexx_ questions only, not OS questions
>specific to VM or any other operating system.
>
>Andre_Lehovich@Brown.Edu
>-----------------------------
>From: flass@136.161.128.3  (Peter Flass)
>Reply-To: flass@nyslbd.gov
>
>>   Subject:      Silencing DMT messages and/or others
>>   To: Multiple recipients of list REXXLIST <REXXLIST@ucf1vm.cc.ucf.edu>
>>
>>   Is there a way to silence or shut off unwanted RSCS messages ...
>
>This is _not_ a flame at you, but since this list has been gated
>to the various usenet lists there has been an effort underway to
>"clean up" the list by moving non-REXX topics to more appropriate
>fora.
>
>REXXLIST is intended for discussion of system-independent REXX topics.
>There are also lists for system-specific REXX implementations for
>TSO, VM, Amiga, and I believe unix and PC.
>
>Your question (though I am interested in hearing the answer) is only
>peripherally REXX-related and should probably be directed to VM-UTIL.

Sorry about the post ... I will direct VM specific questions to VM-REXX.

Thanks again.
From: pmuellr@VNET.IBM.COM ("Pat Mueller")
Newsgroups: comp.lang.rexx
Subject: Re: OS/2 REXX/Presentation Manager Interface?
Date: 29 Jul 92 13:57:41 GMT

There is no general purpose interface between PM and rexx.  There are
a few functions in the REXXUTIL function package (display a message
box, some system object interaction functions) that do interface to PM.

There is also an application called PMREXX, which will run a .cmd file
under the PM application.  It doesn't provide any specific interfaces
to PM for the rexx programmer though.

If you have some specific application in mind, you can write some
functions in C that rexx can use (aka External Functions), and
these functions can do pretty much whatever you want.  We've implemented
some functions for rexx that resolve to WinSendMsg()'s on the C side,
for instance.

Patrick Mueller
pmuellr@vnet.ibm.com
Programming Systems, IBM Cary, NC
Xref: sparky comp.lang.rexx:659 comp.os.os2.programmer:3814
From: raitano@ocoee.cs.ucf.edu (Tony Raitano )
Newsgroups: comp.lang.rexx,comp.os.os2.programmer
Subject: Re: Need scientific math for OS/2 REXX
Date: 27 Jul 92 17:14:21 GMT
Organization: University of Central Florida, Orlando

In article <1992Jul27.002238.12130@tamsun.tamu.edu> dlb5404@tamsun.tamu.edu (Daryl Biberdorf) writes:
>Has anyone written a REXX library for OS/2 that implements scientific
>math functions (trigonometric, logarithms, etc.)?  I'm *really* needing
>an exponentiation function that will let me specify a real (versus
>whole) number for the power, for instance 2**0.93.  Right now,
>the 0.93 is not supported by the ** operator, which takes only
>whole numbers for the power.
>
>Any help is appreciated.
>
>Daryl

Can't help you there, but I've written a root function that will figure the
n'th root (n >0 and an integer).  It started out as a square root, but I
generalized it to n'th root.

Also, a friend of mine wrote a log() function.  If anyone wants either of
these, let me know.
From: jpr@sun4.lri.fr (Jean-Pierre Riviere)
Newsgroups: comp.lang.rexx
Subject: Re: REXX for UNIX? (ignorant question)
Date: 28 Jul 92 11:27:12 GMT
Organization: Laboratoire de Recherche en Informatique


ftp to flipper.pvv.unit.no, go to /pub/rexx
and get regina-0.03d.tar.Z
regina-rexx is a nice implementation, whose author
is always enhancing (thanks Anders! :-)
-- 
  Jean-Pierre RIVIERE        |     ///
  LRI - Universite Paris Sud | \\\///
  e-mail : jpr@lri.lri.fr    |  \///
Newsgroups: comp.lang.rexx,comp.os.os2.programmer
From: giguere@csg.uwaterloo.ca (Eric Giguere)
Subject: OS/2 REXX update available for FTP
Originator: giguere@csg.uwaterloo.ca
Organization: Computer Systems Group, University of Waterloo
Date: Thu, 23 Jul 1992 17:47:29 GMT

I was poking around on software.watson.ibm.com, which is where IBM puts its
official patches for OS/2, and noticed that there was a new version of the
OS/2 REXX interpreter available in /pub/os2/rexx20.zip.  You can also get
it off of ftp-os2.nmsu.edu in /pub/os2/new/rexx20.zoo for now.... 

The new version has some minor bug fixes:
  
    -- SysIni function had a memory leak
    -- A stack overflow could occur when using PMREXX
    -- Value() BIF was incorrect

I didn't see an announcement of this anywhere, so I'm posting it here...

-- 
 Eric Giguere                                    giguere@csg.UWaterloo.CA
          So is Windows NT short for "Windows, NOT?"
From: GOMBERG@UCSFVM.BITNET (Dave Gomberg)
Newsgroups: comp.lang.rexx
Subject: Re: REXX Compiler
Date: 29 Jul 92 22:24:08 GMT
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
              29 Jul 1992 16:05:19 EDT from <RAMETZ01@ULKYVM.LOUISVILLE.EDU>

On Wed, 29 Jul 1992 16:05:19 EDT Robert A. Metzger said:

>that it did not flag a syntax error when the exec was compiled. The statement
>was coded as WHEN Choice = 'QUIT' | Choice 'Q' leaving the = out of the second

This is not an error at compile time.  Choice plus a blank, plus a capital Q
get concatenated together at execution time and treated as a logical.  Of
course, it won't be a valid logical, so an error will arise at execution time,
but how is the poor compiler supposed to second guess that?
Worse (more confusing) constructions are possible in PL1!

Dave

Dave Gomberg    GOMBERG@UCSFVM  Internet node UCSFVM.UCSF.EDU  (415)731-7793
Seven Gateview Court, San Francisco CA 94116-1941
From: cudat@warwick.ac.uk (J M Hicks)
Newsgroups: comp.lang.rexx
Subject: Re: REXX for UNIX? (ignorant question)
Date: 29 Jul 92 09:03:46 GMT
Organization: Computing Services, Warwick University, UK

In article <92209.153048CATHIE@SLACVM.SLAC.STANFORD.EDU> CATHIE@SLACVM.SLAC.STANFORD.EDU writes:
>The Workstation Group also has a free Unix version for academia.

It would seem to be more accurate to say that The Workstation Group
_plans_ to have a free Unix version of Rexx for academia.
I think the company hopes to have it available before the end of 1992.
--
Jim Hicks, Computing Services, Warwick University, Coventry, England. CV4 7AL
cudat@csv.warwick.ac.uk
JANET: cudat@UK.AC.WARWICK.CSV
EARN, BITNET or NetNorth: cudat%CSV.WARWICK.AC.UK@UKACRL
Internet: cudat%csv.warwick.ac.uk@nsfnet-relay.ac.uk
cudat@warwick.uucp
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Subject: (no subject given)
From: dlb5404@tamsun.tamu.edu (Daryl Biberdorf)
Subject: Need scientific math for OS/2 REXX
Organization: Texas A&M University, College Station
Date: Mon, 27 Jul 1992 00:22:38 GMT

Has anyone written a REXX library for OS/2 that implements scientific
math functions (trigonometric, logarithms, etc.)?  I'm *really* needing
an exponentiation function that will let me specify a real (versus
whole) number for the power, for instance 2**0.93.  Right now,
the 0.93 is not supported by the ** operator, which takes only
whole numbers for the power.

Any help is appreciated.

Daryl
-- 
Daryl Biberdorf  N5GJM    dlb5404@rigel.tamu.edu  or  dlb5404@tamsun.tamu.edu
        "You're not messy.  You're organizationally impaired."
                _Real_Life_Adventures_, July 3, 1992 


-- 
Daryl Biberdorf  N5GJM    dlb5404@rigel.tamu.edu  or  dlb5404@tamsun.tamu.edu
        "You're not messy.  You're organizationally impaired."
                _Real_Life_Adventures_, July 3, 1992 
Newsgroups: comp.lang.rexx
From: dlb5404@tamsun.tamu.edu (Daryl Biberdorf)
Subject: Re: Need scientific math for OS/2 REXX
Organization: Texas A&M University, College Station
Date: Mon, 27 Jul 1992 05:18:10 GMT

In article <920726.212719.EDT.BEC@ALBANY> Ben Chi <BEC@ALBANY.BITNET> writes:
[told me about a neat exec he wrote to implement scientific functions]

This worked like a champ.  I went ahead and took only the functions I
needed from the file (because I didn't have time to work around some of
the VM-specific code), and it works great!

Highly recommended.

Daryl
-- 
Daryl Biberdorf  N5GJM    dlb5404@rigel.tamu.edu  or  dlb5404@tamsun.tamu.edu
        "You're not messy.  You're organizationally impaired."
                _Real_Life_Adventures_, July 3, 1992 
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Organization: Institut fuer Medizinische Computerwissenschaften
Newsgroups: comp.lang.rexx
Date:         Thu, 23 Jul 1992 15:14:59 CDT
From:         Christian.J.Reichetzeder@AWIIMC12.IMC.UNIVIE.AC.AT
Subject:      Re: REXX string handling question

On Wed, 22 Jul 92 09:55:35 GMT Ruediger Hoppe said:
>My REXX program started to load the files (together about 65000
>lines, 3,5MB). After a while the swapfile (size onscreen displayed)
>started to grow (with 10 MB Ram?), the disk was really busy.

Well, that's at least 65000 variables in  the array. Dunno about OS's REXX but
let's estimate the control block as 40 bytes/variable. This gives an extra 2.5
MB. So loading the files requires 6MB minimum - for the variables only.
Depending on what your program does besides the loading you may actually break
through the ceiling :-)

Christian
Newsgroups: comp.lang.rexx
From: jogulin@camelot.fia.dmg.ml.com (Joseph Ogulin)
Subject: Re:      Re: Determining weekday given a date
Organization: The Rift from Here to There
Date: Thu, 23 Jul 1992 13:16:30 GMT

In article <m0mA8o4-0000cyC@juts.ccc.amdahl.com>,         chip.davis@AMAIL.AMDAHL.COM writes:
|> The following exec will probably do what you want, and is considerably
|> shorter than the universal CA/ACM routine posted.
|> -Chip-
|> 
|> ------------------Top of Exec-------------------------
|> /* Return the weekday name for an arbitrary date in this century */
|>   wk = 'Sunday Monday Tuesday Wednesday Thursday Friday Saturday'
|>   Parse Var wk wkday.0 wkday.1 wkday.2 wkday.3 wkday.4 wkday.5 wkday.6 .
|>   Parse Value 31 30 30 30 30 With m. m.4 m.6 m.9 m.11 .
|>   Parse Arg mm . '/' dd . '/' yy .
|>   yr = yy + (yy = 0) * 100
|>   m.2 = (yr // 4 = 0) + 28
     ^^^^^^^^^^^^^^^^^^^^^^^^
|>   d0 = ((yr - 1) % 4 + yr) // 7
|>   d = 0
|>   Do i = 1 To mm - 1
|>     d = d + m.i
|>   End i
|>   d = (d + dd + d0) // 7
|>   Return wkday.d
|> -----------------------End of Exec---------------------

By your method, 1900 would have been a leap year and it is not.  To correctly
define a leap year, you would have to do this:

m.2 = (((yr // 4 = 0) & (yr // 100 ^= 0)) | (yr // 400 = 0)) + 28

The year has to be divisible by 4 and not by 100 or divisible by 400.

-- 
==> "You never f**king know the answer when it's important." --The Doctor <==
Joe Ogulin

jogulin@camelot.fia.dmg.ml.com		joe@monroe.pilot.dmg.ml.com
jogulin@apollo.stevens-tech.edu		gcs_jogulin@stevens.bitnet

Disclaimer:  The above article is solely my opinion and does not necessar-
ily reflect that of my employer.  The content is my responsibility alone.
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
X-Delivery-Notice:  SMTP MAIL FROM does not correspond to sender.
Newsgroups: comp.lang.rexx
Date:         Mon, 20 Jul 1992 21:07:00 ET
From:         chip.davis@AMAIL.AMDAHL.COM
Subject:      Re: Determining weekday given a date
Comments: To: TSO-REXX%ucf1vm.cc.ucf.edu@juts.ccc.amdahl.com,
              REXXLIST%ucf1vm.cc.ucf.edu@juts.ccc.amdahl.com

On Tuesday, 14 July 1992 12:50 PT, ts0007 said:
>
> Has anyone written a routine to take a date in the future
> in some form (e.g. 080292), and determine if the day is a weekday (M-F)
> or Sat/Sun?
>
> Perhaps someone knows of a way to easily do this.

The following exec will probably do what you want, and is considerably
shorter than the universal CA/ACM routine posted.
-Chip-

------------------Top of Exec-------------------------
/* Return the weekday name for an arbitrary date in this century */
  wk = 'Sunday Monday Tuesday Wednesday Thursday Friday Saturday'
  Parse Var wk wkday.0 wkday.1 wkday.2 wkday.3 wkday.4 wkday.5 wkday.6 .
  Parse Value 31 30 30 30 30 With m. m.4 m.6 m.9 m.11 .
  Parse Arg mm . '/' dd . '/' yy .
  yr = yy + (yy = 0) * 100
  m.2 = (yr // 4 = 0) + 28
  d0 = ((yr - 1) % 4 + yr) // 7
  d = 0
  Do i = 1 To mm - 1
    d = d + m.i
  End i
  d = (d + dd + d0) // 7
  Return wkday.d
-----------------------End of Exec-------------------------
Comments: Gated by NETNEWS@AUVM.AMERICAN.EDU
Newsgroups: comp.lang.rexx
Date:         Wed, 29 Jul 1992 16:05:19 EDT
Comments:     Converted from PROFS to RFC822 format by PUMP V2.2X
From:         "Robert A. Metzger" <RAMETZ01@ULKYVM.LOUISVILLE.EDU>
Subject:      REXX Compiler

Programmer II, I.T. Information Systems
Phone: 588-0948

We have the IBM REXX Compiler version 1.1.0 installed here, and I have noticed
that it did not flag a syntax error when the exec was compiled. The statement
was coded as WHEN Choice = 'QUIT' | Choice 'Q' leaving the = out of the second
condition. Since this did not get flagged when compiled, I wondered if it
might be a bug in the compiler or is 1.1.0 not the current version for the
compiler?? Any comments??

 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
There are never enough hours in a day!!
                                           :)
Rob