PROFILE UNLOCK....IMACRO NONE....PACK OFF....NOTE ON 


-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Robert Pelletier
Sent: Friday, September 14, 2007 2:20 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ASMA142E Operation code not complete on first record

This is the code:
 DAIR9900 DS    0H                                                     
          DITTRACE ID=EXIT          TRACE                              
          L     R13,4(R13)          RESTORE REGISTER 13                
 ASE01670                                                              
          LM    R14,R12,12(R13)     RESTORE ALL OTHER REGISTERS        
 ASE01680                                                              
          SR    R15,R15             GIVE GOOD RETURN CODE              
 ASE01690                                                              
          BR    R14                 RETURN TO CALLER                   
 ASE01700                                                               


Bob Pelletier
Connecticut Student Loan Foundation
Rocky Hill, Ct.
<SNIP>

The ASEnnnnn should be in 73-80 and it looks like you have an LRECL > 80
somehow.

Just on an off chance, if you get into the source with edit, issue prof
as a command and see if the data has PACK on.

Regards,
Steve Thompson

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

Confidentiality Notice
Unless expressly stated otherwise, this message is confidential and may be 
privileged.  It is intended for the addressee(s) only.  Access to this e-mail 
by anyone else is unauthorized. If you are not an addressee, any disclosure or 
copying of the contents of this e-mail or any action taken (or not taken) in 
reliance on it is unauthorized and may be unlawful.   If you are not an 
addressee, please inform the sender immediately and delete this message from 
your system.

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

Reply via email to