Árvore de páginas

01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Serviços

Módulo:Ativo Fixo(SIGAATF)
Função:Ajuste Contábil(ATFA220)
Ticket:2721419 
Requisito/Story/Issue:DSERCTR1-10375


02. 
SITUAÇÃO/REQUISITO

O ponto de entrada AF220GRV permite realizar uma regra específica no P.E após realizar a gravação na rotina de Ajuste Contábil(ATFA220) nos bens que constem na tabela de inventario(SN8), assim permitindo a sua manipulação.

03. SOLUÇÃO

Realizado documentação do PE.


Importante !


O exemplo demonstrado é meramente ilustrativo. A regra, o funcionamento e os impactos gerados pelo ponto de entrada no sistema são de responsabilidade do cliente que o utiliza.


04. DEMAIS INFORMAÇÕES


Parâmetros:

Parâmetro

Tipo

Descrição

Obrigatório

PARAMIXB[1]Não se aplica

Não se aplica 

Não


Retorno:

Retorno

Tipo

Descrição

Obrigatório

Não se aplicaNão se aplicaNão se aplica(a tratativa será feita dentro do PE sem retornos para o programa principal)Não



Exemplo de utilização do Ponto de Entrada
#INCLUDE "PROTHEUS.ch"
#INCLUDE "rwmake.ch"

User Function AF220GRV()

    Local cAlias := Alias()
    Local nValorAjuste := 20

    if  (cAlias)->N3_VORIG1 > 1000
        Reclock(cAlias)
        SN3->N3_VORIG1 := (cAlias)->N3_VORIG1 + nValorAjuste
        MSUnlock()
    Endif

Return nil



Exemplo da manipulação do PE pelo sistema
	If ExistBlock("AF220GRV")
		ExecBlock("AF220GRV",.F.,.F.)
	EndIf



05. ASSUNTOS RELACIONADOS

  • Não se aplica.