Ron Thomas wrote:

>We have a file which is of the below layout LRECL = 80

>0001 - 4043
>4045 - 4060
>4062 - 4108
>4110 - 4700
>4705 - 4706
>4708    88888   
>4714       
>4719       
>4723
>67777       

>Here we need to make this file as below by appending zeros to the 1'st byte of 
>each number only if the length of the number is 4 . This being a parmcard if 
>someone entered a 5 digit then no need to apend a zero . Could some one let me 
>know how to do the same in sort?

REXX is very handy and useful to fix this. 

>00001 - 04043
>04045 - 04060
>04062 - 04108
>04110 - 04700
>04705 - 04706
>04708   888888    
>04714       
>04719       
>04723       
>677777

Well, as others said, please show us your attempts to resolve your problem. 
Then any of IBM-MAIN members can perhaps give a solution.

Groete / Greetings
Elardus Engelbrecht

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to