diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 5a076dc1a..0128188fc 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -3259,6 +3259,68 @@ Public Class ClsNominas retorno = RunQuery("Ocurrió un error al agregar el SolicitudesNominas.") Return retorno End Function + + + Public Function SolicitudesAdd2(CveSolicitudCFDI As Integer, CveSolicitudMetadata As Integer, estatus As Integer, observaciones As String, fechaInicio As DateTime, fechaFin As DateTime, cveUsuarioIng As Int32, cveEmpresa As Int32, Optional CveTipoSolicitud As Integer = 1) As Integer + + Dim CveSolictudAgregada As Integer = -1 + + Try + DataAdapter("PA_Gral_SAT_SolicitudesAdd2", CommandType.StoredProcedure) + addParameters("@CveSolicitudCFDI", SqlDbType.Int, CveSolicitudCFDI) + addParameters("@CveSolicitudMetadata", SqlDbType.Int, CveSolicitudMetadata) + addParameters("@Estatus", SqlDbType.Int, estatus) + addParameters("@Observaciones", SqlDbType.VarChar, observaciones) + addParameters("@FechaInicio", SqlDbType.DateTime, fechaInicio) + addParameters("@FechaFin", SqlDbType.DateTime, fechaFin) + addParameters("@CveUsuarioIng", SqlDbType.Int, cveUsuarioIng) + addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa) + addParameters("@CveTipoSolicitud", SqlDbType.Int, CveTipoSolicitud) + + With SqlAdapter.SelectCommand.Parameters + .Add("@CveSolicitud", SqlDbType.Int).Direction = ParameterDirection.Output + End With + + + SqlAdapter.Fill(Data) + CveSolictudAgregada = SqlAdapter.SelectCommand.Parameters("@CveSolicitud").Value.ToString.ToEntero + + Catch ex As Exception + CveSolictudAgregada = -1 + OnError("Ocurrió un error al agregar la Solicitud.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End Try + + Return CveSolictudAgregada + + + End Function + + + Public Function UpdateSolicitudDetalleCveSolicitudDetalle(CveEmpresa As Integer, UUID As String, CveSolicitudDetalle As Integer) As Boolean + + + Dim retorno As Boolean = False + Try + DataAdapter("PA_SAT_SolicitudesCFDIDataCveSolicitudDetalleUpdate", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + .Add("@UUID", SqlDbType.VarChar).Value = UUID + .Add("@CveSolicitudDetalle", SqlDbType.Int).Value = CveSolicitudDetalle + End With + SqlAdapter.Fill(Data) + + retorno = True + + Catch ex As Exception + retorno = False + OnError("Ocurrió un error al Actualizar SolicitudesCFDIData.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + + Return retorno + + + End Function + Public Function SolicitudesUp(CveSolicitud As Int32, CveSolicitudCFDI As Int32, CveSolicitudMetadata As Int32, estatus As Int32, observaciones As String, cveEmpresa As Int32) As Boolean Dim retorno As Boolean = False DataAdapter("PA_Gral_SAT_SolicitudesUp", CommandType.StoredProcedure) diff --git a/Empresas/Grales/Formatos/RepVentaDetalle.rdlc b/Empresas/Grales/Formatos/RepVentaDetalle.rdlc index 816c4bfd3..2d2e81ef0 100644 --- a/Empresas/Grales/Formatos/RepVentaDetalle.rdlc +++ b/Empresas/Grales/Formatos/RepVentaDetalle.rdlc @@ -1114,7 +1114,7 @@ 0.63559in @@ -216,15 +222,21 @@ -
  • - <%-- Descargar--%> -
  • + - -
  • - Solicitudes + + +
  • + Descargar
  • -
    +
  • + Solicitudes +
  • + + + + +
    @@ -232,7 +244,7 @@ - +
    @@ -240,8 +252,8 @@
    - - + +
    @@ -253,10 +265,10 @@ - - + + - +
    @@ -267,13 +279,13 @@ - - + + - +
    -
    +
    @@ -286,240 +298,246 @@ - -
    + +
    - + -
    - +
    +
    -
    - -
    - - - - - - - - - - - - - - - - - - - - - - - - -
    - +
    + +
    + + + + + + + + + + + + + + + + + + + + + + + +
    - -
    -
    - - -
    -
    -
    -
    - - - - - - - - - +
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - +
    + +
    +
    +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    + +
    - - - -