Well, I know for a fact that some vendors still don't use MODIFY commands for their products. They "hang" a WTOR. Why? I guess it's just easier.
I spoke with my manager, who used to work for a vendor. He said that for one product he knew of, what became an independent STC was once a subset of a larger STC. If you wanted to shutdown that particular subset, it was easier to issue a START which ran a program which connected to the subfunction and said "shut down". Use of a MODIFY would have caused contention with the routines in the enclosing STC. Since then, the subset was moved into a separate STC, but originally "as is", thus continuing to use the second START. Since then, they have upgraded the separated code to use a STOP as well, but left in the old shutdown code in for existing users. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets® 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® is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. –The Chesapeake Life Insurance Company®, 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 Tim Hare > Sent: Wednesday, December 05, 2012 1:12 PM > To: [email protected] > Subject: Re: Historical question regarding the stop command > > According to IEZCIB, STOP is x'40', MODIFY is x'44' and START is x'04': > > CIBVERB DS C - COMMAND VERB CODE > CIBSTART EQU X'04' - COMMAND CODE FOR START > CIBSTCOM EQU X'08' - COMMAND CODE FOR STC COMMUNICATION @G860P2G > CIBMODFY EQU X'44' - COMMAND CODE FOR MODIFY > CIBSTOP EQU X'40' - COMMAND CODE FOR STOP > CIBMOUNT EQU X'0C' - COMMAND CODE FOR MOUNT > > > I'm still left with my original question - especially now that we've > determined that the STOP/P command existed when I was in high school... > my current thinking: > > 1. Whoever wrote the started task thought they needed to use some sort > of subsystem request (for whatever reason) and therefore had to have a > program to make such request > 2. The people who actually wrote this code are no longer with us, or > no longer on IBM-MAIN at least, so we don't have them around to explain > it > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send > email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
