Re: Decimal Data Error

[John Earl <johnearl@xxxxxxxxx>]

At 03:21 PM 9/9/97 -0400, you wrote:

>C           *ENTRY    PLIST                                        
>C                     PARM           X$YYYY  40      <--4 pos/0dec      
>C                     PARM           X$MM    20                    

<snip>

>I am getting a DDE on this line-
>
>C* PLACE THE YYYY INTO HDYTST.                                     
>C                     MOVELX$YYYY    HDYTST  80    <--DDE happening
>here!
>
>Any help from you bright folks would be appreciated, also any tips on
>avoiding DDE's would be appreciated.              

Tim,
In addition to all the other good advice that you've gotten (15, 5
parameters, RPG's default packing of internally defined fields, etc.), it's
a good rule of thumb to always use Z-ADD when moving data between two
numeric fields.  Save your MOVE and MOVEL op-codes for character data, and
you won't have to worry about incompatibilities between different numeric
data types and field sizes (you still have to be concerned with high order
truncation though :-o ).                       

jte
*************************************************
* John Earl             Lighthouse Software Inc.*
* johnearl@lns400.com   8514 71st NW            *
* 206.858.7388          Gig Harbor, WA 98335    *
*************************************************

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MAJORDOMO@midrange.com
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator: david@midrange.com
+---