IMS DB - Programmation

Un programme d'application qui comprend des appels DL / I ne peut pas s'exécuter directement. Au lieu de cela, un JCL est requis pour déclencher le module de traitement par lots IMS DL / I. Le module d'initialisation par lots dans IMS est DFSRRC00. Le programme d'application et le module DL / I s'exécutent ensemble. Le diagramme suivant montre la structure d'un programme d'application qui comprend des appels DL / I pour accéder à une base de données.

Le programme d'application s'interface avec les modules IMS DL / I via les éléments de programme suivants -

  • Une instruction ENTRY spécifie que les PCB sont utilisés par le programme.

  • Un masque de PCB est associé aux informations conservées dans le PCB préconstruit qui reçoit les informations de retour de l'IMS.

  • Une zone d'entrée-sortie est utilisée pour transmettre des segments de données vers et depuis la base de données IMS.

  • Les appels à DL / I spécifient les fonctions de traitement telles que récupérer, insérer, supprimer, remplacer, etc.

  • Vérifier les codes d'état est utilisé pour vérifier le code de retour SQL de l'option de traitement spécifiée pour indiquer si l'opération a réussi ou non.

  • Une instruction Terminate est utilisée pour terminer le traitement du programme d'application qui comprend le DL / I.

Disposition des segments

À partir de maintenant, nous avons appris que l'IMS se compose de segments qui sont utilisés dans des langages de programmation de haut niveau pour accéder aux données. Considérez la structure de base de données IMS suivante d'une bibliothèque que nous avons vue précédemment et nous voyons ici la disposition de ses segments en COBOL -

01 LIBRARY-SEGMENT.
   05 BOOK-ID        PIC X(5).
   05 ISSUE-DATE     PIC X(10).
   05 RETURN-DATE    PIC X(10).
   05 STUDENT-ID     PIC A(25).
	
01 BOOK-SEGMENT.
   05 BOOK-ID        PIC X(5).
   05 BOOK-NAME      PIC A(30).
   05 AUTHOR         PIC A(25).
	
01 STUDENT-SEGMENT.
   05 STUDENT-ID     PIC X(5).
   05 STUDENT-NAME   PIC A(25).
   05 DIVISION       PIC X(10).

Aperçu du programme d'application

La structure d'un programme d'application IMS est différente de celle d'un programme d'application non IMS. Un programme IMS ne peut pas être exécuté directement; il est plutôt toujours appelé comme sous-programme. Un programme d'application IMS se compose de blocs de spécification de programme pour fournir une vue de la base de données IMS.

Le programme d'application et les PSB liés à ce programme sont chargés lorsque nous exécutons un programme d'application qui comprend des modules IMS DL / I. Ensuite, les requêtes CALL déclenchées par les programmes applicatifs sont exécutées par le module IMS.

Services IMS

Les services IMS suivants sont utilisés par le programme d'application -

  • Accès aux enregistrements de la base de données
  • Émettre des commandes IMS
  • Émettre des appels de service IMS
  • Appels de point de contrôle
  • Synchroniser les appels
  • Envoi ou réception de messages à partir de terminaux d'utilisateurs en ligne