Ordenar datos en la tabla de datos
Esta función FP clasifica los valores (con signo +/- ) de una tabla en orden creciente o decreciente.
Esta instrucción solo ordena matrices unidimensionales. No funciona con matrices bidimensionales o tridimensionales.
Entrada
Área inicial de la tabla a ordenar
Área final de la tabla a ordenar
Especifica el orden:
0 = creciente
1 = decreciente
Los datos se ordenan con el método de la burbuja en el orden especificado en la entrada s3_Control. Puesto que el número de comparaciones aumenta a razón del cuadrado de las palabras a ordenar, la ordenación puede ser ineficiente (alto tiempo de ejecución) para tablas que tengan un gran número de elementos. Cuando la dirección de las variables en la entrada s1_Start = s2_End, no se realiza la ordenación.
si el área especificada utilizando el modificador índice supera el límite.
si la dirección de la variable de entrada s1_Start > s2_End.
Si s1_Start y s2_End pertenecen a diferentes áreas de datos
si el área especificada utilizando el modificador índice supera el límite.
si la dirección de la variable de entrada s1_Start > s2_End.
Si s1_Start y s2_End pertenecen a diferentes áreas de datos
Instrucciones F correspondientes: F277_SORT, F278_DSORT, F353_FSORT
Todas las variables de entrada y de salida utilizadas para la programación de esta función han sido declaradas en la Cabecera de la POU.Se utiliza la misma cabecera de la POU para todos los lenguajes de programación.
VAR
bStart: BOOL:=FALSE;
(*activates the function*)
adiDataField: ARRAY [0..4] OF DINT:=[4,7,-32,13,5];
(*result after a 0->1 leading
edge from start: [-32,4,5,7,13]*)
iOrder: INT:=0;
(*which way to sort:
0 means ascending order
1 means descending order*)
END_VAR
Cuando la variable bStart se encuentra a TRUE, se ejecuta la función.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 7 ;
NETWORK_BODY
B(B_F,FP_DATA_SORT!,,11,1,20,7,,?DEN?Ds1_Start?Ds2_End?Ds3_Control?AENO);
B(B_CONTACT,,bStart,5,2,7,4,);
B(B_VARIN,,adiDataField[0],9,3,11,5,);
B(B_VARIN,,adiDataField[4],9,4,11,6,);
B(B_VARIN,,iOrder,9,5,11,7,);
L(1,3,5,3);
L(7,3,11,3);
L(1,0,1,7);
END_NETWORK_BODY
END_NET_WORK
END_BODY
If (bStart) then
FP_DATA_SORT(s1_Start := adiDataField[0],
s2_End := adiDataField[4],
s3_Control := iOrder);
End_if;