TOTVSTEC

Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 4 Atual »

Lista os slots HSM disponíveis.

Sintaxe

HSMSlotList( [ lClient ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

lClient

logical

Indica se o dispositivo HSM está na máquina do SmartClient.



Retorno

Nome

Tipo

Descrição

aRet

array

Retorna um vetor com as informações dos slots.

Observações

Cada item de aRet representa um slot de HSM disponível e contém um vetor com as seguintes informações:

Índice

Tipo

Descrição

1

N

Número do slot

2

C

Label do slot

3

C

Descrição do slot

4

L

Indica se o slot está inicializado

5

L

Indica se o slot possui PIN

6

L

Indica se o slot necessita de login

7

L

Indica se o slot é somente leitura

  • O parâmetro lClient está disponível a partir da build 7.00.131227A com data de geração superior a 11/03/2016.
  • O valor padrão de lClient é .F..

Exemplos

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 Len( aSlots )
    if aSlots[nI][4] == .T.
      ASize( aObjs, 0 )
      aObjs := HSMObjList( aSlots[nI][1], cPass )
      varinfo( "aObjs", aObjs )
    endif
  next nI
   
  if HSMFinalize() <> 1
    conout( "HSM not finalized" )
  endif
return

Veja também

  • Sem rótulos