Re: reference file removed

["Quazy" <quazy@xxxxxxxxxxxx>]

Thanks, but why does it work when the field is referenced?


----- Original Message -----
From: "Todd Sabella" <Todd.Sabella@alltel.com>
To: <RPG400-L@midrange.com>
Sent: Tuesday, March 21, 2000 11:35 AM
Subject: Re: reference file removed


>      Chris,
>
>      Change the data type of the fields from S to Y.  When you use the S
(Signed
>      shift) data type, you cannot use editing keywords.
>
>      Todd
>
>
> ______________________________ Reply Separator
_________________________________
> Subject: reference file removed
> Author:  RPG400-L@midrange.com at internet
> Date:    3/21/2000 9:10 AM
>
>
> I had a small application that was written by a outside consultant, and
written
> with a reference file. We don't want to use the reference file, so I went
in and
>  changed all the references, but in my display files I have two fields
giving me
>  problems.  I get a error on the edtcde and edtword that worked when the
field w
> as referenced, but now it wont take them.  Below is a example the lines
with XXX
> X are the error lines.   Any light you can shed on this would be greatly
appreci
> ated.
>
> Thanks Chris.
>
>
>
> BEFORE:
>       A            S@DSTP    R        O 18 39REFFLD(CMDSTP)
>      A                                                    OVRDTA
>       A                                                    EDTCDE(Y)
>
>       A                                             19  8'Last Update Time
. .
> . .
>       A            S@TSTP    R          O 19 39REFFLD(CMTSTP)
>       A                                                     OVRDTA
>
>       A                                                     EDTWRD('  :  :
')
>
>
>
> AFTER: reference removed.
>
>        A            S@DSTP         8S 0O 18 39OVRDTA
> XXXXA                                                     EDTCDE(Y)
>
>        A                                             19  8'Last Update
Time  . .
>  . .
>        A            S@TSTP          6S 0O 19 39OVRDTA
> XXXXA                                                      EDTWRD('  :  :
')
>
>
>
>
> ERROR:
>
>  CPD7554      20        4      Message . . . . :   Keyword not valid with
data t
> ype or keyboard shift value.
> +---
> | 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
> +---
>

+---
| 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
+---