si emite carta porte, validar el producto
This commit is contained in:
@@ -675,7 +675,7 @@ Partial Class Inventarios_TraspasoAlmacen
|
|||||||
Dim DrPS As DataRow = GlobalDTPS(UsuarioActual.CveEmpresa, CvePS:=CvePS).FiltroPrimero("")
|
Dim DrPS As DataRow = GlobalDTPS(UsuarioActual.CveEmpresa, CvePS:=CvePS).FiltroPrimero("")
|
||||||
|
|
||||||
|
|
||||||
If ChkEmitirTimbrado.Checked Then
|
If ChkEmitirTimbrado.Checked AndAlso ChkEmitirCartaPorte.Checked Then
|
||||||
If Not ValidaPSSAT(DrPS) Then
|
If Not ValidaPSSAT(DrPS) Then
|
||||||
Exit Sub
|
Exit Sub
|
||||||
End If
|
End If
|
||||||
|
|||||||
Reference in New Issue
Block a user