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.
This RFE is not for "//SYSOUT DD ...".
This RFE is for "//MYFILE DD SYOUT=..."
BPXWDYN called by Cobol can do it. Why Cobol can't do it natively ?
Denis
This has been investigated further.
The COBOL runtime does not manage the DD SYSOUT. So there is no way for the COBOL runtime to allocate it.
By the time the Job step is running and the COBOL program is initialized; SYSOUT is already allocated.
As a result, this RFE is being rejected.
PS : look at sample program in attachments; it use FD and OPEN, WRITE, CLOSE statements. What we expect is to replace call to BPXWDYN for file allocation by full Cobol solution.
Hi,
Note: the request related to the dynamic allocation of file with a release in sysout (//MYDD DD SYSOUT = *), and not the allocation of the ddname SYSOUT (//SYSOUT DD...).
The purpose is to produce reports, using statments "WRITE AFTER ADVANCING n LINES / PAGE" to control the layout, and incidentally the "AT-END-OF-PAGE" clause or FD entry clause (LINAGE).
Using the DISPLAY statement will not allow the same control of the layout, except to expand it with the same possibilities as the statement WRITE concerning the management of the jumps lines and pages.
Incidentally, we use a code generator (IBM VisualAge Pacbase today, Rational Programming Patterns in future) to produce programs in genral, and reports in particular. The generated code uses the WRITE statement.
Kind regards,
Denis FALLAI
SYSOUT is managed by the system before initialization of COBOL (the user program and the COBOL library). It cannot be dynamically allocated. Since SYSOUT is being used in DISPLAY, we are investigating an alternative: To allow DISPLAY to send output to a user DD, which can be dynamically allocated. The name of this DD cannot be SYSOUT. Would this alternate approach satisfy your requirement ?
This RFE requires some more time to be considered.
Attachment (Description): Dynamic allocation of a SYSOUT