This sounds like a somehow strange request to me,
because concatenation is designed just to hide the fact that
the data comes from different concatenated files from the
application program. I guess it will be difficult to extract the
current processed DSN from the I/O related MVS control blocks.
If you have such a requirement, I would suggest that you concatenate
the files in advance (DFSORT?) and append a file identifier (1, 2, 3) at
the end
of every record (fixed record length assumed), then you can read this
record
identifier from your COBOL program when processing the concatenated file.
Kind regards
Bernd
Am 14.09.2015 um 13:14 schrieb Massimo Biancucci:
Hi everybody,
is there any way to know which concatenated dataset I've read the current
record from ?
To be clear:
FILE1 DD DISP=SHR,DSN=MYDSN1
DD DISP=SHR,DSN=MYDSN2
DD DISP=SHR,DSN=MYDSN3
>From a COBOL program:
READ FILE1 INTO MY-RECORD AT END GO E-O-P.
CALL "MYPGM to know the file I've read from".
MYPGM should be assembler I suppose.
I was not able to find anything in TIOT nor JFCB.
Thanks a lot in advance.
Massimo
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
