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 |
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 |
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 ... |
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 |
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 |
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 |
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. |
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 |
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 |
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 |
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!) |
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é. |
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. |
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 ************************************* |
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 ************************************* |
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 ************************************* |
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.) |