Storr Consulting - sc520-nat017


Home	The Company	Publications	Products	Links	Tips

Tips, Tricks, and Techniques

Last update: 30 April 2004

Update Many Descriptors

Poor Response Time

Problem:

For Y2K test in 1999 it was necessary to age all date fields (add two years). Some files have many records and additionally many Superdescriptors based on PE fields. For example, one file (CAA) contained six Periodic Group date fields (1:20). Most of these occurencies are occupied with valid values.

I T L Name                             F Leng Index/Init/EM/Name/Comment      
- - - -------------------------------- - ---- ------------------------------  
  V 1 CAA-VIEW                                Customer A.
    2 C*CUST-ACCT-ADJ-HIST            	 	    	                                  
  P 2 CUST-ACCT-ADJ-HIST              	 	    	                            
    3 CAA-ACCT-ADJ-DTE                 N  8.0 (1:20)  
    3 CAA-ADJ-ORIG-PAYMT-DTE           N  8.0 (1:20)  
  G 3 CUST-ACCT-PAYMT-DATA            	 	    	                            
    4 CAP-RPC-PROC-DTE                 N  8.0 (1:20)
  G 3 CUST-ACCT-RFND-DATA             	 	    	                            
    4 CAR-REQ-DTE                      N  8.0 (1:20) 
    3 CAS-ADJ-PRD-BEG-DTE              N  8.0 (1:20)  
    3 CAS-ADJ-PRD-END-DTE              N  8.0 (1:20)

Ty  L  Name                             F  Length   D U DB S	      
--  -  -------------------------------- -- -------- - - -- -	      
SP  1  ACTV-RECRD-DTE/TYP-CDE           B   9.0     D   ZC N
SP  1  ACTV-TERR/EFFT-DTE/SEQ           A  14.0     D   ZD N
SP  1  ACTV-TERR/EFFT-DTE/TYP/STAT      A  14.0     D   ZE N
SP  1  ACTV-SUBS-ORD-ISN/EFFT-DTE       B  11.0     D   ZF N
SP  1  ACTV-TYP/ANA-FLG/ANA-DTE         A  10.0     D   ZG N
SP  1  ACTV-EFFT-DTE/RPT-SEQ/TERR       A  17.0     D   ZH N
SP  1  ACTV-CBLE-FLAG/EFFT-DTE          A   9.0     D   ZI N

All DTE fields are located in 6 superdescriptors. Six Superdescriptors multiplied by 20 fields giving 120 superdescriptor values per record. 3.4 millions of records (ISN) are stored in this file.

It took 10 minutes to update 2,000 records, even PREFETCH was activated and the ET counter was set to 99.

The calculated run time, approximately 12 days, for aging (updating) the entire file was unacceptable.

Solution:

Released the relevant 6 superdescriptors with AOS functions online
Time: 2 minutes
Started the job again
- Now, it took 10 minutes to update 60,000 records.
- This is a factor of 1 : 30
Inverted the relevant superdescriptors with batch utility functions of ADABAS.
- Descriptor AC = 14:20 - 14:36 = 16 minutes, 1,533.096 DE values
- Descriptor ZC = 15:04 - 15:34 = 30 minutes, 12,349,004 DE values
- Descriptor ZD = 15:34 - 15:52 = 18 minutes, 1,553,098 DE values
- Descriptor ZE = 15:52 - 16:27 = 35 minutes, 7,557,352 DE values
- Descriptor ZF = 16:27 - 17:09 = 42 minutes, 12,349,004 DE values
- Descriptor ZG = 17:09 - 17:32 = 23 minutes, 7,357,352 DE values
- Descriptor ZH = 17:32 - 17:47 = 15 minutes, 917,753 DE values
- Descriptor ZI = 17:47 - 18:00 = 13 minutes, 6,080 DE values

Tips, Tricks, and Techniques

Update Many Descriptors

Poor Response Time

Problem:

Solution:

Back to NATURAL Tips, Tricks, Techniques -- Overview