Converting partitioned table spaces to partition-by-range table spaces with relative page numbering by importing DML

Use the following procedure to import DML to convert the following partitioned table spaces to partition-by-range table spaces with relative page numbering:

To convert partitioned table spaces to partition-by-range table spaces with relative page numbering

1. Copy the DML statements from member ACMDMLUL in the HLQ.BMCCNTL data set.

2. Edit one of the DML statements (in the following figure) in an ISPF editor. Provide the information that is required for your site, and delete the other statement.For information about DML syntax, see CM-PILOT-Data-Manipulation-Language-DML.

   --  The example DML in this file converts partition-by-range table spaces       
   --  with absolute page numbering, table-controlled partitioned table            
   --  spaces and index-controlled partitioned table spaces to                     
   --  partition-by-range table spaces with relative page numbering.               
   --  After you edit the DML statement, you can use Change Manager to             
   --  import it.                                                                  
   --                                                                              
   --  The update tablespace example sets page numbering to relative               
   --  and assigns DSSIZE and SEGSIZE values if they are zero on the catalog.          
   --                                                                              
   UPDATE TABLESPACE                                                               
   SET PAGENUM = 'R',                                                              
   DSSIZE =   CASE WHEN DSSIZE = 0 THEN 5 ELSE DSSIZE END ,                        
   SEGSIZE =  CASE WHEN SEGSIZE = 0 THEN 4 ELSE SEGSIZE END                        
   WHERE                                                                           
   DBNAME = 'DEM0228A'  AND                                                        
   PARTITIONS > 1       AND                                                        
   TYPE IN (' ','L','R')                                                           
   ;                                                                               
   --  The update table example changes any index-controlled partitioned           
   --  table spaces to partition-by-range table spaces.  It uses the same          
   --  scope as the prior update tablespace.                                       
   --                                                                              
   UPDATE TABLES JOIN SYSIBM.SYSTABLESPACE TS                                      
   SET TCPART = 'Y' WHERE                                                          
   TABLES.DBNAME = 'DEM0228A'  AND                                                 
   TABLES.PARTKEYCOLNUM = 0  AND                                                   
   TABLES.DBNAME = TS.DBNAME AND                                                   
   TABLES.TSNAME = TS.NAME   AND                                                   
   TS.PARTITIONS > 1         AND                                                   
   TS.TYPE IN (' ','L')                                                            
   ;                                                                               
3. Import the DML file.Now that the DML file has been imported, you can analyze a work ID and execute a worklist.