On Thu, 7 Aug 2008 14:22:38 -0400 David Boyes said:
>TAPPDS and TAPEMAC can reassemble unloaded PDSes on CMS. In looking
>around, also look for INMR123 REXX on your S disk. That seems to do
>something like what you might want.

OSPDS is a rexx stage for Pipelines that breaks apart a IEBCOPY file.
http://www2.marist.edu/~pipeline/ospds.rexx

I use it as:

PIPE(name PDSREC)|',
  'reader file' splid '|',
  'find' '41'x '|',
  'spec 2-* 1.80|',
  'deblock netdata|',
  'find {|' ,
  'spec 2-* 1|' ,
  'ospds' ft fm


You may also find http://www.planetmvs.com/unxmit/index.html useful for
some additional details.


>> I suspect that the 'some data' is an IEBCOPY unloaded PDS. Now I have
>an
>> assembler program that reads an IEBCOPY unloaded PDS but no program to
>wr
>> ite
>> one. I will have to break open the IEBCOPY program to see how a
>datastrea
>> m
>> is constructed. Maybe I can get a pipeline to create a compatible
>datastr
>> eam.

Reply via email to