AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- cambios de OS - SMS

Browse Source
This commit is contained in:
rrene
2023-12-23 08:41:59 -07:00
parent 2648c7b53f
commit 59f49e8261
2 changed files with 7 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

24
Ventas/Ventas.aspx
View File

@@ -593,9 +593,6 @@
<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" step="1"></asp:TextBox>
</td> </td>
</tr> </tr>
</table> </table>
</div> </div>
</div> </div>
@@ -8474,33 +8471,22 @@
<asp:GridView ID="GvProductosProcedimiento" runat="server" CssClass="table table-hover table-striped ScrollAD mysmallbtn" data-sort="true" AutoGenerateColumns="False" Width="100%" OnRowDataBound="GvProductosProcedimiento_RowDataBound" <asp:GridView ID="GvProductosProcedimiento" runat="server" CssClass="table table-hover table-striped ScrollAD mysmallbtn" data-sort="true" AutoGenerateColumns="False" Width="100%" OnRowDataBound="GvProductosProcedimiento_RowDataBound"
DataKeyNames="CveProcedimientoProducto,CveProcedimiento,Cantidad,CvePS,CodigoPS,Autogenerado,Estatus,CveVenta,CveUnidadMedida,Abreviatura,CveClasificacion,Clasificacion,Precio" GridLines="None"> DataKeyNames="CveProcedimientoProducto,CveProcedimiento,Cantidad,CvePS,CodigoPS,Autogenerado,Estatus,CveVenta,CveUnidadMedida,Abreviatura,CveClasificacion,Clasificacion,Precio" GridLines="None">
<Columns> <Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="Cant." ItemStyle-Width="40px"> <asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="Cant." ItemStyle-Width="40px">
<ItemTemplate> <ItemTemplate>
<asp:TextBox ID="TxtCantidad" runat="server" Text="0" Width="40px" style="text-align:right!important"></asp:TextBox> <asp:TextBox ID="TxtCantidad" runat="server" Text="" Width="40px" style="text-align:right!important"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="FilTxtCantidad" runat="server" TargetControlID="TxtCantidad" FilterType="Custom, Numbers" ValidChars="." /> <ajax:FilteredTextBoxExtender ID="FilTxtCantidad" runat="server" TargetControlID="TxtCantidad" FilterType="Custom, Numbers" ValidChars="." />
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField DataField="Cantidad" HeaderText="Cant." DataFormatString="{0:#,###.##}" ItemStyle-Width="30px" >
<asp:BoundField DataField="Cantidad" HeaderText="Cant." DataFormatString="{0:N3}" ItemStyle-Width="30px" >
<ItemStyle HorizontalAlign="Right" /> <ItemStyle HorizontalAlign="Right" />
</asp:BoundField> </asp:BoundField>
<asp:BoundField DataField="CodigoPS" HeaderText="Producto"> <asp:BoundField DataField="CodigoPS" HeaderText="Producto">
<ItemStyle HorizontalAlign="Left" /> <ItemStyle HorizontalAlign="Left" />
</asp:BoundField> </asp:BoundField>
<asp:BoundField DataField="Abreviatura" HeaderText="UM"> <asp:BoundField DataField="Abreviatura" HeaderText="UM">
<ItemStyle HorizontalAlign="Left" /> <ItemStyle HorizontalAlign="Left" />
</asp:BoundField> </asp:BoundField>
<asp:BoundField DataField="Precio" HeaderText="Precio" DataFormatString="{0:#,##0.###}" HtmlEncode="False" />
<asp:BoundField DataField="Precio" DataFormatString="{0:#,##0.###}" HtmlEncode="False" />
</Columns> </Columns>
<HeaderStyle CssClass="Titulos" Height="15px"></HeaderStyle> <HeaderStyle CssClass="Titulos" Height="15px"></HeaderStyle>
</asp:GridView> </asp:GridView>

4
Ventas/Ventas.aspx.vb
View File

@@ -4483,7 +4483,7 @@ Partial Class Ventas
End If End If
For Each Row As DataRow In DtDetalle.Rows For Each Row As DataRow In DtDetalle.Rows
If OS.GetDetalleMateriales(Row("CveOSDetalle").ToString().ToEntero(), CveOS, -1) Then If OS.GetDetalleMateriales(Row("CveOSDetalle").ToString().ToEntero(), CveOS) Then
If OS.DtResultados.FiltraParametros("SeFacturara = 1").Rows.Count > 0 Then If OS.DtResultados.FiltraParametros("SeFacturara = 1").Rows.Count > 0 Then
Alert("Hay materiales en la Orden de Servicio, ¿Desea facturar los materiales?", TipoMensaje.MsgConfirmacion, "BtnMateriales()") Alert("Hay materiales en la Orden de Servicio, ¿Desea facturar los materiales?", TipoMensaje.MsgConfirmacion, "BtnMateriales()")
End If End If
@@ -21641,7 +21641,7 @@ Partial Class Ventas
DtDetalle = TmpDT.Copy DtDetalle = TmpDT.Copy
For Each Row As DataRow In DtDetalle.Rows For Each Row As DataRow In DtDetalle.Rows
If OS.GetDetalleMateriales(Row("CveOSDetalle").ToString().ToEntero(), CveOS, -1) Then If OS.GetDetalleMateriales(Row("CveOSDetalle").ToString().ToEntero(), CveOS) Then
Dim Cons As Integer = TmpDT.Rows.Count + 1 Dim Cons As Integer = TmpDT.Rows.Count + 1
For Each dr As DataRow In OS.DtResultados.FiltraParametros("SeFacturara = 1 ").Rows For Each dr As DataRow In OS.DtResultados.FiltraParametros("SeFacturara = 1 ").Rows