Mombu the Programming Forum sponsored links

Go Back   Mombu the Programming Forum > Programming > Programming languages > PLI Cant create a Upper case function
User Name
REGISTER NOW! Mark Forums Read

sponsored links

11 24th October 08:40
david frank
External User
Posts: 1
Default PLI Cant create a Upper case function

I replied in comp.lang.pl1 that it meant that the hard-core bakers-dozen of
IBM syncophants still posting has had their pristine IBM-BLUE TEAM PL/I
t-shirts discolored in the last decade by the CRAP they spread in the

But one of the replies provided a better definition, which is: IBM has
"marooned" PL/I programmers with cutbacks in
platforms supported vs. that supported by their C++ Fortran compilers thus
I have adopted that definition,
marooneds shortens to MAROONS
Does it also question their IQ levels, well who would hire one of them

Meanwhile IBM moves on with a Fortran (claiming some F2003 capabilities) for
But has NO plans for a PL/I for Linux, and has stopped its PL/I quarterly
newsletter 5 years ago.
  Reply With Quote

  sponsored links

12 24th October 08:40
External User
Posts: 1
Default PLI Can create a Upper case function

|"robin" <> wrote in message |news:HFXUe.30311$
|> David Frank wrote in message ...
|>> However I assert that PL/I syntax cant be used to create a Upper
|>> function, |
|> PL/I has an UPPERCASE function, as well as LOWERCASE.
|> As well, anyone can write one,
|Well anyone aint going to write one, are they?

They wouldn't bother, because the function is:
1. convenient;
2. portable;
3. about 10 times faster than your ******** loop Fortran code; and what's more, 4. it works.
|> but why would you?
|To prove your FAQ assertion that PL/I syntax "has more power than Fortran"
|of course.

Well, you've just proved the opposite, haven't you.

A simple function to do the job.
  Reply With Quote
13 24th October 08:41
william m klein
External User
Posts: 1
Default PLI Cant create a Upper case function

If your concern (as if you actually had one) was for IBM providing the UPPERCASE
and LOWERCASE "BIF's" for Windows PL/I, then please see:

which is the Language Refererence (for among others) for:

WSED PL/I for Windows

Then look at page 440 for LOWERCASE
Page 495 for UPPERCASE

I believe (but won't swear to it) that there actuallyhas been one or more
releases after this one, but this just shows that these built-in functions have
been available for Windows PL/I (from IBM) since 2003 (the copyright for that

Of course, it is interesting that you "CAN'T" challenges now ONLY apply to PL/I
for Windows (from IBM). You really do need to make that clearer in the future.

As far as EBCDIC goes, you may want to check out:

and start reading at page 35 where it says (in part),

The workstation compilers support options that instruct the operating system to
treat data and floating-point operations the same way that the mainframe does.
There are suboptions of the DEFAULT compile-time option that you should specify
for all mainframe applications that might need to be changed when moving code to
the workstation:
For more information on these compile-time options, see "DEFAULT" on page 46."

Bill Klein
wmklein <at>
  Reply With Quote
14 24th October 08:41
External User
Posts: 1
Default PLI Can create an Upper case function and Anything Else

|"James J. Weinkam" <> wrote in message |news:W%0Ve.269044$on1.102625@clgrps13...
|> As Robin has said, recent versions of PL/I have UPPERCASE and LOWERCASE
|> built in functions which work correctly irrespective of the character code
|> in use. Your code will fail in EBCDIC. All version of PL/I have the
|> TRANSLATE built in function. UPPERCASE and LOWERCASE are just special
|> cases of TRANSLATE which is also independent of character code.
|> Although it would be foolish to do so, it would be easy to write code
|> equivalent to yours using RANK and BYTE. Only a masochist would do so,
|> since the result would be slower and non portable.
|As a IBM rep has said, ALL their current compilers support ONLY ASCII as the
|native text,
|which is what Fortran supports.
|Furthermore, like always my challenge only addresses Windows PL/I

Windows PL/I supports EBCDIC as well as ASCII,
and 16-bit characters and GRAPHIC.
So does Enterprise PL/I (z/OS).
Why don't you read the manual?

|I believe you got involved when a similar challenge was for a PL/I TRIM
|function to be written, yes/no?
|(only Windows PL/I has such a function?)..

TRIM is available at least in Enterprise PL/I, Windows VA PL/I, and PL/I for OS/2.

|A PL/I function declaration cant declare a string output length determined
|dynamically by input string length,
|in fact mainframe PL/I hardly supports at all, isnt that true?

Why don't you read the manual?
A PL/I function can return a character string whose
current length depends on an input string length or
anything else.

|function User_String_Function(s1) result (s2)
|character(*) :: s1
|character(len(s1)) :: s2 ! <- cant do this even in Windows PL/I

Can so -
declare s2 char (length(s1));
in all versions of PL/I.
You really need to read the manual.

|note: it was Robin Vowels who again cross-posted a PL/I topic to

It was a Fortran topic.
  Reply With Quote
15 24th October 08:41
tim challenger
External User
Posts: 1
Default PLI Cant create a Upper case function

How do they ever manage across the road on the mainframe, I wonder?
Tim C.
  Reply With Quote
16 24th October 08:41
dick hendrickson
External User
Posts: 1
Default PLI Cant create a Upper case function

I'm curious about the non portable part. It's easy to write
a standard conforming portable Fortran uppercase or
lowercase function. Is the PL/I version non portable
because you'd attempt to mimic Dave's Fortran coding style,
or is there an inherent reason why character conversions
are nonportable. I haven't seen Dave's Fortran functions
(at least not in this round ). But, he often writes
functions that are special cased to one particular compiler
rather than use the natural Fortran character operations.
Like I said, I'm curious if that's what makes the PL/I
version non portable.

**** Hendrickson
  Reply With Quote
17 24th October 08:41
david frank
External User
Posts: 1
Default PLI Can create an Upper case function and Anything Else

As usual you will blather for dozens of lines, but wont commit yourself to
posting a actual function
that shud take half-a-dozen statements, why is that ALWAYS the case?

No-one will backup your assertion that a RETURNS statement can be declared
as you HINT it can
because it cant,
You really need to read the manual..
  Reply With Quote
18 24th October 08:41
david frank
External User
Posts: 1
Default PLI Cant create a Upper case function

has always asserted its "CANTS" are aimed at IBM's Windows PL/I
  Reply With Quote
19 24th October 08:42
glen herrmannsfeldt
External User
Posts: 1
Default PLI Cant create a Upper case function

In that case, I assert that all Fortran "CANS" be aimed at
IBM's VS Fortran.

It is only fair, you get one assertion, I get another.

-- glen
  Reply With Quote
20 24th October 08:42
david frank
External User
Posts: 1
Default PLI Cant create a Upper case function

Afaik, Windows PL/I is the pinnacle of IBM's PL/I development and was
migrated several years back to support IBM's Z/OS platform
so any shortcomings of that compiler means IBM doesnt have syntax that
allows matching Fortran's capability..

Otoh, CVF is no longer the leader in current Fortran development
but it does have implemented some syntax thats new in THE STANDARD
so whats wrong with my using such syntax? ANS: NOT A THING!!
  Reply With Quote

Thread Tools
Display Modes

Copyright 2006 - Dies Mies Jeschet Boenedoesef Douvema Enitemaus -