diff --git a/Planeacion/CatFolios.aspx b/Planeacion/CatFolios.aspx index 3d8fff4b8..fe83fcb43 100644 --- a/Planeacion/CatFolios.aspx +++ b/Planeacion/CatFolios.aspx @@ -104,7 +104,7 @@
- + <%-- --%> @@ -182,12 +182,7 @@
- -
- - - -
+ <%--
diff --git a/Planeacion/CatFolios.aspx.vb b/Planeacion/CatFolios.aspx.vb index 80852d1e0..1c8f92399 100644 --- a/Planeacion/CatFolios.aspx.vb +++ b/Planeacion/CatFolios.aspx.vb @@ -124,7 +124,6 @@ Partial Class CatFolios HdnModalidad.Value = "U" DdlSubProyecto.SelectedValueExist(GvRow.DataKey("CveSubProyecto")) DdlTipoDocto.SelectedValueExist(GvRow.DataKey("TipoDocto")) - TxtSerie.Text = (GvRow.DataKey("Serie")) ChkEstatus.Checked = If(GvRow.DataKey("Estado").ToString = "Activo", True, False) TxtFolioInicial.Text = (GvRow.DataKey("FInicial")) TxtFolioFinal.Text = (GvRow.DataKey("FFinal")) @@ -169,12 +168,12 @@ Partial Class CatFolios If HdnModalidad.Value = "I" Then - If Not ObjFolios.AddFolios(DdlSubProyecto.SelectedValue.ToEntero, DdlTipoDocto.SelectedValue, TxtSerie.Text, TxtFolioInicial.Text.Trim.ToEntero, TxtFolioInicial.Text.Trim.ToEntero, + If Not ObjFolios.AddFolios(DdlSubProyecto.SelectedValue.ToEntero, DdlTipoDocto.SelectedValue, TxtFolioInicial.Text.Trim.ToEntero, TxtFolioInicial.Text.Trim.ToEntero, TxtFolioFinal.Text.Trim.Trim.ToEntero, Session("FileUpload").ToString, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then TieneError = True End If Else - If Not ObjFolios.UpdateFolios(DdlSubProyecto.SelectedValue.ToEntero, DdlTipoDocto.SelectedValue, TxtSerie.Text, TxtFolioInicial.Text.Trim.ToEntero, TxtFolioActual.Text.Trim.ToEntero, TxtFolioFinal.Text.Trim.ToEntero, + If Not ObjFolios.UpdateFolios(DdlSubProyecto.SelectedValue.ToEntero, DdlTipoDocto.SelectedValue, TxtFolioInicial.Text.Trim.ToEntero, TxtFolioActual.Text.Trim.ToEntero, TxtFolioFinal.Text.Trim.ToEntero, "", If(ChkEstatus.Checked, True, False), UsuarioActual.CveUsuario, CveFolio) Then TieneError = True End If