如何将查询变量从server.r传递给R-shiny中的global.r.

Question

queryvar <- sqlquery(select * from emp)  #in server.r

如何将此queryvar传递给global.r