Linha Microsiga Protheus

Árvore de páginas

Função: LerData() - Altera a data base do sistema
Versões: Advanced Protheus 5.07 , Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Nível de Acesso: Nível 1 (Acesso Clientes)
Idiomas: Espanhol , Inglês
Descrição: 
A função lerdata() é uma função específica para o processo de Contabilização TXT para os ambientes SIGACON - Contabilidade e SIGACTB - Contabilidade Gerencial. Esta função, diferente de suas pares LerStr() e LerVal(), não retorna a data do lançamento contábil, e sim altera a database do sistema para a data avaliada nas informações da linha do arquivo TXT em função dos parâmetros informados.O retorno desta função é uma string em branco, para permitir sua utilização em um dos campos macro-executáveis da configuração do lançamento padrão.A utilização da função LerData() impõe uma limitação na funcionalidade de Contabilização TXT: cada linha do arquivo TXT deverá ser tratada como um único documento contábil.
Programa Fonte: 
MATXFUNC.PRW
Sintaxe:

LerData() - Altera a data base do sistema ( nPosIni (x)nCaracteres (y) ) --> cString

Retorno:
    cString(constante)
  • String em branco.
Observações

Esta função utiliza a variável xBuffer (escopo Private) disponível em tempo de processamento da rotina de Contabilização TXT. O conteúdo da variável xBuffer é do tipo string, sendo que seu tamanho depende da parametrização da rotina de contabilização TXT, o qual deve avaliar o tamanho da linha do arquivo TXT + duas posições. As posições adicionadas ao tamanho da linha são referentes ao CRLF formado pela combinação de chr(10) + chr(13).

 

A informação do arquivo TXT deve estar obrigatoriamente em um dos dois formatos:

DDMMYY - Dia (2 dígitos) + Mês (2 dígitos) + Ano (2 dígitos)

ou

DDMMYYYY - Dia (2 dígitos) + Mês (2 dígitos) + Ano (4 dígitos)

 

IMPORTANTE:

    1. A configuração deste formato string para a data é diferente do formato reconhecido por outras funções similares do sistema como a STOD() a qual utiliza o formato YYYYMMDD (Year + Month + Day).
    2. Para a correta utilização da função LerData(), a rotina de Contabilização TXT deve ser configurada para "quebrar" cada linha do arquivo TXT em um novo documento contábil, para que desta forma cada documento contábil utilize a data de lançamento especificada na linha do movimento associado.

 

Exemplos 
1o. Estrutura da linha do arquivo TXT analisado:LLLDDMMYYYYTDDDDDDDDDDDDDDDDDDDDCCCCCCCCCCCCCCCCCCCCVVVVVVVVVVVVVVVVVVVVHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHHAonde:LLL      - Código do lançamento padrão            : 001 - 003 (03)DDMMYYYY - Data no formato DD/MM/YYYY             : 004 - 011 (08)T        - Tipo do lançamento contábil (DC)       : 012 - 012 (01)DDD      - Conta à debito do lançamento contábil  : 013 - 032 (20)CCC      - Conta à crédito do lançamento contábil : 033 - 052 (20)VVV      - Valor do lançamento contábil           : 053 - 072 (20)HHH      - Histótico do lançamento contabil       : 073 - 112 (40)2o. O tamanho de linha a ser configurado para correta leitura deste arquivo será 114 (última posição de informação (112) + 2 caracteres de final de linha.3o. Uso do LerData(x,y):A. LerData(4,8) --> Alterará a data do sistema para o conteúdo disponível na linha no formato DDMMYYYY.
Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
nPosIni (x) Numérico Posição inicial da informação da linha do arquivo X
nCaracteres (y) Numérico Quantidade de caracteres que compõe a informação a ser avaliada a partir da posição inicial (inclusive). X