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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
rrene
2023-03-15 14:34:36 -07:00
parent 5df21b02f2 a1dbcc0c8a
commit 9ee815493c
18 changed files with 192 additions and 129 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Inventarios/EntradasSalidas.aspx.vb
View File

@@ -1910,6 +1910,9 @@ Partial Class Inventarios_EntradasSalidas
If UsuarioActual.Empresa.Funcionalidad(342).ToEntero > 0 Then
IdCtaContableOtro = UsuarioActual.Empresa.Funcionalidad(342).ToEntero
End If
Case 34
CveConceptoContable = 51
EsContabilizable = True
Case 13, 29
CveConceptoContable = 69
TipoMovtoOtro = True
@@ -1930,7 +1933,7 @@ Partial Class Inventarios_EntradasSalidas
Else
'Dim Total As Decimal = 0
If CveConceptoContable.Contiene(181, 78) Then
If CveConceptoContable.Contiene(181, 78, 51) Then
Dim Dt As DataTable = ObjInventario.DtResultados.FiltraParametros("", "", {"CveClasificacion"}).Copy
'Dim IdCuentaGasto As Integer = 0
For Each Dr As DataRow In Dt.Rows

2
Inventarios/EntregaAlmacen.aspx.vb
View File

@@ -3137,7 +3137,7 @@ Partial Class Inventarios_EntregaAlmacen
If Not ErrorMovInv AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then
If ObjConta.ValorPolizaDescuadre > 0 Then
GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
GuardaLogAD($"Inventario/EntregaAlmacen | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
ErrorMovInv = True
End If
End If