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

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

Selecionando um Alias/Tabela com DBSelectArea em ADVPL

Selecionando um Alias/Tabela com DBSelectArea em ADVPL

3 minutos A função DBSelectArea em ADVPL seleciona um alias/tabela ou área de trabalho especificada, deixando ela como ativa para manipularmos seus registros. Todas as operações subsequentes que fizerem referência a uma área de trabalho a utilização, a menos que a área desejada seja informada explicitamente. Ela também é uma das Funções de Acesso a Banco de Dados / SQL no Protheus em ADVPL.    Sintaxe: DBSelectArea(xArea)   Parâmetro(s): Observações: xArea pode ser do tipo numérico, indicando o número da área de trabalho, ou do tipo caractere, 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

Mostrando uma Mensagem de Advertência na Tela com MsgStop em ADVPL

Mostrando uma Mensagem de Advertência na Tela com MsgStop em ADVPL

2 minutos A função MsgStop em ADVPL mostra uma mensagem de advertência na tela do TOTVS Protheus.  Ela é uma das funções de Avisos e Alertas em ADVPL.    Sintaxe: MsgStop(cMsg,cTitulo) Parâmetro(s): Retorno: – Observações: Essa função permite que se mostre uma mensagem para o usuário sem a necessidade de se criar botões de opção. O único botão(Ok) é criado automaticamente pela própria função para que o usuário prossiga o processamento; MsgStop mostra uma imagem representando uma advertência, uma exceção, tornando a identificação do tipo Continue lendo

Convertendo um Texto para Letras Minúsculas com Lower em ADVPL

Convertendo um Texto para Letras Minúsculas com Lower em ADVPL

1 minuto A função Lower em ADVPL converte um texto para letras minúsculas. Ela é uma das funções de manipulação de string em ADVPL.    Sintaxe: Lower(cTexto)   Parâmetro(s): Retorno:     Exemplo da função Lower 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, até um próximo post, grande abraço e fica com Deus. Link(s) de referência(s): https://tdn.totvs.com/display/tec/Lower  

Adicionando Caracteres de Preenchimento à Esquerda do Conteúdo de uma Variável com PadL em ADVPL

Adicionando Caracteres de Preenchimento à Esquerda do Conteúdo de uma Variável com PadL em ADVPL

2 minutos A função PadL em ADVPL adiciona caracteres de preenchimento à esquerda do conteúdo de uma variável passada como parâmetro. Ela é uma das funções de manipulação de string em ADVPL.    Sintaxe: PadL(xExp,nTam,cChar)   Parâmetro(s): Retorno: Observações: PadL transforma o valor apontado por xExp em string (igual ao comportamento da função cValToChar), e adiciona o caractere definido em cChar à esquerda do valor de xExp até que o comprimento especificado em nTam seja atingido; Caso o comprimento de xExp convertido para string for maior que o especificado em nTam, a função retornará o Continue lendo

Obtendo o Tamanho de uma Variável com Len em ADVPL

Obtendo o Tamanho de uma Variável com Len em ADVPL

1 minuto A função Len em ADVPL retorna o tamanho de uma variável passada como parâmetro. Essa variável pode ser do tipo String, Data, Lógica, Numérica ou Array. Também é uma das funções de manipulação de string em ADVPL.    Sintaxe: Len(xParam)   Parâmetro(s): Retorno: Observações: Se a cadeia de caracteres especificada for nula (“”), a função Len retornará o valor zero. Entretanto, o caractere nulo, Chr(0), tem o comprimento de uma (1) posição; Deve-se lembrar que no ADVPL cada array multidimensional é composto Continue lendo

Retornando uma Parte Específica de uma String com SubStr em ADVPL

Retornando uma Parte Específica de uma String com SubStr em ADVPL

2 minutos A função SubStr em ADVPL retorna parte específica de uma String, de acordo com a posição inicial deste conteúdo na string e a quantidade de caracteres que deverá ser retornada a partir daquele ponto(inclusive). Ela é também uma das funções de manipulação de string em ADVPL.    Sintaxe: SubStr(cTexto,nPos,nQtd)   Parâmetro(s): Retorno: Observações: nPos inicia em 1; Se nPos for menor que 0(zero) ou maior do que o tamanho de cTexto, a função retornará uma string vazia; Se nQtd for menor ou igual a 0(zero), a função Continue lendo