logiv nominas antiguedad

RH/Personal.aspx.vb

@@ -6738,6 +6738,12 @@ Partial Class RH_Personal
 #End Region
 
 
+    Protected Sub DdlTipoAsistencias_SelectedIndexChangedP(sender As Object, e As EventArgs)
+        Dim ddl As DropDownList = DirectCast(sender, DropDownList)
+        If ddl.SelectedItem.Text = "Retardo" Then
+            TxtPorPago.Text = "87.5"
+        End If
+    End Sub
     Protected Sub DdlTipoAsistencias_SelectedIndexChanged(sender As Object, e As EventArgs)
         Dim ddl As DropDownList = DirectCast(sender, DropDownList)
         Dim gvrow As GridViewRow = DirectCast(ddl.NamingContainer, GridViewRow)