RE: Performance Tuning.

[Chris Bipes <ChrisB@xxxxxxxxxxxxxxx>]

Well the best one to eliminate in RPGII(36) is overflow on the MULT opt
code.  ESPECALLY: date re-formatting "MMDDYY   MULT  10000.01  YYMMDD".
This is a real killer.  Instead create a data structure:
IDSDATE  DS
IDSCYMD 1  8 0
IDSCC           1  2 0
IDSYYB  3  4 0
IDSMM           5  6 0
IDSDD           7  8 0
IDSYMD  3  8 0
IDSYYE  9 10 0
IDSMDY  5 10 0

Then move your MMDDYY to DSMDY, move dsyye dsyyb, move or use dsymd.  You
can even set the century i.e.   dsyyb iflt 50
                        z-add20   dscc
                      else
                        z-add19   dscc
                        endif

For reformatting dates in RPGII it works great.  I changed a batch program
that took hours to run and was converting 4 dates per record for millions of
records.  The program then run in 1/4th the time.  RPG overflow is a real
CPU hog.

Christopher K. Bipes
CrossCheck, Inc.


-----Original Message-----
From: Mani Veluthakkal [mailto:Mani.Veluthakkal@metamorgs.com]
Sent: Friday, September 17, 1999 4:32 PM
To: 'MIDRANGE-L@midrange.com'
Subject: Performance Tuning.


Hello all:

Our client has asked us to analyze their AS/400s and applications (RPG,
RPG36, COBOL) to identify possibilities of performance improvement. Can
anyone out there give me directions to do this?! I am trying to prepare a
check list as to what to look for with respect to system settings &
variables, work management settings, inefficient CL commands, inefficient
RPG opcodes etc. Any help is appreciated. Thanks much.

Mani
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---