# NOT RUN {
safetyGraphics:::getSettingValue(list("a","b"),list(a=list(b="myValue"))) #returns "myValue"
testSettings<-generateSettings(standard="AdAM")
safetyGraphics:::getSettingValue(list("id_col"),testSettings)
safetyGraphics:::getSettingValue(list("measure_values","ALP"),testSettings)
safetyGraphics:::getSettingValue(list("NotASetting"),testSettings) #returns NULL
# }
Run the code above in your browser using DataLab