poder cambiar el codigo de la cuenta

This commit is contained in:
HECTOR RODRIGUEZ
2021-05-04 17:53:49 -07:00
parent 17cf5c8beb
commit 4b6695e7a3
2 changed files with 5 additions and 3 deletions

View File

@@ -304,7 +304,7 @@ Partial Class Contabilidad2_CatCuentas
End If
TxtCuenta.Enabled = True
Guardar.Visible = True
updatos.Visible = True
updatos.Update()
@@ -330,7 +330,7 @@ Partial Class Contabilidad2_CatCuentas
If ObjConta.UpdateCuenta(IDSelected.ToEntero, Tnombre.Text, DTcuenta.SelectedValue.ToString, DcuentaMayor.SelectedValue.ToString.ToEntero, DdlMoneda.SelectedValue.ToEntero,
TxtDigAgrup.Text.ToString.ToEntero, DdlAgrupadorSAT.SelectedValue.ToEntero, TxtNomIngles.Text.ToString, CveConceptoAdmin:=CveConceptoAdmin,
CveProveedor:=CveProveedor, CveCliente:=CveCliente, CveClasificacion:=CveClasificacion, PorcentajeImpuesto:=PorcentajeImpuesto,
CveBancoCuenta:=CveBancoCuenta, CveAlmacen:=CveAlmacen) Then
CveBancoCuenta:=CveBancoCuenta, CveAlmacen:=CveAlmacen, Codigo:=TxtCuenta.Text.Replace("-", "")) Then
If UsuarioActual.Empresa.TipoContabilidad = 2 Then
Dim ObjContaEmpresa As New ClsContPAQi(UsuarioActual.Empresa)