Cria uma chave unica para a tabela corrente.

Sintaxe

TCUnique( < cAlias >, [ cColumn ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cAlias

caractere

Alias da tabela corrente.

X


cColumn

caractere

Nome das coluna da tabela.



Retorno

Nome

Tipo

Descrição

Retorna

numérico

0 no caso de sucesso. No caso de erro retorna os numeros de erros.

Observações

Exemplos

FUNCTION Example()
  Local cT1 := "T1"
  
  TCLink()
  
  DBCreate("T1", {{"FIELD_NAME", "C", 10, 0}, ;
                  {"FIELD_TYPE", "C", 10, 0}}, "TOPCONN")
                 
  DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .T.)

  // exemplo com duas colunas
  nRet := TCUnique("T1", "FIELD_NAME+FIELD_TYPE")
  
  if nRet == 0
    conout("Criado com sucesso")
  endif
  
  DBCloseArea()
  
  TCUnlink()
RETURN

Veja também