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

- que no se cargue la compra sino corresponde

Browse Source
This commit is contained in:
rrene
2021-09-17 08:05:15 -07:00
parent fe5c5c64c1
commit 2e2a03c651
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Contabilidad/RegPrePolizaS.aspx.vb
View File

@@ -668,7 +668,7 @@ Partial Class ContabilidadC_RegPrePolizaS
End Sub End Sub
Private Sub CargaCompras(CveProveedor As Integer) Private Sub CargaCompras(CveProveedor As Integer)
If Not DdlConceptosContables.SelectedValue.ToEntero.Contiene(21) Then If DdlConceptosContables.SelectedValue.ToEntero.Contiene(5, 17, 305, 308, 310, 311, 312) Then
Dim ObjCompras As New ClsCompras Dim ObjCompras As New ClsCompras
DdlCompras.ClearSelection() DdlCompras.ClearSelection()
@@ -1265,7 +1265,7 @@ Partial Class ContabilidadC_RegPrePolizaS
DdlProveedoresE.Items.Insert(0, New ListItem(" - ", "-1")) DdlProveedoresE.Items.Insert(0, New ListItem(" - ", "-1"))
End Sub End Sub
Private Sub CargaComprasE(CveProveedor As Integer) Private Sub CargaComprasE(CveProveedor As Integer)
If Not DdlConceptosContablesE.SelectedValue.ToEntero.Contiene(21) Then If DdlConceptosContables.SelectedValue.ToEntero.Contiene(5, 17, 305, 308, 310, 311, 312) Then
Dim ObjCompras As New ClsCompras Dim ObjCompras As New ClsCompras
DdlComprasE.ClearSelection() DdlComprasE.ClearSelection()