Re: EDTCDE Errors on Signed

[Simon Coulter <shc@xxxxxxxxxxxxxxxxx>]

On 15/07/2005, at 6:09 AM, Scott Klement wrote:

> This code "5S 0" in a display file does NOT tell it that you want a 5 
> digit zoned decimal field.

Actually, it does do exactly that. Primarily because all numeric fields 
in display files (except floats) are zoned decimal fields. A HLL 
compiler may override that definition and RPG redefines them as packed 
numeric in most cases.

The column with an S is the Data Type/Keyboard Shift column so it 
serves double duty. In this case it defines a signed numeric Data Type 
AND puts the keyboard into numeric shift IF you have a keyboard that 
supports it. If I recall correctly you need a Data Entry keyboard for 
which the numeric keys are found on the UIOJKLM,. keys thus requiring a 
numeric shift key to activate them--much like alpha shift activates 
uppercase. (You can see the same layout on any laptop computer so 
everything old IS new again). All other keyboards are Typewriter-like 
keyboards and have a separate numeric keypad so no numeric shift state 
is required. The combination of shift state and data type affect what 
characters can be typed into the field.

> What it tells it is that you want to use "S" as your keyboard shift. 
> The keyboard shift tells the program how the user is to be able to key 
> in data. Keyboard shift "S" is not compatible with edit codes.
>
> I'd suggest removing the "S" so you have "5  0", and see if that 
> solves the problem.

EDTCDE and EDTWRD are only valid on Y shifted (numeric only) fields. 
Leaving the type/shift column blank causes a numeric field to be 
created with shift/type S unless EDTCDE or EDTWRD are specified in 
which case the shift/type is Y. The DDS compiler listing will show you 
this behaviour and the DDS reference explains it.

Regards,
Simon Coulter.
--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists

   http://www.flybynight.com.au/
   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175                                   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------