import.css=/download/attachments/6062824/tecnologia.css |
Cria um HashMap para acessar elementos em uma lista, a chave de busca dos elementos pode ser Numérica, de Caracteres ou de Datas, os valores armazenados podem ser de qualquer tipo.
#include "TOTVS.CH"
User Function Exemplo()
Local xVal
Local listHM
oHash := tHashMap():New()
oHash:Set("item1",10)
oHash:Set("item2",22)
oHash:Set("item3",34)
oHash:Set("item4",46)
oHash:Get("item4",xVal)
conout("Valor do item4: "+ xVal)
oHash:Del("item2")
oHash:List(listHM)
varinfo("Objetos: ", listHM)
oHash:Clean()
Return
|
Totvs Application Server com release igual ou superior a 7.00.131227A