Pular para o conteúdo
Início » Advpl ExistCpo

Advpl ExistCpo

Advpl ExistCpo

Tipo: Processamento

Verifica se determinada chave existe no Alias especificado. Função utilizada em processamentos onde o código informado deve existir em determinado cadastro, na sua validação.

Sintaxe

ExistCpo(cAlias,cChave,nOrdem)

Parâmetros

cAlias – Alias do arquivo para a pesquisa

cChave – Chave a ser pesquisada (opcional). Se não for informada, o conteú-do

é obtido automaticamente do GET em uso

nOrdem – Número da ordem do Índice para Pesquisa (Opcional). Se não for informado, usa a ordem atual do Alias.

Retorna

lRet – Retorna Verdadeiro (.T.) se a chave existir no Alias especificado, caso contrário, retorna Falso (.F.) e executa um help padrão do sistema (“REGNOIS”). A ordem utilizada na pesquisa é a atualmente selecionada. Se não for informado, usa a ordem atual do álias.

Exemplo

// Exemplo de uso da funcao ExistCpo:

While .T.

cProd := Space(15)

@10,10 Get cProd

Read

If LastKey() == 27

Exit

Endif

If !ExistCpo(“SB1”,cProd)

Loop

Endif

Grava() // Funcao generica.

EndDo

Return

Estude para provas de certificações em TI com os simulados Bynem

Veja também: