NO!!!! Why? Because we're too cheap to license the C compiler. We do have HLASM. Now, if they want to make the C/C++ come for free, I'd jump for joy. We had a license at one time. But a manager who was struggling to save his job decided that eliminating all "non-critical" software was the way to go. So the C license went. Followed shortly thereafter by the manager.
-- 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 Discussion List > [mailto:[email protected]] On Behalf Of Edward Jaffe > Sent: Thursday, August 04, 2011 11:18 AM > To: [email protected] > Subject: Re: assembler help! > > On 8/4/2011 6:02 AM, Crabtree, Anne D wrote: > > In our IEFACTRT (accounting exit), an assembler program, it > has the following commands: > > > > L R2,PARMJOBC > > ICM R1,7,0(R2) > > > > If PARMJOBC contains a binary integer length of 4 with 00 > 00 00 08, what ends up in all bits of R1? I am trying to add > additional values to what is in R1 by doing: > > > > MVC WK1(4),SMF30CPS > > A R1,WK1 > > > > This is not doing what I want it to do! If SMF30CPS, also a > binary integer length of 4, has 00 00 00 01, what ends up in R1? > > Many have asserted that assembler language skills are > inadequate to properly > maintain 21st-Century z/OS systems. > > Would it be better if IBM provided sample exits in METAL C? > > -- > Edward E Jaffe > Phoenix Software International, Inc > 831 Parkview Drive North > El Segundo, CA 90245 > 310-338-0400 x318 > [email protected] > http://www.phoenixsoftware.com/ > > ---------------------------------------------------------------------- > 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 > > ---------------------------------------------------------------------- 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
