One thing you might try is FCOPY with an appropriate blocking factor
on the file equate (what this would be, I don't remember - it's been
a _long_ time since I tried something like this).  This would give
you a file on the 3000 that should be readable from your COBOL program.
 
I know the thoughts expressed here are my own because no one else would claim
them!
 
Don Harrington                      [log in to unmask]
Boeing Commercial Airplane Group    Phone:   206-931-4457
PO Box 3707  MS 5J-34               FAX:     206-931-2325
Seattle, WA  98124-2207