Perguntas ADVPL WEB

Bom Dia Pessoa,

Estou tentando utilizar as sessões do ADVPL WEB, mas eu não estou conseguindo pegar o usuário da sessão. Sempre que volto ou troco de página está criando uma nova sessão.

Desta forma a sessão só fica ativa para as páginas individualmente.

Podem me ajudar? Obrigado.

Segue código da home:

#include 'rwmake.ch'
#include 'apwebex.ch'

User Function home()

Local cHTML := ""
Local nSess
nSess := HttpCountSession()

WEB EXTENDED INIT cHtml

cHTML := h_home()
cHTML += "Numero de sessoes ativas: " + str(nSess)

WEB EXTENDED END

return cHTML