Common Business Oriented Language d'IBM ( COBOL ) du langage de programmation permet aux utilisateurs de traiter différents types de données dans les applications logicielles financières et commerciales . COBOL prend en charge les enregistrements de longueur variable type de données pour une utilisation dans les fichiers de bases de données stockées sur des disques durs , l'utilisateur spécifie les longueurs minimale et maximale record pour décrire les fichiers du disque avec des enregistrements de longueur variable. La lecture des données de longueur variable à partir d'un fichier vous permet de traiter les informations de base de données sans définir la taille exacte d'un enregistrement dans votre programme COBOL . Instructions
1

type «Modifier» sur la console du système de gestion z/OS360 mainframe et appuyez sur la touche "Entrée" pour modifier votre programme COBOL .
2

Ajoutez la le code suivant sur le début de votre programme : .

IDENTIFICATION DIVISION

PROGRAM -ID. COBVAR .

Division de l'environnement .

SECTION entrées-sorties.

FILE- CONTROL.

SELECT IFILE ASSIGN TO " IFILE " .
< p> DIVISION DATA.

FILE SECTION .

FD IFILE

enregistrement est variant de 10 à 50 SELON LEN .

01 IREC . < br >

05 FILLER PIC X SE PRODUIT 10 à 50 fois selon LEN .

PROCEDURE DIVISION.

P1 .

DISPLAY " Exemple 1 apparaît en fonction REC"

entrée ouverte IFILE

PERFORM UNTIL LEN = -1

LIRE IFILE
CHEZ Fin Déplacement -1 à Len

PAS À LA FIN Photos

DISPLAY IREC

DISPLAY LEN

FIN LIRE

END- PERFORM

PROCHE IFILE

espace d'affichage Photos

DISPLAY " exemple fixé REC"

entrée ouverte IFILE

TOUT DEPLACER "X" pour IREC

LIRE IFILE À LA FIN MOUVEMENT -1 à LEN

DISPLAY IREC

espace d'affichage
3 type de

"Enregistrer" sur la console et appuyez sur la touche "Entrée" pour permettre à votre programme pour traiter variable enregistrements de longueur .