From 2c41cd63bc3fe4ae9f7f6d83fc85537ee11e962e Mon Sep 17 00:00:00 2001 From: rakcsle Date: Fri, 22 Dec 2023 17:56:45 -0700 Subject: [PATCH] OS Corecion tipo docto remision --- OS/OrdenesServicios.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/OS/OrdenesServicios.aspx.vb b/OS/OrdenesServicios.aspx.vb index e788c7d4d..310f046ea 100644 --- a/OS/OrdenesServicios.aspx.vb +++ b/OS/OrdenesServicios.aspx.vb @@ -3351,7 +3351,7 @@ Partial Class OS_OrdenesServicios CveSubProyectoPedido = DbRowVenta("CveSubProyecto").ToString().ToEntero() End If - Dim ObjFactura = Modelos.Factura.CrearVentaNueva(UsuarioActual, CveSubProyectoPedido, CveCliente, CveMoneda, "Ped") + Dim ObjFactura = Modelos.Factura.CrearVentaNueva(UsuarioActual, CveSubProyectoPedido, CveCliente, CveMoneda, "Rem") If ObjFactura IsNot Nothing Then