## Not run:
# ### Need internet connection
# choosebank("emblTP")
# mylist <- query("mylist", "sp=felis catus et t=cds", virtual=TRUE)
# getliststate(glr("mylist")) # SQ, MYLIST, 603, FALSE
# gln(glr("mylist")) # MYLIST (upper case letters on server)
# closebank()
# ## End(Not run)
Run the code above in your browser using DataLab