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

-- al agrear poliza virtual, excluir marca lth especiales

Browse Source
This commit is contained in:
rrene
2022-03-15 17:59:25 -07:00
parent a27f08bf79
commit dcdaf8c422
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Ventas/PV.aspx.vb
View File

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