This commit is contained in:
janeth arvizu
2019-11-08 09:59:48 -07:00
2 changed files with 15 additions and 12 deletions

View File

@@ -1776,10 +1776,10 @@
<Height>1.16692in</Height>
<Style />
</Body>
<Width>8.23098in</Width>
<Width>8.2362in</Width>
<Page>
<PageHeader>
<Height>3.33515cm</Height>
<Height>4.57869cm</Height>
<PrintOnFirstPage>true</PrintOnFirstPage>
<PrintOnLastPage>true</PrintOnLastPage>
<ReportItems>
@@ -1896,7 +1896,7 @@
<rd:DefaultName>Textbox15</rd:DefaultName>
<Top>2.40001cm</Top>
<Left>0.01325cm</Left>
<Height>0.6cm</Height>
<Height>1.8259cm</Height>
<Width>20.89344cm</Width>
<ZIndex>3</ZIndex>
<Style>
@@ -1910,7 +1910,8 @@
</Style>
</Textbox>
<Line Name="Line1">
<Top>3.1764cm</Top>
<Top>4.4023cm</Top>
<Left>0.01325cm</Left>
<Height>0cm</Height>
<Width>20.90669cm</Width>
<ZIndex>4</ZIndex>
@@ -2107,6 +2108,7 @@
</Textbox>
<Line Name="Line2">
<Top>0.127cm</Top>
<Left>0cm</Left>
<Height>0cm</Height>
<Width>20.90669cm</Width>
<ZIndex>5</ZIndex>

View File

@@ -373,16 +373,16 @@ Partial Class OS_OrdenesServicios
End If
UpDetalleOS.Update()
End Sub
Protected Sub DdlCCEdit_SelectedIndexChanged(sender As Object, e As System.EventArgs)
Dim gvr As GridViewRow = DirectCast(DirectCast(sender, DropDownList).BindingContainer, GridViewRow)
Dim CveProyecto As String = DirectCast(sender, DropDownList).SelectedValue
'Protected Sub DdlCCEdit_SelectedIndexChanged(sender As Object, e As System.EventArgs)
' Dim gvr As GridViewRow = DirectCast(DirectCast(sender, DropDownList).BindingContainer, GridViewRow)
' Dim CveProyecto As String = DirectCast(sender, DropDownList).SelectedValue
gvr.FCDropDownList("DDlSubProyecto").Items.Clear()
gvr.FCDropDownList("DDlSubProyecto").DataSource = GlobalDTSubProyectos(CveProyecto.ToEntero)
gvr.FCDropDownList("DDlSubProyecto").DataBind()
gvr.FCDropDownList("DDlSubProyecto").Items.Insert(0, New ListItem("Sin SubProyecto Asignado", "-1"))
' gvr.FCDropDownList("DDlSubProyecto").Items.Clear()
' gvr.FCDropDownList("DDlSubProyecto").DataSource = GlobalDTSubProyectos(CveProyecto.ToEntero)
' gvr.FCDropDownList("DDlSubProyecto").DataBind()
' gvr.FCDropDownList("DDlSubProyecto").Items.Insert(0, New ListItem("Sin SubProyecto Asignado", "-1"))
End Sub
'End Sub
Protected Sub DdlFR_SelectedIndexChanged(sender As Object, e As EventArgs)
Dim DdlFR_Gv As DropDownList = CType(sender, DropDownList)
Dim index As Integer = CType(DdlFR_Gv.NamingContainer, GridViewRow).FCLiteral("LtlConsecutivo").Text.ToString.ToEntero
@@ -1303,6 +1303,7 @@ Partial Class OS_OrdenesServicios
TmpDT.Rows(Row.RowIndex)("Estatus") = "False"
Row.FCLinkButton("imgEstatus").CssClass = "btn btn-circle btn-sm red"
End If
UpDetalleOS.Update()
End Sub
Private Sub BtnAddGvDetalle_Click(sender As Object, e As EventArgs) Handles BtnAddGvDetalle.Click
Dim ObjOS As New ClsOS