Pack will exception on protection and addressing, not data......
If not numeric, abend.......
-----Original Message-----From: IBM Mainframe Discussion List [mailto:[EMAIL
PROTECTED] On Behalf Of Peter Ten EyckSent: Monday, October 15, 2007 2:34 PMTo:
[EMAIL PROTECTED]: COBOL move statement issue
Enterprise COBOL 3.4.1 on z/OS 1.7
The following does not abend:
.
.
.
01 FIELD-1 PIC 9(3).
01 FIELD-2 PIC 9(3) COMP-3.
.
.
.
MOVE FIELD-1 TO FIELD-2.
.
.
.
Note: Prior to the move FIELD-1 contains "86 " thats F8F640
What COBOL or LE option(s) do I need to change to make this code abend?
_________________________________________________________________
Windows Live Hotmail and Microsoft Office Outlook – together at last. Get it
now.
http://office.microsoft.com/en-us/outlook/HA102225181033.aspx?pid=CL100626971033
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
