cmsoft wrote:Hola Sebastian:
Posiblemente no tengas definidos campos no null en la tabla, y con esa instruccion dejas todos los campos en blancos e intentas grabar. Tal vez venga por ahí el error.
base := oQry:GetBlankRow()
base:condition := "new"
oQry:oRow := base
oQry:Save()
cmsoft wrote:No se si es la forma mas adecuada, pero funciona.
- Code: Select all Expand view
base := oQry:GetBlankRow()
base:condition := "new"
oQry:oRow := base
oQry:Save()
Marcelo Roggeri wrote:Hola Sebastian podrias poner la cadena de creación de la estructura de la tabla? tal cual la creaste si es que lo hiciste por código.
Saludos
Marcelo
Sebastián Almirón wrote:Ahora la pregunta del millon: como hago para que no se añada a la cadena WHERE de la query de save(), cuando un campo numerico tiene el valor NULL en un registro, he probado a modificar el metodo BuildDataWhere(), pero no se como capturar si el valor de la variable uValue es NULL (con NIL no funciona).
Hector Pedro Lerda wrote:is null en tu ejemplo sería
UPDATE ps_product_shop SET id_category_default=6 WHERE id_product = 3 AND id_category_default is null
cWhere += aField[ MYSQL_FS_NAME ] + If( uValue == NIL .OR. ( HB_IsString( uValue ) .AND. Empty( uValue ) ) .OR. ( HB_IsDate( uValue ) .AND. Empty( uValue ) ), " IS ", " = " ) + ;
ClipValue2Sql( uValue, , , .F. ) + " AND "
Daniel Garcia-Gil wrote:Sebestian
en el codigo de TDolphin esta creada la validacion sin es NIL coloca "IS NULL"
aqui coloco la version del codigo que hace esa validacion en el metodo BuildDataWhere
tomado de TDolpqry.prg
linea 461 de la version actual de TDolphin
- Code: Select all Expand view
cWhere += aField[ MYSQL_FS_NAME ] + If( uValue == NIL .OR. ( HB_IsString( uValue ) .AND. Empty( uValue ) ) .OR. ( HB_IsDate( uValue ) .AND. Empty( uValue ) ), " IS ", " = " ) + ;
ClipValue2Sql( uValue, , , .F. ) + " AND "
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: No registered users and 80 guests