Revue de presse Natural
Natural
Un article de Wikipédia, l'encyclopédie libre.
 |
| Cet article fait partie de la série langages de programmation |
| Langages à objets |
| C++ - C# - D Delphi - Eiffel - Groovy Java - Lisaac - Python - Ruby Simula - Smalltalk Visual Basic - WLangage |
| Langages impératifs |
| APL - ASP - Assembleur BASIC - C - Cobol - Natural Forth - Fortran - Limbo Logo - Pascal - Perl - PHP |
| Langages fonctionnels |
| Haskell - ML/OCaml Lisp/Common Lisp Scheme - XSLT |
| Langages déclaratifs |
| Clips - Prolog |
| Langages concurrents |
| Ada 95 - Erlang |
| Voir aussi |
| Conception - Codage Tests - Optimisations |
Natural est un langage de programmation semi-compilé, édité par la société allemande Software AG.
Sommaire |
[] Définition
Sa syntaxe est fortement inspirée de celle de Cobol : on y retrouve des instructions telles que move, perform, compute, ainsi que des principes tels que la redéfinition de données ou la possibilité de définir le scope d'une variable. Néanmoins, cette syntaxe reste assez simple et beaucoup moins verbeuse que Cobol :
- l'en-tête du programme est réduite à sa plus simple expression;
- il n'y a pas de caractère de fin de ligne;
- ...
L'intérêt d'un langage semi-compilé est sa portabilité sur différents systèmes (mainframe, Unix, Windows...) ; en effet il suffit de porter le "RunTime Natural" sur une plateforme pour pouvoir y exécuter des programmes Natural originellement créés sur une autre plateforme (c'est le même principe que celui de Java avec les portages des JVM.
Ce langage fut créé au départ pour permettre l'accès aux bases de données Adabas (du même éditeur). Il s'est rapidement enrichi pour pouvoir supporter des bases de données relationnelles comme DB2 ou non relationnelles comme DL1, VSAM. Il est surtout utilisé dans l'industrie et les sociétés de grande taille, car la base Adabas est supportée non seulement sur des platesformes comme Unix ou Windows mais surtout sur de gros systèmes autorisant une gestion d'I/O massive.
Les instructions d'accès au Système de gestion de base de données (SGBD) sont fonctionnelles (elles masquent les requêtes physiques et l'organisation des données) : chaque instruction d'accès à une table de la base se présente sous forme d'une boucle de lecture suivant une clé simple ou composée.
Ex: La lecture se présente sous la forme de 2 Mot-clefs.
READ Table (Accès à la table ? Début boucle de lecture)
instruction(s).... sur l'enregistrement gestion de sortie de la boucle de lecture souvent à la discrétion du programmeur
END-READ (Marqueur de fin de boucle)
Le langage dispose d'extension permettant également le codage des accès sous forme de requêtes SQL.
[] Exemple de Source Natural
DEFINE DATA PARAMETER /* paragraphe de déclaration des paramètres du programme
1 PARAM1 (A001) /* alphanumérique
1 PARAM2 (N004) /* Numérique
LOCAL /* paragraphe de déclaration des variables du programme
1 CLE_COMPOSEE (A022)
1 REDEFINE CLE_COMPOSEE /* redéfinition de la variable cle_composee
2 VAR1_1 (A001)
2 VAR1_2 (N020)
1 VAR3 (L) /* booléen
1 VAR4 (D) /* Date
1 VAR5 (N5) /* Numérique sur 5 positions
END-DEFINE /* début de programme
ON ERROR /* paragraphe de gestion des erreurs
WRITE 'erreur N°' *ERROR-NR 'ligne ' *ERROR-LINE 'dans programme' *PROGRAM
END-ERROR
MOVE PARAM1 TO VAR1_1
MOVE PARAM2 TO VAR1_2
/* le paragraphe find .... end-find définit une boucle de lecture.
/* Tant que des enregistrements de la table satisfont aux critères
/* de recherche, on revient au début de la boucle pour trouver
/* l'enregistrement suivant ...
FIND TABLE WITH TABLE.CLE = CLE_COMPOSEE /* boucle de recherche d'enregistrements
IF NO RECORD FOUND
WRITE 'aucun enregistrement trouve'
ESCAPE BOTTOM /* sortie de la boucle de lecture
END-NOREC
IF TABLE.CHAMP1 = 'toto'
ESCAPE TOP /* passage à l'itération suivante
/* (pour éviter, par exemple, de traiter
/* certains enregistrements)
END-IF
PERFORM TRAITER_CHAQUE_RECORD_LU
END-FIND
DEFINE SUBROUTINE TRAITER_CHAQUE_RECORD_LU
WRITE TABLE.CHAMP1 TABLE.CHAMP2
END-SUBROUTINE
END /* fin de programme
[] HISTORIQUE
- La première version de Natural voit le jour en 1979.
- Limité au départ au monde des grands systèmes (IBM, Siemens...), une version fonctionnant sous Windows est apparue durant les années 1990.
- Début 2003 un environnement de développement graphique (Natural for Windows) permet de développer et de mettre au point des programmes Natural sur Mainframe à partir d'un poste de travail sous Windows.
- Natural 2006 s'enrichit d'un studio graphique sous Windows et aussi d'un studio sous forme de plugin Eclipse.
[] EVOLUTIONS
Natural 2006 dispose d'un vocabulaire étendu pour traiter de façon native les documents XML.
Natural reste, comme Cobol, fortement orienté vers les applications de gestion, du fait:
- de ses facilités pour la manipulation des données (accès au SGBD, redéfinitions);
- de ses performances élevées notamment pour les traitements de masse.
- de ses facilités à gérer les interfaces utilisateurs de type 3270 pour des saisies controlées intensives.
La source est wikipedia http://fr.wikipedia.org/wiki/ Natural
