Progress - Identificar renglones marcados de un Browse

   
Vista:

Identificar renglones marcados de un Browse

Publicado por Siliceo (5 intervenciones) el 07/01/2011 18:59:38
Necesito detectar los renglones marcados de un browse para actualizar unos datos.

alguien me podria ayudar.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Identificar renglones marcados de un Browse

Publicado por DparteD (129 intervenciones) el 10/01/2011 20:55:05
Utiliza el Metodo send-records

Si en un boton en al misma pantalla del Browse escribrs este codigo en el evento Click veras el resultado:

/********************************************/
DEFINE VARIABLE row-char AS CHARACTER NO-UNDO.
RUN send-records IN h_browse (INPUT "Archivo", OUTPUT row-char).

FIND Archivo where rowid(Archivo) = to-rowid(rowid-char) NO_LOCK NO-RROR.
if available Archivo then do:
Message " el valor del campo es: " archivo.campo
view-as alert-box info..
end.

Sustituye Archivo por el archivo de base de datos que visualizas en el Browser

y campo por un campo de dicho archivo que se este visualizando en el Browser

h_browse por el nombre del objeto browse.

Hacienco click en el boton que tiene el cogigo que te explico el mensaje tomara el valor del registro marcado en el Browser.

Suerte.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Identificar renglones marcados de un Browse

Publicado por DparteD (129 intervenciones) el 11/01/2011 12:05:45
Hay un pequeño error en el codigo que expuse que puede inducir a confusion.
donde dice:
FIND Archivo where rowid(Archivo) = to-rowid(rowid-char) NO_LOCK NO-RROR.
debe decir :
FIND Archivo where rowid(Archivo) = to-rowid(row-char) NO_LOCK NO-RROR.
/********************************************/
DEFINE VARIABLE row-char AS CHARACTER NO-UNDO.
RUN send-records IN h_browse (INPUT "Archivo", OUTPUT row-char).

FIND Archivo where rowid(Archivo) = to-rowid(row-char) NO_LOCK NO-RROR.
if available Archivo then do:
Message " el valor del campo es: " archivo.campo
view-as alert-box info..
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Identificar renglones marcados de un Browse

Publicado por Jesús (6 intervenciones) el 04/09/2011 06:50:50
Es un Smart o un Borwse normal?.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Identificar renglones marcados de un Browse

Publicado por Rayne Flores raynitoflores@hotmail.com (7 intervenciones) el 05/11/2012 18:22:19
Debes Buscar el Trigger del Evento que deseas para ejecutar la busqueda, por ejemplo a mi me sirve cuando le doy doble-click a una celda del browse y me queda de la siguiente manera:

on left-mouse-dblclick:
DO:
FIND CURRENT tabla NO-LOCK NO-ERROR.
IF AVAILABLE tabla THEN DO:
/*y aqui asignas lo que quieras, por ejemplo:*/
assign
tabla .campo = 1.
END.
END.

espero te sirva
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar