Tous les articles par Mr COBOL

SPITAB cours

MAJ de postes sous SPITAB

La mise à jour d’une table SPITAB est un processus essentiel pour assurer la qualité et la pertinence des données stockées dans la table. Cela implique la création, la modification ou la suppression d’une poste ou d’éléments d’une poste.

Voici les différentes méthodes pour effectuer une mise à jour :

  • En temps réel :
    Cette méthode consiste à utiliser la transaction MAJ ou un écran généré pour effectuer la mise à jour en temps réel.
  • En traitement batch :
    Cette méthode utilise un utilitaire qui exécute en temps différé des opérations analogues conduisant au même résultat.

Il est important de noter que la modification d’un poste de table se fait toujours page par page et que la procédure de modification se déroule en deux temps :

  • Visualisation de la page à modifier :
    avant de modifier une page, il est recommandé de la visualiser pour avoir une idée globale des éléments qui la composent.
  • Modification proprement dite :
    une fois que la page est visualisée, vous pouvez modifier un ou plusieurs éléments de la page. Cependant, il est à noter qu’il n’est pas possible de modifier la valeur d’un élément de référence. Pour remettre un élément à blanc, il suffit de mettre “à” en début de zone.

Le champ “Op” de l’écran MAJ permet de spécifier le type d’opération à effectuer. Les valeurs permises sont :

  • I (Interrogation) :
    Cette valeur est utilisée par défaut quand la zone est à “espace”.
  • C (Création) :
    Cette valeur permet de créer une page ou un poste.
  • M (Modification) :
    Cette valeur permet de modifier des éléments appartenant à la page de structure affichée.
  • S (Suppression) :
    Cette valeur permet de supprimer une page et/ou un poste.

Enfin, il est également possible de consulter les valeurs croissantes ou décroissantes de la référence en utilisant les touches PF8 et PF7 respectivement.

En utilisant ces méthodes, vous pouvez effectuer des mises à jour de manière efficace et fiable pour maintenir l’intégrité de vos données SPITAB.

SPITAB cours

Les EXIT-USERS

Les EXIT-USERS sont des programmes qui permettent de compléter les contrôles offerts par SPITAB en standard ou d’opérer des mises à jour en parallèle. Ils sont appelés par SPITAB après que les données saisies ont satisfait aux contrôles standards.

Utilité

L’intérêt d’un EXIT-USER est de pouvoir ajouter des contrôles supplémentaires ou des traitements automatisés sur les données. Par exemple, il peut être utilisé pour effectuer des contrôles de cohérence entre deux ou plusieurs éléments d’une structure. Il peut également être utilisé pour automatiser la mise à jour d’une table lorsque son contenu dépend de la mise à jour d’une autre table.

Niveau d’Intervention

Un EXIT-USER est appelé par SPITAB après que les données saisies ont satisfait aux contrôles standards.

Création

La création d’un EXIT-USER doit être effectuée par le Responsable SPITAB pour des raisons de sécurité et afin de faciliter les recherches en cas d’évolution de SPITAB. Il est donc recommandé de contacter le Responsable SPITAB pour toute demande de création d’un EXIT-USER.

En conclusion, les EXIT-USER sont des outils puissants qui permettent d’étendre les fonctionnalités de SPITAB en ajoutant des contrôles ou des traitements automatisés. Ils doivent être utilisés avec précaution et leur création doit être effectuée par des personnes compétentes.

SPITAB cours

La protection des Tables

SPITAB offre la possibilité de protéger efficacement les tables. Cette protection peut être réalisée à deux niveaux :

  • Au niveau d’une page de structure, en utilisant des indicateurs de protection.
  • Au niveau d’un Code Utilisateur et de son mot de passe, spécifique à une table.

Protection en mise à jour

Le Responsable peut protéger une page de structure pendant les opérations de mise à jour. Il peut également spécifier les niveaux d’autorisation accordés aux différents utilisateurs.

Protection en interrogation

Le Responsable peut protéger une page de structure pendant les opérations d’interrogation de la structure ou des postes. SPITAB n’autorise aucune mise à jour sans interrogation préalable. Par conséquent, la protection en interrogation empêche la mise à jour.

Pour protéger une table, contactez le Responsable SPITAB en précisant le degré de protection souhaité et le code utilisateur. Sur la mire d’accueil, vous pourrez inscrire un mot de passe associé à ce code utilisateur et votre table sera protégée.

SPITAB cours

Les paramètres de transfert

Les paramètres de transfert permettent de copier et d’utiliser les tables SPITAB sur le fichier des Tables Comptables (par exemple : CPT.P000). Ces paramètres sont définis lors de la création de la table par le Responsable SPITAB.

Quels sont les paramètres obligatoires ?

  • La longueur d’un poste sur le fichier CPT.P000. Il est possible de définir une table de 100 caractères et de ne copier que les 50 premiers caractères.
  • La longueur de la clé sur le fichier CPT.P000. Si la longueur entre une clé SPITAB et une clé CPT.P000 peut être différente, elle doit être unique dans tous les cas.
  • Le numéro de la table générale pour les tables exploitées en temps partagé.

Où trouver les paramètres de transfert ?

  • Pour accéder aux paramètres de transfert sous SPITAB, tapez MAJTRANS dans “Prochain écran” de la mire d’accueil.
  • Pour une table déjà livrée en production, vous pouvez le trouver dans le menu sous TSO.

Il est important de noter que SEUL LE RESPONSABLE SPITAB EST HABILITÉ À CRÉER OU MODIFIER CES PARAMÈTRES.

SPITAB cours

Les écrans générés

L’objectif de la personnalisation des écrans de mise à jour (MAJ) avec SPITAB est de faciliter la saisie et la consultation des données en offrant des écrans adaptés aux besoins de l’utilisateur. Pour cela, le Responsable SPITAB peut créer en temps réel un ou plusieurs formats d’écrans grâce à une transaction.

COMMENT PERSONNALISER LES ECRANS DE MAJ AVEC SPITAB ?

Le Responsable SPITAB peut personnaliser les écrans de MAJ avec les étapes suivantes :

  1. Créer un ou plusieurs formats d’écrans en temps réel à partir de la transaction SPITAB.
  2. Préciser les caractéristiques des éléments de la page de structure pour dessiner l’écran : libellés, longueur, etc.
  3. Définir le nombre d’éléments à afficher dans une même page (jusqu’à 99).
  4. Ajouter du texte pour aider à la saisie.
  5. Permettre l’utilisation d’EXIT-USER.
  6. Utiliser des pages de structure différentes pour les éléments.

AVANTAGES DE L’ECRAN GENERE

La personnalisation des écrans de MAJ offre plusieurs avantages, notamment :

  • Une présentation personnalisée selon les goûts de l’utilisateur.
  • La possibilité de limiter la vue des éléments pour des raisons de confidentialité.
  • La possibilité d’intégrer EXIT-USER pour compléter les contrôles standards.
  • Une aide à la saisie grâce au texte ajouté sur l’écran.
  • La possibilité d’avoir jusqu’à 99 éléments dans une même page.
  • La possibilité d’utiliser différentes pages de structure pour les éléments.

En somme, la personnalisation des écrans de MAJ avec SPITAB est un moyen efficace de faciliter la saisie et la consultation des données pour les utilisateurs tout en offrant une plus grande souplesse pour le Responsable SPITAB.

SPITAB cours

Modification de structure de Tables

La modification de la structure d’une table SPITAB est une opération délicate qui doit être effectuée uniquement par le Responsable SPITAB. Si vous avez besoin de modifier la structure d’une table, vous devez adresser une demande d’action à cette personne. Dans votre demande, vous devez spécifier la nouvelle structure et la date de faisabilité.

Lorsqu’une modification de structure est effectuée, cela entraîne automatiquement une mise à jour des Paramètres de Transfert.
Par conséquent, avant de faire une demande de modification de structure, vous devez prendre certaines précautions pour éviter toute interruption de service :

  • Recenser tous les programmes et modules qui utilisent la table en question.
  • Vérifier en Working que la définition des postes de la table est correcte et qu’il existe un filler d’une longueur suffisante pour éviter un Abend 0C4.
  • Informer tous les domaines qui utilisent la table de la nouvelle structure pour qu’ils puissent prendre les dispositions nécessaires.

Il est important de noter que lorsqu’une nouvelle structure est livrée en PROD, il n’est pas possible de revenir en arrière. Par conséquent, il est crucial de prendre toutes les précautions nécessaires avant d’effectuer une demande de modification de structure.

Il est à souligner que SEUL LE RESPONSABLE SPITAB est habilité à effectuer des modifications de structure sur une table SPITAB.

SPITAB cours

Connexion à SPITAB

La connexion à SPITAB se fait à partir d’un terminal reconnu par IMS.

Voici les étapes à suivre :

  1. Connexion à IMS : Depuis un écran de l’IMS, tapez la commande de connexion. Après avoir saisi votre User et votre Password TSO, sélectionnez votre application.
  2. Connexion à SPITAB : Tapez la commande /FOR SPITAB.
  3. Déconnexion SPITAB : Appuyez sur la touche PF9, puis tapez la commande qui permet de sortir d’IMS.

En cas d’incident, de mauvaise connexion ou si l’ancienne mire apparaît lors de la connexion à SPITAB, suivez les étapes suivantes :

  • Restaurez si nécessaire (en général c’est en appuyant sur la touche CONTROL).
  • Déconnectez-vous, puis reconnectez-vous en utilisant la barre de menu.
  • Connectez-vous à IMS en tapant la commande correspondante.
  • Tapez /EXIT, puis /END pour restaurer le buffer.
  • Tapez la commande pour restaurer SPITAB et revenir à la mire de l’écran.
  • Reconnectez-vous à IMS en tapant la commande correspondante
MAINFRAME

Que sont que les systèmes d’exploitation?

Les systèmes d’exploitation pour les mainframes sont des logiciels spécialement conçus pour les grands ordinateurs centraux. Ils offrent des performances et une fiabilité exceptionnelles pour des applications critiques telles que la gestion de bases de données, les transactions en temps réel et la planification des ressources d’entreprise.

Dans cette page, nous allons explorer les différents systèmes d’exploitation mainframe les plus populaires :

Z/OS : le système d’exploitation principal

Z/OS est le système d’exploitation principal pour les mainframes IBM. Il offre une grande puissance de traitement, une sécurité accrue, une haute disponibilité, une grande évolutivité et une grande compatibilité avec les applications existantes. Z/OS prend également en charge les applications Java, les connexions TCP/IP et la virtualisation améliorée. Z/OS a été développé à partir de OS/360, qui a été introduit en 1964.

Z/VM : le système d’exploitation hyperviseur

Z/VM est un système d’exploitation de type hyperviseur qui permet de créer et de gérer plusieurs machines virtuelles sur un seul mainframe. Z/VM est largement utilisé pour la consolidation des serveurs et pour les environnements de développement et de test. Z/VM est basé sur CP-67, qui a été développé au milieu des années 1960.

Z/VSE : le système d’exploitation à usage général

Z/VSE est un système d’exploitation à usage général conçu pour les environnements de traitement de transactions en temps réel et de traitement de données en batch. Il prend en charge les bases de données relationnelles, les réseaux TCP/IP et SNA, ainsi que les applications COBOL, PL/I et Assembler. Z/VSE a été développé à partir de DOS/360, qui a été introduit en 1966.

TPF : le système d’exploitation de traitement de transactions en temps réel

TPF (Transaction Processing Facility) est un système d’exploitation utilisé dans les industries de l’aérospatiale, des voyages et des transports. Il est spécialement conçu pour les applications de traitement de transactions en temps réel, telles que les réservations de vols et de chambres d’hôtel. TPF a été développé à partir de DOS/360.

Les évolutions des systèmes d’exploitation mainframe

Chaque système d’exploitation mainframe a subi plusieurs évolutions au fil des années. Par exemple, les différentes versions d’OS/390 et de z/OS ont permis à IBM de continuer à améliorer les performances, la fiabilité, la sécurité et les fonctionnalités de ses systèmes d’exploitation mainframe, répondant ainsi aux besoins changeants des entreprises pour les applications critiques. Les évolutions des systèmes d’exploitation mainframe ont également permis d’introduire de nouvelles fonctionnalités et technologies, telles que la virtualisation et les connexions TCP/IP.

L’avenir des systèmes d’exploitation mainframe

Les systèmes d’exploitation mainframe continuent d’évoluer pour répondre aux besoins des entreprises modernes. Par exemple, IBM a récemment lancé IBM Z, une plate-forme mainframe sécurisée pour l’informatique en nuage hybride qui combine des capacités de chiffrement de pointe, de confidentialité et de sécurité des données.

Finalement

Les systèmes d’exploitation pour les mainframes sont des logiciels essentiels pour les entreprises qui ont besoin de la puissance, de la fiabilité et de la sécurité des ordinateurs centraux. Les différents systèmes d’exploitation offrent des caractéristiques uniques pour répondre à différents besoins, et continuent d’évoluer pour rester pertinents dans un monde en constante évolution.

FILE STATUS Info

Causes possibles d’erreur

Lorsque vous travaillez avec des fichiers en COBOL sur un mainframe, vous pouvez rencontrer des erreurs File Status. Ces erreurs peuvent être causées par diverses raisons, telles que des problèmes d’accès concurrentiel, des erreurs de syntaxe de fichier, des limitations de ressources, etc. Dans cette page web, nous examinerons quelques-unes des principales causes d’erreur File Status en COBOL sur mainframe.

  1. Problèmes d’accès concurrentiel
    Lorsque plusieurs programmes tentent d’accéder simultanément à un fichier, cela peut entraîner des erreurs File Status. Les programmes peuvent entrer en conflit les uns avec les autres et causer des problèmes d’accès concurrentiel. Les programmeurs COBOL doivent veiller à ce que leur code soit conçu pour éviter ces problèmes, en utilisant des verrous de fichier et en planifiant soigneusement l’accès aux fichiers.
  2. Erreurs de syntaxe de fichier
    Les erreurs de syntaxe de fichier peuvent être causées par des problèmes tels que des noms de fichier incorrects, des noms de champ incorrects, des formats de fichier incorrects, etc. Ces erreurs peuvent entraîner des erreurs File Status lors de l’accès aux fichiers. Les programmeurs COBOL doivent s’assurer que leurs fichiers sont correctement définis et utilisent les noms de fichiers et de champs corrects pour éviter ces erreurs.
  3. Limitations de ressources
    Les limitations de ressources peuvent également causer des erreurs File Status. Par exemple, si le système manque de mémoire ou d’espace de stockage, cela peut entraîner des erreurs File Status lors de l’accès aux fichiers. Les programmeurs COBOL doivent surveiller attentivement l’utilisation des ressources du système et planifier leur code en conséquence.
  4. Erreurs d’opérations de fichiers
    Les erreurs d’opérations de fichiers peuvent être causées par des problèmes tels que des erreurs de lecture, d’écriture ou de suppression de fichiers. Ces erreurs peuvent être causées par des problèmes matériels ou logiciels. Les programmeurs COBOL doivent s’assurer que leur code est conçu pour gérer ces erreurs de manière appropriée, en utilisant des clauses de condition et des instructions IF pour traiter les erreurs File Status.
  5. Problèmes de connectivité réseau
    Enfin, les problèmes de connectivité réseau peuvent également causer des erreurs File Status. Si la connexion au système de fichiers échoue ou si la communication avec le serveur est interrompue, cela peut entraîner des erreurs File Status lors de l’accès aux fichiers. Les programmeurs COBOL doivent surveiller attentivement la connectivité réseau et planifier leur code en conséquence.

En comprenant les principales causes d’erreur File Status en COBOL sur mainframe, les programmeurs COBOL peuvent travailler plus efficacement pour résoudre ces erreurs et assurer un bon fonctionnement de leur code.

FILE STATUS Info

Gestion des erreurs

Les erreurs File Status sont des erreurs courantes qui peuvent survenir lors de l’exécution de programmes COBOL sur un mainframe. Les programmeurs COBOL doivent savoir comment gérer ces erreurs de manière efficace pour garantir le bon fonctionnement de leur code. Dans cette page web, nous examinerons quelques-unes des méthodes les plus courantes pour gérer les erreurs File Status en COBOL sur mainframe.

  1. Utilisation de clauses de condition
    Les clauses de condition sont des instructions qui permettent de gérer les erreurs File Status de manière efficace. Les clauses de condition permettent aux programmeurs COBOL de spécifier des instructions à exécuter en cas d’erreur. Par exemple, ils peuvent spécifier des instructions pour enregistrer l’erreur dans un journal d’erreurs ou afficher un message d’erreur à l’utilisateur.
  2. Utilisation de la clause ON ERROR
    La clause ON ERROR permet de gérer les erreurs File Status de manière automatique. Lorsque cette clause est utilisée, le programme COBOL vérifie automatiquement les erreurs File Status après chaque opération de fichier. Si une erreur File Status est détectée, le programme COBOL exécute les instructions spécifiées dans la clause ON ERROR.
  3. Utilisation de la clause INVALID KEY
    La clause INVALID KEY permet de gérer les erreurs File Status pour les opérations de fichier qui peuvent renvoyer des erreurs de clé invalides. Lorsque cette clause est utilisée, le programme COBOL vérifie si une erreur de clé invalide a été renvoyée et exécute les instructions spécifiées dans la clause.
  4. Utilisation de la clause NOT INVALID KEY
    La clause NOT INVALID KEY permet de gérer les erreurs File Status pour les opérations de fichier qui ne renvoient pas d’erreurs de clé invalide. Lorsque cette clause est utilisée, le programme COBOL vérifie si une erreur File Status autre qu’une erreur de clé invalide a été renvoyée et exécute les instructions spécifiées dans la clause.
  5. Utilisation de la clause AT END
    La clause AT END permet de gérer les erreurs File Status pour les opérations de fichier qui ont atteint la fin du fichier. Lorsque cette clause est utilisée, le programme COBOL vérifie si la fin du fichier a été atteinte et exécute les instructions spécifiées dans la clause.

En suivant ces méthodes, les programmeurs COBOL peuvent gérer efficacement les erreurs File Status dans leur code. Cela peut aider à garantir un bon fonctionnement de leur programme et une meilleure expérience utilisateur.