 F97_DSRC
F97_DSRCBúsqueda de datos de 32-bits en tablas
Busca el valor especificado en la entrada s1 dentro de un bloque de datos (de 32 bits) que comienza en el área especificado por s2_Start y que acaba en s3_End.

Entrada
Área de 32 bits o constante equivalente para almacenar el valor a buscar
Inicio (32-bit) del bloque
Fin (32-bit) del bloque
El número de elementos iguales que s1 se almacena en el registro especial de datos DT90037 (sys_iNumberOfFoundMatches).
La posición relativa del primer elemento coincidente, desde el área inicial s2_Start, se almacena en el registro especial DT90038 (sys_iPositionOfFirstMatch).
Las direcciones de las variables en las entradas s2_Start y s3_End deben ser del mismo tipo de datos.
si el área especificada utilizando el modificador índice supera el límite.
si s2_Start>s3_End
si el área especificada utilizando el modificador índice supera el límite.
si s2_Start>s3_End

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
		start: BOOL:=FALSE;
		data_table: ARRAY [0..3] OF DINT:=[-44,222222,-44,12345];
		number_matches: INT:=0;
		position_1match: INT:=0;
	END_VARCuando la variable start está ajustada a TRUE, se ejecuta la función.
En lugar de utilizar una variable de entrada, en este ejemplo se ha asignado una constante (-44) a la entrada s1. El resultado (result) se almacena en los registros especiales de datos de DT90037 a DT90038. Las dos funciones E_MOVE copian los resultados a las dos variables number_matches y position_1match.

BODY
    WORKSPACE
        NETWORK_LIST_TYPE := NWTYPELD ;
        ACTIVE_NETWORK := 0 ;
    END_WORKSPACE
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 6 ;
        NETWORK_BODY
B(B_F,F97_DSRC!,Instance,8,0,15,6,,?DEN?Ds1?Ds2_Start?Ds3_End?AENO);
B(B_VARIN,,start,6,1,8,3,);
B(B_VARIN,,-44,6,2,8,4,);
B(B_VARIN,,data_table[0],6,3,8,5,);
B(B_VARIN,,data_table[3],6,4,8,6,);
L(1,0,1,6);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 5 ;
        NETWORK_BODY
B(B_F,E_MOVE!,Instance,8,1,14,5,,?DEN?D?AENO?C);
B(B_VAROUT,,number_matches,14,3,16,5,);
B(B_VARIN,,start,6,2,8,4,);
B(B_VARIN,,DT90037,6,3,8,5,);
L(1,0,1,5);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 5 ;
        NETWORK_BODY
B(B_F,E_MOVE!,Instance,8,1,14,5,,?DEN?D?AENO?C);
B(B_VAROUT,,position_1match,14,3,16,5,);
B(B_VARIN,,start,6,2,8,4,);
B(B_VARIN,,DT90038,6,3,8,5,);
L(1,0,1,5);
        END_NETWORK_BODY
    END_NET_WORK
    NET_WORK
        NETWORK_TYPE := NWTYPELD ;
        NETWORK_LABEL :=  ;
        NETWORK_TITLE :=  ;
        NETWORK_HEIGHT := 5 ;
        NETWORK_BODY
L(1,0,1,5);
        END_NETWORK_BODY
    END_NET_WORK
END_BODY
IF start then
    F97_DSRC( s1:= -44 ,
         s2_Start:= data_table[0] ,
         s3_End:= data_table[3] );
    number_matches:=DT90037;
    position1_match:=DT90038;
END_IF;