Cambio GlobalDTPSSimplificado
This commit is contained in:
@@ -3654,7 +3654,7 @@ Partial Class Ventas
|
|||||||
|
|
||||||
'VALIDA EXISTENCIAS DE ALMACÉN
|
'VALIDA EXISTENCIAS DE ALMACÉN
|
||||||
'Dim DrPS = GlobalDTProductosServicios(CveEmpresa:=UsuarioActual.CveEmpresa, CvePS:=Row.DataKey("CvePS").ToEntero()).FiltroPrimero("")
|
'Dim DrPS = GlobalDTProductosServicios(CveEmpresa:=UsuarioActual.CveEmpresa, CvePS:=Row.DataKey("CvePS").ToEntero()).FiltroPrimero("")
|
||||||
Dim DrPS = GlobalDTPS(CveEmpresa:=UsuarioActual.CveEmpresa, CvePS:=Row.DataKey("CvePS").ToEntero()).FiltroPrimero("")
|
Dim DrPS = GlobalDTPSSimplificado(CveEmpresa:=UsuarioActual.CveEmpresa, CvePS:=Row.DataKey("CvePS").ToEntero()).FiltroPrimero("")
|
||||||
|
|
||||||
If DrPS IsNot Nothing Then
|
If DrPS IsNot Nothing Then
|
||||||
Dim CveTipoPS As Integer = DrPS("CveTipoPS").ToString().ToEntero()
|
Dim CveTipoPS As Integer = DrPS("CveTipoPS").ToString().ToEntero()
|
||||||
|
|||||||
Reference in New Issue
Block a user