Cambios en facturacion masiva de contratos

Ashx/SIGWeb.ashx

@@ -43,6 +43,8 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
                     ActualizaPrePoliza(context)
                 Case "getpersonal"
                     getpersonal(context)
+                Case "getcontratos"
+                    GetContratos(context)
                 Case "GettingCURP"
                     context.Response.Write(GettingCURP(context.Request("Curp").ToString(), context.Request("year").ToString().ToEntero()))
                 Case "ValidaCURP"
@@ -1080,4 +1082,38 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
         Return retorno
     End Function
 #End Region
+
+#Region "Get Contratos"
+    Private Function GetContratos(ByVal context As HttpContext) As String
+        Dim retorno As String = ""
+        Dim DtRetorno As DataTable = Nothing
+
+        Dim usuario As Usuario = UsuarioActual(context)
+        Dim CveEmpresa As String
+        If IsNothing(usuario) Then
+            context.Response.Write("")
+        Else
+            CveEmpresa = usuario.CveEmpresa
+            Dim Name = IfNull(context.Request("Name"), "-1").ToString
+
+            Dim dt As DataTable = DirectCast(context.Application("GlobalDTContratos"), DataTable).FiltraParametros(String.Format("CveEmpresa = {0}", CveEmpresa))
+            If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
+                DtRetorno = dt.FiltraParametros(String.Format("NumeroContrato like '%{0}%'", Name))
+            End If
+            dt.Dispose()
+        End If
+
+        If DtRetorno IsNot Nothing AndAlso DtRetorno.Rows.Count > 0 Then
+            DtRetorno.Columns("CveContrato").ColumnName = "id"
+            DtRetorno.Columns("NumeroContrato").ColumnName = "text"
+            retorno = JsonConvert.SerializeObject(DtRetorno).ToString
+            context.Response.Write(retorno)
+        Else
+            context.Response.Write("[]")
+        End If
+
+        DtRetorno.Dispose()
+        Return retorno
+    End Function
+#End Region
 End Class