AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

tipocontabilidad

Browse Source
This commit is contained in:
rrene
2022-11-09 13:43:34 -07:00
parent b8274a1ea3
commit 59bf02d447
1 changed files with 2 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Contabilidad/PlantillasPolizasDetalle.aspx.vb
View File

@@ -61,7 +61,7 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
ObjPlantillaPolizasTipo.Dispose() ObjPlantillaPolizasTipo.Dispose()
Dim dt As DataTable = Nothing Dim dt As DataTable = Nothing
If UsuarioActual.Empresa.UsaContabilidad Then If UsuarioActual.Empresa.TipoContabilidad = 2 Then
Dim Conta As New ClsContPAQi(UsuarioActual.Empresa) Dim Conta As New ClsContPAQi(UsuarioActual.Empresa)
If Conta.GetCuentas(-1, "-1", 1) Then If Conta.GetCuentas(-1, "-1", 1) Then
@@ -257,13 +257,12 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
DdlPorcentajeImpuesto.SelectedValue.ToDecimal, CveCuenta:=DdlCuentas.SelectedValue.ToEntero) Then DdlPorcentajeImpuesto.SelectedValue.ToDecimal, CveCuenta:=DdlCuentas.SelectedValue.ToEntero) Then
TxtOrden.Text = "" TxtOrden.Text = ""
If Not ChkSeguirAgregando.Checked Then If Not ChkSeguirAgregando.Checked Then
updatatos()
Alert("El nuevo Registro se guardó correctamente.", TipoMensaje.MsgInformacion) Alert("El nuevo Registro se guardó correctamente.", TipoMensaje.MsgInformacion)
Else Else
RegistraScript(String.Format("$('#{0}').modal();", "divAgregarSucursal")) RegistraScript(String.Format("$('#{0}').modal();", "divAgregarSucursal"))
UpModal.Update() UpModal.Update()
End If End If
updatatos()
Else Else
ErrorDetalle = True ErrorDetalle = True
End If End If