Rockwell Automation Allen-Bradley Logix 5000 Série Manuel De Référence page 937

Programmation de texte structuré
Si vous exécutez les actions suivantes,
Mis à zéro les bits 0...31 d'un tableau de BOOL :
Initialiser l'étiquette de l'indice à 0.
Mettre i à zéro. Par exemple, lorsque l'indice = 5, mettre
array[5] à zéro.
Ajouter 1 à l'indice.
Si l'indice est ≤ 31, répéter 2 et 3.
Sinon, arrêter.
Si vous exécutez les actions suivantes,
Un type de données défini par l'utilisateur (structure)
stocke les informations suivantes au sujet d'un article
dans votre inventaire :
 ID de code-barres de l'article (type de données chaîne)
 Quantité pour la quantité en stock de l'article (type de
Un tableau de la structure ci-dessus contient un élément
pour chaque article différent de votre inventaire. Vous
voulez faire une recherche dans le tableau pour trouver
un produit spécifique (en utilisant le code-barres) et
déterminer la quantité en stock pour cet article.
1. Déterminer la dimension (nombre des articles) du
2. Inventory_Items (étiquette DINT).
Initialiser l'étiquette de position à 0.
3. Si Code-barres correspond à l'ID de l'article dans le
Définir l'étiquette Quantity = Inventory[position].Qty. Cela
produit la quantité en stock de l'article.
Arrêter.
Code-barres est une étiquette de la chaîne qui stocke le
code-barres de l'article pour lequel vous recherchez. Par
exemple, lorsque
position = 5, compare Barcode à Inventory[5].ID.
4. Ajouter 1 à la position.
5. Si la position est ≤ à (Inventory_Items -1), répéter 3 et
Sinon, arrêter.
Défauts majeurs/mineurs
Un défaut majeur se produira si
La construction fait des boucles
pendant trop longtemps.
Exemple 1
Exemple 2
données DINT)
tableau Inventaire et stocker le résultat dans
tableau, alors :
4. Puisque le nombre d'éléments commence à 0, le
numéro du dernier élément est le nombre d'éléments
dans le tableau moins un.
Publication Rockwell Automation 1756-RM003T-FR-P - Novembre 2018
Type de défaut Code de défaut
6 1
Saisissez ce texte structuré
For subscript:=0 to 31 by 1 do
array[subscript] := 0;
End_for;
Saisissez ce texte structuré
SIZE(Inventory,0,Inventory_Items);
For position:=0 to Inventory_Items - 1 do
If Barcode = Inventory[position].ID then
Quantity := Inventory[position].Qty;
Exit;
End_if;
End_for;
Chapitre 24
937