Re: Finding Internally described files

Suggestion:

When you increase the size of the field, also change it from being numeric
to being alpha.  If it was alpha now you wouldn't be having this problem,
after you hit 99 you could use A1, A2, A3, etc...

Regards,

Jim Langston

"Sneddon, Jim" wrote:
> 
> Thanks for your help - By searching column 6 for 'I' I was able to weed my
> list down to 114 possibilities.
> 
> Unfortunately there are alot of arrays defined in these program for error
> messages.  They all seem to have the word INVALID which puts an 'I' in
> column six and messes up my search- but searching though 114 was much better
> than searching the entire list by hand.
> 
> The good news is that I now only have 47 programs that I have to re-write to
> eliminate duplicate internal file re-descriptions for externally described
> files.
> 
> (We're trying to increase the size of a 2 digit code that our entire system
> is built on because we're running out - no one thought that would we would
> ever have more than 99 customers when they wrote this monster in 1983....)
> 
> It's my own little personal Y2K+1 bug....       ;-)
> 
> Jim Sneddon
> jsneddon@allstateticketing.com
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---