diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index dc97f5068..fe4a57b2c 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -23433,7 +23433,7 @@ Partial Class Ventas
 
 
     Private Sub CalculaUsados()
-        If DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem") Then
+        If DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem", "Cot") Then
             Dim DTTamanios As DataTable = GlobalDTAcumTamaños()
 
             Dim DTCvePSCostos As DataTable