data-raw/makeData.R

In pokyah/tilroyExtractoR: Tilroy extractor

# DEFINING THE THEMATICS PARAMS ----
thematics = list(
  
  dailysales = list(
    name = "DailySales",
    menu = "Daily sales",
    submenu = NULL,
    menu_URL = "/index.cfm/admin/dailysalesreport",
    submenu_URL = NULL,
    period_1 = list(
      from = 0,
      to = 0
    ),
    period_2  = list(
      from = NULL,
      to = NULL
    ),
    steps = list(
      all_shops = TRUE,
      leverancier = FALSE,
      alle_producten = FALSE
    ),
    dest_dir = NULL
  ),
  
  aankooporders = list(
    name = "Aankooporders",
    menu = "Aankooporders",
    submenu = NULL,
    menu_URL = "/index.cfm/admin/purchaseOrdersReport",
    submenu_URL = NULL,
    period_1 = list(
      from = 364,
      to = 0
    ),
    period_2  = list(
      from = 720,
      to = 365
    ),
    steps = list(
      all_shops = FALSE,
      leverancier = FALSE,
      alle_producten = FALSE
    ),
    dest_dir = NULL
  ),
  
  aanvulRapportPerWinkel = list(
    name = "AanvulRapportPerWinkel",
    menu = "Aanvullingen",
    submenu = "Per winkel",
    menu_url = "/index.cfm/admin/refills",
    submenu_URL = "/index.cfm/admin/restockreportbyshop",
    period_1 = list(
      from = 31,
      to = 0
    ),
    period_2 = list(
      from = 364,
      to = 0
    ),
    steps = list(
      all_shops = TRUE,
      leverancier = TRUE,
      alle_producten = TRUE
    ),
    dest_dir = NULL
  ),
  
  openOrdersRapport = list(
    name = "OpenOrdersRapport",
    menu = "Klantorders",
    submenu = "Open orders",
    menu_URL = "/index.cfm/admin/ordersReporting",
    submenu_URL = "/index.cfm/admin/openordersreport",
    period_1 = list(
      from = NULL,
      to = NULL
    ),
    period_2  = list(
      from = NULL,
      to = NULL
    ),
    steps = list(
      all_shops = TRUE,
      leverancier = FALSE,
      alle_producten = FALSE
    ),
    dest_dir = NULL
  )
)

# saving in ./data/*.rda
# usethis::use_data(thematics, internal = FALSE, overwrite = TRUE)

# converting to JSON 
thematics_json = rjson::toJSON(thematics,indent = 1)
write(thematics_json, "thematics.json")