Finaliza o uso de dispositivo HSM.
HSMFinalize( [ lClient ] )
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|---|---|---|---|
lClient | logical | Indica se o dispositivo HSM está na máquina do SmartClient. |
Nome | Tipo | Descrição |
|---|---|---|
nRet | logical | Retorna 1 caso consiga finalizar o HSM com sucesso; caso contrário, retorna 0. |
user function teste()
Local aSlots := {}
Local aObjs := {}
Local nI := 0
Local nSlots := 0
Local cPass := ""
cPass := "1234"
if HSMInitialize() <= 0
conout( "HSM not initialized" )
return
endif
aSlots := HSMSlotList()
nSlots := Len( aSlots )
varinfo( "slots", aSlots )
for nI := 1 to nSlots
ASize( aObjs, 0 )
aObjs := HSMObjList( aSlots[nI][1], cPass )
varinfo( "obj", aObjs )
next nI
if HSMFinalize() <> 1
conout( "HSM not finalized" )
endif
return
A função está disponível a partir da build 13.2.3.0.