PL/I programming language used on IBM Mainframes
Questions tagged [pl-i]
29 questions
10
votes
3 answers
why PL/I didn't make it in scientific computing?
PL/I is a very old language but seemingly haven't got much publicity and appreciation as Fortran for scientific computing. Why is that? A search on the web does show that there are many PL/I codes for scientific computing. There is among others a…
yCalleecharan
- 4,656
- 11
- 56
- 86
4
votes
1 answer
Can anybody clarify how the resultant value is derived?
Code fragment in PL/I is given below:
DECLARE WAVE_LTH FLOAT BINARY(21);
...
WAVE_LTH = 11001E-10B (**resultant value = 0.0244140**)
Can anybody clarify how the resultant value is derived?
manoj murali
- 41
- 2
3
votes
1 answer
Is a z/OS PL/I CONTROLLED variable preserved between separate invocations of a procedure?
Is a z/OS PL/I CONTROLLED variable preserved between separate invocations of a procedure? Let’s suppose that we need a counter that is internal to a subroutine and preserved across invocations. The easiest way to do it would be to use a static…
MF Dinosaur
- 93
- 5
3
votes
2 answers
Where can I find a PL/I Compiler for Windows?
50 years ago, I worked for IBM in a mainframe-environment and was an absolute fan of PL/I, this powerful and flexible language. Today I'm retired and would like to program in this language again.
I'm searching for a PL/I-Compiler for my Windows 10…
Max G.
- 57
- 1
- 3
3
votes
3 answers
z/OS MVS and z/OS UNIX Interop in PL/I Program?
I've been poking around in various resources in the Internet, but couldn't find a definitive answer that I understood, so I'm asking here:
How can I invoke z/OS UNIX code from z/OS MVS?
I'm aware that BPXBATCH PGM ... can invoke a z/OS UNIX Program…
fjf2002
- 872
- 5
- 15
3
votes
2 answers
When there is integer division in PL/1?
There are so many different numeric data types in PL/1. And I want to know when there is an integer devision, and where is not. For instant, I've written a small example that shows (at least for me) that PL/1 is very entangled in it:
DCL BIN15 FIXED…
zer_ik
- 410
- 1
- 4
- 14
3
votes
0 answers
PL/1. begin options(inline). Memory allocation
I'm reading the book about PL/1 and have some doubt about what author says:
And even more...
I did some tests and they really screams that this is not true at all. I can explain what they are if needed. So question is: does memory allocation…
zer_ik
- 410
- 1
- 4
- 14
2
votes
1 answer
How do I get the current remaining length of a string?
I've got an array
DO WHILE (NOTEND = '1'B);
IF (LENGTH(VALUELIST) > 8) THEN DO;
VALUELIST = SUBSTR(VALUELIST,8);
END;
ELSE DO;
NOTEND='0'B;
END;
END;
Now my problem is: Length(valuelist) always returns the original…
Thomas
- 2,886
- 3
- 34
- 78
2
votes
1 answer
IBM PL/I: Using Fixed variable
I came across a code recommendation for IBM PL/I: do not create fixed type variable. The example of wrong code is:
DECLARE avar FIXED BIN;
while the correct code given is:
DECLARE avar BIN;
I wanted to know whether this is correct recommendation…
user7571491
2
votes
0 answers
Oncode 9250 in PLI
I am getting ONCODE 9250 error in PL1 due to which the submodule i am trying to call from CTL module is failing. The error is:
Fetchable procedure with entry "*******" could not be found.
Please help in resolving this issue
Sankar
- 21
- 5
2
votes
2 answers
ONCODE=451 The STORAGE condition was raised
I recently issued an update to a HOST Reporting program. Our shop uses Enterprise PLI.
I added 2 new structures Declared as BASED. So i basically use an ALLOC statement to allocate the required storage for the structures and then pass the pointers…
HEX
- 83
- 1
- 9
2
votes
1 answer
PL/1 fixed and float, dec and bin data types. Difference between dec and bin. How many bytes?
I came from c++ and java and now I am reading book about PL/1 and have some problems with understanding data types.
First is fixed bin. As I understand actually there are 4 fixed bin types. They are:
fixed bin(7,n) -- 1 byte
fixed bin(15,n) -- 2…
zer_ik
- 410
- 1
- 4
- 14
2
votes
1 answer
PL/I & not printing on tab stop
I have the following PL/I code:
declare 1 u union,
2 c character(1),
2 ci fixed binary(4) unsigned;
ci = data_mem(data_ptr);
put list (c);
What this does, is it takes an integer and outputs that as if it was an ascii/ebcdic…
Folkert van Heusden
- 433
- 4
- 17
- 38
2
votes
1 answer
Why comparision doesn't work as I suspect? PL/I
This comparison prints '0'b. Don't understand why... As I know strings are converted automatically to float in PL/I if needed.
put skip list('-2.34e-1'=-2.34e-1);
zer_ik
- 410
- 1
- 4
- 14
2
votes
0 answers
official test suite for PL/I like for Cobol 85?
Could anybody point me to an official test suite for PL/I ?
as PL/I is an ANSI standard, I was hoping to find such a suite but I'm unsuccessful in my search until now.
Ideal would be to find a suite like the test suite for COBOL85 test suite…
Didier Durand
- 627
- 7
- 16