SMS Ventas Sucursales cliente + parte tarjeta SMS - 2024.01.04

App_Code/ClsPaginas.vb

@@ -5883,6 +5883,9 @@ Public Class ClsPaginas
 
                     If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
                         params.Add(New ReportParameter("Documentacion", Vta.Cliente.Documentacion))
+                        params.Add(New ReportParameter("Medico", Vta.Medico))
+                        params.Add(New ReportParameter("Procedimiento", Vta.Procedimiento))
+                        params.Add(New ReportParameter("FechaCirugia", Vta.Alfa1.ToDateTime.ToString("dd/MM/yyyy hh:mm")))
                     End If
 
                     RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
@@ -5988,6 +5991,9 @@ Public Class ClsPaginas
 
                     If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
                         params.Add(New ReportParameter("Documentacion", Vta.Cliente.Documentacion))
+                        params.Add(New ReportParameter("Medico", Vta.Medico))
+                        params.Add(New ReportParameter("Procedimiento", Vta.Procedimiento))
+                        params.Add(New ReportParameter("FechaCirugia", Vta.Alfa1.ToDateTime.ToString("dd/MM/yyyy hh:mm")))
                     End If
 
                     RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)

App_Code/Modelos.vb

@@ -7671,7 +7671,9 @@ Namespace Modelos
         Public Property CveEstatus As Integer
         Public Property GenerarPDFFactura As Boolean = False
         Public Property CveMedico As Integer = -1
+        Public Property Medico As String = ""
         Public Property CveProcedimiento As Integer = -1
+        Public Property Procedimiento As String = ""
         Public Property CveTipoVenta As Integer = -1
 #End Region
 

Compras/PopUpVerFactura.aspx.vb

@@ -3084,12 +3084,15 @@ Partial Class PopUpVerFactura
                 Vta.Cliente.UsaProductoAlterno = CBool(dtVentas(0)("UsaProductoAlterno"))
                 Vta.Cliente.Documentacion = dtVentas(0)("Documentacion").ToString
 
+                Vta.Medico = dtVentas(0)("Medico").ToString
+                Vta.Procedimiento = dtVentas(0)("Procedimiento").ToString
+                Vta.Alfa1 = dtVentas(0)("Alfa1").ToString
+
                 Vta.RefDocto = dtVentas(0)("Ref").ToString
                 Vta.CveVenta = dtVentas(0)("CveVenta").ToString.ToEntero
                 Vta.NumeroCuenta = dtVentas(0)("NumCtaPago").ToString
                 Vta.Version = dtVentas(0)("CFDIVersion").ToString
 
-
                 Vta.NumeroContrato = dtVentas(0)("NumeroContrato").ToString
                 Vta.DescripcionContrato = dtVentas(0)("DescripcionContrato").ToString
                 Vta.NumeroDescripcionContrato = If($"{dtVentas(0)("NumeroContrato").ToString} - {dtVentas(0)("NumeroLicitacion").ToString}" = " - ", "", $"{dtVentas(0)("NumeroContrato").ToString} {If(dtVentas(0)("NumeroLicitacion").ToString = "", "", $" - Licitación: {dtVentas(0)("NumeroLicitacion").ToString}")}")

Empresas/186/Formatos/Factura.mrt

@@ -647,11 +647,11 @@ AElFTkSuQmCC</ImageBytes>
                       <Name>PS</Name>
                       <Page isRef="7" />
                       <Parent isRef="26" />
-                      <Text>{DtDetalle.PSCalculado}</Text>
+                      <Text>{IIF(UsaProductoAlterno == "1",DtDetalle.CodigoPSAlterno,DtDetalle.PSCalculado)}</Text>
                       <TextBrush>Black</TextBrush>
                       <TextOptions>,,,,WordWrap=True,A=0</TextOptions>
                       <TextQuality>Wysiwyg</TextQuality>
-                      <Type>DataColumn</Type>
+                      <Type>Expression</Type>
                     </PS>
                     <PU Ref="32" type="Text" isKey="true">
                       <Brush>Transparent</Brush>
@@ -733,7 +733,7 @@ AElFTkSuQmCC</ImageBytes>
                     <Text20 Ref="40" type="Text" isKey="true">
                       <Brush>Transparent</Brush>
                       <CanGrow>True</CanGrow>
-                      <ClientRectangle>12.4,0,1.66,0.37</ClientRectangle>
+                      <ClientRectangle>12.6,0,1.46,0.37</ClientRectangle>
                       <Conditions isList="true" count="0" />
                       <Expressions isList="true" count="0" />
                       <Font>Myriad Pro,7.5,Regular,Point,False,0</Font>
@@ -1498,7 +1498,7 @@ Sello digital  del SAT:
         <Textbox20 Ref="91" type="Text" isKey="true">
           <Brush>Transparent</Brush>
           <CanGrow>True</CanGrow>
-          <ClientRectangle>-0.28,2,9.62,3.08</ClientRectangle>
+          <ClientRectangle>-0.25,2,9.62,3.08</ClientRectangle>
           <Conditions isList="true" count="0" />
           <Expressions isList="true" count="0" />
           <Font>Myriad Pro,9,Bold,Point,False,0</Font>
@@ -1542,8 +1542,8 @@ Regimen Fiscal Receptor: {ClienteRegimenFiscal}</Text>
   <ReportAlias>Factura</ReportAlias>
   <ReportChanged>12/22/2023 1:34:41 AM</ReportChanged>
   <ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
-  <ReportFile>Factura.mrt</ReportFile>
+  <ReportFile>F:\Proyectos\Empresas\186\Formatos\Factura.mrt</ReportFile>
-  <ReportGuid>fce72c3004184545a030083d08713120</ReportGuid>
+  <ReportGuid>5697d1e820c04b44b4aba72597e3ca27</ReportGuid>
   <ReportName>Factura</ReportName>
   <ReportUnit>Centimeters</ReportUnit>
   <ReportVersion>2022.4.5.0</ReportVersion>

Empresas/186/Formatos/NotaDevolucion.mrt

@@ -1030,7 +1030,7 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
                       <Type>Expression</Type>
                     </Textbox26>
                     <Panel7 Ref="61" type="Panel" isKey="true">
-                      <Border>Top, Bottom;[227:108:9];5;Solid;False;4;[227:108:9]</Border>
+                      <Border>Top, Bottom;[156:195:229];5;Solid;False;4;[227:108:9]</Border>
                       <Brush>Transparent</Brush>
                       <ClientRectangle>0.2,3.48,20.6,2.2</ClientRectangle>
                       <Components isList="true" count="6">

Empresas/186/Formatos/Pedido.mrt

@@ -54,7 +54,7 @@
     <Relations isList="true" count="0" />
     <Report isRef="0" />
     <Resources isList="true" count="0" />
-    <Variables isList="true" count="79">
+    <Variables isList="true" count="82">
       <value>ReportParameters,ClienteCodigo,ClienteCodigo,ReportParameter1,System.String,_x0030_2,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0035_4a879e0a10d464ba2f01e0372efb9ca</value>
       <value>ReportParameters,ClienteTelefono,ClienteTelefono,ReportParameter1,System.String,,False,False,True,False,,_x0036_22a3a61b2f247a6ab5d7dc6c66568db</value>
       <value>ReportParameters,ClienteContacto,ClienteContacto,ReportParameter1,System.String,,False,False,True,False,,_x0035_c52eccfce4d4681a1c62017e690c7c1</value>
@@ -133,7 +133,10 @@
       <value>ReportParameters,TipoRelacionTexto,TipoRelacionTexto,ReportParameter1,System.String,,False,False,True,False,,_x0034_17b8382f8e448a5b21018e50590835b</value>
       <value>ReportParameters,FolioFiscalRelacionado,FolioFiscalRelacionado,ReportParameter1,System.String,,False,False,True,False,,_x0037_0c2d36e39d1464d821ac353ccaa2dcd</value>
       <value>ReportParameters,ClienteDireccion,ClienteDireccion,ReportParameter1,System.String,,False,False,True,False,,f18e5fd820754666994a9d3f995d50a7</value>
-      <value>ReportParameters,Documentacion,Documentacion,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_</value>
+      <value>ReportParameters,Documentacion,Documentacion,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C__x002F_StiSerializer_x003E_</value>
+      <value>ReportParameters,Medico,Medico,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
+      <value>ReportParameters,Procedimiento,Procedimiento,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
+      <value>ReportParameters,FechaCirugia,FechaCirugia,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
     </Variables>
   </Dictionary>
   <EngineVersion>EngineV2</EngineVersion>
@@ -480,7 +483,7 @@ Vendedor: {VendedorNombre}</Text>
                 <Text7 Ref="19" type="Text" isKey="true">
                   <Brush>Transparent</Brush>
                   <CanGrow>True</CanGrow>
-                  <ClientRectangle>0,3.8,10.03,0.62</ClientRectangle>
+                  <ClientRectangle>0,3.8,10.03,1.22</ClientRectangle>
                   <Conditions isList="true" count="0" />
                   <Expressions isList="true" count="0" />
                   <Font>Myriad Pro,6.7,Bold,Point,False,0</Font>
@@ -490,7 +493,10 @@ Vendedor: {VendedorNombre}</Text>
                   <Name>Text7</Name>
                   <Page isRef="5" />
                   <Parent isRef="7" />
-                  <Text>Proveedor: {Documentacion}</Text>
+                  <Text>Proveedor: {Documentacion}
+Médico:  {Medico}
+Procedimiento:  {Procedimiento}
+Fecha Cirugia:  {FechaCirugia}</Text>
                   <TextBrush>Black</TextBrush>
                   <TextQuality>Wysiwyg</TextQuality>
                   <Type>Expression</Type>
@@ -1121,7 +1127,7 @@ Vendedor: {VendedorNombre}</Text>
   <ReportChanged>10/11/2022 8:18:55 PM</ReportChanged>
   <ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
   <ReportFile>Pedido.mrt</ReportFile>
-  <ReportGuid>1db7603a85b2437ca458bc10348aaf60</ReportGuid>
+  <ReportGuid>cb0c4a26c29e4eaea6e5fdce45abd03e</ReportGuid>
   <ReportName>Report</ReportName>
   <ReportUnit>Centimeters</ReportUnit>
   <ReportVersion>2022.4.5.0</ReportVersion>

OS/Asignaciones.aspx

@@ -188,7 +188,7 @@
                                 </div>
                             </div>
                             <div class="portlet-body">
-                                <asp:GridView ID="GvNA" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron Órdenes de Servicio No Asignadas" 
+                                <asp:GridView ID="GvNA" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron Órdenes de Servicio No Asignadas"  ClientIDMode="Static"
                                     DataKeyNames="CveOSDetalle, CveOS,CveUsuarioAtendio,TipoEstatus,EstatusOrdenServicio,CveSubProyecto,Folio,FechaCita,FechaCitaOS"
                                     CssClass="table table-striped table-hover Widthall table-advance" GridLines="None">
                                     <Columns>
@@ -202,8 +202,8 @@
                                         <asp:BoundField DataField="SubProyecto" HeaderText="SubProyecto" ItemStyle-HorizontalAlign="Left" />
                                         <asp:BoundField DataField="Concepto" HeaderText="Concepto" ItemStyle-HorizontalAlign="Left" />
                                         <asp:BoundField DataField="EstatusOrdenServicio" HeaderText="Estatus" ItemStyle-HorizontalAlign="Left" />
-                                        <asp:BoundField DataField="FechaIng" HeaderText="Fecha Ingreso" DataFormatString="{0:d}" />
+                                        <asp:BoundField DataField="FechaIng" HeaderText="Fecha Ingreso" DataFormatString="{0:d}" ItemStyle-Width="130px" />
-                                        <asp:TemplateField>
+                                        <asp:TemplateField ItemStyle-Width="120px">
                                             <HeaderTemplate>
                                                 Fecha Servicio
                                             </HeaderTemplate>
@@ -224,13 +224,13 @@
                                                 </div>
                                             </ItemTemplate>
                                         </asp:TemplateField>
-                                        <asp:TemplateField>
+                                        <asp:TemplateField ItemStyle-Width="60px">
                                             <HeaderTemplate>
                                                 Hora Servicio
                                             </HeaderTemplate>
                                             <ItemTemplate>
                                                  <asp:Literal ID="LtlHoraServicio" runat="server" Visible="false" Text='<%# Eval("HoraCita", "{0:t}")%>'> ></asp:Literal>
-                                                <cc1:TimeSelector ID="TimeSelector" runat="server" DisplaySeconds="false" DisplayButtons="false" Visible="false">
+                                                <cc1:TimeSelector ID="TimeSelector" runat="server" DisplaySeconds="false" DisplayButtons="false" Visible="false" SelectedTimeFormat="TwentyFour" Width="60px" Height="20px" CssClass="test" >
                                                 </cc1:TimeSelector>
                                             </ItemTemplate>
                                         </asp:TemplateField>

OS/Asignaciones.aspx.vb

@@ -70,6 +70,18 @@ Partial Class OS_Asignaciones
             ObjEstatusPermisos.Dispose()
 
         End If
+
+        RegistraScript("
+            $('#GvNA tr').each(function() {
+                $(this).find('td:eq(8) input').each(function() {		
+		            if($(this).val()!=':'){
+			            $(this).attr('style', 'width: 20px;');
+		            }else{
+			            $(this).attr('style', 'width: 10px;');
+		            }		
+                });
+            });
+        ")
     End Sub
 
 #Region "C A R G A S "

Ventas/CatMedicos.aspx

@@ -149,7 +149,7 @@
                                     <div class="col-md-12" style="max-width:900px">
 
                                         <asp:GridView ID="GvIndicadores" runat="server" AutoGenerateColumns="False"
-                                            DataKeyNames=""
+                                            DataKeyNames="" data-sort="true"
                                             EmptyDataText="No se encontraron registros" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
                                             <Columns>                                                
                                                 
@@ -226,6 +226,7 @@
 
                                 <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False"
                                     DataKeyNames="CveMedico,Medico,CedulaProfesional,FechaNacimiento,Notas,DiasAtencion,Horario,Lugar,Estatus,CveUsuario,FechaIng,CveEmpresa,Telefono,Mail,CveMedicoEspecialidad,CveMedicoSubEspecialidad,Celular,Consultorio,Torre"
+                                    data-sort="true"
                                     EmptyDataText="No se encontraron Medicos Registrados" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
                                     <Columns>
                                         <asp:TemplateField HeaderText="Médico" ItemStyle-HorizontalAlign="Left">

Ventas/CatProcedimientos.aspx

@@ -149,6 +149,7 @@
 
                                         <asp:GridView ID="GvIndicadores" runat="server" AutoGenerateColumns="False"
                                             DataKeyNames=""
+                                            data-sort="true"
                                             EmptyDataText="No se encontraron registros" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
                                             <Columns>                                                
                                                 <%--CveClave	Grupo	Total	nVentas	Utilidad	SerieFolio	Fecha--%>
@@ -230,6 +231,7 @@
                                                 <div style="max-width: 800px">
                                                     <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False"
                                                         DataKeyNames="CveProcedimiento, Procedimiento, Estatus, FechaIng, CveUsuario, CveEmpresa, Usuario, EstatusStr"
+                                                        data-sort="true"
                                                         EmptyDataText="No se encontraron Procedimientos Registrados" ToolTip="Listado de Procedimientos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" GridLines="None">
                                                         <Columns>
 

Ventas/Ventas.aspx

@@ -594,7 +594,7 @@
                                     <b>Fecha de Cirugia:</b>
                                 </td>
                                 <td runat="server" id="TdFechaOS2" visible="false">
-                                    <asp:TextBox ID="TxtFechaOS" type="datetime-local" runat="server" CssClass="make-switchsd" CausesValidation="true" Style="width: 130px" step="1"></asp:TextBox>
+                                    <asp:TextBox ID="TxtFechaOS" type="datetime-local" runat="server" CssClass="make-switchsd" CausesValidation="true" Style="width: 130px" ></asp:TextBox>
                                 </td>
                             </tr>
                         </table>
@@ -8419,12 +8419,28 @@
                         <div runat="server" visible="False" id="DvModalTipoVentaPasoCliente">
                             <div class="row">
                                 <div class="form-group col-md-12 form-md-line-input input-iconright ">
-                                    <asp:Label runat="server" Style="width: 90%; color: #888888;" AssociatedControlID="DdlClientesWS">Cliente:</asp:Label>
+                                    <asp:Label runat="server" Style="width: 90%; color: #888888;" AssociatedControlID="DdlClientesWS">Hospital:</asp:Label>
                                     <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientesWS" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;" Onselectedindexchange="DdlClientesWS_selectedindexchange"></ADS:Dropdownlost>
                                 </div>
                             </div>
                         </div>
 
+
+                        <%--Sucursales--%>
+                          <div runat="server" visible="False" id="DvModalClientesucursal">
+                            <div class="row">
+
+                                <div class="form-group col-md-12 form-md-line-input input-iconright ">
+                                    <asp:DropDownList ID="DdlSucursalClienteModal" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SucursalCliente" DataValueField="CveClienteSucursal">
+                                        <asp:ListItem Value="-1">Seleccione uno</asp:ListItem>
+                                    </asp:DropDownList>                                    
+                                    <asp:Label runat="server" Style="width: 90%; color: #888888;" AssociatedControlID="DdlSucursalClienteModal">Sucursal:</asp:Label>
+                                </div>                                
+                            </div>
+
+                        </div>
+                      
+
                         <%--Medico Procedimiento--%>
                         <div runat="server" visible="False" id="DvModalTipoVentaPasoMedicoProcedimiento">
                             <div class="row">
@@ -8462,7 +8478,7 @@
                                 </div>
                                 <div class="form-group col-md-6 form-md-line-input input-iconright " runat="server" id="DvModalRequiereOSFecha" visible="false">
                                     <asp:Label runat="server" Style="width: 90%; color: #888888;" AssociatedControlID="TxtFechaModal">Fecha de Cirugia:</asp:Label>
-                                    <asp:TextBox ID="TxtFechaModal" type="datetime-local" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 100%" step="1"></asp:TextBox>
+                                    <asp:TextBox ID="TxtFechaModal" type="datetime-local" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 100%" ></asp:TextBox>
                                 </div>
                             </div>
                         </div>

Ventas/Ventas.aspx.vb

@@ -2560,6 +2560,7 @@ Partial Class Ventas
             If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
                 CargaMedicos()
                 CargaProcedimientos()
+
                 CargaDdlClientes()
             End If
 
@@ -7799,6 +7800,35 @@ Partial Class Ventas
 
     End Sub
 
+    Private Sub CargaSucursalesModal(CveClienteSeleccionado As Integer)
+
+        DdlSucursalClienteModal.Items.Clear()
+        DdlSucursalClienteModal.ClearSelection()
+        DdlSucursalClienteModal.SelectedValue = Nothing
+
+        Dim ObjCliente As New ClsClientes
+        If ObjCliente.GetSucursales(CveClienteSeleccionado) Then
+            DdlSucursalClienteModal.DataSource = ObjCliente.DtResultados
+            If ObjCliente.DtResultados.Rows.Count > 0 Then
+                DvModalClientesucursal.Visible = True
+            Else
+                DvModalClientesucursal.Visible = False
+            End If
+        Else
+            DvModalClientesucursal.Visible = False
+            DdlSucursalClienteModal.DataSource = Nothing
+        End If
+        ObjCliente.Dispose()
+
+        DdlSucursalClienteModal.DataBind()
+        DdlSucursalClienteModal.Items.Insert(0, New ListItem("Matriz", "-1"))
+
+        UpDvModalTipoVenta.FindDataSourceControl
+
+    End Sub
+
+
+
     Private Sub CargaDdlClientes()
         If UsuarioActual.Empresa.Funcionalidad(105) = "1" Then
             DdlClientesWS.setEsWebService(True)
@@ -10755,7 +10785,13 @@ Partial Class Ventas
         ObjFacturaDevolucion.Fech1 = TxtFech1.Text.Trim.ToDate
         ObjFacturaDevolucion.Fech2 = TxtFech2.Text.Trim.ToDate
         ObjFacturaDevolucion.Fech3 = TxtFech3.Text.Trim.ToDate
-        ObjFacturaDevolucion.Alfa1 = TxtAlfa1.Text.Trim
+
+        If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso DvModalRequiereOSFecha.Visible Then
+            ObjFacturaDevolucion.Alfa1 = TxtFechaOS.Text.Trim
+        Else
+            ObjFacturaDevolucion.Alfa1 = TxtAlfa1.Text.Trim
+        End If
+
         ObjFacturaDevolucion.Alfa2 = TxtAlfa2.Text.Trim
         ObjFacturaDevolucion.Alfa3 = TxtAlfa3.Text.Trim
         ObjFacturaDevolucion.Num1 = TxtNum1.Text.Trim.ToDouble
@@ -11031,7 +11067,13 @@ Partial Class Ventas
         ObjFacturaBonificacion.Fech1 = TxtFech1.Text.Trim.ToDate
         ObjFacturaBonificacion.Fech2 = TxtFech2.Text.Trim.ToDate
         ObjFacturaBonificacion.Fech3 = TxtFech3.Text.Trim.ToDate
-        ObjFacturaBonificacion.Alfa1 = TxtAlfa1.Text.Trim
+
+        If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso DvModalRequiereOSFecha.Visible Then
+            ObjFacturaBonificacion.Alfa1 = TxtFechaOS.Text.Trim
+        Else
+            ObjFacturaBonificacion.Alfa1 = TxtAlfa1.Text.Trim
+        End If
+
         ObjFacturaBonificacion.Alfa2 = TxtAlfa2.Text.Trim
         ObjFacturaBonificacion.Alfa3 = TxtAlfa3.Text.Trim
         ObjFacturaBonificacion.Num1 = TxtNum1.Text.Trim.ToDouble
@@ -11513,7 +11555,13 @@ Partial Class Ventas
         ObjFactura.Fech1 = TxtFech1.Text.Trim.ToDate
         ObjFactura.Fech2 = TxtFech2.Text.Trim.ToDate
         ObjFactura.Fech3 = TxtFech3.Text.Trim.ToDate
-        ObjFactura.Alfa1 = TxtAlfa1.Text.Trim
+
+        If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso DvModalRequiereOSFecha.Visible Then
+            ObjFactura.Alfa1 = TxtFechaOS.Text.Trim
+        Else
+            ObjFactura.Alfa1 = TxtAlfa1.Text.Trim
+        End If
+
         ObjFactura.Alfa2 = TxtAlfa2.Text.Trim
         ObjFactura.Alfa3 = TxtAlfa3.Text.Trim
         ObjFactura.Num1 = TxtNum1.Text.Trim.ToDouble
@@ -12170,7 +12218,14 @@ Partial Class Ventas
         ObjFacturaDevolucion.Fech1 = TxtFech1.Text.Trim.ToDate
         ObjFacturaDevolucion.Fech2 = TxtFech2.Text.Trim.ToDate
         ObjFacturaDevolucion.Fech3 = TxtFech3.Text.Trim.ToDate
-        ObjFacturaDevolucion.Alfa1 = TxtAlfa1.Text.Trim
+
+
+        If UsuarioActual.Empresa.Funcionalidad(578) = "1" AndAlso DvModalRequiereOSFecha.Visible Then
+            ObjFacturaDevolucion.Alfa1 = TxtFechaOS.Text.Trim
+        Else
+            ObjFacturaDevolucion.Alfa1 = TxtAlfa1.Text.Trim
+        End If
+
         ObjFacturaDevolucion.Alfa2 = TxtAlfa2.Text.Trim
         ObjFacturaDevolucion.Alfa3 = TxtAlfa3.Text.Trim
         ObjFacturaDevolucion.Num1 = TxtNum1.Text.Trim.ToDouble
@@ -35975,14 +36030,24 @@ Partial Class Ventas
             DvModalTipoVentaPasoCliente.Visible = True
             DvModalTipoVentaPasoRequiereOS.Visible = True
             DvModalTipoVentaPasoMedicoProcedimiento.Visible = True
-            TxtFechaModal.Text = NowADS.ToString("yyyy-MM-dd HH:mm:ss").Replace(" ", "T")
+
+            ChkRequiereTecnicoModal.Checked = True
+            ChkRequiereTecnicoModal.Enabled = True
+            DvModalRequiereOSFecha.Visible = True
+
+            If CveCliente > 0 Then
+                CargaSucursalesModal(CveCliente)
+            End If
+
+            TxtFechaModal.Text = NowADS.AddHours(1).ToString("yyyy-MM-dd HH").Replace(" ", "T") + ":00" ' ToString("yyyy-MM-dd HH:mm:ss").Replace(" ", "T")
+
             LnkDvModalTipoVentaAceptar.Visible = True
 
 
             Select Case RBLTipoVenta.SelectedValue
                 Case "1" ' Fuera de linea
                     ChkRequiereTecnicoModal.Checked = True
-                    ChkRequiereTecnicoModal.Enabled = False
+                    ChkRequiereTecnicoModal.Enabled = True
                     DvModalRequiereOSFecha.Visible = True
                 Case "2" ' Pago Directo
                     ChkRequiereTecnicoModal.Checked = True
@@ -36012,6 +36077,9 @@ Partial Class Ventas
 
     Protected Sub DdlClientesWS_selectedindexchange(sender As Object, e As EventArgs)
         CargaPSProcedimiento(DdlProcedimiento.SelectedValue.ToEntero, DdlClientesWS.SelectedValue.ToEntero, DdlSubProyectoDatos.SelectedValue.ToEntero)
+
+        CargaSucursalesModal(DdlClientesWS.SelectedValue.ToEntero)
+
     End Sub
 
 
@@ -36089,6 +36157,7 @@ Partial Class Ventas
         DdlMedico.SelectedValueExist(DdlMedicoModal.SelectedValue)
         DdlProcedimiento.SelectedValueExist(DdlProcedimientoModal.SelectedValue)
 
+
         'si es  pago directo es factura
         If RBLTipoVenta.SelectedValue.Contiene("2") Then
             DdlTipoComprobante.SelectedValueExist("Ing")
@@ -36106,8 +36175,12 @@ Partial Class Ventas
         DdlTipoComprobante.Enabled = False
 
         CargaCliente(CveCliente)
+
+        DdlSucursalCliente.SelectedValueExist(DdlSucursalClienteModal.SelectedValue)
+
         DdlTipoComprobante_SelectedIndexChanged(sender, Nothing)
-        RegistraScript("$('#DvModalTipoVenta').modal('hide');")
+
+
         Dim CountPsAgregados As Integer = 0
 
         For Each GvRow As GridViewRow In GvProductosProcedimiento.Rows
@@ -36134,6 +36207,13 @@ Partial Class Ventas
         If CountPsAgregados > 0 Then
             CalculaTotalesVenta()
         End If
+
+        If UsuarioActual.CveVendedor > 0 Then
+            DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor)
+            UpParametros.Update()
+        End If
+
+        RegistraScript("$('#DvModalTipoVenta').modal('hide');")
         UpCliente.Update()
     End Sub