Dear List,
I have inherited a thirty year old assembler interface for COBOL
to access VSAM ESDS data sets randomly.
I have been asked to produce a version that will allow access to extended
format ESDS. I have updated
the code as best as I can, updating the GENCB macro calls for ACB and RPL
with the appropriate opt codes for
extended addressability. However, the program as written returns the RBA
being requested in a 4 byte field called
RPLDDDD from the IFGRPL Macro. I can find no other field in the literature
or IFGRPL which would return me the 8 byte address
although RPLDDDD seems to be part of a double word area called RPLRBAR and
may well be the eight byte RBA field I'm looking for.
The comments within the macro say otherwise. Has anyone coded for 8 byte
RBAs and extended addressability who may be able to
shed some light on this?
Thanks,
Jim Holloway - MetLife
The information contained in this message may be CONFIDENTIAL and is for the
intended addressee only. Any unauthorized use, dissemination of the
information, or copying of this message is prohibited. If you are not the
intended addressee, please notify the sender immediately and delete this
message.
