Re: *INPUTPACKED ignored for arrays ?

I sugest a two step solution:

1- Wite a program using the file as Update Primary, compare each record
with blanks (or each element) and move paked zeros in place.

2- Write a trigger that does the same.


1 will rapidly clean your file, 2 will keep it clean.

Raúl
__________________________________________________________
Timothy Adair wrote:

I have an RPG IV pgm (not ILE) that is reading in an old QS36F
program-described file. This file has a "field" that is actually a
30-element packed numeric array (7,0). For records with valid data in this
array, everything is fine; but I have some records with spaces (hex
'4040404') in this array, and when it hits one of these, the program gives a
decimal-data error (understandably so).

I have specified the compile option of FIXNBR(*INPUTPACKED) but the program
is not fixing the data at input-time. Does *INPUTPACKED not work for input
arrays? It seems to work for single fields.

And yes, I know, I need to fix the data. I intend to but that doesn't
guarantee I won't encounter more of these in this file (or other files).
I'd like to nail down a viable solution now. We will be converting to
externally-described files eventually but for now this is the situation I
have to deal with.

And yes, I have tried every conceivable combination of overlays & arrays to
program around the problem. Every attempt either wouldn't compile, or gave
the DD error when run.

Me duele la cabeza!

Ayuda?