Xailer & OZ Software

Tengo un verdadero problema con los campos numéricos
Abro un objeto tSqlTable con AdoDatasource
Si creo un registro con este código , cada vez que defino un campo numerico
con valor 0 , graba un NULL en el campo
Al Leer el campo más tarde , el resultado que me devuelve es NULL que para
xailer es de tipo caracter , es decir no puedo usarlo para realizar
operaciones .
¿Pueden hacer algo ?
Ejemplo de creación de un registro
with object ::oDbfTCit
:AddNew()
:CENTRO := ::nCentro
:CODPRO := ::nCodPro
:NUMERO := nCod
:NOMBRE := " "
:TIEMPO := 0 //Graba NULL y no cero
:Update()
end with

Juanjo:
Una idea al aire.... en el diseño de la tabla pusiste que ese campo como
NOT NULL ?
Saludos
Rene Flores
http://www.ciber-tec.com
José Garcí­a escribió:
> Tengo un verdadero problema con los campos numéricos
>
> Abro un objeto tSqlTable con AdoDatasource
>
> Si creo un registro con este código , cada vez que defino un campo numerico
> con valor 0 , graba un NULL en el campo
> Al Leer el campo más tarde , el resultado que me devuelve es NULL que para
> xailer es de tipo caracter , es decir no puedo usarlo para realizar
> operaciones .
>
> ¿Pueden hacer algo ?
>
>
> Ejemplo de creación de un registro
>
> with object ::oDbfTCit
> :AddNew()
> :CENTRO := ::nCentro
> :CODPRO := ::nCodPro
> :NUMERO := nCod
> :NOMBRE := " "
> :TIEMPO := 0 //Graba NULL y no cero
> :Update()
> end with
>
>
>

Cierto , asi lo resuelvo .Pero no sería lógico que el driver inicializara
los campos caracter con espacio y los numéricos con 0 ?
"Rene Flores" <"rflores <nospam> escribió en el mensaje
news:[email=463546bc@ozsrv2.ozlan.local...]463546bc@ozsrv2.ozlan.local...[/email]
> Juanjo:
>
> Una idea al aire.... en el diseño de la tabla pusiste que ese campo como
> NOT NULL ?
>
> Saludos
>
> Rene Flores
> http://www.ciber-tec.com
>
> José García escribió:
>> Tengo un verdadero problema con los campos numéricos
>>
>> Abro un objeto tSqlTable con AdoDatasource
>>
>> Si creo un registro con este código , cada vez que defino un campo
>> numerico con valor 0 , graba un NULL en el campo
>> Al Leer el campo más tarde , el resultado que me devuelve es NULL que
>> para xailer es de tipo caracter , es decir no puedo usarlo para realizar
>> operaciones .
>>
>> ¿Pueden hacer algo ?
>>
>>
>> Ejemplo de creación de un registro
>>
>> with object ::oDbfTCit
>> :AddNew()
>> :CENTRO := ::nCentro
>> :CODPRO := ::nCodPro
>> :NUMERO := nCod
>> :NOMBRE := " "
>> :TIEMPO := 0 //Graba NULL y no cero
>> :Update()
>> end with
>>
>>

Juan José,
Muéstranos el DDL de la tabla y la sentencia SQL que haces para crear el
dataset.
Saludos,
José Luis Capel
"Juan José García" <correo@jjgsoft.biz> escribió en el mensaje
news:4634ef08$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
> Tengo un verdadero problema con los campos numéricos
>
> Abro un objeto tSqlTable con AdoDatasource
>
> Si creo un registro con este código , cada vez que defino un campo
> numerico con valor 0 , graba un NULL en el campo
> Al Leer el campo más tarde , el resultado que me devuelve es NULL que para
> xailer es de tipo caracter , es decir no puedo usarlo para realizar
> operaciones .
>
> ¿Pueden hacer algo ?
>
>
> Ejemplo de creación de un registro
>
> with object ::oDbfTCit
> :AddNew()
> :CENTRO := ::nCentro
> :CODPRO := ::nCodPro
> :NUMERO := nCod
> :NOMBRE := " "
> :TIEMPO := 0 //Graba NULL y no cero
> :Update()
> end with
>
>
>

Lo siento que es el DDL ?
La tabal SQL es una tabla abierta desde el Ide como TSQLTABLE
unicamente en el metodo oncreate la conecto con el DataSource de Ado que
abro en el programa principal
El objeto es oDbfTCit (aunque se llame Dbf es un objeto tSqlTable)
que aparece así en el fichero xfm
WITH OBJECT ::oDbfTCit := TSQLTable():New( Self )
:cProcess := "GENERAL"
:nCursorType := adOpenDynamic //Cursor CLiente
:nLockType := adLockOptimistic //Bloqueo optimista
:cTableName := "TIPOCITA" //Relleno el nombre de la tabla
:OnCreate := "DbfTCitCreate" //Al crear conecte con conexion
Ado
:Create()
END
//Este es el método
METHOD DbfTCitCreate( oSender ) CLASS TTipCita
oSender:oDataSource := AppData:oAdoDbase
RETURN Nil
"José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
news:[email=4635973b@ozsrv2.ozlan.local...]4635973b@ozsrv2.ozlan.local...[/email]
> Juan José,
>
> Muéstranos el DDL de la tabla y la sentencia SQL que haces para crear el
> dataset.
>
> Saludos,
> José Luis Capel
>
>
>
> "Juan José García" <correo@jjgsoft.biz> escribió en el mensaje
> news:4634ef08$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>> Tengo un verdadero problema con los campos numéricos
>>
>> Abro un objeto tSqlTable con AdoDatasource
>>
>> Si creo un registro con este código , cada vez que defino un campo
>> numerico con valor 0 , graba un NULL en el campo
>> Al Leer el campo más tarde , el resultado que me devuelve es NULL que
>> para xailer es de tipo caracter , es decir no puedo usarlo para realizar
>> operaciones .
>>
>> ¿Pueden hacer algo ?
>>
>>
>> Ejemplo de creación de un registro
>>
>> with object ::oDbfTCit
>> :AddNew()
>> :CENTRO := ::nCentro
>> :CODPRO := ::nCodPro
>> :NUMERO := nCod
>> :NOMBRE := " "
>> :TIEMPO := 0 //Graba NULL y no cero
>> :Update()
>> end with
>>
>>
>>
>
>

Juan José,
> Lo siento que es el DDL ?
La estructura de tu tabla en lenguaje SQL. Si nos muestras esa estructura
podremos ver mejor lo que nos indicas.
Saludos,
José Luis Capel

Juanjo:
DDL = Data Definition Language,
Es como MySQL genera la tabla, en general es una instruccion del tipo
CREATE TABLE ..... que viene con la definicion de todos los campos de
tabla, y es ahi donde viene si el campo va como NULL o como NOT NULL
Saludos
Rene Flores
http://www.ciber-tec.com
José Garcí­a escribió:
> Lo siento que es el DDL ?
> La tabal SQL es una tabla abierta desde el Ide como TSQLTABLE
> unicamente en el metodo oncreate la conecto con el DataSource de Ado que
> abro en el programa principal
> El objeto es oDbfTCit (aunque se llame Dbf es un objeto tSqlTable)
> que aparece así­ en el fichero xfm
>
> WITH OBJECT ::oDbfTCit := TSQLTable():New( Self )
> :cProcess := "GENERAL"
> :nCursorType := adOpenDynamic //Cursor CLiente
> :nLockType := adLockOptimistic //Bloqueo optimista
> :cTableName := "TIPOCITA" //Relleno el nombre de la tabla
> :OnCreate := "DbfTCitCreate" //Al crear conecte con conexion
> Ado
> :Create()
> END
>
> //Este es el método
> METHOD DbfTCitCreate( oSender ) CLASS TTipCita
> oSender:oDataSource := AppData:oAdoDbase
> RETURN Nil
>
> "José Luis Capel - Aicom" <jose.luis@iaicom.com> escribió en el mensaje
> news:[email=4635973b@ozsrv2.ozlan.local...]4635973b@ozsrv2.ozlan.local...[/email]
>> Juan José,
>>
>> Muéstranos el DDL de la tabla y la sentencia SQL que haces para crear el
>> dataset.
>>
>> Saludos,
>> José Luis Capel
>>
>>
>>
>> "Juan José Garcí­a" <correo@jjgsoft.biz> escribió en el mensaje
>> news:4634ef08$[email=1@ozsrv2.ozlan.local...]1@ozsrv2.ozlan.local...[/email]
>>> Tengo un verdadero problema con los campos numéricos
>>>
>>> Abro un objeto tSqlTable con AdoDatasource
>>>
>>> Si creo un registro con este código , cada vez que defino un campo
>>> numerico con valor 0 , graba un NULL en el campo
>>> Al Leer el campo más tarde , el resultado que me devuelve es NULL que
>>> para xailer es de tipo caracter , es decir no puedo usarlo para realizar
>>> operaciones .
>>>
>>> ¿Pueden hacer algo ?
>>>
>>>
>>> Ejemplo de creación de un registro
>>>
>>> with object ::oDbfTCit
>>> :AddNew()
>>> :CENTRO := ::nCentro
>>> :CODPRO := ::nCodPro
>>> :NUMERO := nCod
>>> :NOMBRE := " "
>>> :TIEMPO := 0 //Graba NULL y no cero
>>> :Update()
>>> end with
>>>
>>>
>>>
>>
>
>