Linha Microsiga Protheus

Árvore de páginas

Realização de Validações Antes da Execução do Cálculo de Depreciação e Correção Monetária

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Serviços

Módulo:

SIGACTB

Rotina:

Rotina

Nome Técnico

ATFA050

 

Cálculo Mensal

Ponto de Entrada:

AF050LOG

País(es):

Brasil

Banco(s) de Dados:

Todas

Sistema(s) Operacional(is):

Todos

Descrição

O Ponto de Entrada ATF050LOG realiza validações antes da execução do cálculo de depreciação e da correção monetária, na rotina Cálculo Mensal (ATFA050).

Ponto de Entrada

Descrição:

É utilizado para executar as validações antes de executar a Procedure no cálculo da depreciação e na correção monetária, na rotina Cálculo Mensal (ATFA050).

Programa Fonte:

ATFA050

Retorno:

Valor Lógico(.T. ou .F.)

 

Exemplo:

#Include "PROTHEUS.ch"
#INCLUDE "rwmake.ch"
 
User Function ATF050LOG()
 
Local cTipDepr := AllTrim(GetMv("MV_TIPDEPR"))
Local lret := .T.
 
If cTipDepr <> "0"
lret:= .F.
Alert("Depreciação não é proporcional")
Return lret
EndIf