MVSFORUMS.com

[pete]

This can be accomplished with a program, but can sort do this ?

I have records that look like (a period was used to represent a tab : X'05'):

[kolusu]

Pete,

The position of the '.' is varible which makes it hard for sort to achieve the desired results.But if you have file-aid in your shop then the following JCl will give you the desired results.

[pete]

Yes sir, I do have Fileaid.

I was not clear about the period. I just used it for demonstration purposes to represent a TAB ( could not think of a way to type a hex '05' but x'4b' will do ).

Anyway, I was looking for a process that converts the input records to output records where account is in position 1, first name starts at postion 9, last name starts at position 22, date starts at postion 38, etc. for all the records.

Thanks for your response.
_________________
Regards,
Pete.

[vijay]

If u've SAS in ur shop use it for this.
Sample example to do this kind of formatting:

[vijay]

SAS will take care of delimiters etc., and is very easy.If u've SAS and need help ,let me know.

[vijay]

or use EZT like this

[pete]

Thanks vijay. I'll try the EZtrive program.
_________________
Regards,
Pete.

[kolusu]

pete,

A simpler version than the code posted above. I assumed that your input file is of 80 bytes length.I used reference modification(similar to cobol) and case(evaluate in cobol) in this program.Notice that I used '*' for the output field declarations which means that easytrieve will calculate the start position based on the lengths of the fields.

[Frank Yaeger]

With z/OS DFSORT V1R5 PTF UK90007 or DFSORT R14 PTF UK90006 (April, 2006), you can now use DFSORT's new PARSE and JFY functions to do this kind of thing quite easily as shown by the DFSORT job below: