FiveTech Support Forums

Hola

antes usaba Listbox ya pase todo a TXBrowse pero me di cuenta que ya no me funciona el refresh como lo tenia en el listbox me pasa lo siguiente

habro un recurso donde pongo datos y despues de cerrar llama una funcion donde me guarda en la base de datos lo capturado y de ahi refrescar pero con TXBrowse no me funciona me tira un error y se cierra todo y si lo quito si me guarda todo bien pero no me refresca el TXBrowse

que estara mal mejor dicho que estare haciendo mal pongo abajo la funcion de guardar mis datos como lo tengo y tenia con el listbox espero me orienten

Gracias de antemano

Aida

STATIC FUNCTION GUARDAR(oBrw)

APPEND BLANK
AUTOS->NIVEL := 1
AUTOS->PAGCOM :=.F.
AUTOS->CATORSENA2 :=.F.

AUTOS->FICHA := cFicha
AUTOS->NOMBRE := cNombre
AUTOS->APELLIDO_P := cPaterno
AUTOS->APELLIDO_M := cMaterno
AUTOS->DIRECCION := cDireccion
AUTOS->COD_POSTAL := cCp
AUTOS->COLONIA := cCOLONIA
AUTOS->POBLACION := cCiudad
AUTOS->ESTADO := cEstado
AUTOS->TEL1 := cTelefona
AUTOS->TEL2 := cTelefonb
AUTOS->EMPRESA := cCentro

AUTOS->Vigencia1 := cVigencia1
AUTOS->Vigencia2 := cVigencia2
AUTOS->RENUEMES := xmes
AUTOS->RENUANO := xanno

AUTOS->Comp := cCompa

IF nOption = 1
AUTOS->Cobertura :="M"
ENDIF

IF nOption = 2
AUTOS->Cobertura :="T"
ENDIF

IF nOption = 3
AUTOS->Cobertura :="S"
ENDIF

IF nOption = 4
AUTOS->Cobertura :="A"
ENDIF

AUTOS->Clamarctip:= cClamt
AUTOS->Marca := cMarc
AUTOS->Tipo := cCtipo
AUTOS->Modelo := Cmodelo

cAire :=AUTOS->conaire
cEqf :=AUTOS->equipfabri
cAutero :=AUTOS->AUSTERO
cAutomatico :=AUTOS->automatico
cSina :=AUTOS->sinaire
cTipico :=AUTOS->tipico
cStd :=AUTOS->STD

AUTOS->Ocupantes := cOcupa
AUTOS->Num_serie := cNum_serie
AUTOS->Num_motor := cNum_motor
AUTOS->Placas := cPlacas

IF cOption = 1
AUTOS->COVE :="A"
ENDIF

IF cOption = 2
AUTOS->COVE :="L"
ENDIF

IF cOption = 3
AUTOS->COVE :="RC"
ENDIF

AUTOS->COMENTARIO := mComments
AUTOS->OCUPACION := cOcupacion
AUTOS->DEPARTA := cDeparta
AUTOS->DEPACLAVE := cDepaclave
AUTOS->UNIDAD := cUnidad
AUTOS->UNICLAVE := cUniclave
AUTOS->UBICADEP := cUbicadep
commit

oBrw:Refresh()

RETURN Nil