Transposição de registro JCL de mainframes usando SORT

Quero fazer a seguinte transposição de registros para a coluna usando SORT (snycsort ou DFSORT). Deve ser escalável para qualquer número de registros. Isso é possível? DE001XYX A CD100000 B CD200000 C DE001KKK A CD100000 B DE003ZZZ A ...