We've sort of made progress with my situation. Part of this application (and others) is a proprietary product called GTAM which is OCO. The vendor supplied the applications with a 31-bit capable version of GTAM which they are using for their testing.
We sent the vendor the source code for the routines involved and he ran some tests. While the module names won't mean anything here's part of his response: "The wall clock timings on the reports are not interesting because these tests were run on the test system during the day, and with all the competition for resources they vary wildly. But the CPU times are interesting since they don't vary as much. I ran several tests to make to make sure the CPU results were consistent. If you look at all the reports from the different tests, the CPU times between each test is constant for all subroutine calls except to WDDWS0A, WDDWS0B, and WDDRS0A. The CPU times for those three modules jumped when running DATA(24) with the 31 bit GTAM, and then jumped dramatically when running DATA(31). The problem appeared to grow when adding 31 bit addressing. By looking at the reports it was clear that WDDWS0A and WDDWS0B were responsible for the dramatic increase in CPU, and to a lesser extent WDDRS0A. I looked at the code for WDDWS0A for clues to what might cause an address mode problem. The entry macro (PMS31ENT) contained logic to switch address modes. I took WDDWS0A and created a WDDWS0T without the PMS31ENT macro, and had WDD0900 call WDDWS0T instead of WDDWS0A. This cut the CPU usage to a fraction of what it was. In the DATA(31) tests it cut the CPU used by WDDWS0A from 40 CPU seconds down to around 2 CPU seconds. I also created a WDDWS0U to replace the WDDWS0B module and got the same results, with the CPU usage dropping to around 2 seconds." This gives our applications group enough to work with to correct the performance problem. Thanks for all your suggestions. Alan Schwartz Assurant Shared Business Services Lead Systems Programmer Phone: 651-361-4758 Fax: 651-361-5625 ************************************************************************************** This e-mail message and all attachments transmitted with it may contain legally privileged and/or confidential information intended solely for the use of the addressee(s). If the reader of this message is not the intended recipient, you are hereby notified that any reading, dissemination, distribution, copying, forwarding or other use of this message or its attachments is strictly prohibited. If you have received this message in error, please notify the sender immediately and delete this message and all copies and backups thereof. Thank you. ************************************************************************************** ---------------------------------------------------------------------- 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