Sommaire

Le logiciel Microsoft COBOL 4.5 est la dernière version proposé Microsoft du langage de programmation COBOL. Parmi les nouveautés de la version 4.5, on retrouve les fonctionnalités suivantes :

• L'utilisation de la directive MF lors de la compilation rendra certains noms de données illégaux car la liste de mots réservés a été étendue. Modifiez le nom de données, utilisez la directive REMOVE(reservedword) ou recompilez avec MF(6).
• Les nouveaux mots réservés inclus lors de l'utilisation de MF(7) sont : ALPHABET, ALPHABETIC-LOWER, ALPHABETIC-UPPER, ALPHANUMERIC, ALPHANUMERIC-EDITED, ANY, BINARY, CLASS, COMMON, COMP-1, COMP-2, COMP-4, COMPUTATIONAL-1, COMPUTATIONAL-2, COMPUTATIONAL-4, CONTENT, CONTINUE, CONVERTING, CYCLE, DAY-OF-WEEK, DBCS, DISPLAY-1, EJECT, END-ADD, END-CALL, END-COMPUTE, END-DELETE, END-DISPLAY, END-DIVIDE, END-EVALUATE, END-IF, END-MULTIPLY, END-PERFORM, END-READ, END-RECEIVE, END-RETURN, END-REWRITE, END-SEARCH, END-START, END-STRING, END-SUBTRACT, END-UNSTRING, END-WRITE, EOL, EOS, EQUALS, EVALUATE, EXCEEDS, FALSE, FUNCTION, GLOBAL, ID, INITIALIZE, LOWLIGHT, NUMERIC-EDITED, ORDER, OTHER, PACKED-DECIMAL, PADDING, PARAGRAPH, PURGE, REFERENCE, REPLACE, SKIP1, SKIP2, SKIP3, SORT-RETURN, STANDARD-2, TEST, TIME-OUT, TIMEOUT, TITLE, TRUE, UNEQUAL, WAIT, WHEN-COMPILED. Notez que la plupart de ces mots sont déjà réservés sous les directives ANS85 ou VSC2, ils ne deviendront donc nouveaux que si vous compilez avec MF mais sans ANS85 ou VSC2.
• Compatibilité RM : lors de la compilation pour la compatibilité RM, si le même comportement est requis qu'avec Microsoft COBOL 4.0, vous devez compiler avec la directive DETECTLOCK.
• ASSIGN TO PRINTER&nbsb;: Les fichiers définis avec ASSIGN TO PRINTER sont traités comme LINE ADVANCING dans Microsoft COBOL 4.5. Dans la version 4.0, elles étaient traitées comme des LINE SEQUENTIAL.
• NEXT SENTENCE : Dans Microsoft COBOL 4.0, vous pouviez faire passer NEXT SENTENCE au délimiteur de fin de portée approprié en utilisant la directive MF"5". En 4.5, cette directive n'a pas cet effet.
• Programmes imbriqués : Dans la version 4.0 de Microsoft COBOL, les programmes imbriqués pouvaient avoir des sections de configuration. Dans la version 4.5 de Microsoft COBOL, ils ne le peuvent pas.
• Le commutateur S6 "DISPLAY ... UPON CRT Attributes Behavior" n'est plus documenté dans le Guide d'utilisation. Voici sa description. Avec le DISPLAY amélioré, si aucun attribut n'est spécifié sur le DISPLAY, alors, par défaut, les attributs déjà existants dans la zone donnée seront utilisés. Si le commutateur +S6 est spécifié au moment de l'exécution, les attributs d'écran normaux seront utilisés à la place.
• Dans les versions antérieures de ce système COBOL, toutes les routines de la bibliothèque système étaient appelées par numéro. De nombreuses routines d'appel par nom du produit actuel remplacent les anciennes routines d'appel par numéro. La liste ci-dessous indique, pour chaque routine d'appel par nom ayant remplacé une routine d'appel par numéro, le numéro de la routine qu'elle a remplacée. Dans certains cas, la routine d'appel par le nom a des fonctionnalités supplémentaires :

Nom	Numéro
CBL_READ_SCR_CHARS	B7 0
CBL_READ_SCR_ATTRS	B7 2
CBL_READ_SCR_CHATTRS	B8 0
CBL_WRITE_SCR_CHARS	B7 1
CBL_WRITE_SCR_ATTRS	B7 3
CBL_WRITE_SCR_CHATTRS	B8 1
CBL_WRITE_SCR_TTY	82
CBL_WRITE_SCR_N_CHAR	B7 4
CBL_WRITE_SCR_N_ATTR	B7 5
CBL_SWAP_SCR_CHATTRS	B8 2
CBL_GET_SCR_SIZE	E3
CBL_SET_CSR_POS	E6
CBL_CLEAR_SCR	E4
CBL_GET_KBD_STATUS	D9
PC_READ_DRIVE	91 5
PC_SET_DRIVE	91 6
CBL_READ_DIR	91 7
CBL_CHANGE_DIR	91 8
CBL_DELETE_FILE	91 18
CBL_RENAME_FILE	91 17
PC_TEST_PRINTER	B0 7
CBL_SPLIT_FILENAME	8C
CBL_JOIN_FILENAME	8D



• Le comportement de COPY ... REPLACING a été modifié en fonction du paramétrage des directives ANS85 ou VSC2(3). Auparavant, tous les caractères non COBOL étaient interdits dans les opérandes de COPY ... REPLACING, et les minuscules et les deux-points étaient ajoutés au ensemble de caractères. Ce comportement se produit désormais uniquement si la directive ANS85 ou VSC2(3) est utilisée. Sinon, les opérandes peuvent contenir des caractères non COBOL.