You may find something close to what you are asking for by using DDUTILTY: https://docops.ca.com/ca-datacom/15-1/en/using/ca-datacom-datadictionary-batch-facilities/ddutilty-producing-reports-and-source-language-statements/ddutilty-sample-job-streams-and-output
For example, for our Table PERSON:
//SYSIN DD *
However the above does not give the offsets. But gives a full copybook layout.
Replace DESCRIPTION by NONE to get a easier output to read,
But using DR instead of COBOL will give the offsets.
Offset starting at 301, see docops for further information.
Several language are supported.