I personally don't have a particular use for it, and thus would not myself create an RFE requesting it. But based on what I've seen discussed here I was thinking they were looking for something like the following example:
select my-file assign using my-file-name. 01 my-file-name pic x(8). *> Populate with the DDNAME to be associated with "my-file" perform with test after until my-file-name = low-values move low-values to my-file-name accept my-file-name if my-file-name = low-values exit perform end-if open input my-file perform process-my-file close my-file end-perform (yes, I used exit perform. :-) ) With JCL being something like this: //SYSIN DD * FILE1 FILE2 FILE3 FILE4 /* //FILE1 DD ... //FILE2 DD ... //FILE3 DD ... //FILE4 DD ... If this is what the OP was really looking for I'm not sure. Frank ________________________________ From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> on behalf of Bill Woodger <bill.wood...@gmail.com> Sent: Tuesday, January 10, 2017 4:34 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: "task level" TIOT & XTIOT? A crazy thought? And what would you want in data-name-1? A DDNAME,like the PL/I? A data set name? A partial data set name (with some magic for full expansion)? Something else? What do you feel, with your selected option for data-name-1, would be some example uses for this? Again, for me, just because something is in COBOL 2014, doesn't naturally mean it should get Enterprise COBOL development resources assigned to it. Clearly, unlike in 1985, the number of "sites" using COBOL on Linux/Unix/Windows is greater than the number of Mainframe sites. COBOL 2014 and future developments of the COBOL Standard will reflect this. As you've pointed out previously, with XML, Json and UNBOUNDED, IBM is happy to be COBOL-85-with-extesnsions-from-2002-2014-plus-our-own. So, good choices from 2002/2014, yes. What is it that would make the ability to use a data-name in the ASSIGN good? On Tue, 10 Jan 2017 23:01:59 +0000, Frank Swarbrick <frank.swarbr...@outlook.com> wrote: >For whatever its worth, the latest COBOL Standard offers the following syntax, >which I believe meets this requirement at the language level: > > >SELECT file-name-1 ASSIGN USING data-name-1. > > >"3) The ASSIGN clause specifies the association of the file connector >referenced by file-name-1 to a physical file identified by device-name-1, >literal-1, or the content of the data item referenced by data-name-1. > >3b) When the USING phrase of the ASSIGN clause is specified, the file >connector referenced by file-name-1 is associated with a physical file >identified by the content of the data item referenced by data-name-1 in the >runtime element that executes the OPEN, SORT, or MERGE statement." > > >Someone want to open an RFE? > > >Frank ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN