Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Alterado exemplo

...

Bloco de código
languagecpp
themeEclipse
linenumberstrue
collapsefalse
user function teste()
  Local aSlots := {}
  Local aObjs := {}
  Local nI := 0
  Local cPass := ""
  
  if HSMInitialize() <= 0
    conout( "HSM not initialized" )
    return
  endif
  
  aSlots := HSMSlotList()
  
  cPass := "1234"
  
  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
return

...