Moving a date field into a numeric field

[darryl.mavin@xxxxxxxxxxxxxx]

I have the following field definitions ...

D mnISODate             S               8   0
D dateField             S                D      

... and I want to replace the following line of code with the equivalent
free format code.
C       *ISO            Move    dateField       mnISODate

We are currently at V5R1, and I have been unable to work out how to do this.

Anyone know how to do this?


------------------------------------------------------------------------------
The opinions expressed within this email represent those of the
individual and not necessarily those of Gullivers Travel Associates (GTA).

This email and any files transmitted with it are confidential and intended 
solely for the use of the individual or entity to whom they are addressed.
If you have received this email in error please notify 
postmaster@xxxxxxxxxxxxxxx

Should you wish to use email as a form of communication, GTA are unable to
guarantee the security of email content outside of our own computer systems.



________________________________________________________________________
This email has been scanned for all viruses by the MessageLabs Email
Security System. For more information on a proactive email security
service working around the clock, around the globe, visit
http://www.messagelabs.com
________________________________________________________________________