¿ªÔÆÌåÓý

ctrl + shift + ? for shortcuts
© 2025 Groups.io

Naive PL/1 F question.


 

I've a naive question about the PL/1 F we
have onboard on MVS3.8j.

Forgive me, I'm trying to write code for
going from a single character to its EBCDIC
code and viceversa.

The first problem should be solved by this code
fragment:

ECODE:
PROCEDURE ( CHR ) RETURNS(FIXED BIN(15));
DCL CHR CHARACTER(1);
DCL CODE FIXED BIN(15);

CODE = UNSPEC ( CHR );
RETURN ( CODE );
END ECODE;

which seems to work correctly.

But I can't see a way for going back from the EBCDIC
code to a single character string, using only PL/1 F.

For what I can understand in modern PL/1 compilers
there are specific builtin functions implemented, but,
reading the original IBM manuals, I can't see any simple
way to solve the problem.

Any advice?

Peppe.

Join [email protected] to automatically receive all group messages.