From 35469e785a218074f0a60371e1ce8aad7aff7d42 Mon Sep 17 00:00:00 2001
From: rrene <rrene@DESKTOP-04EII7E>
Date: Fri, 7 Aug 2020 11:40:34 -0700
Subject: [PATCH] -- parametro de acreedor/proveedor, para el registro de
 compra

---
 Compras/Compras.aspx.vb | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index cf7488197..67887b226 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -3146,6 +3146,8 @@ Partial Class Compras_Compras
 
                 ViewState("CveProveedor") = ObjProveedor.CveProveedor
                 ViewState("CveTipoProveedor") = ObjProveedor.CveTipoProveedor
+                If ObjProveedor.CveTipoProveedor = 1 Then LblProveedor.Text = "Proveedor:" Else LblProveedor.Text = "Acreedor:"
+                CveTipoConcepto = ObjProveedor.CveTipoProveedor
 
                 'Conta ContPAQ
                 ViewState("CtaProveedor") = ObjProveedor.IdCtaContProveedores