Browse Source

cleanup

master
Maxime Wack 8 years ago
parent
commit
c03943e857
1 changed files with 0 additions and 3 deletions
  1. +0
    -3
      functionsOvalide.R

+ 0
- 3
functionsOvalide.R View File

@@ -69,9 +69,6 @@ getOvalide <- function(CHUuser, CHUpass, ATIHuser, ATIHpass, annee, mois)
# Auth
print("ePMSI : AUTH")
system(str_c(curl, epmsi, 'authenticate.do'))
# getURL(str_c(epmsi, 'authenticate.do'),
# .opts = curlopts) %>%
# cat

# Applis
print("ePMSI : APPLIS")


Loading…
Cancel
Save