Adilio Costa

Travando um Registro de um Alias/Tabela para Inclusão ou Alteração com RecLock em ADVPL

Travando um Registro de um Alias/Tabela para Inclusão ou Alteração com RecLock em ADVPL

2 minutos A função RecLock em ADVPL efetua o travamento do registro posicionado na área de trabalho ativa, permitindo a inclusão ou alteração das informações do mesmo. Ela também é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL.    Sintaxe: RecLock(cAlias,lOper)   Parâmetro(s):   Retorno:     Exemplo da função RecLock em ADVPL:     É isso aí, finalizamos aqui mais um post no Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie Continue lendo→

Convertendo Qualquer Valor para uma String Formatada com Transform em ADVPL

Convertendo Qualquer Valor para uma String Formatada com Transform em ADVPL

1 minuto A função Transform em ADVPL converte qualquer valor para uma string formatada. Para isso, formata valores do tipo caractere, data, lógico e numérico, conforme uma string de máscara especificada que inclui uma combinação de strings de template e funções de picture. Ela é uma das funções de manipulação de string em ADVPL.    Sintaxe: Transform(xExp,cMasc)   Parâmetro(s): Retorno:   Observações: Esta função tem a mesma característica, do parâmetro PICTURE, do comando @…SAY; Utilizada para formatar dados que serão enviados à tela ou à Continue lendo→

Criando um Sequencial de um Campo Caractere com Soma1 em ADVPL

Criando um Sequencial de um Campo Caractere com Soma1 em ADVPL

1 minuto A função Soma1 em ADVPL é utilizada para criar um sequencial de um campo do tipo caractere. Ela é uma função padrão utilizada em objetos do sistema como GetDados, gravações de itens(grid do documento de entrada(MATA103), grid do pedido de venda(MATA410), etc. É uma das funções de Componentes de Interface Visual em ADVPL.    Sintaxe: Soma1(cSeq,cPos,lSomMin,lSomComp) Parâmetro(s): Retorno:     Exemplo da função Soma1 em ADVPL: Abaixo podemos ver os exemplos da função Soma1 incrementando de forma sequencial caracteres numéricos(“000“) como caracteres Continue lendo→

Retornando a Diferença em Anos Entre duas Datas com DateDiffYear em ADVPL

Retornando a Diferença em Anos Entre duas Datas com DateDiffYear em ADVPL

1 minuto   A função DateDiffYear em ADVPL retorna a diferença em anos entre duas datas informadas nos parâmetros. Essa função recebe duas datas como parâmetros onde o primeiro se refere a data inicial e o segundo a data final. DateDiffYear é uma das funções de manipulação de data e hora em ADVPL. Sintaxe: DateDiffYear(dDataIni,dDataFim)   Parâmetro(s):   Retorno:   Exemplo da função DateDiffYear em ADVPL:   É isso aí, finalizamos mais um post aqui no Blog ProtheusAdvpl, caso tenha ficado alguma dúvida deixe Continue lendo→

Restaurando os Dados de um Alias/Tabela com RestArea em ADVPL

Restaurando os Dados de um Alias/Tabela com RestArea em ADVPL

2 minutos A função RestArea em ADVPL restaura os dados de um alias/tabela que foram salvos através da função GetArea, ou seja, restaurar o ambiente salvo por ela. A última área restaurada é a área que ficará ativa para a aplicação. Ela é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL.    Sintaxe: RestArea(aArea)   Parâmetro(s): Exemplo da função RestArea em ADVPL: Suponhamos que o ambiente ativo seja do alias SA2(Alias()), índice 1(IndexOrd())e registro 320(Recno()) e salvamos Continue lendo→

ExecAuto MATA220 – Inclusão de Saldos Iniciais

ExecAuto MATA220 – Inclusão de Saldos Iniciais

1 minuto   A rotina automática ExecAuto MATA220 tem por objetivo criar saldos iniciais(SB9) automaticamente no TOTVS Protheus. Ela é uma das Rotinas Automáticas em ADVPL. Essa rotina automática é muito útil em situações onde nós iremos fazer uma transferência múltipla de produtos(MATA261) e assim podemos criar saldo inicial dos produtos de destinos caso eles não possuam.   Sintaxe: MSExecAuto({|x, y| Mata220(x, y)}, aArray, 3)   Exemplo em ADVPL da rotina automática ExecAuto MATA220:   É isso aí, finalizamos mais um post aqui no Continue lendo→

IsUpper

IsUpper

1 minuto A função IsUpper determina se o caractere mais à esquerda de uma string é uma letra maiúscula. Essa função pode ser muito útil em situações que precisamos validar nomes de pessoas por exemplo. Ela também é uma das funções de manipulação de string em ADVPL.    Sintaxe: IsUpper(cString)   Parâmetro(s): Retorno: Exemplo da função IsUpper em ADVPL:   É isso aí, finalizamos aqui mais um post no Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para Continue lendo→

Obtendo o Conteúdo de um Registro Posicionado com Posicione em ADVPL

Obtendo o Conteúdo de um Registro Posicionado com Posicione em ADVPL

2 minutos   A função Posicione em ADVPL retorna o conteúdo de um campo(SX3) de um registro de uma tabela(SX2) posicionado através de uma chave de busca. Ela é uma das Funções do Dicionário de Dados do Protheus em ADVPL. Sintaxe: Posicione(cAlias,nOrdem,cExpr,cCampo,cNickName)   Parâmetro(s):   Retorno:     Exemplo da função Posicione em ADVPL:  No código ADVPL acima nós passamos para a função Posicione o alias(tabela) “SA2“(fornecedores), a ordem do índice(nOrdem=1), a chave de busca(xFilial(“SA2“)+cCodFor+cLojaFor) e o campo(“A2_NOME“) que desejamos obter o conteúdo e ao Continue lendo→

Pesquisando um Elemento em um Array com aScan em ADVPL

Pesquisando um Elemento em um Array com aScan em ADVPL

2 minutos   A função aScan em ADVPL percorre um array procurando por um valor especificado. Pode ser especificado um valor a ser buscado, ou pode ser informada uma condição de busca através de um bloco de código. Ela é uma das funções de manipulação de array em ADVPL. Sintaxe: aScan(aDestino,xExpr,nInicio,nQtd)   Parâmetro(s):   Retorno:     Exemplo da função aScan em ADVPL:  No código ADVPL acima nós passamos para a função aScan o array aLingProg e uma expressão de busca com o bloco Continue lendo→

Retornando o Ano de uma Data com Year em ADVPL

Retornando o Ano de uma Data com Year em ADVPL

1 minuto   A função Year em ADVPL retorna o ano(formato aaaa) correspondente a uma data passada como parâmetro. Ela é uma das funções de manipulação de data e hora em ADVPL. Sintaxe: Year(dData)   Parâmetro(s):   Retorno:   Observações: Quando informado uma data nula(CtoD(“”)), o retorno será zero; Essa função faz parte de um grupo funções que retornam componentes de um valor data na forma de valores numéricos. Esse grupo inclui as função Day e Month, que retornam os valores dia e mês respectivamente na forma Continue lendo→

Retornando a Data do Sistema com Date em ADVPL

Retornando a Data do Sistema com Date em ADVPL

1 minuto   A função Date retorna a data do sistema como sendo um valor do tipo data. Essa função dispõe um meio de inicializar variáveis de memória com a data corrente, comparando outros valores do tipo data e realizando operações aritméticas relativas à data corrente. Ela é uma das funções de manipulação de data e hora em ADVPL. Sintaxe: Date()   Parâmetro(s): —   Retorno:   Observações: O formato para exibição de datas é controlado pelo comando Set Date; O formato padrão assumido pela Continue lendo→

Verificando se o Posicionamento dos Registros de um Alias/Tabela está no Fim com EoF em ADVPL

Verificando se o Posicionamento dos Registros de um Alias/Tabela está no Fim com EoF em ADVPL

2 minutos A função EoF em ADVPL verifica se o posicionamento dos registros está no fim do alias/tabela ativo. Ela também é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL.    Sintaxe: EoF()   Parâmetro(s): Nenhum. Retorno:     Observações: Após abertura de uma tabela, caso nenhum registro tenha sido inserido, a flag de EOF sempre será True (.T.).   Exemplo da função EoF em ADVPL: Enquanto não tiver no último registro da tabela SA1 a contagem Continue lendo→

Pesquisando um Registro de um Alias/Tabela com DBSeek em ADVPL

Pesquisando um Registro de um Alias/Tabela com DBSeek em ADVPL

2 minutos A função DBSeek em ADVPL pesquisa um registro de um alias/tabela ativo, com as informações especificadas na chave de busca, fornecendo um retorno lógico indicando se a pesquisa foi efetuada com sucesso, ou seja, se a informação especificada na chave de busca foi localizada na área de trabalho. Ela é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL.    Sintaxe: DBSeek(cExpr,lPos)   Parâmetro(s): Retorno:     Exemplo da função DBSeek em ADVPL:     É Continue lendo→

Verificando se o Primeiro Caractere de uma String é Numérico com IsDigit em ADVPL

Verificando se o Primeiro Caractere de uma String é Numérico com IsDigit em ADVPL

1 minuto A função IsDigit em ADVPL é utilizada para determinar se o caractere mais à esquerda de uma string é um dígito, permitindo avaliar se o string especificado começa com um caractere numérico(0 a 9). IsDigit é muito útil para situações onde precisamos validar números em campos. Ela é também  uma das funções de manipulação de string em ADVPL.    Sintaxe: IsDigit(cString)   Parâmetro(s): Retorno:     Exemplo da função IsDigit em ADVPL: No código ADVPL acima informamos 2 variáveis chamadas cString1 e cString2, Continue lendo→

Removendo os Espaços em Branco à Direita de uma String com RTrim em ADVPL

Removendo os Espaços em Branco à Direita de uma String com RTrim em ADVPL

2 minutos A função RTrim em ADVPL remove os espaços em branco à direita de uma string. Ela é também  uma das funções de manipulação de string em ADVPL.    Sintaxe: RTrim(cString)   Parâmetro(s): Retorno:   Observações: RTrim está relacionada as funções LTrim, que remove os espaços em branco à esquerda, e a AllTrim, que remove os espaços em branco à esquerda e à direita; O inverso de AllTrim, RTrim e LTrim são as funções PadC, PadR e PadL, que centralizam, alinham à direita ou à esquerda as strings, respectivamente, através da inserção de caracteres de Continue lendo→