diff --git a/UTILSUBS/get_values.f b/UTILSUBS/get_values.f
index b7ba588ca1baeb6460bd7a94ebdc670f5f41edfa..8aabe477c5964a3cbbbb7fa0805cfe808e138024 100644
--- a/UTILSUBS/get_values.f
+++ b/UTILSUBS/get_values.f
@@ -72,12 +72,14 @@ c
               this(last_hex:)=' ' 
               CALL squeeze(this,i)
               IF(this.eq.' ') goto 2222
-              READ(this(1:i),'(z)',err=2222) v(j)
+c              READ(this(1:i),'(z)',err=2222) v(j)
+              READ(this(1:i),'(z10)',err=2222) v(j)
             elseif(oct) then
               this(last_oct:)=' ' 
               CALL squeeze(this,i)
               IF(this.eq.' ') goto 2222
-              READ(this(1:i),'(o)',err=2222) v(j)
+c              READ(this(1:i),'(o)',err=2222) v(j)
+              READ(this(1:i),'(o10)',err=2222) v(j)
             elseif(bin) then
               this(last_binary:)=' '
               CALL squeeze(this,i)
@@ -95,7 +97,8 @@ c
             else
               CALL squeeze(this,i)
               IF(this.eq.' ') goto 2222
-              READ(this(1:i),'(i)',err=2222) v(j)
+c              READ(this(1:i),'(i)',err=2222) v(j)
+              READ(this(1:i),'(i10)',err=2222) v(j)
             endif
 c
 	    this= line(divider+1:)