SQL/DDL Implementation › Extended SQL Naming › Example of Extended SQL DDL Naming

Example of Extended SQL DDL Naming

EXEC SQL                                               
     CREATE VIEW RWCSQL.ORDL1 (                        
           ORDER_CODE                                  
          ,CUSTOMER_CODE                               
          ,CUSTOMER_NAME                               
          ,ORDER_STATUS                                
          ,ORDER_DATE                                  
                                )                      
     AS SELECT                                         
           X1.ORDER_CODE                               
          ,X1.CUSTOMER_CODE                            
          ,X2.CUSTOMER_NAME                            
          ,X1.ORDER_STATUS                             
          ,X1.ORDER_DATE                               
     FROM     RWCSQL.ORDERS X1                         
              RWCSQL.CUSTOMER X2                       
     WHERE    X1.CUSTOMER_CODE = X2.CUSTOMER_CODE      
END-EXEC                                               
                                                       
EXEC SQL                                               
     COMMENT ON TABLE RWCSQL.ORDL1 IS                  
          ‘Orders       Retrieval index’               
END-EXEC                                               
                                                       
EXEC SQL                                               
     COMMENT ON RWCSQL.ORDL1 (                         
           ORDER_CODE          IS      ‘Order code’    
          ,CUSTOMER_CODE       IS      ‘Customer code’ 
          ,CUSTOMER_NAME       IS      ‘Customer name’ 
          ,ORDER_STATUS        IS      ‘Order status’  
          ,ORDER_DATE          IS      ‘Order date’    
                                       )               
END-EXEC                                               
                                                       
EXEC SQL                                               
     LABEL ON TABLE RWCSQL.ORDL1 IS                    
          ‘Orders              Retr’                   
END-EXEC                                               
                                                       
EXEC SQL                                               
     CREATE UNIQUE INDEX RWCSQL.ORDL1I ON RWCSQL.ORDERS
          ORDER_CODE ASC                               
END-EXEC