Error al leer dbf con FW_OpenRecordSet

Post Reply
jpcavagnaro

Error al leer dbf con FW_OpenRecordSet

Post by jpcavagnaro »

Hola gente, tengo una dbf generada con la estructura así:
dbcreate( ".\auditado", { { "id" , "n", 8, 0 }, ;
{ "Cliente " , "n", 6, 0 }, ;
{ "Nro_Audit" , "n", 6, 0 }, ;
{ "Numero " , "n", 6, 0 }, ;
{ "Lider " , "n", 6, 0 }, ;
{ "Norma " , "n", 8, 0 }, ;
{ "apartado " , "c", 10, 0 }, ;
{ "Fecha " , "d", 8, 0 }, ;
{ "Hora " , "c", 5, 0 }, ;
{ "Proceso " , "c", 10, 0 }, ;
{ "Resultado" , "m", 10, 0 }, ;
{ "Clasifica" , "c", 10, 0 }, ;
{ "Hecho " , "m", 10, 0 }, ;
{ "Evidencia" , "m", 10, 0 }, ;
{ "ReqNorma " , "m", 10, 0 }, ;
{ "Finalizada " , "D", 8, 0 } ;
} )
clos data

cuando intento leerla :
xdrive := curdrive() + ":\" + curdir()
oCnM := FW_OpenAdoConnection( { "FOXPRO", xdrive }, .T.)
cSQLa := "SELECT * FROM Auditado where cliente = 5 order by numero "
oRSa := FW_OpenRecordSet( ocnm, cSQLa ) ACA SE CIERRA EL PROGRAMA
? oRSa:RecordCount
xbrowse(orsa)
orsa:close()

Alguna idea de porque se cierra y no da ningún error?
User avatar
Jimmy
Posts: 1740
Joined: Thu Sep 05, 2019 5:32 am
Location: Hamburg, Germany
Has thanked: 2 times

Re: Error al leer dbf con FW_OpenRecordSet

Post by Jimmy »

hi,

have you try your CODE without "last line" ?
where is you ACTIVATE ?

---

XBROWSE does NOT work "modal"
it will pass that line and "close" Recordset

you need a DIALOG as Parent for XBROWSE
greeting,
Jimmy
jpcavagnaro

Re: Error al leer dbf con FW_OpenRecordSet

Post by jpcavagnaro »

Hola, gracias por responder.

Acabo de encontrar el problema, los campos memo se guardaban con nil eso afectaba, ahora si viene nil los dejo en blanco y funciono perfecto.
Post Reply