By the way: I think the solution below is the best option... Any comments?
oObj = CreateObject("Objeto")
Define Class Objeto As Session
Licenciado = CreateObject("Licenciado")
Empresa = CreateObject("Empresa")
Programa = CreateObject("Programa")
EndDefine
Define Class Licenciado As Session
Nome = "Qualquer Um"
CNPJ = "Qualquer Outro"
EndDefine
Define Class Empresa As Session
Nome = "Rodolfo"
CNPJ = "111.11.11.1.1"
EndDefine
Define Class Programa As Session
Nome = "Programa"
Versao = "1.0"
DataExpiracao = {}
EndDefine[]s
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Rodolfo Duarte
