validacion doc electronica

This commit is contained in:
2021-09-24 12:19:35 -07:00
parent c8f9433c8b
commit 5f09b0a2a9

View File

@@ -1036,6 +1036,7 @@ Partial Class Inventarios_EntregaAlmacen
End Sub End Sub
Private Sub CargaDocumentos(tCveVenta As Integer) Private Sub CargaDocumentos(tCveVenta As Integer)
If tCveVenta > 0 Then
Dim objInv As New ClsEdocumentacion Dim objInv As New ClsEdocumentacion
If objInv.DocumentacionElectronicaGet(-1, -1, -1, UsuarioActual.CveEmpresa, -1, tCveVenta) Then If objInv.DocumentacionElectronicaGet(-1, -1, -1, UsuarioActual.CveEmpresa, -1, tCveVenta) Then
@@ -1043,6 +1044,8 @@ Partial Class Inventarios_EntregaAlmacen
End If End If
objInv.Dispose() objInv.Dispose()
GvDocs.DataBind() GvDocs.DataBind()
End If
End Sub End Sub