search

SwissClinicalTrialOrganisation / secuTrialR

Handling of data from the clinical data management system secuTrial
https://swissclinicaltrialorganisation.github.io/secuTrialR/
Other
8 stars 12 forks source link

build_secuTrial_url() not generic enough #263

Closed pianeu closed 5 months ago

pianeu commented 5 months ago

Describe the bug If you want to generate a URL with the build_secutrial_url function, this no longer works for our instance due to the hardcoding of apps/ :

... sT_url <- paste0(sT_url, "apps/WebObjects/", instance) ...

To Reproduce Steps to reproduce the behavior:

secuTrialR::build_secuTrial_url(server = "secutrial.dkfbasel.ch/", instance = "ST21-productive-DataCapture", customer = "XXX")

Generates the following link, for example: https://secutrial.dkfbasel.ch/apps/WebObjects/ST21-productive-DataCapture.woa/wa/choose?customer=XXX

Expected behavior

This would be correct: https://secutrial.dkfbasel.ch/prod1/WebObjects/ST21-productive-DataCapture.woa/wa/choose?customer=XXX