An off-the-wall thought. Take the FLOWASM program and modify the Listing Exit portion. Check each output line for the ASMA033I message in the PROCESS subfunction of the Listing portion of the code. If you see one, set an indicator in the "Common User Field" fullword passed and maintained by the assembler. When you get a CLOSE request to the Listing Exit, check this indicator. If it is on, then put the address of a message into the "Error buffer pointer" and the length thereof in the "Error Buffer Length". Also set the "Error Severity Field" fullword to 4. This will write your message to the SYSPRINT, along with ASMA701W and cause a return code of 4.
Most of the work is already done in FLOWASM, so it shouldn't be too difficult for you to modify. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * [email protected] * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM > -----Original Message----- > From: IBM Mainframe Assembler List > [mailto:[email protected]] On Behalf Of David Cole > Sent: Wednesday, February 22, 2012 12:59 PM > To: [email protected] > Subject: Re: ASMA033I vs. ASMA033W > > At 2/21/2012 05:32 PM, John Ehrman wrote: > >Dave, your memory is too good. ASMA033W (in HLASM R2) was changed to > >ASMA033I (in HLASM R3), at which time two additional > alignment messages > >were added (212 and 213). > > > >I hope this will help: > > > >ASMA212W and ASMA213W are controlled by the FLAG(ALIGN) option. > >These messages are issued even if the NOALIGN option is used > >(assuming FLAG(ALIGN) is still active) - whereas ASMA033I is > >suppressed if NOALIGN is specified. > > > > >Why would anyone specify the NOALIGN option? > > I don't know, John... But that's not my issue. > > My issue is that the ASMA033I variant flags issues in my code that I > want to eliminate, but because ASMA033I leaves RC=0, I have no quick > and easy way to notice them without manually checking all 195 > separate assemblies! > > So I want an option (call it "HARDALIGN" or whatever) whereby > ASMA033I conditions will be reported as ASMA033W conditions and will > set at least RC=4. > > Can that be done? > > > > Dave Cole REPLY TO: [email protected] > ColeSoft Marketing WEB PAGE: http://www.colesoft.com > 736 Fox Hollow Road VOICE: 540-456-8536 > Afton, VA 22920 FAX: 540-456-6658 > >
