Vous avez plus de 60 ans ? Vous connaissez le COBOL[1] ? L’avenir est devant vous !
Une très intéressante discussion sur l’obsolescence des langages de programmation.
L’importance critique du langage de programmation COBOL, utilisé depuis 70 ans, dans les systèmes financiers mondiaux. Voici les points clés :
-
Origine et Utilisation :
- COBOL a été créé en 1959 pour l’armée américaine afin d’avoir un langage commun et lisible pour les audits.
- Rapidement adopté par les banques, assurances et caisses de retraite en raison de sa performance dans les calculs en virgule fixe.
-
Problèmes Actuels :
- Les développeurs maîtrisant COBOL partent à la retraite, créant une pénurie de compétences.
- Les entreprises embauchent des développeurs seniors en CDI pour maintenir ces systèmes vitaux.
-
Évolutions et Défis :
- Le bug de l’an 2000 a nécessité des investissements massifs pour corriger les systèmes COBOL.
- Les systèmes COBOL sont sécurisés et performants, mais leur migration vers des technologies modernes est coûteuse et complexe.
-
Opportunités :
- Les jeunes développeurs peuvent trouver des opportunités lucratives en apprenant COBOL.
- La double compétence en COBOL et en langages modernes comme Java est très valorisée.
-
Perspectives Futures :
- COBOL reste essentiel pour les infrastructures critiques et continuera probablement à être utilisé pendant encore plusieurs décennies.
- Les systèmes COBOL sont robustes et sécurisés, mais nécessitent une maintenance continue par des experts.
En conclusion, bien que COBOL soit un langage ancien, il reste crucial pour le fonctionnement de nombreuses infrastructures financières et industrielles. Les jeunes développeurs peuvent y voir une opportunité de carrière en raison de la rareté des compétences et de la demande continue pour la maintenance de ces systèmes.
Exemple de langage COBOL:
IDENTIFICATION DIVISION.
PROGRAM-ID. SalaryIncrease.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT EmployeeFile ASSIGN TO 'employees.dat'
ORGANIZATION IS LINE SEQUENTIAL.
SELECT NewEmployeeFile ASSIGN TO 'newemployees.dat'
ORGANIZATION IS LINE SEQUENTIAL.
DATA DIVISION.
FILE SECTION.
FD EmployeeFile.
01 EmployeeRecord.
05 EmployeeID PIC 9(5).
05 EmployeeName PIC A(20).
05 EmployeeSalary PIC 9(7)V99.
FD NewEmployeeFile.
01 NewEmployeeRecord.
05 NewEmployeeID PIC 9(5).
05 NewEmployeeName PIC A(20).
05 NewEmployeeSalary PIC 9(7)V99.
WORKING-STORAGE SECTION.
01 WS-EOF PIC X VALUE 'N'.
88 END-OF-FILE VALUE 'Y'.
PROCEDURE DIVISION.
OPEN-FILES.
OPEN INPUT EmployeeFile
OPEN OUTPUT NewEmployeeFile.
READ-FILE.
PERFORM UNTIL END-OF-FILE
READ EmployeeFile
AT END
MOVE 'Y' TO WS-EOF
NOT AT END
PERFORM CALCULATE-SALARY
PERFORM WRITE-RECORD
END-READ
END-PERFORM.
CLOSE-FILES.
CLOSE EmployeeFile
CLOSE NewEmployeeFile
STOP RUN.
CALCULATE-SALARY.
COMPUTE NewEmployeeSalary = EmployeeSalary * 1.10.
MOVE EmployeeID TO NewEmployeeID.
MOVE EmployeeName TO NewEmployeeName.
WRITE-RECORD.
WRITE NewEmployeeRecord.
Common Business-Oriented Language ↩︎