Xailer & OZ Software

Desde un DBBrowse llamo a un formulario para editar los datos de la linea.
Pues al confirmar en el formulario, retorna al DBBrowse y al ahacer el Update
me dice:
Se ha modificado la fila en curso despues de la edición, 'Update' cancelado[#0]En
procedimiento:PRESUDAT20:EditLin linea 103
Adjunto el Código ya que algo tengo que hacer mal porque en otros módulos
funciona OK. Una manita:
METHOD EditLin( oSender, nFlags, nPosX, nPosY ) CLASS PresuDat20
LOCAL oFrm
WITH OBJECT oFrm := PreDatLin():New( Self )
:cText := "Modificar Ficha Proveedor"
::oDbfDataSet1:Edit()
:ShowModal()
if :nModalResult == mrOK
::oDbfDataSet1:Update()
::oDBBrowse1:RefreshCurrent()
else
::oDbfDataSet1:Cancel()
endif
:END()
END WITH
RETURN Nil

Paco:
Yo revisarí­a la asignación de oDataSet del formulario PreDatLin()
normalmente para pasar los valores del formulario padre asociado a un
oDataSet en tu caso ::oDbfDataSet1 a los campos del formulario hijo se
emplea el Evento OnCreate de formulario hijo asociándolo con el padre
algo así­:
METHOD InicialCreate( oSender ) CLASS TFormAnillasNew
oSender:oDataSet := ::oParent:oDataSet
RETURN Nil
Este evento es asociado a cada TDbEdit.
José Ramón Castro.
Paco V escribió:
> Desde un DBBrowse llamo a un formulario para editar los datos de la linea.
> Pues al confirmar en el formulario, retorna al DBBrowse y al ahacer el Update
> me dice:
> Se ha modificado la fila en curso despues de la edición, 'Update' cancelado[#0]En
> procedimiento:PRESUDAT20:EditLin linea 103
>
> Adjunto el Código ya que algo tengo que hacer mal porque en otros módulos
> funciona OK. Una manita:
>
> METHOD EditLin( oSender, nFlags, nPosX, nPosY ) CLASS PresuDat20
> LOCAL oFrm
>
> WITH OBJECT oFrm := PreDatLin():New( Self )
> :cText := "Modificar Ficha Proveedor"
> ::oDbfDataSet1:Edit()
> :ShowModal()
> if :nModalResult == mrOK
> ::oDbfDataSet1:Update()
> ::oDBBrowse1:RefreshCurrent()
> else
> ::oDbfDataSet1:Cancel()
> endif
> :END()
> END WITH
> RETURN Nil
>