quarta-feira, agosto 27, 2014

Adicionar/Retirar espaço ao File Adabas

Deallocate - Retirando Espaço ao File

Vamos retirar espaço (Deallocate) de um file Adabas, primeiro acessamos o SYSAOS - o file que vamos tirar vai ser o 83 vamos tirar 100 blocks do NI
11:37:16          ***** A D A B A S  BASIC  SERVICES *****       2008-08-15  
DBID 220                   - Display File Layout -                  PDRF022  
File 83                                                                      
                                                                              
     IDeviceIListI Space allocated  I      From         To    I Unused        
     I Type ITypeI Blocks   / Cyls. I      RABN         RABN  I Blocks / Cyls.
-----I------I----I------------------I ------------------------I---------------
     I      I    I                  I                         I                
ASSO I 8391 I AC I       20       0 I     120250 -     120269 I        0     0
     I 8391 I UI I       43       0 I     120270 -     120312 I       33     0
     I 8391 I NI I      357       1 I     120313 -     120669 I      340     1
     I      I    I                  I                         I                
DATA I 8391 I DS I      103       1 I     513070 -     513172 I       87     1
                                                                              
                                                                              
                                                                              
                                                                              
                                                                              
                                                                              
                                                                              
                                                                              
PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
Help               Exit      Refresh                              Menu
Opção F - File maintenance
11:51:19          ***** A D A B A S  BASIC  SERVICES *****          2008-07-09
                                 -  Main Menu  -                      PMAIN02  
                                                                                
                                                                                
               Code  Basic Services              Code  Other Services          
               ----  ----------------------      ----  ---------------------    
                A    Session monitoring           1    Adabas Cache Facility    
                C    Checkpoint maintenance       2    Delta Save Facility      
                F    File maintenance             3    Trigger Maintenance      
                M    Database maintenance         4    AOS Security            
                O    Session opercoms             5    Transaction Manager      
                R    Database report              6    Adabas Statistics        
                S    Space calculation            7    Vista                    
                ?    Help                         8    Fastpath                
                .    Exit                         9    SAF Security            
               ----  ----------------------      ----  ---------------------    
                                                                                
   Code ....... f                                                              
   Database ... 220     (DB.T220.SINTEGRA)                                      
  MENFL04 : - File Service -  Function interrupted                              
  Command ==>                                                                  
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit
Opção S - Allocate/deallocate file space
  11:51:30          ***** A D A B A S  BASIC  SERVICES *****          2008-07-09
                              -  File Maintenance  -                  PFL0002  
                       Code    Service                                          
                       ----    ------------------------------                  
                        C      Define/modify FDT                                
                        D      Release descriptor                              
                        E      Delete existing file                            
                        F      Define new file                                  
                        M      Modify file parameters                          
                        O      Reorder file online                              
                        R      Refresh file to empty status                    
                        S      Allocate/deallocate file space                  
                        X      Maintain expanded files                          
                        ?      Help                                            
                        .      Exit                                            
                       ----    ------------------------------                  
         Code ......... S                                                      
         File No ...... 83     Descriptor Name .. __                            
         Database ID .. 220    (DB.T220.SINTEGRA)                              
                                                                                
  Command ==>                                                                  
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit                                           Menu
Deallocate - Retirando espaço do file
11:37:41          ***** A D A B A S  BASIC  SERVICES *****          2008-08-15
  DBID 220             -  Allocate/Deallocate File Space  -           PFLS002  
                                                                                
  File Number .............. 83                                                
  File Name ................ SINTEGRA-RECEITAS-BRUTAS                                      
                                                                                
  Enter Parameters :                    Possible values:                        
                                                                                
     Allocate/Deallocate ... d            (A/D)                                
     Table Type ............ ni           (AC/DS/NI/UI)                        
     Size .................. 100                                                
     Blocks or Cylinders ... B            (B/C)                                
     Start RABN ............ __________                                        
     Device Type ........... ____                                              
                                                                                
  File Password ............                                                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit                                           Menu
Feito com sucesso;
11:39:00          ***** A D A B A S  BASIC  SERVICES *****          2008-08-15
                              -  File Maintenance  -                  PFL0002  
                       Code    Service                                          
                       ----    ------------------------------                  
                        C      Define/modify FDT                                
                        D      Release descriptor                              
                        E      Delete existing file                            
                        F      Define new file                                  
                        M      Modify file parameters                          
                        O      Reorder file online                              
                        R      Refresh file to empty status                    
                        S      Allocate/deallocate file space                  
                        X      Maintain expanded files                          
                        ?      Help                                            
                        .      Exit                                            
                       ----    ------------------------------                  
         Code ......... _                                                      
         File No ...... 83     Descriptor Name .. __                            
         Database ID .. 220    (DB.T220.SINTEGRA)                              
  EFLS006 : - Space Deallocation -  Function ended successfully                
  Command ==>                                                                  
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit                                           Menu
Foi retirado 100 blocos do NI
11:37:16          ***** A D A B A S  BASIC  SERVICES *****       2008-08-15  
DBID 220                   - Display File Layout -                  PDRF022  
File 83                                                                      
                                                                              
     IDeviceIListI Space allocated  I      From         To    I Unused        
     I Type ITypeI Blocks   / Cyls. I      RABN         RABN  I Blocks / Cyls.
-----I------I----I------------------I ------------------------I---------------
     I      I    I                  I                         I                
ASSO I 8391 I AC I       20       0 I     120250 -     120269 I        0     0
     I 8391 I UI I       43       0 I     120270 -     120312 I       33     0
     I 8391 I NI I      257       1 I     120313 -     120669 I      340     1
     I      I    I                  I                         I                
DATA I 8391 I DS I      103       1 I     513070 -     513172 I       87     1
                                                                              
                                                                              
                                                                              
                                                                              
                                                                              
                                                                              
                                                                              
                                                                              
PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
Help               Exit      Refresh                              Menu
Allocate - Adicionado Espaço ao File

O banco estava com dois pequeno espaço não usados - um de 30 no DATA e outro de 3 no ASSO - para ajuntar estes espaços não usados fizemos.
13:55:42          ***** A D A B A S  BASIC  SERVICES *****       2009-06-08  
  DBID 177                  - Display Unused Storage -                PDRU012  
                                                                                
         I Device I     Total Number of      I Extent           in Blk.   I    
         I Type   I   Blocks     /  Cyls.    I from        -      until   I    
   ------I--------I------------------------- I----------------------------I    
   DATA  I  8391  I          30           0  I      423147 -      423150  I    
         I  8391  I      102929        1372  I      423117 -      526045  I    
   ------I--------I------------------------- I----------------------------I    
   ASSO  I  8391  I           3           0  I      154515 -      154517  I    
         I  8391  I      276701        1537  I      263288 -      539988  I
Vamos adicionar este espaço no file - no SYSAOS na opção F - File maintenance
13:56:12          ***** A D A B A S  BASIC  SERVICES *****          2009-06-08
                                 -  Main Menu  -                      PMAIN02  
                                                                                
                                                                                
               Code  Basic Services              Code  Other Services          
               ----  ----------------------      ----  ---------------------    
                A    Session monitoring           1    Adabas Cache Facility    
                C    Checkpoint maintenance       2    Delta Save Facility      
                F    File maintenance             3    Trigger Maintenance      
                M    Database maintenance         4    AOS Security            
                O    Session opercoms             5    Transaction Manager      
                R    Database report              6    Adabas Statistics        
                S    Space calculation            7    Vista                    
                ?    Help                         8    Fastpath                
                .    Exit                         9    SAF Security            
               ----  ----------------------      ----  ---------------------    
                                                                                
   Code ....... f                                                              
   Database ... 177     (DB.D177.SINTEGRA)                                      
  EPDR05 : 'Database Report' function interrupted                              
  Command ==>                                                                  
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit
Opção S - Allocate/deallocate file space
14:01:36          ***** A D A B A S  BASIC  SERVICES *****          2009-06-08
                              -  File Maintenance  -                  PFL0002  
                       Code    Service                                          
                       ----    ------------------------------                  
                        C      Define/modify FDT                                
                        D      Release descriptor                              
                        E      Delete existing file                            
                        F      Define new file                                  
                        M      Modify file parameters                          
                        O      Reorder file online                              
                        R      Refresh file to empty status                    
                        S      Allocate/deallocate file space                  
                        X      Maintain expanded files                          
                        ?      Help                                            
                        .      Exit                                            
                       ----    ------------------------------                  
         Code ......... s                                                      
         File No ...... 124    Descriptor Name .. __                            
         Database ID .. 177    (DB.D177.SINTEGRA)                              
                                                                                
  Command ==>                                                                  
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit                                           Menu
DATASET ASSO - Esta vai ser a opção que vai adicionar mais espaço para o file
14:01:45          ***** A D A B A S  BASIC  SERVICES *****          2009-06-08
  DBID 177             -  Allocate/Deallocate File Space  -           PFLS002  
                                                                                
  File Number .............. 124                                                
  File Name ................ SINTEGRA-CAD-GERAL-BENEFICIO                                    
                                                                                
  Enter Parameters :                    Possible values:                        
                                                                                
     Allocate/Deallocate ... a            (A/D)                                
     Table Type ............ ac           (AC/DS/NI/UI)                        
     Size .................. 3                                                  
     Blocks or Cylinders ... B            (B/C)                                
     Start RABN ............ __________                                        
     Device Type ........... ____                                              
                                                                                
  File Password ............                                                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit                                           Menu
DATASET DATA - Esta vai ser a opção que vai adicionar mais espaço para o file 273
13:06:02          ***** A D A B A S  BASIC  SERVICES *****          2009-06-08
  DBID 177             -  Allocate/Deallocate File Space  -           PFLS002  
                                                                                
  File Number .............. 273                                                
  File Name ................ SINTEGRA-AUTO-ATENDIMENTO                                    
                                                                                
  Enter Parameters :                    Possible values:                        
                                                                                
     Allocate/Deallocate ... a            (A/D)                                
     Table Type ............ ds           (AC/DS/NI/UI)                        
     Size .................. 30                                                
     Blocks or Cylinders ... B            (B/C)                                
     Start RABN ............ __________                                        
     Device Type ........... ____                                              
                                                                                
  File Password ............                                                    
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit                                           Menu
Os dois comandos foram dados com sucesso
13:06:17          ***** A D A B A S  BASIC  SERVICES *****          2009-06-08
                              -  File Maintenance  -                  PFL0002  
                       Code    Service                                          
                       ----    ------------------------------                  
                        C      Define/modify FDT                                
                        D      Release descriptor                              
                        E      Delete existing file                            
                        F      Define new file                                  
                        M      Modify file parameters                          
                        O      Reorder file online                              
                        R      Refresh file to empty status                    
                        S      Allocate/deallocate file space                  
                        X      Maintain expanded files                          
                        ?      Help                                            
                        .      Exit                                            
                       ----    ------------------------------                  
         Code ......... _                                                      
         File No ...... 273    Descriptor Name .. __                            
         Database ID .. 177    (DB.D177.SINTEGRA)                              
  EFLS006 : - Space Allocation -  Function ended successfully                  
  Command ==>                                                                  
  PF1----- PF2------ PF3------ PF4------ PF6----- PF7----- PF8----- PF12-----  
  Help               Exit                                           Menu
No final ficou assim os espaços não utilizados no banco Adabas 177.
14:48:30          ***** A D A B A S  BASIC  SERVICES *****       2009-06-08  
  DBID 177                  - Display Unused Storage -                PDRU012  
                                                                                
         I Device I     Total Number of      I Extent           in Blk.   I    
         I Type   I   Blocks     /  Cyls.    I from        -      until   I    
   ------I--------I------------------------- I----------------------------I    
   DATA  I  8391  I      102929        1372  I      423117 -      526045  I    
   ------I--------I------------------------- I----------------------------I    
   ASSO  I  8391  I      276701        1537  I      263288 -      539988  I

0 comentários:

Enviar um comentário