Query Manager (requêtes)

BoTTom |    Changer de couleur
                      Q U E R Y   M A N A G E R          
 
 Query manager est un outil qui permet de gérer des querys (requêtes)
  de manière standard sur toute la gamme IBM (surtout 370/390)
 
 Les objets qui sont utilisés sont les suivants:
 
                *QMQRY   Objet contenant une requête SQL
                               (logiciel 5728-ST1 non obligatoire)
 
                *QMFORM  Objet contenant la définition de la présentation
                          et des totaux pour un ordre SELECT
 
                et les commandes:
 
                RTVQMQRY  Extrait un source à partir d'un *QMQRY ou *QRYDFN
                RTVQMFORM Extrait un source à partir d'un *QMFORM ou *QRYDFN
                CRTQMQRY  Création d'un objet *QMQRY à partir d'un source
                CRTQMFORM Création d'un objet *QMFORM à partir d'un source      
                STRQMPRC  Lancement d'une procédure QMPRC
                STRQMQRY  Exécution d'une requête QMQRY                         
 


|    Changer de couleur
                      Retrieve Query Mgmt Query (RTVQMQRY)     
 
 Indiquez vos choix, puis appuyez sur Entrée. 
 
 Query management query . . . . . QMQRY           nom-query  
   Library  . . . . . . . . . . .                  *LIBL      
 Source file  . . . . . . . . . . SRCFILE         qqmqrysrc  
   Library  . . . . . . . . . . .                  *LIBL      
 Source member  . . . . . . . . . SRCMBR         *QMQRY     
 Allow information from QRYDFN  . ALWQRYDFN       *YES 
 
 
 
 
 
 
 
 
 
                                                                          Fin 
 F3=Exit   F4=Invite   F5=Réafficher   F12=Annuler   F13=Mode d'emploi invite
 F24=Autres touches                                                             


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                  QRYDFN 
        **************  Début des données  ************************************ 
0001.00 SELECT                                                                  
0002.00   ALL       T01.MATRIC, T01.DATPT, T01.HDEB, T01.HFIN                   
0003.00   FROM      SQLPGMR/PG00TPT T01                                         
0004.00   WHERE     HFIN > HDEB                                                 
0005.00   ORDER BY  T01.DATPT ASC, T01.MATRIC ASC                               
        ***************  Fin des données  ************************************* 
                                                                                
                                                                                
                                                                                
            Voici le source extrait à partir d'un query simple                  
                                                                                
                  (*QRYDFN = QUERY/400)                                         
                                                                                
            Ces lignes sont maintenant précédées d'indications QM               
             (complètement facultatives) signalant l'OS d'origine,              
             date et heure, etc ...                                             
                                                                                
                                                                                
 


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                 QRYQM01 
        **************  Début des données  ************************************ 
0001.00 SELECT                                                 -- COMMENTAIRES  
0002.00   ALL       T01.MATRIC, T01.DATPT, T01.HDEB, T01.HFIN, -- COL/TABLE     
0002.01             HFIN-(HDEB)                                -- CALCUL        
0003.00   FROM      SQLPGMR/PG00TPT T01                        -- NOM TABLE     
0004.00   WHERE     HFIN > HDEB                                -- SéLECTION     
0005.00   ORDER BY  T01.DATPT ASC, T01.MATRIC ASC              -- TRI           
        ***************  Fin des données  ************************************* 
                                                                                
                                                                                
            Ce source peut être modifié en respectant la syntaxe SQL            
 
                      peut contenir des commentaires précédés de "--"           
                                                                                
            Un objet peut être créé à partir de ce source avec CRTQMQRY         
                                                                                
                                                                                
                                                                                
                                                                                
 


|    Changer de couleur
                     Start Query Management Query (STRQMQRY)   
 
 Indiquez vos choix, puis appuyez sur Entrée. 
 
 Query management query . . . . . QMQRY        >  nom-query  
   Library  . . . . . . . . . . .              >   SQLPGMR    
 Output . . . . . . . . . . . . . OUTPUT         *        
 Query management report form . . QMFORM         *SYSDFT    
   Library  . . . . . . . . . . .                             
 
 
 
            Voici ce que cela donne à l'exécution
 
 
 
 
 
 
                                                                          Fin 
 F3=Exit   F4=Invite   F5=Réafficher   F10=Autres paramètres   F12=Annuler
 F13=Mode d'emploi invite              F24=Autres touches                       


|    Changer de couleur
                                 Display Report 
 Query . . . . .:   SQLPGMR/QRYQM01           Width . . .:      71 
 Form  . . . . .:   *SYSDFT                   Column  . .:       1 
 Control  . . . .           
 Line   ....+....1....+....2....+....3....+....4....+....5....+....6....+....7. 
          MATRIC     DATPT    HDEB    HFIN     SEL1                             
          ------  --------  ------  ------  -------                             
 000001       1   910.101    8,00   15,00     7,00                              
 000002       1   910.501    8,00   17,00     9,00                              
 000003       2   910.501    8,00   17,00     9,00                              
 000004       1   910.502    8,00   17,00     9,00                              
 000005       2   910.502    8,00   17,00     9,00                              
 000006       1   910.503    8,00   17,00     9,00                              
 000007       1   910.504    8,00   17,00     9,00                              
 000008       6   910.521    8,50   18,75    10,25                              
 ******  * * * * *  E N D  O F  D A T A  * * * * *                              
 
              Le système à utilisé un *QMFORM par défaut.
 
                                                                          Fin 
 F3=Exit   F12=Cancel   F19=Left   F20=Right   F21=Split 
 


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                 QRYQM02 
        **************  Début des données  ************************************ 
0001.00 SELECT                                                 -- COMMENTAIRES  
0002.00   ALL       T01.MATRIC, T01.DATPT, T01.HDEB, T01.HFIN, -- COL/TABLE     
0002.01             HFIN-(HDEB)                                -- CALCUL        
0003.00   FROM      SQLPGMR/PG00TPT T01                        -- NOM TABLE     
0004.00   WHERE     HFIN > HDEB   AND                          -- SéLECTION     
0004.01             MATRIC = &MATRICULE                                         
0005.00   ORDER BY  T01.DATPT ASC, T01.MATRIC ASC              -- TRI           
        ***************  Fin des données  ************************************* 
                                                                                
            Ce source peut contenir des variables (caractérisées par "&")       
               qui seront remplacées à l'exécution par des valeurs.             
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
 


|    Changer de couleur
                             Messages du programme              
 
 Travail 123456/AF400/DSPXX démarré le 21/06/91 à 16:15:19 dans le sous-système
 Entrez une valeur pour la variable MATRICULE.                                
 
 
 
 
          Si le QMQRY est exécuté en interactif le système envoie un message
 
 
 
 
 
 
 
 Répondez, puis appuyez sur ENTREE.          
   Réponse . .   1
                                                                                
 
 F3=Exit   F12=Annuler          
 


|    Changer de couleur
                                 Display Report 
 Query . . . . .:   SQLPGMR/QRYQM02           Width . . .:      71 
 Form  . . . . .:   *SYSDFT                   Column  . .:       1 
 Control  . . . .           
 Line   ....+....1....+....2....+....3....+....4....+....5....+....6....+....7. 
          MATRIC     DATPT    HDEB    HFIN     SEL1                             
          ------  --------  ------  ------  -------                             
 000001       1   910.101    8,00   15,00     7,00                              
 000002       1   910.501    8,00   17,00     9,00                              
 000003       1   910.502    8,00   17,00     9,00                              
 000004       1   910.503    8,00   17,00     9,00                              
 000005       1   910.504    8,00   17,00     9,00                              
 ******  * * * * *  E N D  O F  D A T A  * * * * *                              
 
 
 
 
 
 
                                                                          Fin 
 F3=Exit   F12=Cancel   F19=Left   F20=Right   F21=Split 
 


|    Changer de couleur
                     Start Query Management Query (STRQMQRY)   
 
 Indiquez vos choix, puis appuyez sur Entrée. 
 
 Query management query . . . . . QMQRY        >  QRYQM02    
   Library  . . . . . . . . . . .              >   SQLPGMR    
 Output . . . . . . . . . . . . . OUTPUT         *        
 Query management report form . . QMFORM         *SYSDFT    
   Library  . . . . . . . . . . .                             
                                             
                            Autres paramètres              Dans tous les cas    
 Naming convention  . . . . . . . NAMING         *SYS      il est possible
 Allow information from QRYDFN  . ALWQRYDFN      *NO       de pré-renseigner
 Set variables:                   SETVAR                   les variables
   Variable name  . . . . . . . .                 matricule                 
   Variable value . . . . . . . .                 1
  ###########################################      
                         + si autres valeurs     
                                                                          Fin 
 F3=Exit   F4=Invite   F5=Réafficher   F12=Annuler   F13=Mode d'emploi invite
 F24=Autres touches                                                             
 


|    Changer de couleur
                     Start Query Management Query (STRQMQRY)   
 
 Indiquez vos choix, puis appuyez sur Entrée. 
 
 Query management query . . . . . QMQRY        >  QRYQM02    
   Library  . . . . . . . . . . .              >   SQLPGMR    
 Output . . . . . . . . . . . . . OUTPUT         *        
 Query management report form . . QMFORM         *SYSDFT    
   Library  . . . . . . . . . . .                             
                                             
                            Autres paramètres              #################### 
 Naming convention  . . . . . . . NAMING         *SYS      
 Allow information from QRYDFN  . ALWQRYDFN      *NO       Avec une zone
 Set variables:                   SETVAR                    ALPHA :
   Variable name  . . . . . . . .                 nom                       
   Variable value . . . . . . . .                 '''BAUDELAIRE'''
  ###########################################      
                         + si autres valeurs     
                                                                          Fin 
 S'il s'agit de variable alpha vous devez saisir les apostrophes en même
  temps que la valeur, ici elles sont triplées: ' pour le début d'une           
  constante et '' pour que le système considère le caractère '.(ca marche!)


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                 QRYQM03 
        **************  Début des données  ************************************ 
0001.00 INSERT                                                 -- COMMENTAIRES  
0001.01   INTO      SQLPGMR/PG00TPT                            -- NOM TABLE     
0001.02   VALUES(1, 910101, 07, 18)                            -- VALEURS       
        ***************  Fin des données  ************************************* 
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            N'importe quel ordre SQL peut être exécuté.                         
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
 


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                 QRYQM04 
        **************  Début des données  ************************************ 
0001.00 INSERT                                                 -- COMMENTAIRES  
0001.01   INTO      SQLPGMR/PG00TPT                            -- NOM TABLE     
0001.02   VALUES(&MATRICULE, &DATE, &HEUREDEBUT, &HEUREFIN)    -- VALEURS       
        ***************  Fin des données  ************************************* 
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            Y compris avec des variables.                                       
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
 


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                 QRYQM05 
        **************  Début des données  ************************************ 
0001.00 UPDATE                                                 -- COMMENTAIRES  
0001.01             SQLPGMR/PG00TPT                            -- NOM TABLE     
0001.02   SET   HDEB   =  &HEUREDEBUT,                                          
0002.00         HFIN   =  &HEUREFIN                                             
0002.01                                                                         
0003.00   WHERE MATRIC = &MATRICULE AND                                         
0004.00         DATPT  = &DATE                                                  
        ***************  Fin des données  ************************************* 
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
 


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                 QRYQM06 
        **************  Début des données  ************************************ 
0001.00 DELETE                                                 -- COMMENTAIRES  
0001.01       FROM  SQLPGMR/PG00TPT                            -- NOM TABLE     
0002.00                                                                         
0003.00   WHERE MATRIC = &MATRICULE AND                                         
0004.00         DATPT  = &DATE                                                  
        ***************  Fin des données  ************************************* 
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
 


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                 QRYQM07 
        **************  Début des données  ************************************ 
0001.00 UPDATE                                                 -- COMMENTAIRES  
0001.01             SQLPGMR/PG00TPT                            -- NOM TABLE     
0001.02   SET   HDEB   =  &HEUREDEBUT,                                          
0002.00         HFIN   =  &HEUREFIN                                             
0002.01                                                                         
0003.00   WHERE &SELECTION                                                      
        ***************  Fin des données  ************************************* 
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
 


|    Changer de couleur
 Colonnes  . . :    1  71           Examen                    SQLPGMR/QQMQRYSRC
 SEU==>                                                                 QRYQM08 
        **************  Début des données  ************************************ 
0001.00  &ORDRESQL                                                              
        ***************  Fin des données  ************************************* 
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
            La totalité de l'ordre SQL pouvant être une variable.               
                                                                                
          (mais la valeur de remplacement ne peut pas dépasser 55 c.)           
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
 





©AF400