This portal is to open public enhancement requests against IBM Z Software products. To view all of your ideas submitted to IBM, create and manage groups of Ideas, or create an idea explicitly set to be either visible by all (public) or visible only to you and IBM (private), use the IBM Unified Ideas Portal (https://ideas.ibm.com).
We invite you to shape the future of IBM, including product roadmaps, by submitting ideas that matter to you the most. Here's how it works:
Start by searching and reviewing ideas and requests to enhance a product or service. Take a look at ideas others have posted, and add a comment, vote, or subscribe to updates on them if they matter to you. If you can't find what you are looking for,
Post an idea.
Get feedback from the IBM team and other customers to refine your idea.
Follow the idea through the IBM Ideas process.
Welcome to the IBM Ideas Portal (https://www.ibm.com/ideas) - Use this site to find out additional information and details about the IBM Ideas process and statuses.
IBM Unified Ideas Portal (https://ideas.ibm.com) - Use this site to view all of your ideas, create new ideas for any IBM product, or search for ideas across all of IBM.
ideasibm@us.ibm.com - Use this email to suggest enhancements to the Ideas process or request help from IBM for submitting your Ideas.
See this idea on ideas.ibm.com
Today, the DISPLAY UPON CONSOLE statement has a default Desciptor Code of 2 and a Route Code of 3. For automated log processing, it is important to be able to specify these codes. The only way today is to call an Assembler program performing WTO. PL/I already has this feature implemented : a DISPLAY(WTO) compiler option to specify the authorized values and a DISPLAY statement with sub-options.
COBOL
DISPLAY 'Hello World!' UPON CONSOLE
Assembler
HELLO CSECT
USING HELLO,15
SAVE (14,12)
WTO 'HELLO WORLD!',DESC=(11)
RETURN (14,12),RC=0
END
PL/I
*PROCESS DISPLAY(WTO(ROUTCDE(2,3,11),DESC(3,7,11,13)));
MSGWTO: PROC OPTIONS(MAIN) ;
DECLARE
My_Name Char(20);
My_Name = 'Hello World!';
display(My_Name) ROUTCDE(3) DESC(11);
End MSGWTO;
There is also the CICS example as per the documentation
EXEC CICS
WRITE OPERATOR
TEXT(data-value)
TEXTLENGTH(data-value)
ROUTECODES(data-value)
NUMROUTES(data-value)
...
Idea priority | Medium |
By clicking the "Post Comment" or "Submit Idea" button, you are agreeing to the IBM Ideas Portal Terms of Use.
Do not place IBM confidential, company confidential, or personal information into any field.
This Idea is being accepted and will be updated once planned for a future release.