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

Browse Source
This commit is contained in:
HECTOR RODRIGUEZ
2021-04-19 01:05:22 -07:00
parent 8fbd82bf9e 521ae247e9
commit 5f907ed2d7
3 changed files with 12 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Bancos/DepositosCaja.aspx.vb
View File

@@ -70,6 +70,7 @@ Partial Class Bancos_DepositosCaja
UpGvFacturas.Update() UpGvFacturas.Update()
GvFacturas.DataBind() GvFacturas.DataBind()
lblValorTotal.Text = "0.00" lblValorTotal.Text = "0.00"
TxtComision.text = ""
divLabelTotal.Visible = True divLabelTotal.Visible = True
End Sub End Sub
@@ -93,8 +94,8 @@ Partial Class Bancos_DepositosCaja
TotalImportePrePoliza = TotalImporte TotalImportePrePoliza = TotalImporte
If Comision <> 0 Then If Comision <> 0 Then
TotalImporte = TotalImporte + Comision + Descuento TotalImporte = TotalImporte + Comision + Descuento
Comision = -(Comision) ' se inverte el valor, va cargada 'Comision = -(Comision) ' se inverte el valor, va cargada
Descuento = -(Descuento) ' se inverte el valor, va cargada 'Descuento = -(Descuento) ' se inverte el valor, va cargada
If DdlSubProyectoDeposito.SelectedValue.ToEntero = -1 Or DdlClasificacion.SelectedValue.ToEntero = -1 Then If DdlSubProyectoDeposito.SelectedValue.ToEntero = -1 Or DdlClasificacion.SelectedValue.ToEntero = -1 Then
Alert("Debes Seleccionar un Subproyecto y una Clasificación", TipoMensaje.MsgAdvertencia) Alert("Debes Seleccionar un Subproyecto y una Clasificación", TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
@@ -121,7 +122,6 @@ Partial Class Bancos_DepositosCaja
Dim CveSubProyecto As Integer = 0 Dim CveSubProyecto As Integer = 0
Dim CveClasificacion As Integer = 0 Dim CveClasificacion As Integer = 0
Dim CveClasificacionDescuento As Integer = 0 Dim CveClasificacionDescuento As Integer = 0
Dim documentos As String = "Los Depósitos se realizaron exitósamente<br/><br/>" Dim documentos As String = "Los Depósitos se realizaron exitósamente<br/><br/>"
Dim imprimirFolios As String = "" Dim imprimirFolios As String = ""
If drOrigen IsNot Nothing Then If drOrigen IsNot Nothing Then

2
General/SaldosIniciales.aspx.vb
View File

@@ -2002,7 +2002,7 @@ Partial Class General_SaldosIniciales
CveSubProyecto = DataTemp.FiltroPrimeroValor("CveSubProyecto", "").ToEntero CveSubProyecto = DataTemp.FiltroPrimeroValor("CveSubProyecto", "").ToEntero
End If End If
Cuenta = Cuenta.Replace(" ", "") Cuenta = Cuenta.Replace(" ", "")
If ObjConta.GetCuentas(-1, Cuenta.Replace("-", ""), 1, UsuarioActual.CveEmpresa) Then If ObjConta.GetCuentas(-1, Cuenta.Replace("-", "").Trim, 1, UsuarioActual.CveEmpresa) Then
If ObjConta.DtResultados.Rows.Count > 0 Then If ObjConta.DtResultados.Rows.Count > 0 Then
IdCuenta = ObjConta.DtResultados().FiltroPrimeroValor("CveCuenta").ToEntero IdCuenta = ObjConta.DtResultados().FiltroPrimeroValor("CveCuenta").ToEntero
'TipoCuenta = ObjConta.DtResultados().FiltroPrimeroValor("Tipo") 'TipoCuenta = ObjConta.DtResultados().FiltroPrimeroValor("Tipo")

12
OC/OC.aspx
View File

@@ -2757,19 +2757,23 @@
<asp:TemplateField HeaderText="Producto"> <asp:TemplateField HeaderText="Producto">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LblPS" runat="server" CssClass="Texto" Text='<%# Eval("PS")%>' Width="250px"></asp:Label> <asp:Label ID="LblPS" runat="server" CssClass="Texto" Text='<%# Eval("PS")%>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Cant. Max" ItemStyle-HorizontalAlign="Right">
<ItemTemplate>
<span><%# Eval("CantidadMax", "{0:N2}")%></span>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Cantidad"> <asp:TemplateField HeaderText="Cantidad">
<ItemTemplate> <ItemTemplate>
<asp:TextBox ID="TxtCantidad" Text="" CssClass="txtcant" onkeyup="ValidateCant(this)" type="number" step="any" <asp:TextBox ID="TxtCantidad" Text="" CssClass="txtcant" onkeyup="ValidateCant(this)" type="number" step="any"
data-cantidad='<%# Eval("CantidadMax")%>' data-pu='<%# Eval("PU")%>' data-cve='<%# Eval("CveContratoDetalle") %>' data-cantidad='<%# Eval("CantidadMax")%>' data-pu='<%# Eval("PU")%>' data-cve='<%# Eval("CveContratoDetalle") %>'
Width="90" runat="server"></asp:TextBox> Width="70" runat="server"></asp:TextBox>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="PU"> <asp:TemplateField HeaderText="PU" ItemStyle-HorizontalAlign="Right">
<ItemTemplate> <ItemTemplate>
<span><%# Eval("PU", "{0:N2}")%></span> <span><%# Eval("PU", "{0:N2}")%></span>
</ItemTemplate> </ItemTemplate>