Fonctionnalités liées au disque

Le DISK BASIC fournit un ensemble puissant de commandes, d'instructions et de fonctions relatives aux entrées/sorties disque sous TRSDOS. Ceux-ci se répartissent en deux catégories :

• Manipulation de fichiers : traiter les fichiers comme des unités, plutôt que les enregistrements distincts que contiennent les fichiers.
• Accès aux fichiers : préparation des fichiers de données pour les entrées/sorties ; lecture et écriture dans les fichiers.

Voici les commandes discutées sous «Manipulation de fichiers» :

Instruction et fonctions décrites sous «Accès aux fichiers»

Instructions

Fonctions

Manipulation de fichiers

Syntaxe

Paramètres

Description

Cette commande fonctionne comme la commande KILL du TRSDOS.

Exemple

supprime le fichier spécifié du premier unité de disque le contenant.

Ne supprimer pas un fichier ouvert, ou vous risquez de détruire le contenu de la disquette. (Utilisé CLOSE d'abord sur le fichier ouvert.)

Syntaxe

Paramètres

Description

La commande charge un fichier de programme BASIC dans la RAM ; si l'option R est utilisée, BASIC procédera à l'exécution automatique du programme ; sinon, BASIC reviendra au mode de commande.

Le LOAD sans l'option R efface tout programme BASIC résident, efface toutes les variables et ferme tous les fichiers ouverts. LOAD avec l'option R supprime le programme résident et efface toutes les variables, mais ne ferme pas les fichiers ouverts.

Le LOAD avec l'option R équivaut à la commande RUN exp$,R. L'une ou l'autre de ces commandes peut être utilisée à l'intérieur des programmes pour permettre l'enchaînement des programmes - un programme en appelant un autre,...

Si vous tentez de charger un fichier non BASIC, une instruction directe dans le fichier ou une erreur de format de chargement se produira.

Exemples

Efface le programme BASIC résident et charge PROG1/BAS à partir de l'unité de disque 2 ; revient au mode de commande BASIC.

Exemple d'enchaînement de deux programmes :

Le premier peut être utilisé pour donner des instructions puis pour charger la partie travail du programme.

(PROG2/BAS). Notez que la ligne 1000 est équivalente à 100 RUN "PROG2/BAS".

Syntaxe

Paramètres

Description

MERGE est similaire à LOAD - sauf que le programme résident n'est pas effacé avant que le nouveau programme exp$ ne soit chargé. Au lieu de cela, exp$ est fusionné dans le programme résident.

C'est-à-dire que les lignes de programme dans exp$ seront simplement insérées dans le programme résident dans un ordre séquentiel. Si les numéros de ligne dans exp$ coïncident avec les numéros de ligne dans le programme résident, les lignes résidentes seront remplacées par celles de exp$.

MERGE offre un moyen pratique d'assembler des programmes modulaires. Par exemple, un ensemble souvent utilisé de sous-programmes BASIC peut être suivi sur une variété de programmes avec cette commande.

Par exemple, supposons que le programme suivant est en RAM :

Et supposons que le programme suivant soit entreposé sur disque au format ASCII :

En supposant que le programme de sous-programme est nommé SUB/TXT, alors nous pourrions le MERGE avec l'instruction :

et le programme résultant en RAM serait :

Notez que MERGE ferme tous les fichiers et efface toutes les variables. À la fin, BASIC revient au mode de commande.

Syntaxe

Paramètres

Description

Si l'option R n'est pas sélectionnée, tous les fichiers ouverts seront fermés.

Lorsque la commande est exécutée, tout programme BASIC résident sera remplacé par le programme contenu dans exp$.

Exemples

Charge et exécute le programme de vidage de secteur BASIC.

Supposons que vous sauvegardiez le programme suivant sur disque sous le nom "PROG1/BAS" :

Et enregistrez ce programme sur disque sous le nom "PROG2/BAS" :

Tapez maintenant :

et vous verrez un exemple simple d'enchaînement de programmes. Maintenez la touche BREAK enfoncée pour interrompre la chaîne de caractères de programmes.

Syntaxe

Paramètres

Description

Cette commande vous permet de sauvegarder vos programmes BASIC sur disque. Vous pouvez enregistrer le programme au format compressé ou ASCII.

L'utilisation du format compressé occupe moins d'espace disque et est plus rapide lors de la sauvegarde et du chargement. C'est ainsi que les programmes BASIC sont entreposés dans la RAM.

L'utilisation de l'option ASCII permet de faire certaines choses ne pouvant pas être faites avec des fichiers BASIC au format compressé.

Exemples :

• La commande MERGE nécessite que le fichier disque soit au format ASCII.
• Vous pouvez utiliser les commandes LIST et PRINT du TRSDOS avec des fichiers au format ASCII.
• Les programmes lus dans d'autres programmes en tant que données nécessitent généralement que les programmes de données soient entreposés en ASCII.

Conventions utiles pour placer des extensions sur les programmes BASIC : Pour les programmes au format compressé, utilisez l'extension /BAS. Pour les programmes au format ASCII, utilisez l'extension /TXT.

Exemples

enregistrer le programme BASIC résident au format compressé avec le nom de fichier FILE1, extension /BAS, mot de passe. JOHNQDOE; le fichier est placé sur l'unité de disque :3.

enregistrer le programme résident sous forme ASCII, sous le nom MATHPAK/TXT, sur le premier unité de disque non protégé en écriture.

À la fin d'un SAVE, le BASIC revient en mode commande.

Accès du fichier

Cette section est divisée en quatre parties :

• Création de fichiers et affectation de tampons - OPEN et CLOSE.
• Déclarations et fonctions
• Techniques d'entrée/sortie séquentielles.
• Techniques d'entrée/sortie aléatoires.

Création de fichiers et affectation de tampons

Pendant la boîte de dialogue d'initialisation, vous tapez un nombre en réponse à HOW MANY FILES? Le nombre que vous tapez indique à BASIC combien de tampons créer pour gérer vos accès disque (lectures et écritures).

Chaque tampon reçoit un numéro de 1 à 15. Si vous tapez :

puis BASIC met de côté quatre tampons, numérotés 1, 2, 3 et 4.

Vous pouvez considérer un tampon comme une zone d'attente que les données doivent traverser pour aller et revenir du fichier disque. Lorsque vous souhaitez accéder à un fichier particulier, vous devez indiquer à BASIC quel tampon utiliser pour accéder à ce fichier. Vous devez également indiquer à BASIC le type d'accès que vous souhaitez - sortie séquentielle, entrée séquentielle ou entrée/sortie aléatoire.

Tout cela est fait avec l'instruction OPEN et "défait" avec l'instruction CLOSE.

Syntaxe

Paramètres

Description

Cette instruction permet d'accéder à un fichier. exp1$ détermine le type d'accès que vous aurez via le tampon spécifié ; nmexp détermine quel tampon sera affecté au fichier ; et exp2$ nomme le fichier auquel accéder. Si exp2$ n'existe pas, alors TRSDOS peut le créer ou non, selon le mode d'accès.

Remarque

• nmexp (numéro de tampon) ne peut pas dépasser le nombre que vous avez entré pour les questions «FILES?» lors de l'initialisation. Si vous avez entré :

HOW MANY FILES? 2ENTER

alors nmexp peut avoir la valeur 1 ou 2.

Exemples d'instructions OPEN :

Ouvre le fichier "CLIENTLS/TXT" pour une sortie séquentielle. Le tampon 1 sera utilisé. Si le fichier n'existe pas, il sera créé. S'il existe déjà, son contenu précédent est perdu.

Ouvre le fichier "PROG1/TXT" sur l'unité de disque 1 pour une entrée séquentielle. Le tampon 1 est affecté au fichier. Si PROG1/TXT n'existe pas sur l'unité de disque 1, un message d'erreur est renvoyé - puisque vous ne pouvez pas entrer à partir d'un fichier inexistant !

Cette séquence d'instructions vous permet de fournir les paramètres de l'instruction OPEN pendant l'exécution du programme. Le premier caractère de MODE$ définit le mode d'accès, BUFFER% détermine quel tampon sera utilisé et FILESPEC$ donne la spécification du fichier.

Ouvre le fichier DATA/BAS avec le mot de passe SPECIAL, en mode d'entrée/sortie aléatoire, en utilisant le tampon numéro 2. Si DATA/BAS n'existe pas, il sera créé sur le premier unité de disque non protégé en écriture.

Lorsqu'un fichier est ouvert, il est référencé par le numéro de tampon lui ayant été attribué. Exemples :

Toutes ces instructions feront référence au fichier ayant été OPEN via le numéro de tampon. Le mode doit être correct.

Une fois qu'un tampon a été affecté à un fichier avec l'instruction OPEN, ce tampon ne peut pas être utilisé dans une autre instruction OPEN. Vous devez d'abord le CLOSE.

En savoir plus sur les affectations de tampon

Deux tampons ou plus peuvent être affectés au même fichier pour une entrée séquentielle (mode I). Cependant, un seul tampon à la fois peut être affecté à un fichier pour une sortie séquentielle (mode O) ou un accès aléatoire en mode R.

Par exemple :

Maintenant, TEST/TXT est accessible via les tampons 1 et 2 pour une entrée séquentielle.

Syntaxe

Paramètres

Description

Cette commande met fin à l'accès à un fichier via le(s) tampon(s) spécifié(s). Si nmexp n'a pas été affecté dans une instruction OPEN précédente, alors :

n'a aucun effet.

Exemple d'énoncés de CLOSE :

Termine les affectations de fichiers aux tampons 1, 2 et 8. Ces tampons peuvent maintenant être affectés à d'autres fichiers avec des instructions OPEN.

Termine l'affectation du fichier au tampon spécifié par la somme (FIRST% + COUNT%).

Ne retirez pas une disquette contenant un fichier ouvert - fermez d'abord le fichier. En effet, les 256 derniers octets de données n'ont peut-être pas encore été écrits sur le disque. La fermeture du fichier écrira les données, si elles n'ont pas déjà été écrites.

Les actions et conditions suivantes entraînent la fermeture automatique de tous les fichiers :

Soit l'édition d'un fichier, l'ajout ou suppression de lignes de programme, l'exécution de l'instruction CLEAR n et les erreurs disque.

Syntaxe

Paramètres

Cette instruction entre les données d'un fichier disque. Les données sont saisies séquentiellement. Autrement dit, lorsque le fichier est ouvert pour la première fois, un pointeur est défini sur le début du fichier. Chaque fois que des données sont saisies, le pointeur avance. Pour recommencer la lecture depuis le début du fichier, vous devez fermer le file-buffer et le rouvrir.

INPUT# ne se soucie pas de la manière dont les données ont été placées sur le disque - qu'une seule instruction PRINT# les y ait placées ou qu'elles aient nécessité 10 instructions PRINT# différentes. Ce qui compte pour INPUT#, ce sont les positions des caractères de fin et le marqueur EOF.

Pour INPUT# les données avec succès à partir du disque, vous devez savoir à l'avance quel est le format des données. Voici une description de la façon dont INPUT# interprète les différents caractères qu'il rencontre lors de la lecture des données.

Lors de la saisie de données dans une variable, le BASIC ignore les blancs de tête ; lorsque le premier caractère non blanc est rencontré, BASIC suppose qu'il a rencontré le début de l'élément de données.

L'élément de données se termine lorsqu'un caractère de fin est rencontré ou lorsqu'une condition de fin se produit. Les caractères de fin particuliers varient selon que BASIC entre dans une variable numérique ou de chaîne de caractères.

Lorsque EN (un retour chariot) est précédé de LF (un saut de ligne), EN n'est pas considéré comme un terminateur. Au lieu de cela, il devient une partie de l'élément de données (variable de chaîne de caractères) ou est simplement ignoré (variable numérique). (Pour saisir le caractère LF à partir du clavier, appuyez sur la flèche vers le bas (↓). Pour saisir le caractère EN, appuyez sur ENTER.) L'exception s'applique à tous les cas notés ci-dessous où EN est considéré comme un terminateur.

Entrée numérique

Supposons que l'image de données sur le disque est :

EN désigne un caractère de retour chariot (code ASCII décimal 13).

Puis l'instruction suivante :

ou la séquence d'instructions suivantes :

attribuera les valeurs comme suit :

Cela fonctionne car les blancs et EN servent de terminateurs pour l'entrée des variables numériques. Le blanc avant 1,2345 est un «blanc de début», il est donc ignoré. Le blanc après 1,2345 est un terminateur ; par conséquent, BASIC commence à entrer la deuxième variable au caractère «-», entre le nombre -33 et prend les deux blancs suivants comme terminateurs. La troisième entrée commence au 2 et se termine au 7.

Entrée de chaîne de caractères

Lors de la lecture de données dans une variable de chaîne de caractères, INPUT ignore tous les blancs de début ; le premier caractère non blanc est considéré comme le début de l'élément de données.

Si le premier caractère est un guillemet double ("), alors INPUT évaluera les données comme une chaîne entre guillemets : il lira tous les caractères suivants jusqu'au prochain guillemet double. Les virgules, les espaces et les caractères EN - seront être inclus dans la chaîne de caractères. Les guillemets eux-mêmes ne font pas partie de la chaîne de caractères.

Par exemple, si les données sur disque sont :

Alors l'instruction suivante :

attribuerait des valeurs comme suit :

Si une virgule est insérée dans l'image de données avant le premier guillemet double, C$ obtiendra la valeur, BON MELONS.

Ce sont des exemples très simples juste pour vous donner une idée de la façon dont INPUT fonctionne. Cependant, il existe de nombreuses autres façons d'entrer des données - différents terminateurs, différents types de variables cibles,...

Plutôt que d'adopter une approche de fusil de chasse et d'essayer de tous les couvrir, nous donnerons une description générale du fonctionnement de l'entrée et des caractères et conditions de terminaison, puis fournirons plusieurs exemples.

Lorsque BASIC rencontre un caractère de terminaison, il analyse en avant pour voir combien de caractères de terminaison supplémentaires il peut inclure avec le premier caractère de terminaison. Cela garantit que BASIC commencera à rechercher l'élément de données suivant au bon endroit.

La liste ci-dessous définit les différents ensembles de terminaison que INPUT# recherchera. Il essaiera toujours de prendre le plus grand ensemble possible.

Ensembles de terminaisons d'entrée numérique :

• Fin de fichier rencontrée
• 255e caractère de données rencontré
• , (virgule)
• EN
• EN LF
• [ ...] [ EN]
• [ ...] [ EN LF]

Ensembles de terminateurs de chaîne de caractères entre guillemets :

• Fin de fichier rencontrée
• 255^e caractère de données rencontré
• " (double citation)
• " [ ...][,]
• " [ ...][ EN]
• " [ ...][ EN LF]

Ensembles de terminaisons de chaîne de caractères sans guillemets :

• Fin de fichier rencontrée
• 255^e caractère de données rencontré
• ,
• EN [LF]

Voici un organigramme décrivant comment INPUT# affecte des données à une variable :

Le tableau suivant montre comment différentes images de données seront lues par l'instruction :

Voici quelques exemples de résultats :

Dans l'exemple 2 ci-dessus, pourquoi la variable C prend-elle la valeur 0 ? Lorsque l'entrée atteint la fin du fichier, elle termine la dernière donnée, contenant alors "A12". Ceci est évalué par une routine similaire à la fonction VAL du BASIC - renvoyant un zéro car le premier caractère de "A12" n'est pas numérique.

Dans l'exemple 3, lorsque INPUT# cherche le deuxième élément de données, il rencontre immédiatement un terminateur (la virgule) ; donc la variable B prend la valeur zéro.

Le tableau suivant montre comment diverses images de données sur disque seront lues par l'instruction :

Dans l'exemple 3, le premier élément de données est une chaîne de caractères sans guillemets, donc les guillemets doubles ne sont pas des terminateurs et font partie de A$.

Dans l'exemple 4, le EN est précédé d'un LF, il ne termine donc pas la première chaîne de caractères ; LF et EN sont tous deux inclus dans A$.

Note technique : La discussion ci-dessus ignore le rôle du tampon d'entrée dans le processus d'entrée séquentielle. En fait, DISK BASIC lit toujours des enregistrements de données de 256 octets dans le tampon, puis trie ce qui se trouve dans le tampon pour "satisfaire" la liste de variables INPUT #. C'est pourquoi :

ne nécessitent pas nécessairement deux accès disque. L'enregistrement de 256 octets dans la mémoire tampon peut contenir suffisamment de données pour A%, B% et plus.

Syntaxe

Paramètres

Description

Semblable à LINE INPUT à partir du clavier, cette instruction lit une "ligne" de données de chaîne de caractères dans var$. Ceci est utile lorsque vous souhaitez lire un fichier de programme BASIC au format ASCII en tant que données, ou lorsque vous souhaitez lire des données sans suivre les restrictions habituelles concernant les caractères de début et les terminateurs.

LINE INPUT (ou LINEINPUT - l'espace est facultatif) lit tout depuis le premier caractère jusqu'à :

• un caractère EN non précédé de LF
• la fin de fichier
• le 255^e caractère de données (ce 255 caractère est inclus dans la chaîne de caractères)

Les autres caractères rencontrés - guillemets, virgules, espaces de début, paires LF EN - sont inclus dans la chaîne de caractères.

Par exemple, si les données ressemblent à :

puis l'instruction :

pourrait être utilisé de manière répétitive pour lire chaque ligne de programme, une ligne à la fois.

Syntaxe

Paramètres

Description

L'instruction écrit les données séquentiellement dans le fichier spécifié. Lorsque vous ouvrez un fichier pour la première fois pour une sortie séquentielle, un pointeur est placé au début du fichier, donc votre premier PRINT# place les données au début du fichier. A la fin de chaque opération PRINT#, le pointeur avance, de sorte que les valeurs sont écrites en séquence.

Une instruction PRINT# crée une image disque similaire à ce qu'un PRINT pour afficher crée à l'écran. Souvenez-vous de cela et vous pourrez configurer correctement votre liste PRINT# pour un accès par une ou plusieurs instructions INPUT.

PRINT# ne compresse pas les données avant de les écrire sur le disque ; il écrit une image codée en ASCII des données.

Exemples

Par exemple, si A=123,45 :

écrira une séquence de caractères de neuf octets sur le disque :

La ponctuation dans la liste PRINT est très importante. Les virgules et les points-virgules sans guillemets ont le même effet que dans PRINT normal pour afficher les instructions.

Par exemple, si A=2300 et B=1,303, alors :

place les données sur le disque comme :

La virgule entre A et B dans la liste PRINT# provoque 10 espaces supplémentaires dans le fichier disque. En règle générale, vous ne voudriez pas utiliser l'espace disque de cette façon, vous devez donc utiliser des points-virgules au lieu de virgules.

écrivez les données comme suit :

PRINT# avec des données numériques est assez simple - n'oubliez pas de séparer les éléments par des points-virgules.

PRINT# avec des données de chaîne de caractères nécessite plus de soin, principalement parce que vous devez insérer des délimiteurs pour que les données puissent être lues correctement. En particulier, vous devez séparer les éléments de chaîne de caractères avec des délimiteurs explicites si vous souhaitez les INPUT# en tant que chaînes de caractères distinctes.

Par exemple, supposons :

Alors :

produirait cette image sur le disque :

ne pouvant pas être INPUT dans deux variables.

L'instruction suivante :

produirait :

pouvant être INPUT# en deux variables.

Cette méthode est adéquate si les données de chaîne ne contiennent pas de délimiteurs - virgules ou EN - caractères. Mais si les données contiennent des délimiteurs ou des espaces de début que vous ne voulez pas ignorer, vous devez fournir des guillemets explicites à écrire avec les données. Par exemple, supposons A$="TREMBLAY, JEAN P." B$="100-01-001".

Si vous utilisez :

produirait :

Lorsque vous essayez de saisir ceci avec une déclaration telle que :

A$ obtiendra la valeur "TREMBLAY", et B$ obtiendra "JEAN P." - à cause de la virgule après TREMBLAY dans l'image disque.

Pour écrire ces données afin qu'elles puissent être saisies correctement, vous devez utiliser la fonction CHR$ pour insérer des guillemets doubles explicites dans l'image disque. Étant donné que 34 est le code ASCII décimal pour les guillemets doubles, utilisez CHR$ comme suit :

cela produit l'image disque :

pouvant être lu avec un simple :

Remarque : Vous pouvez également utiliser la fonction CHR$ pour insérer d'autres délimiteurs et codes de contrôle dans le fichier, par exemple :

Option USING

Cette option facilite l'écriture de fichiers dans un format soigneusement contrôlé. Vous pouvez créer un fichier de rapport de cette manière, pouvant alors être LIST ou PRINT (commandes TRSDOS).

Ou vous pouvez utiliser cette option pour contrôler le nombre de caractères d'une valeur étant écrits sur le disque.

Par exemple, supposons :

Puis l'instruction suivante :

écrirait les données sous forme de surnom :

(dans ce cas, nous ne voulions pas ajouter de délimiteurs explicites.)

Note technique : La discussion ci-dessus ignore le rôle du tampon de sortie dans le processus d'écriture séquentielle. En fait, les données sont d'abord placées dans la mémoire tampon, puis, au fur et à mesure que les enregistrements de 256 octets sont remplis, les données sont écrites sur le fichier disque. C'est pourquoi il n'y a pas toujours d'accès disque lors de l'exécution de chaque instruction PRINT#.

Instructions d'accès aléatoire

Syntaxe

Paramètres

Avant d'appliquer FIELD sur un tampon, vous devez utiliser une instruction OPEN pour affecter ce tampon à un fichier disque particulier (vous devez utiliser le mode d'accès aléatoire). Utilisez ensuite l'instruction FIELD pour organiser un tampon de fichiers aléatoire afin de pouvoir transmettre des données de BASIC à l'entreposage sur disque et vice-versa.

Chaque tampon de fichier aléatoire a 255 octets pouvant entreposer des données pour le transfert de l'entreposage sur disque vers le BASIC ou du BASIC vers le disque. Cependant, vous avez besoin d'un moyen d'accéder à ce tampon à partir de BASIC afin de pouvoir soit lire les données qu'il contient, soit y placer de nouvelles données. L'instruction FIELD fournit les moyens d'accès.

Vous pouvez utiliser l'instruction FIELD un certain nombre de fois pour "réorganiser" un tampon de fichier. Le FIELD sur un tampon n'efface pas le contenu du tampon ; seuls les moyens d'accès au tampon (les noms des champs) sont modifiés. De plus, deux ou plusieurs noms de champ peuvent faire référence à la même zone du tampon.

Exemples

Cette instruction indique à BASIC d'affecter la totalité du tampon de 255 octets à la variable de chaîne de caractères A$. Si vous affichez maintenant A$, vous verrez le contenu du tampon. Bien sûr, cette valeur n'aurait aucun sens à moins que vous n'ayez utilisé GET pour lire un enregistrement de 255 octets à partir du disque.

Remarque : Toutes les données - à la fois les chaînes de caractères et les nombres - doivent être placées dans le tampon sous forme de chaîne de caractères. Il existe trois paires de fonctions (MKI$/CVI,MKS$/CVS,MKD$/CVD) pour convertir des nombres en chaînes de caractères et vice-versa.

Les 16 premiers octets du tampon 3 reçoivent le nom de tampon NM$ ; les 25 suivants, AD$ ; les 10 suivants, CY$ ; les 2 suivants, ST$ ; et les 7 suivants, ZP$. Les 195 octets restants du tampon ne sont pas du tout mis en champ.

En savoir plus sur les noms de champs

Les noms de champ, comme NM$, AD$, CY$, ST$ et ZP$, ne sont pas des variables de chaîne de caractères au sens ordinaire. Ils ne consomment pas l'espace de chaîne de caractères disponible pour BASIC.

Au lieu de cela, ils pointent vers le champ tampon que vous avez affecté avec l'instruction FIELD. C'est pourquoi vous pouvez utiliser :

sans se soucier de savoir si 255 octets d'espace de chaîne de caractères sont disponibles pour A$.

Si vous utilisez un nom de champ tampon sur le côté gauche d'une instruction d'affectation ordinaire, ce nom ne pointera plus vers le champ tampon ; par conséquent, vous ne pourrez pas accéder à ce champ en utilisant le nom de champ précédent.

Par exemple :

annule l'effet de l'instruction FIELD ci-dessus (ligne 100).

Lors d'une entrée aléatoire, l'instruction GET place les données dans le tampon de 255 octets, où elles sont accessibles à l'aide des noms de champ attribués à ce tampon. Pendant la sortie aléatoire, LSET et RSET placent les données dans le tampon, vous pouvez donc mettre (PUT) le contenu du tampon dans un fichier disque.

Souvent, vous ne voudrez pas utiliser une variable factice dans une instruction FIELD pour "passer" une partie du tampon et commencer à la remplir quelque part au milieu. Par exemple :

Dans la deuxième instruction FIELD, DUMMY$ sert à déplacer la position de départ de CLIENT$(2) vers la position 129. De cette manière, deux "sous-enregistrements" identiques sont définis sur le tampon numéro 1. Nous n'utiliserons pas réellement DUMMY$ pour placer données dans la mémoire tampon ou les récupérer à partir de la mémoire tampon.

Le tampon ressemble maintenant à ceci :

Notez qu'un seul octet (le 128e octet) reste inutilisé dans cette structure de champ.

Syntaxe

Paramètres

Cette instruction obtient un enregistrement de données à partir d'un fichier disque et le place dans le tampon spécifié. Avant d'obtenir des données GET à partir d'un fichier, vous devez ouvrir le fichier et lui attribuer un tampon. C'est-à-dire une déclaration du type :

est requis avant l'instruction :

Lorsque BASIC rencontre l'instruction GET, il examine le bloc de contrôle du tampon et obtient :

• les informations nécessaires pour accéder au dossier
• le mode dans lequel ce tampon a été configuré (doit être R)
• le numéro d'enregistrement en cours
• le numéro d'enregistrement EOF (fin de fichier), c'est-à-dire l'enregistrement ayant le numéro le plus élevé dans le fichier
• de nombreuses autres informations à usage interne

Le BASIC lit ensuite l'enregistrement nmexp2 du fichier et le place dans le tampon. Si vous omettez le numéro d'enregistrement, il lira l'enregistrement en cours.

L'enregistrement courant est l'enregistrement dont le numéro est supérieur d'une unité à celui du dernier enregistrement consulté. La première fois que vous accédez à un fichier via un tampon particulier, l'enregistrement courant est mis égal à 1.

Par exemple :

Si vous tentez d'obtenir un enregistrement dont le numéro est supérieur à celui de l'enregistrement de fin de fichier, BASIC remplira le tampon avec des zéros hexadécimaux et aucune erreur ne se produira.

Pour éviter cela, vous pouvez utiliser la fonction LOF pour déterminer le numéro de l'enregistrement au numéro le plus élevé.

Syntaxe

Paramètres

Cette instruction déplace les données du tampon d'un fichier vers un emplacement spécifié dans le fichier. Avant de mettre des données dans un fichier, vous devez :

• Ouvrir le fichier (OPEN), affectant ainsi un tampon et définissant le mode d'accès (doit être R);
• Appliquer FIELD sur le tampon
• Placer les données dans la mémoire tampon avec les instructions LSET et RSET.

Lorsque BASIC rencontre l'instruction :

il fait ce qui suit :

• Obtenez les informations nécessaires pour accéder au fichier disque
• Vérifie le mode d'accès pour ce tampon (doit par R)
• Acquiert plus d'espace disque pour le fichier est nécessaire pour accueillir l'enregistrement indiqué par nmexp2
• Copie le contenu du tampon dans l'enregistrement spécifié du fichier disque
• Mettre à jour le numéro d'enregistrement actuel pour qu'il soit égal à nmexp2 + 1

L'enregistrement courant est l'enregistrement dont le numéro est supérieur d'une unité au dernier enregistrement consulté. La première fois que vous accédez à un fichier via un tampon particulier, l'enregistrement courant est mis égal à 1.

Si le numéro d'enregistrement que vous mettez (PUT) est supérieur au numéro d'enregistrement de fin de fichier, alors nmexp2 devient le nouveau numéro d'enregistrement de fin de fichier.

Cela a une implication importante. Lorsque vous mettez un enregistrement dont le nombre dépasse le numéro d'enregistrement EOF, de l'espace est alloué sur le disque pour accueillir le nouveau numéro d'enregistrement le plus élevé plus tous les enregistrements de numéro inférieur. Par exemple :

produira toujours un message DISK FULL (disque plein), puisque TRSDOS essaie de trouver de l'espace pour tous les enregistrements de 1 à 336 - et 335 est le nombre maximum d'enregistrements disponibles sur une disquette.

Exemples (supposons qu'un fichier nommé SAMPLE/BAS existe et que vous y ayez précédemment écrit 10 enregistrements, de sorte que LOF=10) :

Syntaxe

Paramètres

Ces deux instructions vous permettent de placer des données de chaîne de caractères dans des champs préalablement définis par une instruction FIELD.

Par exemple, supposons que NM$ et AD$ aient été définis comme noms de champ pour un tampon de fichier aléatoire. NM$ a une longueur de 18 caractères et AD$ a une longueur de 25 caractères.

Maintenant, nous voulons placer les informations suivantes dans le champ de tampon afin qu'elles puissent être écrites sur le disque :

Ceci est accompli avec les deux instructions :

Cela place les données dans le tampon comme suit :

Notez que les espaces de remplissage ont été placés à droite des chaînes de données dans les deux cas. Si nous avions utilisé RSET au lieu des instructions LSET, les espaces de remplissage auraient été placés à gauche. C'est la seule différence entre LSET et RSET.

Par exemple :

place les données dans le champ comme suit :

Si un élément de chaîne est trop grand pour tenir dans le champ tampon spécifié, il est toujours tronqué à droite. Autrement dit, les caractères supplémentaires à droite sont ignorés.

Syntaxe

Paramètres

Syntaxe

Paramètres

Syntaxe

Paramètres

Ces fonctions vous permettent de restaurer les données sous forme numérique après leur lecture à partir du disque. Généralement, les données ont été lues par une instruction GET et sont entreposées dans un tampon de fichier à accès aléatoire.

Les fonctions CVD, CVI, CVS sont respectivement les inverses de MKD$, MKI$ et MKS$.

Par exemple, supposons que le nom GROSSPAY$ fasse référence à un champ de huit octets dans un tampon de fichier à accès aléatoire et qu'après avoir obtenu un enregistrement, GROSSPAY$ contienne une représentation MKD$ du nombre 13123.38.

Puis l'instruction suivante :

affiche le résultat de la différence, 13123.38-TAXES. Alors que l'instruction suivante :

produira une erreur TYPE MISMATCH, car les valeurs de chaîne de caractères ne peuvent pas être utilisées dans les expressions arithmétiques.

En utilisant le même exemple, l'instruction :

attribue la valeur numérique 13123,38 à la variable double précision A#.

Syntaxe

Paramètres

Cette fonction vérifie si tous les caractères jusqu'au marqueur de fin de fichier ont été accédés, de sorte que vous pouvez éviter les erreurs INPUT PAST END lors de la saisie séquentielle.

En supposant que nmexp spécifie un fichier ouvert, alors EOF(nmexp) renvoie 0 (faux) lorsque l'enregistrement EOF n'a pas encore été lu, et -1 (vrai) lorsqu'il a été lu.

Exemples :

La séquence de lignes suivante lit les données numériques de DATA/TXT dans le tableau A(). Lorsque le dernier caractère de données du fichier est lu, le test EOF de la ligne 30 "réussit", de sorte que le programme sort de la boucle d'accès au disque, empêchant une erreur INPUT PAST END de se produire. Notez également que la variable I contient le nombre d'éléments entrés dans le tableau A().

À la ligne 30, LOF(1) spécifie le numéro d'enregistrement le plus élevé auquel accéder.

Remarque : Si vous tentez d'obtenir des numéros d'enregistrement au-delà de l'enregistrement de fin de fichier, BASIC remplit simplement le tampon avec des zéros hexadécimaux et aucune erreur n'est générée.

Lorsque vous souhaitez ajouter à la fin d'un fichier, LOF vous indique par où commencer :

Syntaxe

Paramètres

Syntaxe

Paramètres

Syntaxe

Paramètres

Description

Ces fonctions changent un nombre en chaîne de caractères. En fait, les valeurs d'octet composant le nombre ne sont pas modifiées ; un seul octet, le spécificateur de type de données interne, est modifié, de sorte que les données numériques peuvent être placées dans une variable de chaîne de caractères.

C'est-à-dire :

• MKD$ renvoie une chaîne de caractères de huit octets
• MKI$ renvoie une chaîne de caractères de deux octets
• MKS$ renvoie une chaîne de caractères de quatre octets

Exemples

AVG$ fait généralement référence à un champ de tampon aléatoire de quatre octets. Maintenant, il contient une représentation du nombre simple précision 0,123.

Le nom des champs TALLY$ contiendrait désormais une représentation sur deux octets de l'entier I%.

A$ devient une représentation sur deux octets de la partie entière de 8/I. Toute partie fractionnaire est ignorée. Notez que A$ dans ce cas est une variable de chaîne normale, pas un nom de champ tampon.

Supposons que BASEBALL/BAT (une extension de fichier non standard) a été ouvert pour un accès aléatoire à l'aide du tampon 2 et que le tampon a été FIELD comme suit :

NM$ est destiné à contenir une chaîne de caractères ; AVG$, AB$ et ERNING$, valeurs converties en simple précision ; YR$ et HR$, entiers convertis.

Supposons que nous souhaitions écrire l'enregistrement de données suivant :

Ensuite, nous utiliserions les fonction de fabrication de chaîne de caractères comme suit :

Après cette séquence, vous pouvez écrire les informations de SLOW LEARNER sur le disque avec l'instruction PUT. Lorsque vous le relirez à partir du disque avec GET, vous devrez restaurer les données numériques de la chaîne de caractères à la forme numérique, en utilisant les fonctions CVI et CVS.

Techniques d'accès séquentiel

L'entrée/sortie séquentielle est le moyen le plus simple de stocker des données dans des fichiers disque et de les récupérer dans des variables BASIC.

Pour écrire sur le disque, vous ouvrez un fichier pour une sortie séquentielle, PRINT# les données et fermez le fichier. Pour relire les données, il vous suffit d'ouvrir le fichier pour un accès séquentiel et d'utiliser l'instruction INPUT# pour mettre les données directement dans les variables BASIC - dans le même ordre que les données ont été écrites sur le disque.

Sortie séquentielle - Un exemple

Supposons que nous souhaitions entreposer une table de constantes de conversion anglais-métrique :

Nous décidons d'abord de ce que sera l'image de données. Disons que nous voulons qu'il ressemble à ceci :

Par exemple, les données entreposées commenceraient :

Le programme suivant créera un tel fichier de données.

Remarque : EN représente un retour de chariot, hexadécimal 0D.

La ligne 10 crée un fichier disque nommé METRIC/TXT et affecte le tampon 1 pour la sortie séquentielle à ce fichier. L'extension /TXT est utilisée car la sortie séquentielle entrepose toujours les données sous forme de texte codé ASCII.

Remarque : Si METRIC/TXT existe déjà, la ligne 10 entraînera la perte de toutes ses données. Voici pourquoi : chaque fois qu'un fichier est ouvert pour une sortie séquentielle, le marqueur EOF est défini au début du fichier. En effet, TRSDOS "oublie" que quoi que ce soit ait jamais été écrit au-delà de ce point.

La ligne 40 affiche le contenu actuel de UNIT$ et FACTR dans le tampon du fichier. L'écriture sur le disque n'aura pas lieu tant que le tampon n'est pas rempli ou que vous ne fermez pas le fichier, selon la première éventualité. Étant donné que les éléments de chaîne ne contiennent pas de délimiteurs, il n'est pas nécessaire d'imprimer des guillemets explicites autour d'eux. La virgule explicite suffit.

La ligne 60 ferme le fichier. Le marqueur EOF pointe vers la fin du dernier élément de données, c'est-à-dire 0,45359, de sorte que plus tard, lors de la saisie, DISK BASIC saura quand il aura lu toutes les données.

Entrée séquentielle - un exemple

Le programme suivant lit les données de METRIC/TXT dans deux tableaux "parallèles", puis vous demande d'entrer un problème de conversion.

La ligne 20 ouvre le fichier pour une entrée séquentielle. Le pointeur de lecture est automatiquement placé au début du fichier.

La ligne 30 vérifie que l'enregistrement de fin de fichier n'a pas été lu. Si c'est le cas, le contrôle passe de la boucle d'entrée du disque à la partie du programme utilisant les données nouvellement acquises.

La ligne 40 lit une valeur dans le tableau d'agitation UNIT$() et un nombre dans le tableau simple précision FACTR(). Notez que cette liste INPUT est parallèle à la liste PRINT# ayant créé le fichier de données. Ce parallélisme n'est cependant pas obligatoire. Nous aurions tout aussi bien pu utiliser :

Comment mettre à jour le fichier

Supposons que vous vouliez ajouter plus d'entrées dans le fichier de conversion Anglais-Métrique. Vous ne pouvez pas simplement rouvrir le fichier pour une sortie séquentielle et PRINT# les données supplémentaires - cela placerait immédiatement le marqueur de fin de fichier au début du fichier, détruisant ainsi le contenu précédent du fichier. Faites ceci à la place :

• Ouvrir le fichier pour une saisie séquentielle
• Entrez le fichier entier et entreposez-le (généralement dans un ou plusieurs tableaux)
• Fermer le fichier
• Ajoutez vos nouvelles entrées au tableau de données ou corrigez les entrées existantes
• Rouvrir le fichier pour une sortie séquentielle
• Sortie du tableau de données mis à jour dans le fichier
• Fermer le fichier

Si le fichier est trop volumineux pour tenir en mémoire, mettez-le à jour de la manière suivante :

• Ouvrir le fichier pour une saisie séquentielle
• Ouvrir un autre nouveau fichier de données pour une sortie séquentielle
• Saisir un bloc de données et mettre à jour les données si nécessaire
• Exporter les données vers le nouveau fichier
• Répétez les étapes 3 et 4 jusqu'à ce que toutes les données aient été lues, mises à jour et sorties dans le nouveau fichier ; puis passez à l'étape 6
• Fermez les deux fichiers
• Tuez l'ancien fichier de données
• Renommer le nouveau fichier (commande RENAME de TRSDOS) avec le nom de l'ancien fichier.

LINE INPUT séquentielle : Un exemple

En utilisant l'entrée orientée ligne, vous pouvez écrire des programmes éditant d'autres fichiers de programme BASIC : les renuméroter, changer LPRINT en PRINT,... - tant que ces programmes "cibles" sont entreposés au format ASCII.

Le programme suivant compte le nombre de lignes dans n'importe quel fichier de disque avec l'extension "/TXT".

Pour les programmes BASIC entreposés en ASCII, chaque ligne de programme se termine par un caractère EN non précédé d'un saut de ligne LF. Ainsi, LINE INPUT à la ligne 70 lit automatiquement une ligne entière à la fois, dans la variable TEMP$. La variable I% fait le comptage.

Pour essayer le programme, enregistrez DISKDUMP/BAS en tant que fichier texte :

Cela vous donne une deuxième version au format ASCII de DISKDUMP. Tapez maintenant le programme du compteur de lignes et dites-lui d'examiner le programme DISKDUMP/TXT.

Entreposage sur disque lors d'un accès séquentiel

Une chose rendant l'accès séquentiel si simple est que vous pouvez généralement ignorer les détails de l'entreposage sur disque. Vous écrivez simplement vos données et relisez-les.

Vous trouverez ci-dessous quelques-uns des détails techniques et des conseils que vous devez garder à l'esprit. Dans certaines situations, ils deviendront importants.

• Les instructions PRINT# n'écrivent pas de données directement sur le disque ; à la place, les données sont placées dans le tampon de sortie de 256 octets. Lorsque ce tampon est rempli, le contenu est automatiquement écrit sur le disque. (La fermeture du fichier écrit également le tampon sur le disque.)
• Si un erreur DISK FULL ERROR se produit lors de l'exécution d'une instruction PRINT#, vous devez réaliser que le contenu actuel du tampon de sortie n'a pas été écrit dans le fichier. Les données du fichier disque sont intactes, mais elles ne contiennent pas les dernières valeurs de votre PRINT. Si vos variables contiennent encore les données, vous pouvez les récupérer directement.

Techniques d'accès aléatoire

L'accès aléatoire offre plusieurs avantages par rapport à l'accès séquentiel :

• Au lieu d'avoir à commencer la lecture au début d'un fichier, vous pouvez lire n'importe quel enregistrement que vous spécifiez.
• Pour mettre à jour un fichier, vous n'avez pas besoin de lire l'intégralité du fichier, de mettre à jour les données et de les réécrire. Vous pouvez réécrire ou ajouter à n'importe quel enregistrement de votre choix, sans avoir à parcourir les autres enregistrements.
• L'accès aléatoire est plus efficace - les données occupent moins d'espace et sont lues et écrites plus rapidement.
• L'ouverture d'un fichier pour un accès aléatoire vous permet d'écrire et de lire dans le fichier via le même tampon.
• L'accès aléatoire fournit de nombreuses instructions et fonctions puissantes pour structurer vos données. Une fois que vous avez mis en place la structure, l'entrée/sortie aléatoire devient assez simple.

Le dernier avantage listé ci-dessus est aussi la "partie difficile" de l'accès aléatoire. Il faut quand même un peu plus.

Aux fins de l'accès aléatoire, vous pouvez considérer un fichier disque comme un ensemble de boîtes - comme un mur de boîtes postales. Tout comme les réceptacles des bureaux de poste, les boîtes à dossiers sont numérotées.

Le nombre de cases dans un fichier varie, mais il s'agit toujours d'un multiple de 5.

Le plus petit fichier non vide contient 5 cases, numérotées de 1 à 5. Lorsque le fichier a besoin de plus d'espace pour contenir plus de données, TRSDOS le fournit par incréments de 5.

Ces boîtes de taille fixe sont appelées enregistrements. Chaque enregistrement contient 256 octets, dont 255 sont disponibles pour entreposer vos données.

Vous pouvez placer des données dans n'importe quel enregistrement ou lire le contenu de n'importe quel enregistrement, avec des instructions telles que :

écrit le contenu du tampon 1 dans l'enregistrement 5.

lit le contenu de l'enregistrement 5 dans le tampon 1.

Le tampon est une zone d'attente pour les données. Avant d'écrire des données dans un fichier, vous devez les placer dans la mémoire tampon affectée au fichier. Après avoir lu les données d'un fichier, vous devez les récupérer dans la mémoire tampon.

Comme vous pouvez le voir dans les exemples d'instructions PUT et GET ci-dessus, les données sont transmises vers et depuis l e disque en blocs de 256 octets.

"C'est beaucoup de données." Mais la plupart des valeurs n'occupent que quelques octets :

Par conséquent, vous souhaiterez placer plusieurs valeurs dans le tampon avant de placer son contenu dans le fichier disque, pour éviter de gaspiller de l'espace disque.

Ceci est accompli en 1) divisant le tampon en champs et en les nommant, puis 2) en plaçant des données numériques dans les champs.

Par exemple, supposons que nous voulions entreposer un glossaire sur disque. Chaque enregistrement sera composé d'un mot suivi de sa définition. On commence par :

La ligne 100 ouvre un fichier nommé GLOSSAIRE/BAS (le crée s'il n'existe pas déjà) ; et donne au tampon 1 un accès aléatoire au fichier.

La ligne 110 définit deux champs sur le tampon 1 : WD$ se compose des 15 premiers octets du tampon ; MEANING$ comprend les 240 derniers octets. WD$ et MEANING$ sont maintenant des noms de champs.

Qu'est-ce qui différencie les noms de champs ? La plupart des variables de chaîne de caractères pointent vers une zone en mémoire appelée l'espace de chaîne de caractères. C'est là que la valeur de la chaîne est entreposée.

Les noms de champs, quant à eux, pointent vers la zone tampon affectée dans l'instruction FIELD. Ainsi, par exemple, l'énoncé :

affiche le contenu des deux champs tampon définis ci-dessus.

Ces valeurs n'ont de sens que si nous plaçons d'abord les données dans le tampon. LSET, RSET et GET peuvent tous être utilisés pour accomplir cette fonction. Nous commencerons par LSET et RSET, étant utilisés en préparation de la sortie sur disque.

Notre première entrée est le mot "justifier à gauche" suivi de sa définition :

La ligne 120 justifie à gauche la valeur entre guillemets dans le premier champ du tampon 1. La ligne 130 fait la même chose avec sa chaîne de caractères de guillemets. Lors de la saisie à la ligne 130, vous devez insérer des caractères de saut de ligne LF (appuyez sur la touche ↓) pour forcer les sauts de ligne comme ci-dessus. Cela facilite l'affichage des données après les avoir lues dans une variable de chaîne de caractères.

Remarque : RSET placerait des blancs de remplissage à gauche de l'élément. La troncature serait toujours à droite.

Maintenant que les données sont dans le tampon, nous pouvons les écrire sur le disque avec une simple instruction PUT :

Cela écrit le premier enregistrement dans le fichier GLOSSARY/BAS.

Pour lire et afficher le premier enregistrement dans GLOSSARY/BAS, utilisez la séquence suivante :

Les lignes 160 et 170 sont nécessaires uniquement parce que nous avons fermé le dossier à la ligne 150. Si nous ne l'avions pas fermé, nous pourrions passer directement à la ligne 180.

Accès aléatoire : une procédure générale

L'exemple ci-dessus montre les séquences nécessaires pour lire et écrire en utilisant un accès aléatoire. Mais il ne démontre pas les principaux avantages de cette forme d'accès - en particulier, il ne montre pas comment mettre à jour les fichiers existants en accédant directement à l'enregistrement souhaité.

Le programme ci-dessous, GLOSSACC/BAS, développe l'exemple de glossaire pour montrer certaines des techniques d'accès aléatoire pour la maintenance des fichiers. Mais avant de regarder le programme, étudiez cette procédure générale de création et de maintenance de fichiers via un accès aléatoire.

Notez que nous avons ajouté un champ, NX$, à l'enregistrement (ligne 120). NX$ contiendra le numéro de l'enregistrement venant ensuite dans l'ordre alphabétique. Cela nous permet de parcourir le glossaire par ordre alphabétique, à condition de savoir quelle avertissement contient l'entrée devant apparaître en premier.

Par exemple, supposons que le glossaire contienne :

Lorsque nous lisons l'enregistrement 2 (OCTET), il nous indique que l'enregistrement 4 (HEXADECIMAL) est le suivant, ce qui indique ensuite que l'enregistrement 1 (JUSTIFIER-A-GAUCHE) est le suivant, etc. La dernière entrée, l'enregistrement 3 (JUSTIFIER-A-DROITE), pointe à zéro, ce que nous prenons pour signifier "LA FIN".

Puisque NX$ contiendra un entier, nous devons d'abord convertir ce nombre en une représentation de chaîne à deux octets, en utilisant MKI$ (ligne 230 ci-dessus).

on obtiendra le résultat suivant :

ensuite :

Le programme suivant affiche le glossaire dans l'ordre alphabétique :

Sous-enregistrements

Dans l'exemple du glossaire, chaque entrée nécessitait la totalité des 255 octets disponibles dans la mémoire tampon. Ce n'est souvent pas le cas. Lorsque chaque unité d'information ne remplit qu'une partie du tampon, il est judicieux de définir plusieurs sous-enregistrements identiques sur le tampon. De cette façon, vous ne gaspillez pas d'espace disque en mettant des enregistrements ne contenant que quelques octets d'informations utiles.

Par exemple, supposons que nous voulions entreposer une liste de diffusion, et chaque entrée consistera en :

Remarque : Le montant du dernier achat sera un nombre simple précision. De telles valeurs nécessitent 4 octets, donc la longueur du champ est de 4.

Si nous ne nous soucions pas de gaspiller de l'espace sur le disque, nous pourrions utiliser l'instruction suivante :

La mise en place d'un tel tampon créerait un enregistrement composé de 63 octets d'informations suivis de 255-63 = 192 octets inutilisés.

Une approche plus efficace divise le tampon en sous-enregistrements identiques. Dans ce cas, nous pouvons créer 255/63=4 sous-enregistrements plus seulement 3 octets perdus à la fin.

Au lieu d'utiliser une très longue instruction FIELD pour affecter explicitement chaque champ, nous rechampons le tampon une fois pour chaque sous-enregistrement, en utilisant une chaîne de caractères factice, STARTHERE$, pour démarrer chaque sous-enregistrement à la position appropriée dans le tampon.

La première fois dans la boucle, STARTHERE$ aura une longueur de zéro. Par conséquent, NM$(0) commencera au premier octet ; AD$(0), au 19ème octet,... LP$(0) se terminera au 63ème octet.

La deuxième fois dans la boucle, STARTHERE$ aura une longueur de 63. Par conséquent, NM$(1) commencera au 64e octet ; AD$(1), au 92e octet,... ; LPS$(1) se terminera au 126ème octet.

Et ainsi de suite, jusqu'à ce que le tampon soit complètement défini.

Pour placer des valeurs dans les sous-enregistrements du tampon : supposez que nos entrées de liste de diffusion sont entreposées dans quatre tableaux, N$(), A$(), C$(), S$(), LP().

Ensuite, nous pouvons remplir le tampon avec quatre entrées comme suit :

Comment accéder aux sous-enregistrements

Étant donné que chaque enregistrement d'un tel fichier contiendra quatre sous-enregistrements, nous avons besoin d'un moyen d'extraire le sous-enregistrement souhaité. Cela nécessite que chaque sous-enregistrement ait un numéro unique pouvant être lié à l'enregistrement qui le contient.

Pour cet exemple, supposons que nous ayons une affichage de toute la liste de diffusion, en commençant par le premier sous-enregistrement de l'enregistrement 1 et en passant par le dernier sous-enregistrement du dernier enregistrement. Nous les numérotons ensuite séquentiellement, en commençant par 1.

Les formules suivantes utilisent ce numéro (nous l'appellerons un numéro-clef) pour déterminer exactement où se trouve le sous-enregistrement dans le fichier :

Si le numéro-clef du sous-enregistrement est KEY%, alors :

où PR% est l'enregistrement physique contenant le sous-enregistrement, et :

où SR% est le numéro de sous-enregistrement à l'intérieur de l'enregistrement physique. Par exemple, supposons que nous voulions accéder à l'entrée avec le numéro de clef = 37 (c'est-à-dire, le 37^e entrée). Alors l'enregistrement physique la contenant est :

et sa position dans l'enregistrement 10 est :

Un programme de travail complet pour créer et manipuler une liste de diffusion suit :

Ce programme ne vous demande en fait pas de remplir le tampon avec quatre sous-enregistrements significatifs. Dès que vous avez placé un sous-enregistrement dans le bon champ, le tampon entier est écrit sur le disque. Cependant, l'espace supplémentaire n'est pas perdu ; il est toujours disponible pour l'ajout de sous-enregistrements ultérieurs.

Notez que ce ne serait pas le moyen le plus efficace de créer une liste en une seule "séance". Dans un tel cas, vous voudriez probablement remplir le tampon avec quatre sous-enregistrements avant d'écrire sur le disque. Le programme ci-dessus vous montre cependant comment mettre à jour un fichier en utilisant un accès aléatoire.

on obtiendra un résultat ressemblant à ceci :

ensuite :

enfin :

Champs se chevauchant

Supposons que vous vouliez accéder à un champ de deux manières - en totalité et en partie. Ensuite, vous pouvez attribuer deux noms de champ à la même zone du tampon.

Par exemple, si les deux premiers chiffres d'un numéro d'entreposage à six chiffres spécifient une catégorie, vous pouvez utiliser la structure de champ suivante :

Désormais, STOCK$ référencera l'intégralité du champ du numéro d'entreposage, tandis que CTG$ référencera uniquement les deux premiers chiffres du numéro.