SQL - Select's utéis - Select para ver de onde uma VIEW foi criada - www.cadcobol.com.br


Volta a página anterior

Volta ao Menu Principal


Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

O SELECT abaixo mostra como é o CREATE de uma VIEW especifica
   SELECT SEQNO                          
   ,      TEXT                     
   FROM   SYSIBM.SYSVIEWS            
   WHERE  CREATOR LIKE '%CAD%'     
   AND    NAME = 'CADVW001_UNIDADE'
   ORDER  BY                       
          NAME                      
   ,      SEQNO

Resultado da pesquisa acima:
   SEQNO  TEXT                                                                 
  ------  ---------------------------------------------------------------------
       1  CREATE VIEW CAD.CADVW001_UNIDADE (NU_UNIDADE, NU_NATURAL , NU_DV_UNID
       2  CEP , NU_CEP_COMPLEM, SG_UF , NU_LOCALIDADE, IC_ULT_SITUAC, DT_INICIO
       3  LO_POSICAO, NO_BAIRRO , NO_TIPO_LOGRADOURO, NO_LOGRADOURO , SG_POSICA
       4  _INICIO , TUNID.DT_FIM, TUNID.SG_TIPO_UNIDADE, TVINC.NU_UNDE_VNCLRA_U
       5  RO , NO_LOGRADOURO , SG_POSICAO_DTRME , ED_POSICAO_DTRME , SG_TIPO_ED
       6  E FROM CAD.CADTBU24_UNIDADE TU24 , CAD.CADTBV03_LOCUNID TV03 , CAD.IC
       7  ATURAL AND TV03.NU_TIPO_FNLDE_V04 = TV04.NU_TIPO_FINALIDADE AND TV04.
       8  AS TUNID LEFT OUTER JOIN (SELECT NU_UNDE_VNCLRA_U24, NU_NTRL_VNCLRA_U
       9   AND TUNID.NU_NATURAL = TVINC.NU_NTRL_VNCLA_U24

O SELECT abaixo mostra como é o CREATE das VIEW de um sistema
   SELECT NAME 
   ,      SEQNO                          
   ,      TEXT                     
   FROM   SYSIBM.SYSVIEWS            
   WHERE  CREATOR LIKE '%CAD%'     
   ORDER  BY                       
          NAME                      
   ,      SEQNO

Resultado da pesquisa acima:
   NAME                 SEQNO  TEXT                                             
   ------------------  ------  -------------------------------------------------
   CADVW001_UNIDADE         1  CREATE VIEW CAD.CADVW001_UNIDADE (NU_UNIDADE, NU_
   CADVW001_UNIDADE         2  CEP , NU_CEP_COMPLEM, SG_UF , NU_LOCALIDADE, IC_U
   CADVW001_UNIDADE         3  LO_POSICAO, NO_BAIRRO , NO_TIPO_LOGRADOURO, NO_LO
   CADVW001_UNIDADE         4  _INICIO , TUNID.DT_FIM, TUNID.SG_TIPO_UNIDADE, TV
   CADVW001_UNIDADE         5  RO , NO_LOGRADOURO , SG_POSICAO_DTRME , ED_POSICA
   CADVW001_UNIDADE         6  E FROM CAD.CADTBU24_UNIDADE TU24 , CAD.CADTBV03_L
   CADVW001_UNIDADE         7  ATURAL AND TV03.NU_TIPO_FNLDE_V04 = TV04.NU_TIPO_
   CADVW001_UNIDADE         8  AS TUNID LEFT OUTER JOIN (SELECT NU_UNDE_VNCLRA_U
   CADVW001_UNIDADE         9   AND TUNID.NU_NATURAL = TVINC.NU_NTRL_VNCLA_U24  

   CADVW002_PV_GIAFI        1   CREATE VIEW  CAD.CADVW002_PV_GIAFI              
   CADVW002_PV_GIAFI        2  AO, NU_LOCALIDADE, SG_UF )               AS      
   CADVW002_PV_GIAFI        3        T25A.NU_SEQUENCIAL, T24A.NU_DV_NU_UNIDADE, 
   CADVW002_PV_GIAFI        4  25A.DT_FIM IS NULL AND                  T24A.DT_F
   CADVW002_PV_GIAFI        5    8 AND T24A.NU_TP_UNIDADE_U21 IN (8, 9, 10, 20) 
   CADVW002_PV_GIAFI        6  DT_FIM IS NULL AND                  T25B.NU_PROCE
   CADVW002_PV_GIAFI        7  5A.NU_UNDE_VNCLA_U24 = T25B.NU_UNDE_VNCLA_U24 AND
   CADVW002_PV_GIAFI        8   AND                            T24A.NU_TP_UNIDAD

   CADVW003_VNCLRA          1    CREATE VIEW   CAD.CADVW003_VNCLRA              
   CADVW003_VNCLRA          2                                         NU_NTRL_VN
   CADVW003_VNCLRA          3  ELECT  T1.NU_UNDE_VNCLA_U24, T1.NU_NTRL_VNCLA_U24
   CADVW003_VNCLRA          4  CO.CADTBU24_UNIDADE T2,                          
   CADVW003_VNCLRA          5              T1.DT_FIM IS NULL  AND               
   CADVW003_VNCLRA          6  _VNCLRA_U24 AND                               T3.
   CADVW003_VNCLRA          7          T3.IC_ULTIMA_SITUACAO = 'AT'             

   CADVW004_VENC            1   CREATE VIEW CAD.CADVW004_VENC AS SELECT T1.NU_CO
   CADVW004_VENC            2  D T14.NU_SITUACAO_ESP = 137 AND T7.DT_VENC_PREST 

   CADVW005_CNTA_OP12       1   CREATE VIEW CAD.CADVW005_CNTA_OP12 (NU_CONTRATO 
   CADVW005_CNTA_OP12       2  BTB001_CONT_SFH TB001 , CAD.CADTB004_PESSOA_CO TB

   CADVW006_PV_GIPRO        1  CREATE VIEW CAD.CADVW006_PV_GIPRO (NU_UNIDADE_VIN
   CADVW006_PV_GIPRO        2  U24, T25A.NU_UNDE_VNCLA_U24, T25A.NU_NTRL_VNCLA_U
   CADVW006_PV_GIPRO        3   = 4 AND T25A.DT_FIM IS NULL AND T24A.DT_FIM IS N
   CADVW006_PV_GIPRO        4   T25A.NU_SEQUENCIAL = (SELECT MAX(NU_SEQUENCIAL) 
   CADVW006_PV_GIPRO        5  4 = T25B.NU_UNDE_VNCLRA_U24 AND T25A.NU_NTRL_VNCL
   CADVW006_PV_GIPRO        6  U24 = T24C.NU_NATURAL AND T24A.NU_TP_UNIDADE_U21 

   CADVW007_FERIADO         1   CREATE VIEW CAD.CADVW007_FERIADO (CO_ABRNA_GGRFA
   CADVW007_FERIADO         2  ADE_L10, DATE(T1.TS_INCLUSAO) , T2.NU_COP, T3.NO_

   CADVW008_FAIXACEP        1                                                   
   CADVW008_FAIXACEP        2  _CENTRALIZADORA,                   DE_CENTRALIZAD

   CADVW009_CEP             1   CREATE VIEW CAD.CADVW009_CEP AS SELECT 'ENDERECO
   CADVW009_CEP             2   TBL01.NO_BAIRRO AS NO_BAIRRO, TBL08.NO_LOCALIDAD
   CADVW009_CEP             3  RICO AS IC_CEP_GENERICO, TBL08.NU_LOCALIDADE AS N
   CADVW009_CEP             4  PLIMITE TBL17 WHERE TBL08.NU_LOCALIDADE = TBL09.N
   CADVW009_CEP             5  D TBL19.SG_TIPO_LOGRADOURO = TBL09.SG_TIPO_LGRDO_
   CADVW009_CEP             6  E, TBL08.SG_UF_L22 AS SG_UF, TBL08.NU_CEP AS NU_C
   CADVW009_CEP             7   CAD.CADTBL08_LOCALIDAD TBL08