Função: GetAdvFval - Execução de pesquisa em arquivo
Abrangências: | Microsiga Protheus 11 , Protheus 10 |
Nível de Acesso: | Nível 1 (Acesso Clientes) |
Descrição:
Esta função executa uma pesquisa em um arquivo, pela chave especificada e ordem especificada, retornando o conteúdo de um ou mais campos.
Programa Fonte:
APLIB190.PRW
Sintaxe:
GetAdvFval - Execução de pesquisa em arquivo ( cKeyAliasuCpo [ uChave ] [ nOrder ] [ uDef ] [ lUseDef ] ) --> uRet
Retorno:
-
uRet(qualquer)
- Retorna o conteúdo de um campo ou array com o conteúdo de vários campos.
Observações
Exemplos
#include "protheus.ch" #include "tbiconn.ch"User Function TstGetADV()Local cChave Local cDesc Local aDados := {}PREPARE ENVIRONMENT EMPRESA "01" FILIAL "01" MODULO "FAT" DbSelectArea("SA1")DbSelectArea("SC5")// Obtendo apenas de um campo:cDesc := GetAdvFVal("SA1","A1_TIPO",xFilial("SA1")+C5_CLIENTE+C5_LOJACLI,1,"Erro") MsgAlert("Tipo de cliente ("+cDEsc+") cadastrado para o pedido:" + SC5->C5_NUM)// Obtendo o conteudo de mais de um campo:aDados := GetAdvFVal("SA1", { "A1_NOME", "A1_END", "A1_BAIRRO", "A1_CEP", "A1_MUN", "A1_EST", "A1_CGC", "A1_CEINSS", "A1_PESSOA" }, xFilial("SA1")+C5_CLIENTE+C5_LOJACLI, 1, { "", "", "", "", "", "", "", "", "" }) Varinfo('aDados', aDados)Return
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cKeyAlias | Caracter | Alias do arquivo. | X | ||||||||||||||
uCpo | Array of Record | Nome de um campo ou array contendo os nomes dos campos desejados. | X | ||||||||||||||
uChave | Array of Record | Chave para pesquisa. | |||||||||||||||
nOrder | Array of Record | Ordem do índice para pesquisa. | |||||||||||||||
uDef | Array of Record | Valor ou array "default" para ser retornado caso a chave não seja encontrada. | |||||||||||||||
lUseDef | Array of Record | Se .T. retorna o valor definido em uDef caso o registro não seja encontrado. | .F. |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas