dbo.obtener_datos_contables_ventas

SET QUOTED_IDENTIFIER, ANSI_NULLS ON
GO
/*
exec obtener_score_contable '30547242331'
exec obtener_score_contable_ant '30501677643'


exec obtener_score_contable_full '30501199253'


*/
CREATE OR ALTER PROCEDURE dbo.obtener_datos_contables_ventas
@p_Cuit varchar(20),
@id_balance int = 0

AS
BEGIN
    SET NOCOUNT ON;
 declare @fecha_max date
  if(@id_balance > 0)
    BEGIN
   
    set @fecha_max = (select max(fecha_balance) from balances_contables where id_balance= @id_balance and visible = 1 and estado = 'PUBLICADO')
    if (datepart(yy,getdate()) - datepart(yy,@fecha_max) > 6)
    begin
      return
    end
    select convert(varchar(10),fecha_balance,103) as fecha_balance_DMY, fecha_balance,balances_contables.moneda,

  /*ac_total as activo_corriente_total,
   anc_total as activo_no_corriente_total,
   act_total as activo_total,
   pc_total as pasivo_corriente_total,
   pnc_total as pasivo_no_corriente_total,
   pas_total as pasivo_total,
   patrimonio as patrimonio_neto,*/
  res_vtanet as ventas_netas/*,
   ganancia as resultado,
  
  
   ind_solvencia_pat as solvencia_patrimonial,
   ind_endeu as endeudamiento_total,
   convert(decimal(12,2),iif(isnull(patrimonio,0) > 0, isnull(pc_total,0)/patrimonio, 0)) as endeudamiento_corriente, /*** pasivo_corriente / patrimonio_neto  **/
   ind_captra as capital_de_trabajo,
   convert(decimal(12,2),iif(isnull(act_total,0) > 0, (isnull(ac_total,0)-isnull(pc_total,0))/act_total, 0)) as capital_corriente_sobre_activo, /** (activo_corriente - pasivo_corriente) / activo **/
   ind_liqcorr as liquidez_corriente,
   ind_liqseca as liquidez_seca,
   ind_indrot as rotacion_de_creditos,
  
   convert(decimal(12,2),iif( (isnull(res_compras,0)+isnull(res_gascom,0)+isnull(res_gasadm,0)+isnull(res_gasfin,0)) > 0, isnull(pc_total,0)*365/((isnull(res_compras,0)+isnull(res_gascom,0)+isnull(res_gasadm,0)+isnull(res_gasfin,0)) * 1.21) , 0 )) as rotacion_pasivo_corriente, /*** (pasivo_corriente * 365) / ((compras+gastos)*1.21) ***/
   ind_rotinv as rotacion_inventarios,
   convert(decimal(12,2),iif(isnull(act_total,0) > 0, isnull(res_vtanet,0)/act_total, 0)) as rotacion_activos,     /***    ventas / activo_total   ***/
   ind_rotact as rotacion_activo_fijo,
   ind_prest_pn as prestamos_sobre_patrimonio_neto,
   convert(decimal(12,2),iif(isnull(res_vtanet, 0) > 0, (isnull(pc_presta,0)+isnull(pnc_presta,0))*12/res_vtanet, 0)) as meses_deuda,    /**** (prestamos (o BCRA)) * 12 / ventas ***/ 
   convert(decimal(12,2),iif(isnull(res_vtanet, 0) > 0, (isnull(pc_presta,0)+isnull(pnc_presta,0))*365/res_vtanet, 0)) as dias_deuda,                /**** (prestamos (o BCRA)) * 365 / ventas ***/ 
  
   ind_marbru as margen_bruto,
   ind_utilfin as margen_neto,
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, (isnull(ganancia,0)+isnull(res_otrosegr,0)-isnull(res_otrosing,0)) /isnull(res_vtanet,0)*100 , 0)) as margen_operativo,
   ind_retpat as margen_sobre_patrimonio,
   ind_rentabilidad as margen_sobre_activo,
  
   ebitda as ebitda,
   ind_ebipas as ebitda_pasivo,
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, isnull(ebitda,0)/res_vtanet, 0)) as ebitda_ventas,    /******* ebitda / ventas *****/
   convert(decimal(12,2),iif(isnull(res_gasfin,0) > 0, isnull(ebitda,0)/res_gasfin, 0)) as etitda_intereses,     /**** ebitda / res_gasfin *****/
  
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, isnull(res_gasfin,0)/res_vtanet, 0)) as gastos_financieros_ventas,   /*** res_gasfin / ventas ***/
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, isnull(res_gascom,0)/res_vtanet, 0)) as gastos_comerciales_ventas,   /*** res_gascom / ventas ***/
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, isnull(res_gasadm,0)/res_vtanet, 0)) as gastos_administracion_ventas,   /*** res_gasadm / ventas ***/
  
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, (isnull(res_gasfin,0)+isnull(res_gascom,0)+isnull(res_gasadm,0))/res_vtanet, 0)) as gastos_totales_ventas,   /*** (res_gasfin + res_gascom + res_gasadm) / ventas ***/
  
   /*ind_invbu as inversiones_bienes_uso,*/  /*** revisar : patrimonio_neto / bienes_uso * 100 ***/
   convert(decimal(12,2),iif(isnull(anc_bieuso,0) > 0, isnull(patrimonio,0)/anc_bieuso, 0)) as inversiones_bienes_uso, 
  
   convert(decimal(12,2),iif(isnull(amortiza,0) > 0, isnull(anc_bieuso,0)/amortiza, 0)) as vida_restante_bienes_uso   /**  anc_bieuso / amortiza  **/
  
   /*************************************************************************************************/
  
   ,ind_endeuact as endeudamiento_activo_fijo,
   ind_solvencia as solvencia,
   ind_cappro as capital_propio,
   ind_inmact as inmovilizacion_de_activos,
   ind_inmpat as inmovilizacion_patrimonio_neto,
  
   ind_rotvta as rotacion_de_ventas,
   ind_rotvta_dias rotacion_de_ventas_dias,
   ind_rotact_dias as rotacion_activo_fijo_dias,
  
   ind_indrot_dias as rotacion_de_creditos_dias,
   ind_rotinv_dias as rotacion_inventarios_dias,
  
   ind_prest_vtas as prestamos_sobre_ventas,
   convert(decimal(12,2),iif (isnull(act_total,0)  !=0, ((isnull(ac_total,0)-isnull(pc_total,0))/act_total),0))       as capital_de_trabajo_activo,
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, ((isnull(res_vtanet,0)-isnull(res_cosmer,0))/res_vtanet),0)) as rentabilidad_bruta,
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, ((isnull(ganancia,0))/isnull(res_vtanet,0)),0))              as utilidad_neta,
   isnull(res_vtanet, 0) as ventas,
   isnull(res_otrosing, 0) as otros_ingresos,
   isnull(res_otrosegr, 0) as otros_egresos,
   isnull(ganancia, 0) as resultado_ejercicio,
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, isnull(ganancia,0)/isnull(res_vtanet,0)*100, 0)) as rentabilidad_sobre_ventas*/
 


   from balances_contables 
  where id_balance = @id_balance
    and fecha_balance = @fecha_max
    and visible = 1
     and estado = 'PUBLICADO'
    END
  ELSE 
    BEGIN
 
 set @fecha_max = (select max(fecha_balance) from balances_contables where cuit= @p_Cuit and visible = 1 and estado = 'PUBLICADO')

 if (datepart(yy,getdate()) - datepart(yy,@fecha_max) > 6)
 begin
    return
 end
 select convert(varchar(10),fecha_balance,103) as fecha_balance_dmy, fecha_balance,balances_contables.moneda,

  /*ac_total as activo_corriente_total,
   anc_total as activo_no_corriente_total,
   act_total as activo_total,
   pc_total as pasivo_corriente_total,
   pnc_total as pasivo_no_corriente_total,
   pas_total as pasivo_total,
   patrimonio as patrimonio_neto,*/
  res_vtanet as ventas_netas/*,
   ganancia as resultado,
  
  
   ind_solvencia_pat as solvencia_patrimonial,
   ind_endeu as endeudamiento_total,
   convert(decimal(12,2),iif(isnull(patrimonio,0) > 0, isnull(pc_total,0)/patrimonio, 0)) as endeudamiento_corriente, /*** pasivo_corriente / patrimonio_neto  **/
   ind_captra as capital_de_trabajo,
   convert(decimal(12,2),iif(isnull(act_total,0) > 0, (isnull(ac_total,0)-isnull(pc_total,0))/act_total, 0)) as capital_corriente_sobre_activo, /** (activo_corriente - pasivo_corriente) / activo **/
   ind_liqcorr as liquidez_corriente,
   ind_liqseca as liquidez_seca,
   ind_indrot as rotacion_de_creditos,
  
   convert(decimal(12,2),iif( (isnull(res_compras,0)+isnull(res_gascom,0)+isnull(res_gasadm,0)+isnull(res_gasfin,0)) > 0, isnull(pc_total,0)*365/((isnull(res_compras,0)+isnull(res_gascom,0)+isnull(res_gasadm,0)+isnull(res_gasfin,0)) * 1.21) , 0 )) as rotacion_pasivo_corriente, /*** (pasivo_corriente * 365) / ((compras+gastos)*1.21) ***/
   ind_rotinv as rotacion_inventarios,
   convert(decimal(12,2),iif(isnull(act_total,0) > 0, isnull(res_vtanet,0)/act_total, 0)) as rotacion_activos,     /***    ventas / activo_total   ***/
   ind_rotact as rotacion_activo_fijo,
   ind_prest_pn as prestamos_sobre_patrimonio_neto,
   convert(decimal(12,2),iif(isnull(res_vtanet, 0) > 0, (isnull(pc_presta,0)+isnull(pnc_presta,0))*12/res_vtanet, 0)) as meses_deuda,    /**** (prestamos (o BCRA)) * 12 / ventas ***/ 
   convert(decimal(12,2),iif(isnull(res_vtanet, 0) > 0, (isnull(pc_presta,0)+isnull(pnc_presta,0))*365/res_vtanet, 0)) as dias_deuda,                /**** (prestamos (o BCRA)) * 365 / ventas ***/ 
  
   ind_marbru as margen_bruto,
   ind_utilfin as margen_neto,    /**** revisar ***/
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, (isnull(ganancia,0)+isnull(res_otrosegr,0)-isnull(res_otrosing,0)) /isnull(res_vtanet,0)*100 , 0)) as margen_operativo,
   ind_retpat as margen_sobre_patrimonio,
   ind_rentabilidad as margen_sobre_activo,
  
   ebitda as ebitda,
   ind_ebipas as ebitda_pasivo,
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, isnull(ebitda,0)/res_vtanet, 0)) as ebitda_ventas,    /******* ebitda / ventas *****/
   convert(decimal(12,2),iif(isnull(res_gasfin,0) > 0, isnull(ebitda,0)/res_gasfin, 0)) as etitda_intereses,     /**** ebitda / res_gasfin *****/
  
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, isnull(res_gasfin,0)/res_vtanet, 0)) as gastos_financieros_ventas,   /*** res_gasfin / ventas ***/
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, isnull(res_gascom,0)/res_vtanet, 0)) as gastos_comerciales_ventas,   /*** res_gascom / ventas ***/
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, isnull(res_gasadm,0)/res_vtanet, 0)) as gastos_administracion_ventas,   /*** res_gasadm / ventas ***/
  
   convert(decimal(12,2),iif(isnull(res_vtanet,0) > 0, (isnull(res_gasfin,0)+isnull(res_gascom,0)+isnull(res_gasadm,0))/res_vtanet, 0)) as gastos_totales_ventas,   /*** (res_gasfin + res_gascom + res_gasadm) / ventas ***/
  
   /*ind_invbu as inversiones_bienes_uso,*/  /*** revisar : patrimonio_neto / bienes_uso * 100 ***/
   convert(decimal(12,2),iif(isnull(anc_bieuso,0) > 0, isnull(patrimonio,0)/anc_bieuso, 0)) as inversiones_bienes_uso, 
  
   convert(decimal(12,2),iif(isnull(amortiza,0) > 0, isnull(anc_bieuso,0)/amortiza, 0)) as vida_restante_bienes_uso   /**  anc_bieuso / amortiza  **/
  
  
   /*************************************************************************************************/
  
  
   ,ind_liqcorr as liquidez_corriente,
   ind_liqseca as liquidez_seca,
   ind_endeu as endeudamiento_corriente,
   ind_endeuact as endeudamiento_activo_fijo,
   ind_solvencia as solvencia,
   ind_solvencia_pat as solvencia_patrimonial,
   ind_captra as capital_de_trabajo,
   ind_cappro as capital_propio,
   ind_invbu as inversiones_bienes_uso,
   ind_inmact as inmovilizacion_de_activos,
   ind_inmpat as inmovilizacion_patrimonio_neto,
   ind_marbru as utilidad_bruta,
   ind_utilfin as utilidad_neta,
   ind_retpat as retorno_sobre_patrimonio,
   ind_rotvta as rotacion_de_ventas,
   ind_rotvta_dias rotacion_de_ventas_dias,
   ind_rotact as rotacion_activo_fijo,
   ind_rotact_dias as rotacion_activo_fijo_dias,
   ind_rentabilidad as rentabilidad_sobre_activo,
   ind_ebipas as ebitda_pasivo,
   ind_indrot as rotacion_de_creditos,
   ind_indrot_dias as rotacion_de_creditos_dias,
   ind_rotinv as rotacion_inventarios,
   ind_rotinv_dias as rotacion_inventarios_dias,
   ind_prest_pn as prestamos_sobre_patrimonio_neto,
   ind_prest_vtas as prestamos_sobre_ventas,
   convert(decimal(12,2),iif (isnull(act_total,0)  !=0, ((isnull(ac_total,0)-isnull(pc_total,0))/act_total),0))       as capital_de_trabajo_activo,
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, ((isnull(res_vtanet,0)-isnull(res_cosmer,0))/res_vtanet),0)) as rentabilidad_bruta,
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, ((isnull(ganancia,0))/isnull(res_vtanet,0)),0))              as utilidad_neta,
   isnull(res_vtanet, 0) as ventas,
   isnull(res_otrosing, 0) as otros_ingresos,
   isnull(res_otrosegr, 0) as otros_egresos,
   isnull(ganancia, 0) as resultado_ejercicio,
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, isnull(ganancia,0)/isnull(res_vtanet,0)*100, 0)) as rentabilidad_sobre_ventas,
   convert(decimal(12,2),iif (isnull(res_vtanet,0) !=0, (isnull(ganancia,0)+isnull(res_otrosegr,0)-isnull(res_otrosing,0)) /isnull(res_vtanet,0)*100 , 0)) as rentabilidad_operativa*/

   from balances_contables 
  where cuit = @p_Cuit
    and fecha_balance = @fecha_max
    and visible = 1
     and estado = 'PUBLICADO'
      END
END

GO