Rockwell Automation Allen-Bradley Logix 5000 Serie Manual De Referencia página 945

Programación de texto estructurado
Si se lleva a cabo lo siguiente,
Borrar el valor de bits 0...31 en una matriz de valores
de tipo BOOL:
Inicializar la etiqueta de subíndice a 0.
Borrar i. Por ejemplo, cuando subscript = 5, borrar
array[5].
Añadir 1 a subscript.
Si subscript es ≤ 31, repetir 2 y 3.
De lo contrario, detener.
Si se lleva a cabo lo siguiente,
Un tipo de datos definido por el usuario (estructura)
almacena la siguiente información sobre un elemento en
su inventario:
 ID de códigos de barra del elemento (tipo de datos de
cadena)
 Cantidad en depósito del elemento (tipo de datos
DINT)
Una matriz de la estructura anterior contiene un
elemento para cada elemento diferente de su inventario.
Debe buscar la matriz de un producto específico (use su
código de barras) y determine la cantidad que hay en
depósito.
1. Obtenga el tamaño (número de elementos) de la
matriz Inventory y almacene el resultado en
2. Inventory_Items (etiqueta DINT).
Inicialice la etiqueta position a 0.
3. Si Barcode coincide con el ID de un elemento de la
matriz, entonces:
Establecer la etiqueta Quantity = Inventory[position].Qty.
Esto produce la cantidad que hay en depósito del
elemento.
Detener.
Barcode es una etiqueta de cadena que almacena el
código de barras del elemento que está buscando. Por
ejemplo , cuando
position = 5, comparar Barcode con Inventory[5].ID.
4. Añadir 1 a position.
5. Si position es ≤ (Inventory_Items -1), repetir 3 y 4.
Dado que los números de elemento comienzan en 0,
el último elemento es menor que el número de
elementos de la matriz en 1.
De lo contrario, detener.
Publicación de Rockwell Automation 1756-RM003T-ES-P - Noviembre 2018
Ejemplo 1
Ejemplo 2
Introduzca este texto estructurado
Para subscript:=0 a 31 por 1, hacer
array[subscript] := 0;
End_for;
Introduzca este texto estructurado
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;
Capítulo 24
945