Cat Folios Garantia acualizar Area

This commit is contained in:
rakcsle
2024-05-18 09:56:35 -07:00
parent b7e7060a30
commit 991a1b0548
5 changed files with 61 additions and 44 deletions

View File

@@ -131,7 +131,7 @@ Partial Class Acumuladores_CatFoliosGarantia
End If End If
Else Else
If ObjAcum.FoliosGarantiaUpdate(CveFolioGarantia, TxtFolioGarantia.Text, DdlEstatusEditar.SelectedValue.ToEntero, UsuarioActual.CveUsuario, DdlSubProyectos.SelectedValue.ToEntero, If ObjAcum.FoliosGarantiaUpdate(CveFolioGarantia, TxtFolioGarantia.Text, DdlEstatusEditar.SelectedValue.ToEntero, UsuarioActual.CveUsuario, DdlSubProyectos.SelectedValue.ToEntero,
DdlTipoFolioModal.SelectedValue, TxtLimite.Text.ToEntero) Then DdlTipoFolioModal.SelectedValue, TxtLimite.Text.ToEntero, DdlArea.SelectedValue.ToEntero) Then
TxtFolioGarantia.Text = "" TxtFolioGarantia.Text = ""
DdlEstatusEditar.SelectedValueExist("1") DdlEstatusEditar.SelectedValueExist("1")
@@ -199,6 +199,8 @@ Partial Class Acumuladores_CatFoliosGarantia
DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1")) DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
DdlSubProyectos.SelectedValueExist(GvRow.DataKey("CveSubProyecto").ToEntero) DdlSubProyectos.SelectedValueExist(GvRow.DataKey("CveSubProyecto").ToEntero)
DdlArea.SelectedValueExist(GvRow.DataKey("Area"))
BtnAgregarFolioGarantiaModal.Text = "Actualizar" BtnAgregarFolioGarantiaModal.Text = "Actualizar"
UpModalFolioGarantia.Update() UpModalFolioGarantia.Update()

View File

@@ -543,7 +543,7 @@ Public Class ClsAcumuladores
Return Retorno Return Retorno
End Function End Function
Public Function FoliosGarantiaUpdate(CveFolioGarantia As Integer, FolioGarantia As String, Estatus As Integer, CveUsuario As Integer, CveSubProyecto As Integer, TipoFolio As String, Limite As Integer) As Boolean Public Function FoliosGarantiaUpdate(CveFolioGarantia As Integer, FolioGarantia As String, Estatus As Integer, CveUsuario As Integer, CveSubProyecto As Integer, TipoFolio As String, Limite As Integer, Area As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
'Data = New DataTable 'Data = New DataTable
@@ -558,6 +558,7 @@ Public Class ClsAcumuladores
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@TipoFolio", SqlDbType.VarChar).Value = TipoFolio .Add("@TipoFolio", SqlDbType.VarChar).Value = TipoFolio
.Add("@Limite", SqlDbType.Int).Value = Limite .Add("@Limite", SqlDbType.Int).Value = Limite
.Add("@Area", SqlDbType.Int).Value = Area
End With End With

View File

@@ -780,7 +780,6 @@
<PaddingTop>=IIf(rownumber(nothing) = 1, "2pt", "0pt")</PaddingTop> <PaddingTop>=IIf(rownumber(nothing) = 1, "2pt", "0pt")</PaddingTop>
</Style> </Style>
</Textbox> </Textbox>
<rd:Selected>true</rd:Selected>
</CellContents> </CellContents>
</TablixCell> </TablixCell>
<TablixCell> <TablixCell>
@@ -1588,7 +1587,7 @@
</TablixCells> </TablixCells>
</TablixRow> </TablixRow>
<TablixRow> <TablixRow>
<Height>0.33542cm</Height> <Height>0.2825cm</Height>
<TablixCells> <TablixCells>
<TablixCell> <TablixCell>
<CellContents> <CellContents>
@@ -1972,7 +1971,7 @@
<DataSetName>DsInventarios</DataSetName> <DataSetName>DsInventarios</DataSetName>
<Top>0.14111cm</Top> <Top>0.14111cm</Top>
<Left>0.10068cm</Left> <Left>0.10068cm</Left>
<Height>3.1562cm</Height> <Height>3.10328cm</Height>
<Width>25.45761cm</Width> <Width>25.45761cm</Width>
<Style> <Style>
<Border> <Border>
@@ -2048,6 +2047,18 @@
<PaddingBottom>2pt</PaddingBottom> <PaddingBottom>2pt</PaddingBottom>
</Style> </Style>
</Textbox> </Textbox>
<Line Name="Line4">
<Top>4.79214cm</Top>
<Left>0.10068cm</Left>
<Height>0cm</Height>
<Width>25.72414cm</Width>
<ZIndex>2</ZIndex>
<Style>
<Border>
<Style>Solid</Style>
</Border>
</Style>
</Line>
</ReportItems> </ReportItems>
<Height>1.88667in</Height> <Height>1.88667in</Height>
<Style /> <Style />
@@ -2055,7 +2066,7 @@
<Width>10.19535in</Width> <Width>10.19535in</Width>
<Page> <Page>
<PageHeader> <PageHeader>
<Height>4.44499cm</Height> <Height>4.55082cm</Height>
<PrintOnFirstPage>true</PrintOnFirstPage> <PrintOnFirstPage>true</PrintOnFirstPage>
<PrintOnLastPage>true</PrintOnLastPage> <PrintOnLastPage>true</PrintOnLastPage>
<ReportItems> <ReportItems>
@@ -2544,7 +2555,7 @@ Municipio y/o Delegación: </Value>
<rd:DefaultName>Textbox7</rd:DefaultName> <rd:DefaultName>Textbox7</rd:DefaultName>
<Top>2.32101cm</Top> <Top>2.32101cm</Top>
<Left>0.13678cm</Left> <Left>0.13678cm</Left>
<Height>2.12398cm</Height> <Height>2.05342cm</Height>
<Width>20.93288cm</Width> <Width>20.93288cm</Width>
<ZIndex>9</ZIndex> <ZIndex>9</ZIndex>
<Style> <Style>
@@ -2565,7 +2576,7 @@ Municipio y/o Delegación: </Value>
</Style> </Style>
</PageHeader> </PageHeader>
<PageFooter> <PageFooter>
<Height>3.8269cm</Height> <Height>2.5569cm</Height>
<PrintOnFirstPage>true</PrintOnFirstPage> <PrintOnFirstPage>true</PrintOnFirstPage>
<PrintOnLastPage>true</PrintOnLastPage> <PrintOnLastPage>true</PrintOnLastPage>
<ReportItems> <ReportItems>
@@ -2588,7 +2599,7 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox21</rd:DefaultName> <rd:DefaultName>Textbox21</rd:DefaultName>
<Top>1.37766cm</Top> <Top>0.74266cm</Top>
<Left>5.68986cm</Left> <Left>5.68986cm</Left>
<Height>0.50243cm</Height> <Height>0.50243cm</Height>
<Width>5.79375cm</Width> <Width>5.79375cm</Width>
@@ -2624,7 +2635,7 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox21</rd:DefaultName> <rd:DefaultName>Textbox21</rd:DefaultName>
<Top>1.37766cm</Top> <Top>0.74266cm</Top>
<Left>14.40467cm</Left> <Left>14.40467cm</Left>
<Height>0.50243cm</Height> <Height>0.50243cm</Height>
<Width>5.78664cm</Width> <Width>5.78664cm</Width>
@@ -2675,9 +2686,9 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox21</rd:DefaultName> <rd:DefaultName>Textbox21</rd:DefaultName>
<Top>1.66375cm</Top> <Top>1.02875cm</Top>
<Left>5.69781cm</Left> <Left>5.69781cm</Left>
<Height>1.2cm</Height> <Height>0.82958cm</Height>
<Width>5.78664cm</Width> <Width>5.78664cm</Width>
<ZIndex>2</ZIndex> <ZIndex>2</ZIndex>
<Visibility> <Visibility>
@@ -2726,9 +2737,9 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox21</rd:DefaultName> <rd:DefaultName>Textbox21</rd:DefaultName>
<Top>1.6632cm</Top> <Top>1.0282cm</Top>
<Left>14.41177cm</Left> <Left>14.41177cm</Left>
<Height>1.2cm</Height> <Height>0.82958cm</Height>
<Width>5.78664cm</Width> <Width>5.78664cm</Width>
<ZIndex>3</ZIndex> <ZIndex>3</ZIndex>
<Visibility> <Visibility>
@@ -2763,7 +2774,7 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox22</rd:DefaultName> <rd:DefaultName>Textbox22</rd:DefaultName>
<Top>0.07331cm</Top> <Top>0.04156cm</Top>
<Left>5.69781cm</Left> <Left>5.69781cm</Left>
<Height>0.6cm</Height> <Height>0.6cm</Height>
<Width>5.78664cm</Width> <Width>5.78664cm</Width>
@@ -2800,7 +2811,7 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox22</rd:DefaultName> <rd:DefaultName>Textbox22</rd:DefaultName>
<Top>0.07331cm</Top> <Top>0.04156cm</Top>
<Left>14.41177cm</Left> <Left>14.41177cm</Left>
<Height>0.6cm</Height> <Height>0.6cm</Height>
<Width>5.78664cm</Width> <Width>5.78664cm</Width>
@@ -2835,7 +2846,7 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox21</rd:DefaultName> <rd:DefaultName>Textbox21</rd:DefaultName>
<Top>0.45106cm</Top> <Top>0.41931cm</Top>
<Left>10.04017cm</Left> <Left>10.04017cm</Left>
<Height>0.63528cm</Height> <Height>0.63528cm</Height>
<Width>5.78664cm</Width> <Width>5.78664cm</Width>
@@ -2886,9 +2897,9 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox21</rd:DefaultName> <rd:DefaultName>Textbox21</rd:DefaultName>
<Top>1.6632cm</Top> <Top>1.0282cm</Top>
<Left>10.04727cm</Left> <Left>10.04727cm</Left>
<Height>1.2cm</Height> <Height>0.82958cm</Height>
<Width>5.78664cm</Width> <Width>5.78664cm</Width>
<ZIndex>7</ZIndex> <ZIndex>7</ZIndex>
<Visibility> <Visibility>
@@ -2923,7 +2934,7 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox22</rd:DefaultName> <rd:DefaultName>Textbox22</rd:DefaultName>
<Top>0.07331cm</Top> <Top>0.04156cm</Top>
<Left>10.04727cm</Left> <Left>10.04727cm</Left>
<Height>0.6cm</Height> <Height>0.6cm</Height>
<Width>5.78664cm</Width> <Width>5.78664cm</Width>
@@ -2971,7 +2982,7 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox29</rd:DefaultName> <rd:DefaultName>Textbox29</rd:DefaultName>
<Top>3.40709cm</Top> <Top>2.13709cm</Top>
<Left>0.10068cm</Left> <Left>0.10068cm</Left>
<Height>0.41981cm</Height> <Height>0.41981cm</Height>
<Width>5.78083cm</Width> <Width>5.78083cm</Width>
@@ -3009,7 +3020,7 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox31</rd:DefaultName> <rd:DefaultName>Textbox31</rd:DefaultName>
<Top>3.40709cm</Top> <Top>2.13709cm</Top>
<Left>11.33129cm</Left> <Left>11.33129cm</Left>
<Height>0.41981cm</Height> <Height>0.41981cm</Height>
<Width>5.13762cm</Width> <Width>5.13762cm</Width>
@@ -3035,23 +3046,12 @@ Municipio y/o Delegación: </Value>
</Border> </Border>
</Style> </Style>
</Line> </Line>
<Line Name="Line4">
<Left>0.13678cm</Left>
<Height>0cm</Height>
<Width>25.72414cm</Width>
<ZIndex>12</ZIndex>
<Style>
<Border>
<Style>Solid</Style>
</Border>
</Style>
</Line>
<Line Name="Line6"> <Line Name="Line6">
<Top>3.26597cm</Top> <Top>1.99597cm</Top>
<Left>0.10068cm</Left> <Left>0.10068cm</Left>
<Height>0cm</Height> <Height>0cm</Height>
<Width>25.76024cm</Width> <Width>25.76024cm</Width>
<ZIndex>13</ZIndex> <ZIndex>12</ZIndex>
<Style> <Style>
<Border> <Border>
<Style>Solid</Style> <Style>Solid</Style>
@@ -3077,11 +3077,11 @@ Municipio y/o Delegación: </Value>
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox10</rd:DefaultName> <rd:DefaultName>Textbox10</rd:DefaultName>
<Top>3.40709cm</Top> <Top>2.13709cm</Top>
<Left>23.00537cm</Left> <Left>23.00537cm</Left>
<Height>0.41981cm</Height> <Height>0.41981cm</Height>
<Width>2.55292cm</Width> <Width>2.55292cm</Width>
<ZIndex>14</ZIndex> <ZIndex>13</ZIndex>
<Style> <Style>
<Border> <Border>
<Style>None</Style> <Style>None</Style>

View File

@@ -2259,7 +2259,21 @@ Partial Class Inventarios_EntregaAlmacen
If ObjInventario.DtResultados.Rows.Count > 0 Then If ObjInventario.DtResultados.Rows.Count > 0 Then
TieneErrorExistencia = True TieneErrorExistencia = True
For Each Dr As DataRow In ObjInventario.DtResultados.Rows For Each Dr As DataRow In ObjInventario.DtResultados.Rows
TextoError.AppendFormat("<b> - {0}</b> Existencia: {1:#,##0.##} <br/>", Dr("CodigoPS"), Dr("Existencia"))
Dim SerieLoteCaducidad As String = ","
If Dr("Serie").ToString.Trim.Length > 0 AndAlso Dr("Serie").ToString.Trim <> "-1" Then
SerieLoteCaducidad = $" Serie: { Dr("Serie").ToString.Trim}"
End If
If Dr("Lote").ToString.Trim.Length > 0 AndAlso Dr("Lote").ToString.Trim <> "-1" Then
SerieLoteCaducidad = $"{SerieLoteCaducidad} Lote: {Dr("Lote").ToString.Trim}"
End If
If Dr("FechaCaducidad").ToString.Trim.Length > 0 AndAlso Dr("FechaCaducidad").ToString.Trim <> "-1" Then
SerieLoteCaducidad = $"{SerieLoteCaducidad} Caducidad: { Dr("FechaCaducidad").ToString.Trim.ToDate.ToString("dd/MM/yyyy")}"
End If
TextoError.AppendFormat("<b> - {0}</b> Existencia: {1:#,##0.##} {2}<br/>", Dr("CodigoPS"), Dr("Existencia"), If(SerieLoteCaducidad <> ",", SerieLoteCaducidad, ""))
Next Next
End If End If
Else Else

View File

@@ -2106,20 +2106,20 @@
<asp:DropDownList ID="DdlEquivalenciaUM" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" CausesValidation="true" DataTextField="UnidadMedida" DataValueField="CveUnidadMedida" Width="206px"> <asp:DropDownList ID="DdlEquivalenciaUM" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" CausesValidation="true" DataTextField="UnidadMedida" DataValueField="CveUnidadMedida" Width="206px">
</asp:DropDownList> </asp:DropDownList>
<label for="<%= DdlEquivalenciaUM.ClientID.ToString()%>">Unidad de Medida:</label> <label for="<%= DdlEquivalenciaUM.ClientID.ToString()%>">Unidad de Medida:</label>
<asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server" CssClass="help-block errorimput" ControlToValidate="DdlEquivalenciaUM" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Unidad de medida''</b> es necesario, por favor ingréselo." ValidationGroup="GrpEliminarPS"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server" CssClass="help-block errorimput" ControlToValidate="DdlEquivalenciaUM" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Unidad de medida''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarEquivalencia"></asp:RequiredFieldValidator>
<i></i> <i></i>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtCantidadEquivalencia" runat="server" Width="60" CausesValidation="true" MaxLength="10"></asp:TextBox> <asp:TextBox ID="TxtCantidadEquivalencia" runat="server" Width="60" CausesValidation="true" MaxLength="10"></asp:TextBox>
<label for="<%= TxtCantidadEquivalencia.ClientID.ToString()%>">Cantidad:</label> <label for="<%= TxtCantidadEquivalencia.ClientID.ToString()%>">Cantidad:</label>
<asp:RequiredFieldValidator ID="RequiredFieldValidator3" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripcion''</b> es necesario, por favor ingréselo." ValidationGroup="GrpEliminarPS"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RequiredFieldValidator3" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripcion''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarEquivalencia"></asp:RequiredFieldValidator>
<i></i> <i></i>
</div> </div>
<div class="modal-footer"> <div class="modal-footer">
<asp:UpdatePanel ID="UpdatePanel5" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpdatePanel5" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:LinkButton ID="LnkAgregarEquivalencia" runat="server" CssClass="btn btn-primary" OnClick="LnkAgregarEquivalencia_Click"> Guardar</asp:LinkButton> <asp:LinkButton ID="LnkAgregarEquivalencia" runat="server" CssClass="btn btn-primary" OnClick="LnkAgregarEquivalencia_Click" ValidationGroup="GrpAgregarEquivalencia" > Guardar</asp:LinkButton>
<button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button> <button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>