O que é?
UUID é um identificador universalmente exclusivo utilizado para identificação de qualquer coisa no mundo da computação. O UUID é um número de 128 bits representado por 32 dígitos hexadecimais, exibidos em cinco grupos separados por hifens, na forma textual8-4-4-4-12 sendo um total de 36 caracteres (32 caracteres alfanuméricos e 4 hifens). Por exemplo:
3d0ca315-aff9–4fc2-be61–3b76b9a2d798
Código: Selecionar todos
function main
? random_uuid()
return nil
function random_uuid()
local cMask := 'xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx'
local cStringHex := '0123456789abcdef-', x
local cUUID := '', i, cCaracter
for x := 1 to Len( cMask )
i := Int( hb_Random( 0, 0xffff ) % 16 )
cCaracter := SubStr( cMask, x, 1 )
if cCaracter == 'x'
cUUID += SubStr( cStringHex, i, 1 )
elseif cCaracter == 'y'
cUUID += SubStr( cStringHex, HB_BitOr( HB_BitAnd( i, 0x03 ), 0x08 ), 1 )
else //- e 4
cUUID += cCaracter
endif
next
return cUUID
Código: Selecionar todos
function main
? win_UuidCreateString()
return nil
>hbmk2 uuid.prg hbwin.hbc
Saudações,
Itamar M. Lins Jr.




