Re: Regarding *RNF7416 -types mismatch in display file and physical file fields

On Sep 7, 2023, at 2:48 PM, tim ken <timk2574@xxxxxxxxx> wrote:

Thanks , I used "10Y 0" as well this time for the display file field ,
but I got the same error in the program for the same statement.

On Fri, 8 Sept 2023 at 00:03, Daniel Gross <daniel@xxxxxxxx> wrote:

Hi Tim,

I hope I got everything right.

Am 07.09.2023 um 19:31 schrieb tim ken <timk2574@xxxxxxxxx>:

Thanks, after careful observation i found i's coming on below statement:-
fld1 = 'Sum: ' + %trim(%editw(fld3:' 0 '))

whereas fld3 is defined in the program like this :-
d fld3 s 5s 0

So far, everything looks fine with fld3 - ok the edit word seems to be
longer than the variable, but that shouldn't be a problem.

I want this fld1 of the display file to be numeric of length 10 but not

sure which data type i should select out of the available options in it's
DDS so that this error could be resolved or this fld3 should be defined

differently here ?

The definition in the DDS seems to be numeric - but you cannot assign a
value like

'Sum: ' + %trim(...


to a numeric display file field. That value is a string - you can't assign
it to a numeric field.

The correct data type in DDS would be "10Y 0" - data type Y would enable
you to use EDTCDE or EDTWRD key words with that field. You could also use
"10S 0", but that does not support the editing keywords.

HTH
Daniel
--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.

--
This is the RPG programming on IBM i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.