This commit is contained in:
rakcsle
2022-03-15 21:15:07 -07:00
15 changed files with 156 additions and 41 deletions

View File

@@ -7480,8 +7480,8 @@ Partial Class PV
Dim DrPS As DataRow = GlobalDTPS(UsuarioActual.CveEmpresa, CvePS:=CvePS).FiltroPrimero("")
If DrPS IsNot Nothing Then
'SOLO DEBE AGREGAR POLIZA VIRTUAL SI ES ACUMULADOR
If Not DrPS("CveClasificacion").ToString().ToEntero().Contiene(20520, 20522, 20513, 20511, 20521, 20512, 20514, 20229) Then
'SOLO DEBE AGREGAR POLIZA VIRTUAL SI ES ACUMULADOR, y que no sea marca "LTH ESPECIALES"
If Not (DrPS("CveClasificacion").ToString().ToEntero().Contiene(20520, 20522, 20513, 20511, 20521, 20512, 20514, 20229) AndAlso DrPS("CveMarca").ToString <> "1050") Then
Return Retorno
End If
Else