Error muy raro???

[Andres Hocevar]

Pasa lo siguiente, tengo 2 tablas en mysql divi y carg para abrir divi
uso el siguiente codigo en una de ellas me da error de que el dataset es
read only y la otra no????
el sistema tiene como 80 tablas de las cuales unas me da ese error y
otras edita sin problema????
ASI ABRO DIVI
WITH OBJECT ::oSQLQuery1 := TSQLQuery():New( Self )
:oDataSource := ::oMySQLDataSource1
:cProcess := "GENERAL"
:nLockType := adLockOptimistic
:cSelect := "SELECT * FROM divi ORDER BY division"
:OnCreate := "SQLQuery1Create"
:Create()
END
ASI ABRO CARG
WITH OBJECT ::oSQLQuery1 := TSQLQuery():New( Self )
:oDataSource := ::oMySQLDataSource1
:cProcess := "GENERAL"
:nLockType := adLockOptimistic
:cSelect := "SELECT * FROM carg ORDER BY cargo"
:OnCreate := "SQLQuery1Create"
:Create()
END
Esta es la funcion que uso al crear el dataset en todos los casos,
METHOD SQLQuery1Create( oSender ) CLASS xxxx
oSender:oDataSource := oCon
oSender:lOpen := .t.
RETURN Nil
oCon es la variable donde al inicio de la aplicacion coloco un
oMySQLDataSource, que es el mismo para toda la aplicacion, por lo tanto
descartado como fuente del problema, entonces no tengo ni idea de que
pueda ser, lo note cuando instale la version 1.8 regrese a la 1.7 y nada
sigue malo????

[Andres Hocevar]

Gracias José F. Giménez
eso era lo que estaba mal
> Andrés,
>
>> Pasa lo siguiente, tengo 2 tablas en mysql divi y carg para abrir divi
>> uso el siguiente codigo en una de ellas me da error de que el dataset
>> es read only y la otra no????
>
> Para que una tabla sea editable, tiene que tener necesariamente una
> clave primaria. De lo contrario, la tabla se abrirá en modo read-only.
>

[jfgimenez]

Andrés,
> Pasa lo siguiente, tengo 2 tablas en mysql divi y carg para abrir divi uso
> el siguiente codigo en una de ellas me da error de que el dataset es read
> only y la otra no????
Para que una tabla sea editable, tiene que tener necesariamente una clave
primaria. De lo contrario, la tabla se abrirá en modo read-only.
--
Un saludo,
José F. Giménez
http://www.xailer.com
http://www.xailer.info

[jose.luis]

Andrés,
Como norma deberías añadir los campos que pertenezcan a la clave primaria de
la tabla. Así podrás tener siempre disponible la posibilidad de editar el
registro.
Saludos,
José Luis Capel
"Andres Hocevar" <datasis@cantv.net> escribió en el mensaje
news:4759cd90$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Pasa lo siguiente, tengo 2 tablas en mysql divi y carg para abrir divi uso
> el siguiente codigo en una de ellas me da error de que el dataset es read
> only y la otra no????
>
> el sistema tiene como 80 tablas de las cuales unas me da ese error y otras
> edita sin problema????
>
> ASI ABRO DIVI
>
> WITH OBJECT ::oSQLQuery1 := TSQLQuery():New( Self )
> :oDataSource := ::oMySQLDataSource1
> :cProcess := "GENERAL"
> :nLockType := adLockOptimistic
> :cSelect := "SELECT * FROM divi ORDER BY division"
> :OnCreate := "SQLQuery1Create"
> :Create()
> END
>
> ASI ABRO CARG
>
> WITH OBJECT ::oSQLQuery1 := TSQLQuery():New( Self )
> :oDataSource := ::oMySQLDataSource1
> :cProcess := "GENERAL"
> :nLockType := adLockOptimistic
> :cSelect := "SELECT * FROM carg ORDER BY cargo"
> :OnCreate := "SQLQuery1Create"
> :Create()
> END
>
> Esta es la funcion que uso al crear el dataset en todos los casos,
>
> METHOD SQLQuery1Create( oSender ) CLASS xxxx
> oSender:oDataSource := oCon
> oSender:lOpen := .t.
> RETURN Nil
>
> oCon es la variable donde al inicio de la aplicacion coloco un
> oMySQLDataSource, que es el mismo para toda la aplicacion, por lo tanto
> descartado como fuente del problema, entonces no tengo ni idea de que
> pueda ser, lo note cuando instale la version 1.8 regrese a la 1.7 y nada
> sigue malo????
>