Nothing
#####################################################################
## This program is distributed in the hope that it will be useful, ##
## but WITHOUT ANY WARRANTY; without even the implied warranty of ##
## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ##
## GNU General Public License for more details. ##
#####################################################################
#-------------------------------------------------------------------------------
# gtoxLoadAeid: Load assay endpoint id and name for the given fields
#-------------------------------------------------------------------------------
#' @rdname assay_funcs
#' @import data.table
#' @export
gtoxLoadAeid <- function(fld=NULL, val=NULL, add.fld=NULL) {
out <- c(
"assay_component_endpoint.aeid",
"assay_component_endpoint.assay_component_endpoint_name"
)
qstring <- .buildAssayQ(
out=out,
tblo=c(1, 2, 4, 3, 6),
fld=fld,
val=val,
add.fld=add.fld
)
dat <- gtoxQuery(query=qstring, db=getOption("TCPL_DB"))
dat[]
}
#-------------------------------------------------------------------------------
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.