Publicité
Description de l'application | Rexroth IndraMotion MTX
Exemple :
Exemple :
REWRITE
Si un fichier séquentiel est écrit et quand la fin du fichier est atteinte, le fichier
est automatiquement copié et la plage réservée est augmentée de la longueur
occupée dans la mesure où l'espace mémoire du programme pièce le permet.
Comme, pour cela, beaucoup d'espace mémoire est utilisé, il convient de ré‐
server avec "OPENW" une longueur de fichier suffisante lors de la création du
fichier.
1 OPENW(1,"P2",300,"TEST ORDRE PRN")
2 A$="TEST"
3 B$="POUR"
4 C$="ORDRE PRN"
5 PRN#(1,A$)
6 PRN#(1,B$)
7 PRN#(1,C$)
8 PRN#(1,A$;)
9 PRN#(1,B$;)
10 PRN#(1,C$;)
11 CLOSE(1)
Résultat :
P2 :
TEST<LF>
POUR<LF>
ORDRE PRN<LF>
TESTPOURORDREPRN<LF><ETX><LF>
10 DIM E$(50)
20 OPENW(1,"P2",300,"TEST2")
30 A% = 5000
40 R = 1.231
50 B! = 4/3
60 D$ = "ABCDE"
70 E$ = "CDEFGHI"
80 PRN#(1,"10";)
90 PRN#(1,"#####","###.###","#.#####",A%,R,B!,D$,E$)
95 CLOSE(1)
P2 :
Si le fichier ouvert contient déjà des données, les nouvelles données sont nor‐
malement ajoutées aux données existantes lors de l'écriture. Un fichier existant
peut toutefois être écrasé par "REWRITE" sans que le contenu qui n'est plus
requis ne doive être supprimé au préalable. Lors de l'écrasement, la zone ré‐
servée de l'ordre OPENW reste dans la mémoire du programme pièce.
Electric Drives
| Bosch Rexroth AG
and Controls
459/550
Fonctions CPL
Publicité
