topic-26240

Posts: 132

Joined: Sun Oct 23, 2005 04:09 PM

xBrowse y ADO
Posted: Sat May 04, 2013 04:53 PM

Hola a todos:
Estoy usando un browse con setado, el problema es que navego en el y al editar el registro simpre me abre el primero, no en el que estoy posicionado con el puntero. alguna pista

Code (fw): Select all Collapse

oBrwDet:SetAdO( oRsDetOrdSrv, .t., .t., { "contenedor", "tipo" } )

oBrwDet:CreateFromResource (117)
oDlg:oClient := oBrwDet
oBrwDet:bLDblClick := { || msginfo( oRsDetOrdSrv:absoluteposition()) }

en el dobleclick simpre muestra 1

saludos

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: xBrowse y ADO
Posted: Sat May 04, 2013 05:14 PM

Miguel:

En el msginfo pídele que te muestre el contenido de algún campo de la tabla, a ver que te muestra?
o con esto otro MsgInfo(oRsTuRecordSet:BookMark())

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

Miguel Salas

Posts: 132

Joined: Sun Oct 23, 2005 04:09 PM

Re: xBrowse y ADO
Posted: Sat May 04, 2013 06:43 PM

Gracias por responder Armando.

el bookmark muestra 1.0000 en todos los registros

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: xBrowse y ADO
Posted: Sat May 04, 2013 06:48 PM

Miguel:

Y el Msginfo con algún campo de tu tabla?
El browse te lo muestra bien?

Ojala pudieras mostrar la parte del código donde creas el recordset

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

Miguel Salas

Posts: 132

Joined: Sun Oct 23, 2005 04:09 PM

Re: xBrowse y ADO
Posted: Sat May 04, 2013 06:49 PM

Te comento que antes de esto tenía definido el browse con las columnas que necesito únicamente, pero me mostraba el primer registro en todos los casos es decir como si estuviera repetido el registro tantas veces como registros había en el detalle. Ahora que lo puse "abierto" con todas las columnas ya me aparecen los datos correctos, únicamente al querer editarlo sube siempre el primero.

saludos y gracias

Miguel Salas

Posts: 132

Joined: Sun Oct 23, 2005 04:09 PM

Re: xBrowse y ADO
Posted: Sat May 04, 2013 06:54 PM

Code (fw): Select all Collapse

      cSQL := "SELECT * FROM  DETORDSRV  WHERE  ordensrv = " + cClave2


          oRsDetOrdSrv := TOleAuto():New( "ADODB.Recordset" )
          oRsDetOrdSrv:CursorType := 1 // opendkeyset
          oRsDetOrdSrv:CursorLocation := 3 // local cache
          oRsDetOrdSrv:LockType := 3 // lockoportunistic

          TRY
           oRsDetOrdSrv:Open(cSQL,oApp:oCon )
          CATCH oErr
           MsgInfo( "Error al abrir la tabla DEtOrdSrv 2" )
           ShowError(oErr)
           RETURN(.F.)
          END TRY

Este es el codigo donde lo creo, curiosamente tengo la tabla maestra en un browse antes y alli no hay problema...

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Re: xBrowse y ADO
Posted: Sat May 04, 2013 07:02 PM

Miguel,

Has comprobado el numero de registros del recordset ?

MsgInfo( oRsDetOrdSrv:RecordCount() )

regards, saludos

Antonio Linares
www.fivetechsoft.com

Miguel Salas

Posts: 132

Joined: Sun Oct 23, 2005 04:09 PM

Re: xBrowse y ADO
Posted: Sat May 04, 2013 07:10 PM

Hola Antonio:
si, de hecho muestra todos correctamente si recorro el recordset , no se si tenga que indicarle algo al editar?

saludos gracias

Antonio Linares

Posts: 44162

Joined: Thu Oct 06, 2005 05:47 PM

Re: xBrowse y ADO
Posted: Sat May 04, 2013 07:22 PM

Prueba esto a ver si sigue mostrando 1:

oBrwDet:bLDblClick := { || msginfo( oBrwDet:oRs:absoluteposition()) }

regards, saludos

Antonio Linares
www.fivetechsoft.com

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: xBrowse y ADO
Posted: Sun May 05, 2013 01:03 AM

Miguel:

Otra sugerencia, cambia estas líneas

Code (fw): Select all Collapse

oRsEmp:CursorLocation   := adUseClient
oRsEmp:LockType         := adLockOptimistic
oRsEmp:CursorType       := adOpenDynamic

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

Miguel Salas

Posts: 132

Joined: Sun Oct 23, 2005 04:09 PM

Re: xBrowse y ADO
Posted: Fri May 10, 2013 05:50 PM

Funcionó con lo de Antonio.
lo que no me queda claro es porque en el primer browse si funciona y en el otro ya no. Voy empezando en esto del recordset.

muchas gracias saludos

Armando

Posts: 3358

Joined: Fri Oct 07, 2005 08:20 PM

Re: xBrowse y ADO
Posted: Sat May 11, 2013 04:09 PM

Miguel:

Tienes alguna dirección de correo?

Saludos

SOI, s.a. de c.v.
estbucarm@gmail.com
http://www.soisa.mex.tl/
http://sqlcmd.blogspot.com/
Tel. (722) 174 44 45
Carpe diem quam minimum credula postero

FiveTech Support Forums

Continue the discussion