The following email explains the process of removing retrieval locks from an update dialog that was being executed 200,000 per day. If anyone wants to try this on one of your high usage dialogs, I will be happy to help with the coding. You will see the results immediately without paying a dime. Keep in mind also, many programs were written by inexperienced programmers. Those that are running long, compare database I/O to input I/O. If the database I/O is many times larger, the access path may need to be changed. I reduced the runtime of a program from 17 hours to one hour by changing the access path.
Feel free to reach out if you have any questions.
From: "Rozeboom, Kay [DAS]" <KAY.ROZEBOOM@IOWA.GOV>
To: <IDMS-L@LISTSERV.IUASSN.COM>
Subject: Retrieval Locks - a success story
Date: Tuesday, January 24, 2006 8:35 AM
I am passing on a success story from one of our applications groups.
This one small change reduced our total daytime mainframe CPU use by 5%.
I would like to join Scott in thanking Margaret Sliming for the
suggestion.
> ______________________________________________
> From: svander@dhs.state.ia.us [mailto:svander@dhs.state.ia.us]
>
> Sent: Monday, January 23, 2006 2:33 PM
> To: Rozeboom, Kay [DAS]
> Subject: Retrieval Locks
>
> During our current cost savings/tuning initiative we took advantage of
> Margaret Sliming's experience with the use, or in this case the non
> use, of Retrieval Locks, and have a success story to report.
>
> We had a dialog that we knew was used 98% of time as a retrieval only
> dialog. This dialog was using an update subschema and retrieval
> locking basically for the other 2%. We moved the updating functions
> of the dialog to a separate dialog which we link to when needed. We
> also modified the original dialog to use a retrieval subschema and
> turned the retrieval locks off. The resulting CPU savings has been
> dramatic. The CPU time used by the dialog has been cut in half. (.02
> seconds before .01 after) it doesn't seem like much but the number of
> executions per day is right at 200,000 so we are very happy.
>
> Thank you Margaret for you help and encouragement. This has been a
> painless way to help our system load and save our department some
> money.
-------------------------------------------