Re: Decimal Data Error

["Venu Gopal"<Venu_Gopal@xxxxxxxxxxxxxxx>]

The solution to avoid DDE is to initialise the fields or Data structures in
the beginning. The problem in your code could be that you may have to
initialise HDYST field. Just give it a try. To verify, you can debug the
program. Put a break point at the MOVEL statement. When the program stops
at that line, just check the value in HDYST. You must be having some junk
characters or Hex40 as '404040404040' . This is Hex blanks. In a packed
decimal we are having Hex blanks. This could result in DDE when you try to
move a valid numeric value into the field. Initialising the field HDYST
shoudl solve the problem. Do a Z-ADD*ZEROS   HDYST in the beginning.

Also sometime back I read about avoiding DDEs in a book. I forgot the name
of the book. May be others can help us out in finding the name of the book.
Good luck!!

- Venu


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