KEY |
Touche |
---|---|
Cobol |
Syntaxe
ALTERNATE RECORD KEY IS identifier [WITH DUPLICATES] |
DELETE filename RECORD [;INVALID KEY imperativestatement] |
FILE-CONTROL. ((SELECT [OPTIONAL] filename ASSIGN TO [label][S] AS JCLvariable) [RESERVE integer AREAS] | ORGANIZATION IS [SEQUENTIAL]/RELATIVE/INDEXED | | ACCESS MODE IS [SEQUENTIAL]/RANDOM/DYNAMIC | |RELATIVE/RECORD KEY alphanumericdatafiled| [ALTERNATIVE RECORD KEY alphanumericrecordfield [WITH DUPLICATES] [PASSWORD IS literaldataname] [FILE STATUS IS alphanumericdataitem, groupdataitem] |
READ filename RECORD [WITH NO LOCK] [INTO identifier] [; KEY IS dataname] [; INVALID KEY imperativestatement] |
REWRITE recordname [FROM identifier] [; INVALID KEY imperativestatement] |
START filename [KEY IS EQUAL TO dataname] [;INVALID KEY imperativestatement] |
START filename [KEY IS = dataname] [;INVALID KEY imperativestatement] |
START filename [KEY IS GREATER THAN dataname] [;INVALID KEY imperativestatement] |
START filename [KEY IS > dataname] [;INVALID KEY imperativestatement] |
START filename [KEY IS NOT LESS THAN dataname] [;INVALID KEY imperativestatement] |
START filename [KEY IS NOT < dataname] [;INVALID KEY imperativestatement] |
WRITE recordname [FROM identifier] ([(BEFORE|AFTER) [ADVANCING] ((identifier|integer)[(LINE|LINES)]|mnemonicname | PAGE)] writestatementphrase|[INVALID [KEY] statementlist][NOT INVALID [KEY] statementlist]) [END-WRITE] |
Description
Cette instruction permet d'indiquer la position dans l'enregistrement logique d'un fichier correspondant à une clef.
Dernière mise à jour : Jeudi, le 28 juillet 2011