If I have been not correct with some used word, excuse me please. not my intention... I think here there is a confusion...I am trying to improve my english -_-.
thank you for your solution and your suggestion about joinkey. I m trying to understand this part of your code:
//SORTIN DD DISP=SHR,DSN=Your Input FB 26 byte file
//SORTOUT DD DSN=&&S,DISP=(,PASS),SPACE=(TRK,(1,1),RLSE)
//SYSIN DD *
OPTION COPY,STOPAFT=1,NULLOUT=RC4
INREC BUILD=(C'TSTMP,C''',1,26,C'''',80:X)
//*
//SORTOUT DD DSN=&&S,DISP=(,PASS),SPACE=(TRK,(1,1),RLSE)
//SYSIN DD *
OPTION COPY,STOPAFT=1,NULLOUT=RC4
INREC BUILD=(C'TSTMP,C''',1,26,C'''',80:X)
//*
I will look in forum
Thank you all