1 / 79

ADABAS V82

ADABAS V82. Jim Poole 2010. Adabas V82 by Jim Poole. 01. COMPATIBILITIES 02. CONVERSION 03. LOWER CASE FIELD NAMES 04. REMOVING UNIQUE DESCRIPTOR FLAG 05. SMF RECORDS 06. ADASAV FILE RANGE (FILE=,FMOVE=) 07. NEW AC EXTENTS 08 DATE/TIME EDIT MASKS DT= 09. TIME ZONE SUPPORT TZ=

navid
Download Presentation

ADABAS V82

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. ADABAS V82 Jim Poole 2010 Adabas V82 by Jim Poole

  2. 01. COMPATIBILITIES 02. CONVERSION 03. LOWER CASE FIELD NAMES 04. REMOVING UNIQUE DESCRIPTOR FLAG 05. SMF RECORDS 06. ADASAV FILE RANGE (FILE=,FMOVE=) 07. NEW AC EXTENTS 08 DATE/TIME EDIT MASKS DT= 09. TIME ZONE SUPPORT TZ= 10. DST DAYLIGHT SAVINGS INDICATOR 11. SYSTEM FIELDS 12. LOGICAL REMOVAL OF DESCRIPTORS 13. LOGICAL REMOVAL OF FIELDS 14. ADADBS MODFCB FILEREADONLY 15. ADADBS ONLINVERT FNDEF option 16. SVC PERFORMANCE 17. ADARES PLCOPY more plogs 18. ADARUN LOGWARN 19. ADADBS ADDPLOG,DELPLOG 20. ADARES REGENERATE/BACKOUT 21. ADARUN NPLOG/NWORK1 22. WORK I,II,III USE TOPICS (V8.2.2) Adabas V82 by Jim Poole

  3. 23. ADASEL NEW FEATURES 24. ADAZIN (NEW) MAINT AND SVC INFO 25. ADARUN SRLOG, PLOG SPANNED RECORDS 26. ADARUN PREFSTDD 27. ADADBS FUNCTIONS. FILE LOCK NOT REQUIRED 28. REVIEW OF IN PARALLEL 29. INFOBUFFERSIZE,DEVENTLOG 30. ADARUN LOGVOLIO 31. CLOG DSECT UPDATED FOR Sx ALGORITHM 32. ADAREP PPT 33. ADAREP XML 34. ADAREP CHANGES 35. DDPRINT CHANGES 36. ADARUN V64BIT 37. ADARUN LARGEPAGE 38. ACBX 64 BIT SUPPORT 39. LOB ENHANCEMENTS 40. OP CMD NWCONNECT FOR ENTIRE NETWORK 41. ADAWRK TRANSACTION NUMBERS 42. SHARED HOLD STATUS 43. SMGT CHANGE 44. RI COMMAND CHANGES TOPICS (V8.2.2) Adabas V82 by Jim Poole

  4. WCP V6.2.1 NAT V4.2.5 SQL V2.4.1 PRD V4.5.2 PAC V2.6.1 AVI V8.1.2 ACE V6.6.4 COR V8.1.2 EXCEPTIONS UNKNOWN SVC , AOS (LATER) PREDICT NEW FEATURES NON-SAGPRODUCTS ADASTRIP >5.0.2P new release CA-APAS compatible, apply Z51047 CA-APAS exploit features Q4 2010 01. COMPATIBILITIES WORKS WITH ALL CURRENT V8 SAG PRODUCTS ? Earlier Versions / ? Other Products ? Adabas V82 by Jim Poole

  5. 01. COMPATIBILITIES (ADASAV) YES: RESTORE/RESTONL FILES=/FMOVE V81 to V82 (V82 LOADLIB) NO: RESTORE/RESTONL FILES=/FMOVE V82 to V81 Adabas V82 by Jim Poole

  6. 02. CONVERSION NOTE 1: V82 SVC IS UP/DOWN COMPATIBLE. V81 SVC IS NOT NOTE 2: V82 AOS IS UP/DOWN COMPATIBLE. V81 AOS IS NOT NOTE 3: V81 ADALINKS ARE UP/DOWN COMPATIBLE NOTE 4: Zapped CA-APAS IS NOT DOWN COMPATIBLE • STEPS: • INFRASTRUCTURE TO V82: SVC, AOS, CA-APAS • CONVERT DATABASES (STANDARD ADACNV) • (PLOGS not needed) • CONVERT ADALINKS (BATCH, CICS, ETC) Adabas V82 by Jim Poole

  7. WHEREVER FNDEF’s ARE USED (ADACMP, ADADBS, ADAINV ADACMP FNDEF='01,AA,10,A,DE,UQ' ADACMP FNDEF='01,Aa,10,A' ADACMP FNDEF='01,aa,10,A' ADACMP FNDEF='01,aA,10,A' ADAREP / AOS Field Description Table I I I I Level I Name I Length I Format I ------I------I--------I--------I 1 I AA I 10 I A I 1 I Aa I 10 I A I 1 I aa I 10 I A I 1 I aA I 10 I A I ! ADARUNS ! ADARUN MSGCONSL=UPPER ADARUN MSGDRUCK=MIXED ADARUN MSGPRINT=MIXED 03. LOWER CASE FIELD NAMES V82 PRIOR V82 926 field names ( 26 * 36 – 10 ) 3214 field names ( 52 * 62 – 10 ) Adabas V82 by Jim Poole

  8. 04,05,06 QUICKIES: NOUQ, SMF, ADASAV FILE Range 04. REMOVING UNIQUE DESCRIPTOR FLAG ADADBS CHANGE FILE=42,FIELD='AA',OPTION=NOUQ (not available in AOS) 05. SMF RECORDS ADARUN SMF=NO/YES (SMF89,SMFDETAIL,SMFINTERVAL,SMFRECNO,SMFSUBSYS) 06. ADASAV FILE RANGE (FILE=,FMOVE=) ADASAV FILE=100-120 Adabas V82 by Jim Poole

  9. V81 ADAREP 15686 - 15686 1 8391 AC 43 DAT911 15687 - 53988 38302 8391 UNUSED 0 DAT911 V81: ADD 1000 RECORDS, RUN ADAREP • 11473 - 11473 1 8391 AC 43 DAT911 • - 15686 1 8391 AC 43 DAT911 • 15687 - 53988 38302 8391 UNUSED 0 DAT911 V82: RELOAD FILE, ADD 1000 RECORDS, RUN ADAREP 15686 - 15687 2 8391 AC 43 DAT911 15688 - 53988 38302 8391 UNUSED 0 DAT911 07. NEW AC EXTENTS “NEW AC EXTENTS WILL ATTEMPT TO BE CONTIGUOUS” DOES NOT WORK WITH ADADBS/AOS (STARTRABN=) Adabas V82 by Jim Poole

  10. CURRENT FORMATS FORMAT/LEN NAME B P U Description DATE 4 5 8 Z'YYYYMMDD' TIME 3 4 6 Z'HHIISS' DATETIME 6 8 14 Z'YYYYMMDDHHIISS' TIMESTAMP - 11 20 Z'YYYYMMDDHHIISSXXXXXX' NATTIME 6 7 13 NATURAL T FORMAT (.1 SECS SINCE YEAR ZERO) NATDATE 3 4 7 NATURAL D FORMAT DAYS SINCE YEAR ZERO) UNIXTIME 4 6 10 FOR UNIX (SINCE 1970.01.01) XTIMESTAMP 8 8 18 FOR UNIX (SINCE 1970.01.01) 08. DATE/TIME EDIT MASKS DT= Default Edit Mask or Programming Edit Mask for Adabas Fields. PART OF DB FDT (DFLT) OR CHANGE IN DIRECT CALL FB Adabas V82 by Jim Poole

  11. 08. DATE/TIME EDIT MASKS DT= TO CREATE: ADACMP FNDEF='01,D1,20,U,DT=E(TIMESTAMP)' ADACMP FNDEF='01,D2,14,U,DT=E(DATETIME)' ADACMP FNDEF='01,D3,06,B,DT=E(DATETIME)' ADADBS NEWFIELD FILE=42, FNDEF='01,Z3,20,U,DT=E(TIMESTAMP)' STORED IN UTC (UNIVERSAL TIME CODE) FORMAT (GMT) NOTE: PREDICT 4.6 DOES NOT SUPPORT! Adabas V82 by Jim Poole

  12. IN PROGRAM 08. DATE/TIME EDIT MASKS DT= '01,D1,20,U,DT=E(TIMESTAMP)' 2010.03.12 16:06:32.2938579 DATE/TIME PROGRAM FB= RETURNS RB= D1. 20100312160632938579 D1,08,U,E(DATE). 20100312 D1,06,U,E(TIME). 160632 D1,14,U,E(DATETIME). 20100312160632 D1,13,U,E(NATTIME). 0634355427929 D1,07,U,E(NATDATE). 0734207 D1,10,U,E(UNIXTIME). 1268409992 D1,18,U,E(XTIMESTAMP). 001268409992938579 Adabas V82 by Jim Poole

  13. 2. TRUNCATION/FILLING MAY OCCUR BETWEEN MASKS EG. '01,D2,14,U,DT=E(DATETIME)‘ FB=D2,20,U,E(TIMESTAMP). RB=20100312160632000000 08. DATE/TIME EDIT MASKS DT= • TO USE EDIT MASKS IN FB, FIELD MUST BE DEFINED WITH DT= ELSE RspCode 41 3. FOR FULL DETAIL, SEE NEW MANUAL: "Date-Time Edit Masks Reference“ NOTE: Conversions Between Date-Time Representations (READ / UPDATE) Adabas V82 by Jim Poole

  14. IF '01,D1,20,U,DT=E(TIMESTAMP)‘ REMOVE WITH: ADADBS CHANGE FILE=43,FNDEF='01,D1,20,U' IF '01,D1,20,U‘ ADD WITH: ADADBS CHANGE FILE=43, FNDEF='01,D1,20,U,DT=E(TIMESTAMP)' 2. MASK MUST HAVE CORRECT FORMAT/LENGTH. ELSE RspCode 55 08. DATE/TIME EDIT MASKS DT= TO ADD/REMOVE 1. CANNOT CHANGE FROM ONE EDIT MASK TO ANOTHER Adabas V82 by Jim Poole

  15. ADABAS LOCAL TIME NUC UTC/GMT FDT OPTION FOR TZ= FIELDS DATETIME TIMESTAMP NATTIME UNIXTIME XTIMESTAMP 09. TIME ZONE SUPPORT TZ= “ENHANCE EDIT MASK ON DT= FIELDS” Adabas V82 by Jim Poole

  16. 09. TIME ZONE SUPPORT TZ= www.twinsun.com/tz/tz-link.htm ZONEINFO or OLSON DATABASE SEE ADABAS SOURCE (TZINFO) America/Chicago , AMECHICA,, US/Central America/Denver , AMEDENVE, America/Shiprock, Navajo US/Mountain America/Los_Angeles , AMELOSAN,, US/Pacific America/New_York , AMENEWYO,, US/Eastern America/Indiana/Indianapolis, AMEININD,, America/Fort_Wayne America America/Indiana/Knox, AMEINKNO,, America/Knox_IN US/Indiana-Starke America/Indiana/Marengo, AMEINMAR,, America/Indiana/Petersburg, AMEINPET,, America/Indiana/Tell_City, AMEINTEL,, America/Indiana/Vevay, AMEINVEV,, America/Indiana/Vincennes, AMEINVIN,, America/Indiana/Winamac, AMEINWIN,, Adabas V82 by Jim Poole

  17. ADANUC / ADACMP JCL REQUIREMENTS //STEPLIB DD //TZINFO DD DISP=SHR,DSN=TZ.LOADLIB //DDCARD DD* ADARUN MSGDRUCK=MIXED USER OP en COMMAND RECORD-BUFFER= TZ='America/New_York' NOTE: TIME ZONES ARE CASE SENSITIVE NOTE: USE OF QUOTES 09. TIME ZONE SUPPORT TZ= Adabas V82 by Jim Poole

  18. ADADBS NEWFIELD ADADBS NEWFIELD FILE=43, FNDEF='01,D4,11,P,DT=E(TIMESTAMP),TZ' (NO //TZINFO, NO TZ= needed) 09. TIME ZONE SUPPORT TZ= (examples) ADACMP ( 0 RECORDS or X RECORDS ADACMP TZ=‘America/Indiana/Vevay ' ADACMP FNDEF= ADACMP FNDEF='01,D2,14,U,DT=E(DATETIME),TZ‘ ADACMP FNDEF= (note length,format,DT mask) NOTE: PREDICT 4.6 DOES NOT SUPPORT! Adabas V82 by Jim Poole

  19. 09. TIME ZONE SUPPORT TZ= (ADAREP (DT=) Field Description Table I I I I Level I Name I Length I Format I Options I I I I ------I------I--------I--------I------------------- I I I I 1 I D1 I 14 I U I DT=E(DATE) 1 I D2 I 14 I U I DT=E(DATETIME),TZ 1 I D3 I 14 I U I DT=E(DATETIME) Adabas V82 by Jim Poole

  20. OPen RB with L1 RB=C2,8,U,E(TIME). ---------------------- -------------------- TZ='America/Chicago‘ 160209 TZ='America/New_York‘ 170209 TZ='America/Los_Angeles‘ 140209 (NOTE LOWER CASE) 09. TIME ZONE SUPPORT TZ= D2,14,U,DT=E(DATETIME),TZ 20100218220209 UTC/GMT YYYYMMDDHHMMSS Adabas V82 by Jim Poole

  21. Rc 55 sub 30 Accessing a field option TZ but no time zone was specified in the user session. Issue the OP command with TZ= Rc 50 sub 31 Time zone not found in ADAZON directory. Rc 41 sub 30 Date-time edit mask (E(date-time-mask)) notation is only permitted for a field defined with a date-time edit mask.. 09. TIME ZONE SUPPORT TZ= (Response Codes) Adabas V82 by Jim Poole

  22. 09. TIME ZONE SUPPORT TZ= (Final Thoughts) 1. There is no default timezone for a file. OPen is required (with TZ=) 2. Natural Implementation? 3. Change in timezones, change in file. 4. TZ flag can only be added/removed if File empty: ADADBS CHANGE FILE=43,FNDEF='01,D2,14,U,DT=E(DATETIME)‘ ADADBS CHANGE FILE=43,FNDEF='01,D2,14,U,DT=E(DATETIME),TZ' 5. UQE Open’d with TZ is not deleted if TNAE exceeded. 6. CPU Overhead. Adabas V82 by Jim Poole

  23. DO 400K L1’s against A. Field B. Field with DT= C. Field with DT=, TZ (no IO, no overlap) CPU DT= vs TZ A B C A B C A B C A B C RUN 1 2 3 4 7%. Increase in CPU for field access Adabas V82 by Jim Poole

  24. 10. DST DAYLIGHT SAVINGS INDICATOR ADACMP COMPRESS, DECOMPRESS FOR TZ FIELDS ADACMP TZ='America/New_York',DST “The two-byte daylight savings indicator directly follows the date-time value in uncompressed input and specifies the hexadecimal value of the daylight saving time offset from standard time in seconds.” X’0000’ OR X’0E10’ (DECIMAL 3600) Adabas V82 by Jim Poole

  25. 11. SYSTEM FIELDS CONCEPT Create Adabas fields on a file that are automatically updated by Adabas with respect to inserts (N1,N2) and updates (A1). Note that deletes (E1) are not recorded (if the record is deleted then so is the Adabas system field). AN ADABAS FIELD BUT ONLY THE NUC CAN UPDATE IT Adabas V82 by Jim Poole

  26. 11. SYSTEM FIELDS (RULES) 1. IF USER TRIES TO UPDATE, NOTHING. (NO RESPONSE CODE) • ADABAS UPDATES CONTENTS WHEN COMMAND (N1,N2,A1) IS • EXECUTED, NOT AT ET • IF THE UPDATES ARE BACKED OUT (TIMEOUT,BT), • CONTENTS ARE BACKED OUT. 4. FIELDS ARE DEFINED AS 'SY' IN THE FDT AND ADAREP. 5. A CR FLAG INDICATES FIELD IS ONLY CHANGED WHEN ADDED. 6. NON-CR SY FIELDS RECORD BOTH UPDATES AND INSERTS. Adabas V82 by Jim Poole

  27. 11. SYSTEM FIELDS (RULES) 7. NON-CR SY FIELDS MUST BE DEFINED AS MU. (NOT A PE) 8. CR SY FIELDS CAN NOT BE DEFINED AS MU 9. SY FIELDS CAN BE DESCRIPTORS, PART OF DESCRIPTORS, ETC. 10. NON-CR SY FIELDS ARE MAINTAINED IN THE MU IN LIFO FASHION. 11. OCCURANCE 1 IS THE MOST RECENT UPDATE. 12. AS EACH UPDATE OCCURS, THE OTHER VALUES ARE MOVED TO N+1. 13. THE MAX NUMBER OF MU OCCURANCES IS DETERMINED BY SYFMAXUV. MAX=20 (IN FCB) Adabas V82 by Jim Poole

  28. 11. SYSTEM FIELDS (TYPES OF) JOBNAME 8-BYTE JOBNAME OF USER THAT DID A1,N1,N2. OPUSER 8-BYTE ETID (FROM ADDS1 OF OP COMMAND) SESSIONID 28-BYTE UQE ID SESSIONUSER LAST 8 BYTES OF 28B UQE ID (EG. TERM-ID OR CICS TRANID) TIME * UTC (GMT) OF A1,N1,N2. * TIME CAN USE DT= and TZ attributes Adabas V82 by Jim Poole

  29. ADALOD ADALOD SYFMAXUV=1 (dlft=1, RANGE: 1 – 20 ) 11. SYSTEM FIELDS (CREATING) ADACMP COMPRESS or ADADBS NEWFIELD FNDEF ADACMP FNDEF='01,C1,08,A,CR,SY=JOBNAME' ADACMP FNDEF='01,C2,14,U,CR,SY=TIME,DT=E(DATETIME)' ADACMP FNDEF='01,S1,08,A,MU,SY=JOBNAME' ADACMP FNDEF='01,S2,14,U,MU,SY=TIME,DT=E(DATETIME)' * ADACMP FNDEF='01,S3,08,A,MU,SY=OPUSER' ADACMP FNDEF='01,S4,28,A,MU,SY=SESSIONID' ADACMP FNDEF='01,S5,08,A,MU,SY=SESSIONUSER' ADACMP FNDEF='01,S6,20,U,MU,SY=TIME,DT=E(TIMESTAMP)' ADACMP FNDEF='01,S7,13,U,MU,SY=TIME,DT=E(NATTIME)' ADACMP FNDEF='01,S8,08,U,MU,SY=TIME,DT=E(DATE)' *ADACMP FNDEF='01,XX,20,U,MU,SY=TIME,DT=E(TIMESTAMP),TZ' Adabas V82 by Jim Poole

  30. 11. SYSTEM FIELDS (ADAREP) MAX-ISN formatted =1,377 System Field Max = 1 : : : System Fields Yes : : : Level I Name I Length I Format I Options ------I------I--------I--------I---------------------- 1 I C1 I 8 I A I SY=JOBNAME,CR 1 I C2 I 14 I U I DT=E(DATETIME) I I I I SY=TIME,CR 1 I S1 I 8 I A I MU,SY=JOBNAME 1 I S2 I 14 I U I MU,DT=E(DATETIME) I I I I SY=TIME 1 I S3 I 8 I A I MU,SY=OPUSER 1 I S4 I 28 I A I MU,SY=SESSIONID 1 I S5 I 8 I A I MU,SY=SESSIONUSER 1 I S6 I 20 I U I MU,DT=E(TIMESTAMP) I I I I SY=TIME 1 I S7 I 13 I U I MU,DT=E(NATTIME) I I I I SY=TIME 1 I S8 I 8 I U I MU,DT=E(DATE),SY=TIME Adabas V82 by Jim Poole

  31. A1 (UPDATE) N1 (STORE) C1 CR,JOBNAME TESTJOB1 TESTJOB1 C2 CR,DATETIME 20100319184817 20100319184817 TESTJOB1 CICSPRG S1 JOBNAME TESTJOB1 S2 DATETIME 20100319184817 20100319185826 20100319184817 S5 SESSIONUSER TSU17862 CIC34512 TSU17862 20100319184817654496 S6 TIMESTAMP 20100319185826957801 20100319184817654496 0634361579069 0634361572976 S7 NATTIME 0634361572976 20100319 20100319 20100319 S8 DATE 11. SYSTEM FIELDS FLD TYPE Adabas V82 by Jim Poole

  32. 11. SYSTEM FIELDS CHANGING THE MU OCCURANCES ADADBS MODFCB SYFMAXUV= (NOTE: OCCURANCES NOT REDUCED UNTIL UPDATE OCCURS) HOW TO REMOVE A SYSTEM FIELD? • ADACMP DECOMPRESS • ADACMP COMPRESS • LOAD • (PLOG/REGENERATE SOLUTIONS) Adabas V82 by Jim Poole

  33. 11. SYSTEM FIELDS (final notes) • IF UPDATE WITH NO DATA CHANGE, SY FIELDS STILL UPDATED 2. IF UPDATE A SY FIELD ONLY, SY FIELDS STILL UPDATED 3. LOGICAL FIELD DELETE (DELFN) STOPS SY FIELD UPDATES 4. PREDICT 4.6 DOES NOT SUPPORT! Adabas V82 by Jim Poole

  34. 12. LOGICAL REMOVAL OF DESCRIPTORS “REMOVE A DESCRIPTOR FROM APPLICATION USE” WHY MARK DESCRIPTORS FOR EVENTUAL REMOVAL BUT QUICK BACKOUT PLAN FINE PRINT DESCRIPTOR INVERTED LIST CONTINUES TO BE UPDATED Adabas V82 by Jim Poole

  35. 12. LOGICAL REMOVAL OF DESCRIPTORS (Example) A. ADADBS DELDE FILE=16,DESCRIPTOR=AE B. READ LOGICAL BY AE (OR FIND) RSP.CODE 39 (not documented) C. UPDATE FIELD AE D. ADADBS UNDELDE FILE=16,DESCRIPTOR=AE E. READ LOGICAL OR FIND USES UPDATED VALUE Adabas V82 by Jim Poole

  36. 12. LOGICAL REMOVAL OF DESCRIPTORS (Example) ADAREP FDT 2 I AE I 20 I A I DE,DL ADADBS ADADBS DELDE FILE=16,DESCRIPTOR=AE ADADBS UNDELDE FILE=16,DESCRIPTOR=AE AOS F File maintenance L Logically delete/undel descriptr Adabas V82 by Jim Poole

  37. AOS F File maintenance C Define/modify FDT F Delete field from FDT G Undelete field from FDT ADAREP: 4 I AC I 20 I A I NU I I I I IDELETED FIELD I 13. LOGICAL REMOVAL OF FIELDS “REMOVE A FIELD FROM APPLICATION USE (Rsp Code 41)” WHY? Eg. ADADBS DELFN FILE=16,FIELDLIST='AE‘ ADADBS DELFN FILE=99,FIELDLIST='AA,AB,AC‘ ADADBS UNDELFN FILE=16,FIELDLIST='AC' Adabas V82 by Jim Poole

  38. 13. LOGICAL REMOVAL OF FIELDS (notes) • CANNOT REMOVE A DESCRIPTOR OR A PARENT FIELD FOR A • DESCRIPTOR b. IF FIELD IS A GROUP, ALL FIELDS MARKED AS DELETED • IF FIELD WITHIN A GROUP, FORMAT-BUFFER=grpname • WILL STILL RETURN FIELD d. IF FIELD IS A SYSTEM FIELD, ADABAS DOES NOT UPDATE FIELD Adabas V82 by Jim Poole

  39. 14. FILE READONLY. ADADBS MODFCB FILE=42,FILEREADONLY=YES (or NO) AOS: F File maintenance M Modify file parameters Filereadonly ...... OFF ADAREP: READONLY-MODE No USER: Rsp Code 17 Sub 17 Adabas V82 by Jim Poole

  40. 15,16,17: ONLINVERT FNDEF, SVC Performance, PLCOPY 15. ADADBS ONLINVERT FILE=201,FNDEF='01,NT,7,A,NU' (Available in AOS) 16. IMPROVED SVC PERFORMANCE UNDER V822. 17. ADARES PLCOPY CALLS UEX(2 OR 12) IF MORE PLOGS TO COPY Adabas V82 by Jim Poole

  41. 18. ADARUN LOGWARN ADARUN LOGWARN = 0 – 2147483647(DFLT = 0 ) Eg. LOGWARN=20 ADANP1 00169 2010-02-16 11:41:00 CAUTION: DDPLOGR1 NOT YET COPIED ADANP1 00169 2010-02-16 11:41:19 CAUTION: DDPLOGR1 NOT YET COPIED ADANP1 00169 2010-02-16 11:41:39 CAUTION: DDPLOGR1 NOT YET COPIED ADANP1 00169 2010-02-16 11:41:59 CAUTION: DDPLOGR1 NOT YET COPIED ADANP2 00169 2010-02-16 11:42:16PLOG WARNING NO LONGER IN EFFECT Adabas V82 by Jim Poole

  42. (not tested) 19. ADADBS ADDPLOG,DELPLOG Eg. NUC JCL //DDPLOGR1 DD DISP=SHR,DSN=AD.P.ADA169.PLOG1 //DDPLOGR2 DD DISP=SHR,DSN=AD.P.ADA169.PLOG2 //DDPLOGR3 DD DISP=SHR,DSN=AD.P.ADA169.PLOG3 //DDPLOGR4 DD DISP=SHR,DSN=AD.P.ADA169.PLOG4 //DDPLOGR5 DD DISP=SHR,DSN=AD.P.ADA169.PLOG5 //DDPLOGR6 DD DISP=SHR,DSN=AD.P.ADA169.PLOG6 //DDCARD DD * : : : ADARUN NPLOG=2 AS PLOGS ARE NEEDED (OR NOT): ADADBS ADDPLOG NUMBER=3 Or ADADBS ADDPLOG NUMBER=3 AOS: O Session opercoms A Allocate/Deallocate CLOG/PLOG Adabas V82 by Jim Poole

  43. 20. ADARES REGENERATE/BACKOUT RECORD COUNTS Eg. ADARES REGENERATE --------------------------------------------- I File Number I Data Record Updates I I-----------------I-------------------------I I 1 I 4 I I 43 I 408274 I --------------------------------------------- Adabas V82 by Jim Poole

  44. POTENTIAL WORK/PLOG PERFORMANCE BOTTLENECKS A. HIGH UPDATE JOB(S) B. UPDATES DURING ADASAV SAVE C. ONLINE INVERTS, ONLINE ORDS D. CONCURRENT Sx (FIND) PROCESSING E. COMBINATIONS OF THE ABOVE OLD SOLUTIONS: WORK.CACHE / BLOCKSIZE SPLIT.WORK / MULTIPLE WORK(S) 21. ADARUN NPLOG/NWORK1 DEFAULT FOR WORK AND PLOGS: 1 BLOCK 1 IO V82 OPTION: 1 IO FOR X BLOCKS Adabas V82 by Jim Poole

  45. 21. ADARUN NPLOG/NWORK1 (ADARUN) ADARUN NPLOGBUFFERS = 1 - 2,147,483,687 ADARUN NWORK1BUFFERS = 1 - 2,147,483,687 1. DEFAULT = 1 (1 IO PER BLOCK) 2. REQUIRES LFIOP /= 0 3. IF ADARUN V64BIT=YES Then ABOVE 2G BAR 4. MEMORY SPACE = buffer.count X blocksize Adabas V82 by Jim Poole

  46. SHUTDOWN DDPRINT: PLOG PROTECTION BLOCKS 2,962 PLOG PROTECTION I/OS 2,962 WORK1 PROTECTION BLOCKS 2,927 WORK1 PROTECTION I/OS 2,927 : : : AREA ADARUN PARM HIGH-WATER-MARK : : : PLOG-IO B NPLOGB= 1 1 (100 %) WRK1-IO B NWORK1= 1 1 (100 %) DSTAT DRES AOS 21. ADARUN NPLOG/NWORK1 (Example) Eg. ADARUN = 1 Adabas V82 by Jim Poole

  47. 21. ADARUN NPLOG/NWORK1 (Example) Eg. NPLOGBUFFERS=100 NWORK1BUFFERS=100 SHUTDOWN DDPRINT: PLOG PROTECTION BLOCKS 37,922 PLOG PROTECTION I/OS 22,846 WORK1 PROTECTION BLOCKS 37,843 WORK1 PROTECTION I/OS 22,733 : : : AREA ADARUN PARM HIGH-WATER-MARK : : : PLOG-IO B NPLOGB= 100 37 ( 37 %) WRK1-IO B NWORK1= 100 38 ( 38 %) 40% FEWER IO’S 572K PER WORK OR PLOG BUFFER AREA (3390) Adabas V82 by Jim Poole

  48. 21. ADARUN NPLOG/NWORK1 (Performance) BATCH JOB DURATION (HIGH UPDATE) BUF=1 BUF=10 BUF=40 TEST: 1 2 3 4 5 6 Adabas V82 by Jim Poole

  49. 22. WORK I,II,III USE DDPRINT SHUTDOWN, DRES, AOS AREA ADARUN PARM HIGH-WATER-MARK ----------------------------------------------- WORK PART1 LP = 83700 1 ( 0 %) WORK PART2 LWKP2= 6000 0 ( 0 %) WORK PART3 -- = 297 0 ( 0 %) ( WORK1 WRAP STILL AT 25%?) Adabas V82 by Jim Poole

  50. (read manual) 23. ADASEL NEW FEATURES //DDKARTE DD * TEST test syntax but do not execute (must be first line) FDTINPUT Use an alternate FDT to read records (in case of file changes) see manual for detail SET GLOBALS specify before 1st SELECT, can repeat this line Many new options for spanned records and various SEL errors Adabas V82 by Jim Poole

More Related