In order for this site to work correctly we need to store a small file (called a cookie) on your computer. Most every site in the world does this, however since the 25th of May 2011, by law we have to get your permission first. Please abandon the forum if you disagree.

Para que este foro funcione correctamente es necesario guardar un pequeño fichero (llamado cookie) en su ordenador. La mayoría de los sitios de Internet lo hacen, no obstante desde el 25 de Marzo de 2011 y por ley, necesitamos de su permiso con antelación. Abandone este foro si no está conforme.

Insertar fila manualmente en TDDBBrowse

Foro público de Xailer en español
Responder
Karl Svensson
Mensajes: 81
Registrado: Mar Oct 18, 2005 7:20 pm

Insertar fila manualmente en TDDBBrowse

Mensaje por Karl Svensson »

Hola!
Estoy empezando en Xailer y me encuentro con un pequeño problema que no se
como solucionar :(
Tengo un TDDBBrowse donde estoy creando una fila manualmente ( los datos
provienen de una consulta ) , adjunto el código :
sql="select pdes,pfor,pcta,pdoh from ctapre where pcod='"+valor+"'"
dades:=AppData:oMySQL:QueryArray(sql)
FOR i:=1 TO len(dades)
::oDetalle:Insert()
::oDetalle:aCols[1]:oGridEdit:value:=dades[1]
::oDetalle:aCols[2]:oGridEdit:value:=dades[3]
SWITCH dades[4]
CASE "D"
::oDetalle:aCols[3]:oGridEdit:value:=000
EXIT
CASE "H"
::oDetalle:aCols[4]:oGridEdit:value:=000
EXIT
END SWITCH
::oDetalle:aCols[7]:oGridEdit:value:=dTos(date())
::oDetalle:Update()
::oDetalle:Refresh()
NEXT
Para cada fila de la base de datos va insertando una fila nueva , el
problema es que la fila no se guarda ( no avanza ) y me hace todas las
operaciones sobre la misma fila , que método debo usar para guardar la fila
?
Gracias!
Avatar de Usuario
Carlos Ortiz
Mensajes: 873
Registrado: Mié Jul 01, 2009 5:44 pm
Ubicación: Argentina - Córdoba
Contactar:

Insertar fila manualmente en TDDBBrowse

Mensaje por Carlos Ortiz »

Probá con ::oDbBrowse1:Append() o con ::oDetalle:AddNew()
"Karl Svensson" <karl@bcnartis.com> escribió en el mensaje
news:4cb2f465$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Hola!
>
> Estoy empezando en Xailer y me encuentro con un pequeño problema que no se
> como solucionar :(
>
> Tengo un TDDBBrowse donde estoy creando una fila manualmente ( los datos
> provienen de una consulta ) , adjunto el código :
>
>
> sql="select pdes,pfor,pcta,pdoh from ctapre where pcod='"+valor+"'"
> dades:=AppData:oMySQL:QueryArray(sql)
>
> FOR i:=1 TO len(dades)
> ::oDetalle:Insert()
>
> ::oDetalle:aCols[1]:oGridEdit:value:=dades[1]
> ::oDetalle:aCols[2]:oGridEdit:value:=dades[3]
> SWITCH dades[4]
> CASE "D"
> ::oDetalle:aCols[3]:oGridEdit:value:=000
> EXIT
> CASE "H"
> ::oDetalle:aCols[4]:oGridEdit:value:=000
> EXIT
> END SWITCH
> ::oDetalle:aCols[7]:oGridEdit:value:=dTos(date())
>
> ::oDetalle:Update()
> ::oDetalle:Refresh()
>
> NEXT
>
> Para cada fila de la base de datos va insertando una fila nueva , el
> problema es que la fila no se guarda ( no avanza ) y me hace todas las
> operaciones sobre la misma fila , que método debo usar para guardar la
> fila ?
>
> Gracias!
>
Responder