Bull GCOS 7, TDS et IDS II
Les DPS 7000 sous GCOS 7 font encore tourner des applications de gestion écrites il y a trente ou quarante ans, dans des administrations et des industriels français. Elles fonctionnent. Le problème n'est pas la machine : ce sont les gens qui savaient la lire.
Pourquoi GCOS 7 tourne encore
Un système transactionnel de gestion qui traite correctement ses volumes n'a aucune raison technique de s'arrêter. Les applications GCOS 7 que je rencontre sont stables, documentées à la mode de leur époque, et tiennent des charges pour lesquelles elles ont été dimensionnées avec soin. Les remplacer coûte cher, et le projet de remplacement échoue assez souvent pour que la prudence l'emporte.
La conséquence est connue de toutes les DSI concernées : le risque ne porte pas sur le matériel, qui s'émule, ni sur l'éditeur, qui accompagne encore. Il porte sur la connaissance. Les équipes qui ont écrit ces chaînes sont parties en retraite, celles qui les ont reprises ne les ont jamais vues naître, et chaque départ emporte un morceau de la carte.
Ce qui pose réellement problème
La compétence, avant tout
Un COBOL de gestion se relit. Un enchaînement JCL, une base IDS II et un moniteur TDS se relisent beaucoup moins, parce que les concepts eux-mêmes ne s'enseignent plus. Une équipe de TMA compétente sur des environnements récents peut rester durablement bloquée devant une chaîne GCOS 7 sans que personne ne soit en cause : il lui manque le modèle mental, pas l'intelligence.
Un modèle de données qui n'est pas relationnel
IDS II est une base de données réseau, au sens CODASYL : les enregistrements sont reliés par des chemins que le programme parcourt explicitement, et non par des jointures qu'un optimiseur calcule. Cela change tout pour qui veut migrer. Une extraction naïve vers un modèle relationnel perd la sémantique des chemins, et le travail réel consiste à retrouver les règles de gestion qui se cachent dans l'ordre de parcours.
Un environnement transactionnel avec ses propres règles
TDS n'est pas un simple lanceur de programmes. Il porte une notion de transaction, de reprise, de partage de ressources et de dialogue avec le terminal qui structure le code applicatif de part en part. Une application TDS ne se transpose pas telle quelle vers un serveur d'application moderne : ce sont deux façons différentes de découper le travail.
Ce que je fais sur ces environnements
Maintien en condition opérationnelle
Correction d'anomalies, évolutions réglementaires, adaptations de chaînes batch, analyse des incidents de production. Le travail ordinaire d'une application qui doit continuer de tourner, mené par quelqu'un qui n'a pas besoin qu'on lui explique ce qu'est une aire IDS II.
Audit et cartographie
Reconstituer ce que le système fait réellement : inventaire des programmes et des chaînes, dépendances entre traitements, structure de la base, points de fragilité, écarts entre la documentation et le code en production. C'est le préalable honnête à toute décision — reconduire, réécrire ou migrer — et c'est aussi ce qui reste quand la mission est finie.
Transfert de compétences
Former l'équipe qui reprend le système, sur son propre code plutôt que sur des exemples d'école. GCOS 7, JCL, COBOL de gestion, principes de TDS et d'IDS II. L'objectif est qu'elle puisse travailler seule, pas qu'elle dépende de moi.
Accompagnement de migration
Aux côtés de l'intégrateur retenu, en tenant le rôle de celui qui connaît le système de départ. C'est le rôle le plus utile et le plus souvent manquant dans ces projets : le prestataire cible maîtrise sa technologie d'arrivée, rarement l'existant.
Les chemins de sortie, et ce qu'ils coûtent vraiment
Trois voies existent, et aucune n'est gratuite.
Le réhébergement conserve l'application et change le socle, par émulation. C'est la voie la moins risquée à court terme, et celle qui traite le risque matériel sans traiter le risque de compétence — le code reste à maintenir, et il faut toujours savoir le lire.
Le transcodage automatique convertit le COBOL et les structures vers une cible moderne. Les outils font ce qu'ils promettent sur la syntaxe. Ils ne font pas le travail sur la sémantique : un parcours IDS II devenu une suite de requêtes SQL fonctionne rarement du premier coup, et le résultat est un code que plus personne n'a écrit ni conçu.
La réécriture donne le meilleur résultat final et échoue le plus souvent, pour une raison simple : la spécification du système cible, c'est le système existant, et personne ne sait plus complètement ce qu'il fait. C'est précisément ce que l'audit sert à reconstituer avant de s'engager.
Mon rôle n'est pas de vous vendre l'une des trois. Il est de vous permettre de choisir en connaissance de cause, puis de tenir le côté legacy du projet.
D'où vient cette expertise
J'ai commencé ma carrière dans l'informatique de gestion sur gros systèmes, chez Bull et chez IBM. C'est là que j'ai appris ces environnements, du dedans et en production, avant de passer à l'informatique industrielle sur matériel DEC puis sur ce qui a suivi. Quarante ans en tout, dont quinze à Fos-sur-Mer, où j'ai dirigé le service informatique de process du département Fonte — des systèmes temps réel dont l'arrêt coûtait très cher, et une équipe à faire monter en compétence dessus.
Je suis aujourd'hui consultant indépendant à Bédoin, dans le Vaucluse, et VSI Ambassador. Je travaille aussi sur OpenVMS, ACMS, RDB et DECforms, sur Natural / ADABAS et sur les fondamentaux du mainframe IBM. Ces environnements ont en commun plus qu'on ne le croit : une culture de la production, de la reprise sur incident et de la donnée qui ne se perd pas.
Pour qui
Les DSI qui exploitent encore un DPS 7000 et voient leur équipe se réduire. Les sociétés de services qui ont hérité d'un parc GCOS 7 dans un contrat de TMA et cherchent un renfort ponctuel ou un référent. Les directions qui doivent instruire une décision de migration et veulent un état des lieux qui ne soit pas rédigé par celui qui vendra le projet.
J'interviens à distance et sur site, en France, en français et en anglais, en renfort de quelques jours par mois comme en mission longue.