Uncategorized

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

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

Verificando se o Primeiro Caractere de uma String é Alfabético com IsAlpha em ADVPL

Verificando se o Primeiro Caractere de uma String é Alfabético com IsAlpha em ADVPL

1 minuto A função IsAlpha em ADVPL é utilizada para verificar se o caractere mais à esquerda em uma cadeia de caracteres é alfabético, permitindo avaliar se o string especificado começa com um caractere alfabético. Um caractere alfabético consiste em qualquer letra maiúscula ou minúscula de “A” a “Z”. IsAlpha é muito útil para situações onde precisamos validar nomes. Ela é também  uma das funções de manipulação de string em ADVPL.    Sintaxe: IsAlpha(cString)   Parâmetro(s): Retorno:   Exemplo da função IsAlpha em ADVPL: No Continue lendo

Definindo e Ordenando um Indíce de um Alias/Tabela Ativo com DBSetOrder em ADVPL

Definindo e Ordenando um Indíce de um Alias/Tabela Ativo com DBSetOrder em ADVPL

2 minutos A função DBSetOrder em ADVPL define e ordena o índice será utilizado por um alias/tabela ativo, ou seja, pela área previamente selecionada através da função DBSelectArea. As ordens disponíveis no ambiente Protheus são aquelas definidas na SIX(Índice das Tabelas) ou as ordens disponibilizadas por meio de índices temporários. Ela também é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL.    Sintaxe: DBSetOrder(nOrdem)   Parâmetro(s): Observações: Esta ordem é a responsável pela sequência lógica dos registros Continue lendo

Retornando a Diferença em Meses Entre duas Datas com DateDiffMonth em ADVPL

Retornando a Diferença em Meses Entre duas Datas com DateDiffMonth em ADVPL

1 minuto   A função DateDiffMonth retorna a diferença em meses 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. DateDiffMonth é uma das funções de manipulação de data e hora em ADVPL. Sintaxe: DateDiffMonth(dDataIni,dDataFim)   Parâmetro(s):   Retorno:   Exemplo da função DateDiffMonth em ADVPL:   É isso aí, finalizamos mais um post aqui no Blog ProtheusAdvpl, caso tenha ficado alguma dúvida deixe seu comentário ou Continue lendo

Identificando o Tipo de Dado de uma Variável com ValType em ADVPL

Identificando o Tipo de Dado de uma Variável com ValType em ADVPL

2 minutos A função ValType em ADVPL identifica o tipo de dado de uma variável passa como parâmetro. Ela retorna um caractere(N – Numérico, B – Bloco de código, L – Lógico, D – Data, A – Array, U – Nil, C – Caractere, O – Objeto, N – Chamada de função),   que identifica o tipo de dado da variável informada. Ela é uma das funções de Verificação de Tipos de Variáveis em ADVPL.    Sintaxe: ValType(xVariavel)   Parâmetro(s): Retorno:     Exemplo da função ValType Continue lendo

Obtendo a Última Posição de uma Substring em uma String com RAt em ADVPL

Obtendo a Última Posição de uma Substring em uma String com RAt em ADVPL

1 minuto A função Rat em ADVPL retorna a última posição de um caracter ou string dentro de outra string especificada. Para isso, a função pesquisa a string destino a partir da direita. Ela é uma das funções de manipulação de string em ADVPL.    Sintaxe: Rat(cPesq,cString)   Parâmetro(s): Retorno: Exemplo de RAt em ADVPL:   No código ADVPL acima utilizamos a função RAt para pesquisar na string “PORTAL PROTHEUSADVPL”(cString= “PORTAL PROTHEUSADVPL”) o conteúdo “P”(cPesq= “P”) onde ao final RAt retornou a última posição de Continue lendo

Protegendo os Dados de um Alias/Tabela com GetArea em ADVPL

Protegendo os Dados de um Alias/Tabela com GetArea em ADVPL

1 minuto A função GetArea em ADVPL é utilizada para proteger um alias/tabela no momento de algum processamento específico para salvar uma outra área de trabalho(alias) que não o ativo. Essa função deve ser executada dentro do alias: ALIAS->(GetArea()). Esse ambiente protegido é restaurado utilizando a função RestArea. Ela é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL.    Sintaxe: GetArea()   Parâmetro(s): Nenhum. Retorno(s):   Exemplo da função GetArea em ADVPL: Suponhamos que o ambiente ativo Continue lendo

Obtendo o Código da Filial de um Alias/Tabela com FWxFilial em ADVPL

Obtendo o Código da Filial de um Alias/Tabela com FWxFilial em ADVPL

1 minuto A função FWxFilial em ADVPL retorna o código da filial do alias/tabela passado como parâmetro. Poderá também de acordo com o parâmetros informados, retornar a string contendo a empresa, unidade de negócio e filial com o tratamento de compartilhamento. Ela é uma das Funções de Manipulação de Empresas em ADVPL.    Sintaxe: FWxFilial(cAlias,cEmpUDFil,cModEmp,cModUn,cModFil)   Parâmetro(s): Retorno: Exemplo da função FWxFilial em ADVPL:   É isso aí, finalizamos mais um post aqui no Blog ProtheusAdvpl. Caso tenha ficado alguma dúvida deixe seu comentário ou nos Continue lendo

Retornando a Quantidade de Dias Úteis Entre duas Datas com DateNoWorkDay em ADVPL

Retornando a Quantidade de Dias Úteis Entre duas Datas com DateNoWorkDay em ADVPL

2 minutos A função DateWorkDay em ADVPL retorna a quantidade de dias úteis entre duas datas informadas nos parâmetros. Essa é uma das funções de manipulação de data e hora em ADVPL. Sintaxe: DateWorkDay(dDataIni,dDataFim,lSabado,lDomingo,lFeriado)   Parâmetro(s):   Retorno:   Observação: A função DateWorkDay consulta os feriados cadastrados na Tabela Genérica 63(SX5).   Exemplo da função DateWorkDay em ADVPL:   É isso aí, finalizamos mais um post aqui no Blog ProtheusAdvpl, caso tenha ficado alguma dúvida deixe seu comentário ou nos envie um e-mail para adiliocosta@protheusadvpl.com.br. Continue lendo

Convertendo uma String do Formato OEM/MS-DOS Text para ANSI Text(formato do Microsoft Windows) com OEMToAnsi em ADVPL

Convertendo uma String do Formato OEM/MS-DOS Text para ANSI Text(formato do Microsoft Windows) com OEMToAnsi em ADVPL

1 minuto A função OEMToAnsi em ADVPL converte uma String do formato OEM/MS-DOS Text para ANSI Text(formato do Microsoft Windows). Ela é uma das funções de manipulação de string em ADVPL.    Sintaxe: OEMToAnsi(cStringOEM)   Parâmetro(s): Retorno:   Observações: Ao utilizar um programa baseado no MS-DOS para alimentar uma base de dados, os acentos e caracteres especiais são gravados como texto OEM. Porém, para visualizar esses dados, na interface do Microsoft Windows, é necessário converter a string de OEM/MS-DOS para ANSI Text.   Exemplo Continue lendo