resize on universe

Hi all,

I am getting error to open files having modulo greater than 1000 in my universe edition. If I resize it is working fine.
I want to resize all the files having modulo greater than 1000.

Is there any way to find all the files having modulo greater than 1000 and resize all files with a single command. using pipe or something.
Now I am resizing on by one as
RESIZE 30 9000

Thank you,

I dont find any direct way to do this.



Write a basic program,



Use STATUS statement to check the existing modulo and RESIZE....


___________

Thanks