Found
Found() --> lRetConsulta resultado de última búsqueda.
Descripción general
Found informa resultado de última búsqueda sin consultar nuevamente ni probar cursor válido para cualquier lectura posterior. Ejemplo requiere orden activa ED_COD de diez posiciones y busca A completada al tamaño. Found se consulta inmediatamente en mismo contexto sin búsqueda intermedia. No busca tabla estándar ni garantiza clave existente. EDTRB es alias propio de prueba abierto; ED_COD, si se utiliza, es campo carácter de tamaño 10 del esquema didáctico. (TOTVS, s.f., ref. 1)
Sintaxis
Found() --> lRetRetorno
Lógico de éxito de última búsqueda.
Ejemplo comentado
#Include "Protheus.ch"
User Function Ed390()
Local lBusqueda
Local lUltima
// EDTRB propia; orden activa ED_COD de tamano 10.
If Select("EDTRB") > 0
lBusqueda := EDTRB->(DBSeek(PadR("A",10), .F.))
lUltima := EDTRB->(Found())
ConOut(cValToChar(lBusqueda))
ConOut(cValToChar(lUltima))
EndIf
Return NilDos indicadores de búsqueda realizada según datos; cambia posición del alias. En revisión: ejemplo editorial no compilado ni ejecutado en Protheus. Comprobar includes, release, RDD y contexto antes de probar.
- Usar solo tabla propia con estructura conocida. Calificar alias, comprobar posición y administrar contexto según contrato.
- En revisión: ejemplo editorial no compilado ni ejecutado en Protheus. Comprobar includes, release, RDD y contexto antes de probar.
Comentarios
Todavía no hay comentarios aprobados.
Inicia sesión con Google o Microsoft para comentar.