That was done. The person working on this conversion agrees with us that the section of Cobol code using the most cpu is:
17490 PERFORM 0222-MULTIPLE-LOSS-WRITES. 17494 PERFORM VARYING ACCUM-R FROM 1 BY 1 UNTIL 17495 ACCUM-R GREATER THAN 9999 17496 MOVE ZERO TO WS-LOSS-PAID-REINS (ACCUM-R) 17497 WS-LOSS-EXP-REINS (ACCUM-R) 17498 END-PERFORM 17499 SET ACCUM-R TO 1. We don't see why the DATA option would cvause this block to use that much cpu, It's still being looked at by all. Ta. Alan Schwartz Assurant Shared Business Services Lead Systems Programmer Phone: 651-361-4758 Fax: 651-361-5625 "Thomas, Jim" <[EMAIL PROTECTED]> Sent by: IBM Mainframe Discussion List <[email protected]> 06/01/2006 10:56 AM Please respond to IBM Mainframe Discussion List <[email protected]> To [email protected] cc Subject Re: Slower run time with DATA(31) COBOL Option Al, Been a while .. Off the top, I'd say there's more than likely data24 modules. I do not think RMODE bears weight on where storage is obtained instead, if AMODE is 31, I think WS and TGT are above the line. >From a Strobe standpoint, I'd say, 'index' both, a DATA24 profile and a DATA31 profile and see where the time is being spent. Regards. Jim Thomas -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Alan Schwartz Sent: Thursday, June 01, 2006 11:41 AM To: [email protected] Subject: Slower run time with DATA(31) COBOL Option Greetings group. We have a bit of a puzzlement here and we're hoping someone can shed a little light on this. We've got an application that is working on becoming 31-bit capable. We got involved when they had a program using more cpu than before. By equalizing the compile options and re-compiling changing only one option at a time we found that the slower program used DATA(31) and the faster program used DATA(24). All other Cobol options are the same and the files used are the same! We've sent listings to IBM but so far we haven't come to a resolution. IBM has compared the execution code between the two compiled versions of the main program and they are indicating that there is NO difference in the instructions executed. The IBM techie is indicating that he thinks programs that are being called by the main program may be the culprit. We've Strobed both runs but the results are confusing/misleading so we've sent them to Compuware (and IBM) for assistance in analyzing them (nothing back yet). All testing is on z/OS 1.4 with Enterprise Cobol 3.2. The only modules statically linked are LE routines and they are all RMODE ANY and AMODE(ANY/31). The main program does call a number of other modules which are all Amode(31) and a mix of Rmode ANY/24. ************************************************************************************** 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
