Turnover in industry, non domestic market - monthly data - sts_intvnd_m

Data - Eurostat

Info

source dataset Title .html .rData
eurostat sts_intvnd_m Turnover in industry, non domestic market - monthly data - sts_intvnd_m 2025-10-10 2025-10-11
eurostat sts_intvd_m Turnover in industry, domestic market - monthly data - sts_intvd_m 2024-06-24 2025-10-11

Data on macro

Title source dataset .html .RData
Gross value added and income by A*10 industry breakdowns eurostat nama_10_a10 2025-10-11 2025-10-11
Employment by A*10 industry breakdowns eurostat nama_10_a10_e 2025-10-11 2025-10-11
GDP and main components (output, expenditure and income) eurostat nama_10_gdp 2025-10-11 2025-10-11
Labour productivity and unit labour costs eurostat nama_10_lp_ulc 2025-10-11 2025-10-11
Gross value added and income A*10 industry breakdowns eurostat namq_10_a10 2025-10-11 2025-10-11
Employment A*10 industry breakdowns eurostat namq_10_a10_e 2025-05-24 2025-10-11
GDP and main components (output, expenditure and income) eurostat namq_10_gdp 2025-10-11 2025-10-11
Labour productivity and unit labour costs eurostat namq_10_lp_ulc 2025-10-11 2025-10-11
Main GDP aggregates per capita eurostat namq_10_pc 2025-10-11 2025-10-11
Non-financial transactions eurostat nasa_10_nf_tr 2025-10-11 2025-10-11
Non-financial transactions eurostat nasq_10_nf_tr 2025-10-11 2025-10-11
Gross Domestic Product fred gdp 2025-10-09 2025-10-09
Quarterly National Accounts oecd QNA 2024-06-06 2025-05-24
Gross domestic product (GDP) oecd SNA_TABLE1 2025-09-29 2025-05-24
Non-financial accounts by sectors oecd SNA_TABLE14A 2025-09-29 2024-06-30
Disposable income and net lending - net borrowing oecd SNA_TABLE2 2024-07-01 2024-04-11
Value added and its components by activity, ISIC rev4 oecd SNA_TABLE6A 2024-07-01 2024-06-30
External balance on goods and services (% of GDP) wdi NE.RSB.GNFS.ZS 2025-10-10 2025-09-27
GDP (current USD) wdi NY.GDP.MKTP.CD 2025-10-10 2025-09-27
GDP, PPP (current international D) wdi NY.GDP.MKTP.PP.CD 2025-10-10 2025-09-27
GDP per capita (current USD) wdi NY.GDP.PCAP.CD 2025-10-10 2025-09-27
GDP per capita (constant 2015 USD) wdi NY.GDP.PCAP.KD 2025-10-10 2025-09-27
GDP per capita, PPP (current international D) wdi NY.GDP.PCAP.PP.CD 2025-10-10 2025-09-27
GDP per capita, PPP (constant 2011 international D) wdi NY.GDP.PCAP.PP.KD 2025-10-10 2025-09-27

Last

Code
sts_intvnd_m %>%
  group_by(time) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(time)) %>%
  head(3) %>%
  print_table_conditional()
time Nobs
2025M08 5838
2025M07 12436
2025M06 12526

Info

The Turnover Index is a business cycle indicator showing the monthly evolution of the market of goods and services in the industrial sector. It also records the evolution of turnover over longer periods of time. The turnover of industry index is not deflated. It is therefore the objective of this indicator to measure the market activity in the industrial sector in value. Data are compiled according to the Statistical classification of economic activities in the European Community, (NACE Rev. 2, Eurostat). Industrial turnover is compiled as a “fixed base year Laspeyres type volume-index”.

indic_bt

Code
sts_intvnd_m %>%
  left_join(indic_bt, by = "indic_bt") %>%
  group_by(indic_bt, Indic_bt) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
indic_bt Indic_bt Nobs
NETTUR_NDOM Non-domestic net turnover 3995428
NETTUR_NDOM_EU Non-domestic net turnover - euro area 1823969
NETTUR_NDOM_NEU Non-domestic net turnover - non-euro area 1798451

nace_r2

Code
sts_intvnd_m %>%
  left_join(nace_r2, by = "nace_r2") %>%
  group_by(nace_r2, Nace_r2) %>%
  summarise(Nobs = n()) %>%
  print_table_conditional()

s_adj

Code
sts_intvnd_m %>%
  left_join(s_adj, by = "s_adj") %>%
  group_by(s_adj, S_adj) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
s_adj S_adj Nobs
SCA Seasonally and calendar adjusted data 2931392
CA Calendar adjusted data, not seasonally adjusted data 2900364
NSA Unadjusted data (i.e. neither seasonally adjusted nor calendar adjusted data) 1786092

unit

Code
sts_intvnd_m %>%
  left_join(unit, by = "unit") %>%
  group_by(unit, Unit) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}
unit Unit Nobs
I15 Index, 2015=100 2258470
I21 Index, 2021=100 2216993
I10 Index, 2010=100 1451162
PCH_PRE Percentage change on previous period 862257
PCH_SM Percentage change compared to same period in previous year 828966

geo

Code
sts_intvnd_m %>%
  left_join(geo, by = "geo") %>%
  group_by(geo, Geo) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  mutate(Geo = ifelse(geo == "DE", "Germany", Geo)) %>%
  mutate(Flag = gsub(" ", "-", str_to_lower(Geo)),
         Flag = paste0('<img src="../../bib/flags/vsmall/', Flag, '.png" alt="Flag">')) %>%
  select(Flag, everything()) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .}

time

Code
sts_intvnd_m %>%
  group_by(time) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(time)) %>%
  print_table_conditional()

EA20

C

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("EA20")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2005M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  filter(date >= as.Date("2005-01-01")) %>%
  ggplot() + ylab("Index of turnover") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.85),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))

Germany - Different Industries

C10 - Manufacture of food products

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C10",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("DE")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2004M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  filter(date <= as.Date("2020-07-01"),
         date >= as.Date("2000-01-01")) %>%
  ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.85),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))

C29 - Manufacture of motor vehicles, trailers and semi-trailers

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C29",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("DE")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2004M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  filter(date <= as.Date("2020-07-01"),
         date >= as.Date("2000-01-01")) %>%
  ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.35),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))

C20 - Manufacture of chemicals and chemical products

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C20",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("DE")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2004M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  filter(date <= as.Date("2020-07-01"),
         date >= as.Date("2000-01-01")) %>%
  ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.85),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))

C30 - Manufacture of other transport equipment

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C30",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("DE")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2004M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  filter(date <= as.Date("2020-07-01"),
         date >= as.Date("2000-01-01")) %>%
  ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.85),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))

Individual Countries

France

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("FR")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2000M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  filter(date <= as.Date("2020-07-01")) %>%
  ggplot() + ylab("Index of turnover") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.85),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))

Germany

All

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("DE")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2003M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.85),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))

1995-

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("DE")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2004M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  filter(date >= as.Date("1995-01-01")) %>%
  ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.85),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))

2000-

Code
sts_intvnd_m %>%
  bind_rows(sts_intvd_m) %>%
  filter(nace_r2 == "C",
         unit == "I21",
         s_adj == "SCA",
         geo %in% c("DE")) %>%
  group_by(indic_bt) %>%
  mutate(values = 100*values/values[time == "2004M01"]) %>%
  left_join(indic_bt, by = "indic_bt") %>%
  month_to_date %>%
  filter(date >= as.Date("2000-01-01")) %>%
  ggplot() + ylab("Index of turnover - Non domestic market") + xlab("") + theme_minimal() +
  geom_line(aes(x = date, y = values, color = Indic_bt)) +
  
  scale_x_date(breaks = seq(1920, 2100,2) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme(legend.position = c(0.3, 0.85),
        legend.title = element_blank()) +
  scale_y_log10(breaks = seq(-60, 300, 10))