esciencecenter-digital-skills / training-infrastructure

collection of files used in setting up the new training infrastructure
Apache License 2.0
0 stars 0 forks source link

Upload files #27

Closed liekelotte closed 1 year ago

liekelotte commented 2 years ago

This pull request takes care of the file structure and uploading of files to sharepoint. Still needs to be tested thoroughly. If you want to test the workflow, use:

remotes::install_github(repo = "esciencecenter-digital-skills/training-infrastructure@upload-files", force=T)
library(traininginfrastructure)

ds_xlsx <- read_from_drive()
dat_struct <- get_future_workshops(ds_xlsx)

create_local_folders(dat_struct)
info <- dat_struct[8,] # should be replaced with select function

instr_team <- Microsoft365R::get_team("Instructors")

debrief_doc_info <- get_debrief_doc_info(info)
plan_doc_info <- get_planning_doc_info(info)
comms_doc_info <- get_comms_doc_info(info)
render_debrief_doc(debrief_doc_info)
render_planning_doc(plan_doc_info)
render_comms_doc(comms_doc_info)

create_data_file(info)
upload_docs(instr_team, info, comms = TRUE, debriefing = TRUE, planning = TRUE, data = TRUE) #to be made

#23 below here: these are part of another PR
#create_sharepoint_folder(instr_drv, info) 
#create_ws_channel(instr_team, info)
bvreede commented 1 year ago

I think this is about ready? It's all included in workshop_activate(), so can best be tested:

data <- read_from_drive()
data <- get_future_workshops(data)
workshop_activate(data)