Verificar a existência de um registro em um arquivo no banco de dados, exibindo um item qualquer formatado em uma determinada coordenada da tela.
CHEXME (<chave>, <exp>, <exp.N1>, <exp.N2>, <item>, <exp.C>)
|
<chave> |
representa o nome da chave primária de um arquivo no banco de dados. |
|
<exp> |
representa o valor a pesquisar e deve ser do mesmo tipo de <chave>. |
|
<exp.N1> |
representa a linha da tela em que será exibido o item. |
|
<exp.N2> |
representa a coluna da tela em que será exibido o item. |
|
<item> |
representa o nome do item que será exibido. |
|
<exp.C> |
representa a máscara de edição para exibição do item. |
Retorna verdadeiro (.T.), se o valor de <exp> for encontrado exibindo <item> nas coordenadas especificadas por <exp.N1> e <exp.N2> segundo a máscara determinada por <exp.C>. Quando não encontra, retorna falso (.F.) e exibe uma quantidade de brancos correspondente ao tamanho da máscara informada.
O arquivo pesquisado não precisa estar em uso ou selecionado. Isto só é necessário se existir mais de um item com o mesmo nome da chave pesquisada.
Quando existir nomes de chaves primárias iguais, a pesquisa é feita pelo primeiro encontrado. Se o primeiro nome encontrado, não for de chave primária ocorrerá um erro de compilação. Para evitar isto, selecione o arquivo com a chave desejada. Útil para validar consistência de dados em tempo de digitação e exibir dados do arquivo pesquisado formatando-os.
O exemplo a seguir mostra-nos como verificar a ocorrência de um registro em um arquivo no banco de dados exibindo um item do registro encontrado.
DATABASE bdemp1 33 a 2
USE tab_func
@ 01,01 "Matrícula do Funcionário " GET id0_func PIC "999" ;
VALID !CHEXME (id0_func, id0_func, 23, 01,; dat_func, "@d")
* Só aceitará funcionários não cadastrados
* e exibirá a data de nascimento na linha 23 coluna 01
MESSAGE "Funcionário já Cadastrado"
READ
?, ??, @ ... GET, @ ... SAY, FIND, CHEX(), CHEXC () e CHEXM().