Por qué usar el WACC como costo de mantener inventario?

INVENTARIOS Serie - Parte 6
Inventarios
Supply Chain
Evaluación de Proyectos
Autor
Afiliación

Cristian Chiquito Valencia

Independent @ CHV

Fecha de publicación

February 24, 2025

¿Por qué usar el WACC?

El costo ponderado promedio del capital de una empresa está determinado por el riesgo de sus activos, como el inventario, las propiedades, las plantas y el equipo, y los cuentas por cobrar.

Vamos a revisar qué tan representativo es el inventario para las industrias en el Valle del Cauca, en cuanto a sus activos operativos netos.

Primero mostramos el Estado de resultado integral que ya conocímos aquí:

Código 
knitr::opts_chunk$set(message = FALSE, warning = FALSE, fig.align = "center")

library(tidyverse)
library(data.table)
library(gt)

estilo_summary <- function(resumen){
    resumen |> 
        summary() |> 
        as.data.frame() |> 
        rownames_to_column() |> 
        #dplyr::select(c(Var2,Freq)) |> 
        rename(Medida = rowname,
               Frecuencia = x) |> 
        mutate(Frecuencia = round(Frecuencia,4))
}

aplicar_theme_table <- function(gt_table) {
    gt_table %>%
        cols_align(align = "center") |> 
        tab_options(
            table.border.top.color = "orange",
            table.font.color = "#1e2c46",
            table_body.hlines.color = "orange",
            column_labels.background.color = "#1e2c46"
        )
}

# Función para extraer texto dentro de parentesis
extraer_texto <- function(texto){
    inicial <- gregexpr("\\(", texto)[[1]]
    final <- gregexpr("\\)", texto)[[1]]
    substring(texto, inicial + 1, final - 1)
}

# Vector con los nombres extraídos
nuevo_nombre <- function(info){
    colnames(info) |> 
    purrr::map(~last(extraer_texto(.x))) |> 
    unlist()
}

pyg <- openxlsx::read.xlsx("./310030_Estado de resultado integral, resultado del periodo, por funcion de gasto(3).xlsx") |> 
    data.table() |> 
    filter(Fecha.de.Corte == "2022-12-31")

# Asignar nombres en inglés
pyg <- setNames(pyg, ifelse(nuevo_nombre(pyg) != "", nuevo_nombre(pyg), colnames(pyg)))

pyg <- pyg |> 
    filter(Periodo == "Periodo Actual", 
           `Departamento.de.la.direcci&#243;n.del.domicilio` == "VALLE")

pyg |> 
    gt_preview() |> 
    aplicar_theme_table()
Punto.de.Entrada Nombre.Formulario NIT Fecha.de.Corte Raz&#243;n.social.de.la.sociedad CIIU Tipo.societario Direcci&#243;n.de.notificaci&#243;n.judicial.registrada.en.C&#225;mara.de.Comercio Departamento.de.la.direcci&#243;n.del.domicilio Ciudad.de.la.direcci&#243;n.del.domicilio Periodo Revenue CostOfSales GrossProfit OtherIncome DistributionCosts AdministrativeExpense OtherExpenseByFunction OtherGainsLosses GananciaPerdidaPorActividadesDeOperacion FinanceIncome FinanceCosts ProfitLossBeforeTax IncomeTaxExpenseContinuingOperations ProfitLossFromContinuingOperations ProfitLossFromDiscontinuedOperations ProfitLoss
1 Pymes-Individuales Estado de resultado integral, resultado del periodo, por funcion de gasto 800000241 2022-12-31 CERERIA EL SAGRADO CORAZON LTDA C3290 - Otras industrias manufactureras n.c.p. 03. SOCIEDAD LIMITADA KM 5.5 VIA LA BUITRERA PREDIO LA CANANEA VALLE CALI-VALLE Periodo Actual 15028675 10346586 4682089 NA 973304 2191209 NA NA 1517576 152265 547097 1122744 413536 709208 NA 709208
2 Pymes-Individuales Estado de resultado integral, resultado del periodo, por funcion de gasto 800000393 2022-12-31 CONFEPLASTICOS SAS C2229 - Fabricaci&#243;n de art&#237;culos de pl&#225;stico n.c.p. 08. SOCIEDAD POR ACCIONES SIMPLIFICADA SAS CL 27 4 55 VALLE CALI-VALLE Periodo Actual 2117949 2327453 -209504 NA NA 438142 73654 NA -721300 NA 232828 -954128 NA -954128 NA -954128
3 Pymes-Individuales Estado de resultado integral, resultado del periodo, por funcion de gasto 800000469 2022-12-31 RIVERA CORREA Y CRUZ Y COMPA&#209;IA LIMITADA G4731 - Comercio al por menor de combustible para automotores 03. SOCIEDAD LIMITADA CRA 24 12 25 VALLE BUGA-VALLE Periodo Actual 5189953 4510177 679776 66584 343831 300699 457 NA 101373 75 87259 14189 9090 5099 NA 5099
4 Pymes-Individuales Estado de resultado integral, resultado del periodo, por funcion de gasto 800001020 2022-12-31 DISTRIBUIDORA DE DROGAS LA REBAJA PRINCIPAL S.A. N7740 - Arrendamiento de propiedad intelectual y productos similares, excepto obras protegidas por derechos de autor 01. SOCIEDAD AN&#211;NIMA CR 3 12 40 OF 1101 VALLE CALI-VALLE Periodo Actual 5063032 NA 5063032 NA NA 1613519 23190 NA 3426323 356968 NA 3783291 1317122 2466169 NA 2466169
5 Pymes-Individuales Estado de resultado integral, resultado del periodo, por funcion de gasto 800001047 2022-12-31 MAYA Y BEDOYA LTDA G4773 - Comercio al por menor de productos farmac&#233;uticos y medicinales, cosm&#233;ticos y art&#237;culos de tocador en establecimientos especializados 03. SOCIEDAD LIMITADA CALLE 8 6 -80 VALLE CALI-VALLE Periodo Actual 17015456 12716657 4298799 24143 2581954 1014383 72255 NA 654350 18956 51 673255 265550 407705 NA 407705
6..2391
2392 Pymes-Individuales Estado de resultado integral, resultado del periodo, por funcion de gasto 901468892 2022-12-31 INVERSIONES ATELIER SAS M7490 - Otras actividades profesionales, cient&#237;ficas y t&#233;cnicas n.c.p. 08. SOCIEDAD POR ACCIONES SIMPLIFICADA SAS CL 67 NORTE # 6 - 85 VALLE CALI-VALLE Periodo Actual 600262 NA 600262 1857 NA 631283 193067 NA -222231 13805 16544 -224970 22615 -247585 NA -247585

Y ahora el Estado de situación financiera que también vimos aquí:

Código 
data <- openxlsx::read.xlsx("./210030_Estado de situación financiera, corriente_no corriente.xlsx") |> 
    data.table() |> 
    filter(Fecha.de.Corte == "2022-12-31")

# Asignar nombres en inglés
data <- setNames(data, ifelse(nuevo_nombre(data) != "", nuevo_nombre(data), colnames(data)))


# Cambiar otros nombres
data <- data |> 
    rename(Razon.Social = "Raz&#243;n.social.de.la.sociedad",
           Direccion = "Direcci&#243;n.de.notificaci&#243;n.judicial.registrada.en.C&#225;mara.de.Comercio",
           Departamento = "Departamento.de.la.direcci&#243;n.del.domicilio",
           Ciudad = "Ciudad.de.la.direcci&#243;n.del.domicilio",
           TotalCurrentFinancialAssetsSELL= "Total_activos_corrientes_distintos_de_los_activos_no_corrientes_o_grupo_de_activos_para_su_disposicion_clasificados_como_mantenidos_para_la_venta_o_como_mantenidos_para_distribuir_a_los_propietarios",
           OtherCurrentFinancialAssetsSELL= "Activos_no_corrientes_o_grupos_de_activos_para_su_disposicion_clasificados_como_mantenidos_para_la_venta_o_como_mantenidos_para_distribuir_a_los_propietarios",
           PropertyPlantAndEquipmentWithDEP= "Propiedades_de_inversi&#243;n_al_costo_menos_depreciacion_acumulada_y_deterioro",
           TotalCurrentFinancialLiabilitiesSELL = "Total_pasivos_corrientes_distintos_de_los_pasivos_incluidos_en_grupos_de_activos_para_su_disposicion_clasificados_como_mantenidos_para_la_venta",
           OtherCurrentFinancialLiabilitiesSELL= "Pasivos_incluidos_en_grupos_de_activos_para_su_disposicion_clasificados_como_mantenidos_para_la_venta")

# Solo veremos el periodo final
data <- data |> 
    filter(Periodo == "Periodo Actual", 
           Departamento == "VALLE")

data |> 
    gt_preview() |> 
    aplicar_theme_table()
Punto.de.Entrada Nombre.Formulario NIT Fecha.de.Corte Razon.Social CIIU Tipo.societario Direccion Departamento Ciudad Periodo CashAndCashEquivalents TradeAndOtherCurrentReceivables Inventories CurrentTaxAssetsCurrent CurrentBiologicalAssetsAtCost CurrentBiologicalAssetsAtFairValue OtherCurrentFinancialAssets OtherCurrentNonfinancialAssets CurrentNoncashAssetsPledgedAsCollateralForWhichTransfereeHasRightByContractOrCustomToSellOrRepledgeCollateral TotalCurrentFinancialAssetsSELL OtherCurrentFinancialAssetsSELL CurrentAssets PropertyPlantAndEquipment PropertyPlantAndEquipmentWithDEP InvestmentProperty Goodwill IntangibleAssetsOtherThanGoodwill NoncurrentBiologicalAssetsAtCost NoncurrentBiologicalAssetsAtFairValue NoncurrentReceivables NoncurrentInventories DeferredTaxAssets CurrentTaxAssetsNoncurrent OtherNoncurrentFinancialAssets OtherNoncurrentNonfinancialAssets NoncurrentNoncashAssetsPledgedAsCollateralForWhichTransfereeHasRightByContractOrCustomToSellOrRepledgeCollateral NoncurrentAssets Assets CurrentProvisionsForEmployeeBenefits OtherShorttermProvisions CurrentProvisions TradeAndOtherCurrentPayables CurrentTaxLiabilitiesCurrent OtherCurrentFinancialLiabilities ShorttermBorrowings CurrentPortionOfLongtermBorrowings OtherCurrentNonfinancialLiabilities TotalCurrentFinancialLiabilitiesSELL OtherCurrentFinancialLiabilitiesSELL CurrentLiabilities NoncurrentProvisionsForEmployeeBenefits OtherLongtermProvisions NoncurrentProvisions NoncurrentPayables DeferredTaxLiabilities CurrentTaxLiabilitiesNoncurrent OtherNoncurrentFinancialLiabilities LongtermBorrowings OtherNoncurrentNonfinancialLiabilities NoncurrentLiabilities Liabilities IssuedCapital SharePremium TreasuryShares InversionSuplementariaAlCapitalAsignado OtherEquityInterest SuperavitPorRevaluacion OtherReserves RetainedEarnings Equity EquityAndLiabilities
1 Pymes-Individuales Estado de situaci&#243;n financiera, corriente/no corriente 800000241 2022-12-31 CERERIA EL SAGRADO CORAZON LTDA C3290 - Otras industrias manufactureras n.c.p. 03. SOCIEDAD LIMITADA KM 5.5 VIA LA BUITRERA PREDIO LA CANANEA VALLE CALI-VALLE Periodo Actual 434850 3294074 2412864 NA NA NA 51621 NA NA 6193409 NA 6193409 564126 NA NA NA NA NA NA NA NA NA NA 18708 NA NA 582834 6776243 114962 NA 114962 2775642 294400 253216 253216 NA NA 3438220 NA 3438220 NA NA NA NA NA NA NA NA NA NA 3438220 200000 NA NA NA NA 132740 130902 2874381 3338023 6776243
2 Pymes-Individuales Estado de situaci&#243;n financiera, corriente/no corriente 800000393 2022-12-31 CONFEPLASTICOS SAS C2229 - Fabricaci&#243;n de art&#237;culos de pl&#225;stico n.c.p. 08. SOCIEDAD POR ACCIONES SIMPLIFICADA SAS CL 27 4 55 VALLE CALI-VALLE Periodo Actual 34675 372255 9424 67673 NA NA NA NA NA 484027 NA 484027 3065089 NA NA NA NA NA NA NA NA NA NA NA NA NA 3065089 3549116 777054 NA 777054 1618837 401720 778820 8121 770699 NA 3576431 NA 3576431 NA 2717 2717 NA NA NA 689414 689414 NA 692131 4268562 200000 NA NA NA NA 394906 458229 -1772581 -719446 3549116
3 Pymes-Individuales Estado de situaci&#243;n financiera, corriente/no corriente 800000469 2022-12-31 RIVERA CORREA Y CRUZ Y COMPA&#209;IA LIMITADA G4731 - Comercio al por menor de combustible para automotores 03. SOCIEDAD LIMITADA CRA 24 12 25 VALLE BUGA-VALLE Periodo Actual 83458 407300 49573 NA NA NA 10000 NA NA 550331 22296 572627 1345406 NA NA NA NA NA NA NA NA NA NA NA NA NA 1345406 1918033 104826 NA 104826 245856 6830 269542 97035 172507 NA 627054 NA 627054 NA NA NA NA 29682 NA NA NA 89498 119180 746234 102245 NA NA NA NA NA 17087 1052467 1171799 1918033
4 Pymes-Individuales Estado de situaci&#243;n financiera, corriente/no corriente 800001020 2022-12-31 DISTRIBUIDORA DE DROGAS LA REBAJA PRINCIPAL S.A. N7740 - Arrendamiento de propiedad intelectual y productos similares, excepto obras protegidas por derechos de autor 01. SOCIEDAD AN&#211;NIMA CR 3 12 40 OF 1101 VALLE CALI-VALLE Periodo Actual 6059138 910913 NA NA NA NA NA NA NA 6970051 NA 6970051 19683 NA NA NA NA NA NA NA NA NA NA NA 33761 NA 53444 7023495 NA NA NA 24685 1415386 NA NA NA NA 1440071 NA 1440071 NA NA NA NA NA NA NA NA NA NA 1440071 53497 NA NA NA NA NA 26749 5503178 5583424 7023495
5 Pymes-Individuales Estado de situaci&#243;n financiera, corriente/no corriente 800001047 2022-12-31 MAYA Y BEDOYA LTDA G4773 - Comercio al por menor de productos farmac&#233;uticos y medicinales, cosm&#233;ticos y art&#237;culos de tocador en establecimientos especializados 03. SOCIEDAD LIMITADA CALLE 8 6 -80 VALLE CALI-VALLE Periodo Actual 1946480 1162466 1872505 NA NA NA NA 1201 NA 4982652 NA 4982652 262823 NA NA NA NA NA NA NA NA NA NA 10000 NA NA 272823 5255475 193609 NA 193609 1265130 262475 NA NA NA 651741 2372955 NA 2372955 NA NA NA NA NA NA NA NA NA NA 2372955 1500000 NA NA NA NA NA 370959 1011561 2882520 5255475
6..2391
2392 Pymes-Individuales Estado de situaci&#243;n financiera, corriente/no corriente 901468892 2022-12-31 INVERSIONES ATELIER SAS M7490 - Otras actividades profesionales, cient&#237;ficas y t&#233;cnicas n.c.p. 08. SOCIEDAD POR ACCIONES SIMPLIFICADA SAS CL 67 NORTE # 6 - 85 VALLE CALI-VALLE Periodo Actual 436111 3054731 NA 20822 NA NA NA NA NA 3511664 NA 3511664 5457219 NA NA NA NA NA NA NA NA NA NA NA NA NA 5457219 8968883 19851 NA 19851 143592 26788 NA NA NA NA 190231 NA 190231 NA NA NA NA NA NA NA NA NA NA 190231 1000 NA NA NA NA 9052026 NA -274374 8778652 8968883

Nos interesa conocer la proporción de \(deuda / capital\) que tienen las empresas en el Valle del Cauca:

Código 
caratula <- openxlsx::read.xlsx("./10000_Carátula.xlsx") |> 
    data.table()

full_join(
data |> 
    filter(Periodo == "Periodo Actual") |> 
    dplyr::select(c(3,4,5,14,62,72)) |> 
    unique() 
,
pyg |> 
    filter(Periodo == "Periodo Actual") |> 
    dplyr::select(c(3,4,5,12)) |> 
    unique()
) |> 
    left_join(caratula[,c(3,11)], by = c("NIT")) |> 
    mutate(prop_deuda = `Liabilities` / `EquityAndLiabilities`,
           tiempo = 2024 - as.numeric(substr(`Fecha.de.constitución.(Aaaa-Mm-Dd)`,1,4))) |> 
    filter(prop_deuda > 0, !is.na(prop_deuda), prop_deuda<=1, tiempo >=0, !is.na(tiempo)) |> 
    filter(tiempo < 50) |> 
    ggplot(aes(as.numeric(tiempo), prop_deuda, group = as.factor(tiempo)))+
    geom_boxplot(aes(fill = "orange"))+
    hrbrthemes::theme_ipsum()+
    theme(legend.position = "none")+
    labs(x = "AÑOS DESDE CREACIÓN",
         y = "PROPORCIÓN DE DEUDA (%)")+
    scale_y_continuous(labels = scales::percent)

Proporción deuda/capital

Ahora cruzamos la información de los dos reportes financieros para el mostrar el inventario como porcentaje de los activos operativos netos para una muestra de Pymes del Valle del Cauca varios sectores.

Código 
data |> 
    mutate(sector = substr(CIIU,1,1)) |> 
    mutate(NOA = (Assets -(
        OtherCurrentFinancialAssets+OtherNoncurrentFinancialAssets))-
            (Liabilities -(OtherCurrentFinancialLiabilities+
            OtherNoncurrentFinancialLiabilities)),
    inv_NOA = (Inventories+NoncurrentInventories)/NOA) |> 
    filter(!is.nan(inv_NOA), inv_NOA <=1, inv_NOA>0) |> 
    group_by(sector) |> 
    summarise(media = mean(inv_NOA)) |> 
    ggplot(aes(sector, media))+
    geom_bar(stat = "identity", position = "dodge", fill = "orange")+
    hrbrthemes::theme_ipsum()+
    theme(axis.text.y = element_blank())+
    labs(x = "SECTOR (CIIU)", y = "INVENTARIO / ACTIVOS OPERATIVOS NETOS")+
    geom_text(aes(label = paste0(round(media,2)*100,"%")), size = 3, vjust = -0.3)

Aquí te muestro el listado de CIIU por división:

Código 
ciiu <- openxlsx::read.xlsx("./Estructura-detallada-CIIU-4AC-2022.xlsx")

ciiu |> 
    filter(str_detect(División, "SECC")) |> 
    dplyr::select(División, Descripción) |> 
    gt() |> 
    aplicar_theme_table()
División Descripción
SECCIÓN A AGRICULTURA, GANADERÍA, CAZA, SILVICULTURA Y PESCA
SECCIÓN B EXPLOTACIÓN DE MINAS Y CANTERAS
SECCIÓN C INDUSTRIAS MANUFACTURERAS
SECCIÓN D SUMINISTRO DE ELECTRICIDAD, GAS, VAPOR Y AIRE ACONDICIONADO
SECCIÓN E DISTRIBUCIÓN DE AGUA; EVACUACIÓN Y TRATAMIENTO DE AGUAS RESIDUALES, GESTIÓN DE DESECHOS Y ACTIVIDADES DE SANEAMIENTO AMBIENTAL
SECCIÓN F CONSTRUCCIÓN
SECCIÓN G COMERCIO AL POR MAYOR Y AL POR MENOR; REPARACIÓN DE VEHÍCULOS AUTOMOTORES Y MOTOCICLETAS
SECCIÓN H TRANSPORTE Y ALMACENAMIENTO
SECCIÓN I ALOJAMIENTO Y SERVICIOS DE COMIDA
SECCIÓN J INFORMACIÓN Y COMUNICACIONES
SECCIÓN K ACTIVIDADES FINANCIERAS Y DE SEGUROS
SECCIÓN L ACTIVIDADES INMOBILIARIAS
SECCIÓN M ACTIVIDADES PROFESIONALES, CIENTÍFICAS Y TÉCNICAS
SECCIÓN N ACTIVIDADES DE SERVICIOS ADMINISTRATIVOS Y DE APOYO
SECCIÓN O ADMINISTRACIÓN PÚBLICA Y DEFENSA; PLANES DE SEGURIDAD SOCIAL DE AFILIACIÓN OBLIGATORIA
SECCIÓN P EDUCACIÓN
SECCIÓN Q ACTIVIDADES DE ATENCIÓN DE LA SALUD HUMANA Y DE ASISTENCIA SOCIAL
SECCIÓN R ACTIVIDADES ARTÍSTICAS, DE ENTRETENIMIENTO Y RECREACIÓN
SECCIÓN S OTRAS ACTIVIDADES DE SERVICIOS
SECCIÓN T ACTIVIDADES DE LOS HOGARES INDIVIDUALES EN CALIDAD DE EMPLEADORES; ACTIVIDADES NO DIFERENCIADAS DE LOS HOGARES INDIVIDUALES COMO PRODUCTORES DE BIENES Y SERVICIOS PARA USO PROPIO
SECCIÓN U ACTIVIDADES DE ORGANIZACIONES Y ENTIDADES EXTRATERRITORIALES

Vemos que el inventario para las Pymes en el Valle del Cauca es representativo para: INDUSTRIAS MANUFACTURERAS, CONSTRUCCIÓN y COMERCIO AL POR MAYOR Y AL POR MENOR.

Desde la perspectiva de un inversionista, el inventario es un contribuyente significativo al riesgo general, dado sus riesgos inherentes y su porcentaje de activos operativos. En consecuencia, es razonable aplicar el costo ponderado promedio del capital al calcular la tasa de capital del inventario.

El uso del costo ponderado promedio del capital es una práctica común en aquellas empresas que utilizan un sistema de gestión financiera como el valor económico agregado (EVA). Sin embargo, debes preguntarte qué costo de capital usa tu empresa? Utiliza una tasa de préstamo a corto plazo? O usa una tasa de inversión a corto plazo?.

Ambas tasas subestiman la tasa de capital que corresponde al riesgo subyacente del inventario. Esto puede llevar a decisiones no óptimas en actividades como la selección del modo de transporte, el diseño de la red y la contratación, que equilibran la inversión en inventario frente a los gastos operativos. La discusión, en los próximos posts, describe las deficiencias de estos enfoques comunes para establecer los costos de capital.

Cómo citar

BibTeX
@online{chiquito_valencia2025,
  author = {Chiquito Valencia, Cristian},
  title = {Por Qué Usar El {WACC} Como Costo de Mantener Inventario?},
  date = {2025-02-24},
  url = {https://cchiquitovalencia.github.io/posts/2025-02-24-why_use_WACC/},
  langid = {en}
}
Por favor, cita este trabajo como:
Chiquito Valencia, Cristian. 2025. “Por Qué Usar El WACC Como Costo de Mantener Inventario?” February 24, 2025. https://cchiquitovalencia.github.io/posts/2025-02-24-why_use_WACC/.