Mensaje de error al guardar con TDataRow
Posted: Tue Jun 15, 2021 12:39 pm
Hola Gente!
Tengo el siguiente, sencillo Query, de una Tabla con 29 campos, la mayoría de tipo numérico
Donde el campo id_FacState es de tipo numérico y solo registra los valores 1 (_DOCCOMPRAS ) Y 2 (_DOCPAGOS)
De manera que al agregar, un registro (documento factura) hago:
En esta acción de Agregar, el proceso es correcto.
En el segundo paso y al pasar este proceso al estado "pagado"; se procede a editar un registro, mediante:
En este acto; se modifica solo dos campos del registro editado:
Y es aquí donde emerge la siguiente ventana; y que en el paso siguiente, NO pasa por el CATCH y realiza (guarda) la modificación de los campos precitados.
Cual podría ser es el motivo del mensaje emergente?
Tengo el siguiente, sencillo Query, de una Tabla con 29 campos, la mayoría de tipo numérico
- Code: Select all Expand view
- local cSQL := "SELECT COMP.* FROM cabcompras AS COMP " + ;
"WHERE id_FacState="+FW_ValtoSQL( _DOCCOMPRAS ) +" "+ ;
"ORDER BY FeCompra DESC"
Donde el campo id_FacState es de tipo numérico y solo registra los valores 1 (_DOCCOMPRAS ) Y 2 (_DOCPAGOS)
De manera que al agregar, un registro (documento factura) hago:
- Code: Select all Expand view
- oDataFCompra:= TDataRow():New( ::oQryFCompra, TRUE )
En esta acción de Agregar, el proceso es correcto.
En el segundo paso y al pasar este proceso al estado "pagado"; se procede a editar un registro, mediante:
- Code: Select all Expand view
- oDataPagos := TDataRow():New( ::oCompras:oQryFCompra, FALSE )
En este acto; se modifica solo dos campos del registro editado:
- Code: Select all Expand view
- oDataPagos:Detalle := "Factura PAGADA a: " +Rtrim( cProveedor )
oDataPagos:id_FacState:= _DOCPAGOS
... luego, en un TRY CATCH se procede a Guardar, mediante:
oDataPagos:Save()
Y es aquí donde emerge la siguiente ventana; y que en el paso siguiente, NO pasa por el CATCH y realiza (guarda) la modificación de los campos precitados.
Cual podría ser es el motivo del mensaje emergente?