if (FALSE) {
o <- opal.login('administrator','password', url='https://opal-demo.obiba.org')
cqx <- opal.table_get(o, "CPTP", "Cag_coreqx")
cqx <- dictionary.annotate.harmo_status(cqx,
variables = c("A_SDC_EDU_LEVEL", "A_SDC_EDU_LEVEL_AGE"),
status = "complete")
opal.logout(o)
}
Run the code above in your browser using DataLab