Criado ponto de entrada que permite alterar a data a ser gravada de um lançamento contábil

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

SIGACTB - Contabilidade Gerencial

Rotina:

Rotina	Nome Técnico
CTBA105	Programa de Inclusão de Lançamentos Contábeis

Ponto de Entrada:

ALTDATAL

Chamados Relacionados

TUSRFE

País(es):

Todos homologados pelo Protheus

Banco(s) de Dados:

Todos homologados pelo Protheus

Sistema(s) Operacional(is):

Todos homologados pelo Protheus

A principal funcionalidade do ponto de entrada ALTDATAL é disponibilizar a customização da data a ser gravada no movimento contábil

Descrição:

O ponto de entrada ALTDATAL disponibiliza a variável dData, onde o usuário pode definir a data a ser gravada no lançamento contábil.

Eventos:

If lAltDataL .and. lOrdTpSld .And. !lSimula

dDataLanc := ExecBlock("ALTDATAL",.F.,.F.,{dDataLanc,cRotina})

EndIf

Programa Fonte:

CTBA105.PRW

Função:

CTB_Incl() - Programa de Inclusão de Lançamentos Contábeis.

Retorno:

Nome	Tipo	Descrição	Obrigatório
dDataLanc	Data	Data da contabilização	Sim
cRotina	Caractere	Qual rotina originou o movimento contábil	Não

Exemplo:

User Function ALTDATAL()

Local dDataLanc := paramixb[1]
Local cRotina := paramixb[2]

dData := CTOD('30/06/16')

Alert ("Nova data contabilizada: " + dtoc(dDataLanc))

Return dDataLanc