Histórico da Página

01.

...

GENERAL DATA

Product:

Produto:

Solucoes_totvs

Solucoes_totvs_crossSolucaoCross

TOTVS Backoffice

Solucoes_totvs_parceirosSolucaoParceiros

Product Line:	Microsiga Protheus Line
Industry:	Services
Module:	TOTVS Backoffice (Protheus Line) - Fixed Asset (SIGAFIS)
Function

Solucoes_totvs_parceirosexptotvsSolucaoParcsExpsTOTVSLinha de Produto:

Linhas_totvs

Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	Serviços

Módulo:

Modulos_cross_segmentos

ModulosCrossSegmentos	TOTVS Backoffice (Linha Protheus) - Ativo Fixo (SIGAATF)

Modulos_framework

Modulos_totvs_construcao

Modulos_totvs_juridico

Modulos_totvs_logistica

Modulos_totvs_manufatura

Modulos_totvs_rh

Modulos_totvs_saude

Função

:	ATFA050 - AF050FPR

País

Country:

Brasil

Brazil

Ticket:

Interno

Internal

Requisito

Requirement/

Story

Story/Issue:

DSERCTR1-39974

02.

...

STATUS/

...

REQUISITION

Entry point AF050FPR allows selecting certain assets to be disregarded in the Monthly Calculation of depreciation

...

O ponto de entrada AF050FPR permite a seleção de determinados ativos a serem desconsiderados no Cálculo Mensal de depreciação.

Informações

title	Atenção	Attention

The examples used in this document are merely illustrativeOs exemplos utilizados nesse documento são meramente ilustrativos.

Aviso

title	IMPORTANTE !!!	IMPORTANT

The impacts caused by using the entry point are the total responsibility of the customer that implements them.

You may run this EP via PROCEDURE or ADVPL. If you perform the depreciation calculation without procedure, use the EP in ADVPL; whereas, if you perform the depreciation calculation with PROCEDURE, use the EP

Os impactos causados pela utilização do ponto de entrada são de total responsabilidade do cliente que o implementou.

Este PE pode ser executado via PROCEDURE ou ADVPL, se for executado o calculo de depreciação sem procedure utiliza-se o PE em ADVPL, agora se for executado o calculo de depreciação com PROCEDURE deve ser utilizado o PE via PROCEDURE

03.

...

SOLUTION

Explanation and contextualization regarding the use of the EP

...

Explicação e contextualização sobre o uso do PE.

Totvs custom tabs box

tabs	Passo 01, Passo 02, Passo 03, Passo 04
ids	passo1,passo2

Totvs custom tabs box items

default	yes
referencia	passo1

Entry point when the Depreciation Calculation is performed by procedures. Note that, to use procedure AF050FPR, you must encode/develop it in the native language of the SGBD you are using. If you use ORACLE, encode it in ORACLE, if MSSQLSERVER, encode it in SQLSERVER and if in POSTGRES, encode it in POSTGRES.

The example below is in Oracle.

Procedure to use the procedure AF050FPR or any other Entry Point in procedure.

Install the main procedure package and check whether the Entry Point was created, being mindful of parameter MV_DROPPE.
It must be set to "F" to not delete the Entry Points.

Note this procedure is always installed in the database:

Image Added

Note: note that the EP is always executed in the call of the main procedure ATF001 as follows

Ponto de entrada quando o Cálculo de Depreciação é realizada por procedures. Detalhe que para ser utilizada, esta procedure AF050FPR deve ser codificada/desenvolvida na linguagem nativa do SGBD utilizado. Se utiliza ORACLE, codificar em ORACLE, se MSSQLSERVER codificar em SQLSERVER e se POSTGRES codificar em POSTGRES.

O exemplo abaixo está em Oracle.

Procedimento para utilizar a procedure AF050FPR ou qualquer outro Ponto de Entrada em procedure.

Instalar o pacote principal de procedure e verificar se o ponto de Entrada foi criada, atentando-se para o parâmetro MV_DROPPE.
Este deve estar parametrizado com "F" para que não se excluam os Pontos de Entradas.

Observe que essa procedure é sempre instalada no banco:

Image Removed

Obs: observe que o PE é sempre executada na chamada da procedure principal ATF001 da seguinte forma:

Bloco de código

language	sql
title	Chamada do PE via SQL
linenumbers	true

AF050FPR_11_T1 (vcFilial , vcN3_CBASE , vcN3_ITEM , vcN3_TIPO , vcN3_SEQ , IN_DATADEP , vcCalcula );

Totvs custom tabs box items

default	no
referencia	passo2

Exemplo em Example in PROCEDURE:

Aviso

title	Atenção

Importante se atentar que em procedure deve-se codificar, na linguagem do banco de Dados.

Attention

It is important to pay attention to the procedure in which you must encode, in the database language.

If encoded in Se codificado em ADVPL:

Bloco de código

language	cpp
title	Exemplo em ADVPL
linenumbers	true

User Function AF050FPR()

	Local lRet := .F.
	Local cChave := Paramixb[1]
	Local aChave := {}

	// Monta array para itens que não serão depreciados
	// CBASE CITEM
	AADD(aChave, "100003 03 " )
	AADD(aChave, "100005 05 " )
	AADD(aChave, "111111 11 " )

	If Ascan(aChave, cChave) # 0
		lRet := .T.
		Alert("Ponto de entrada AF050FPR() executado")
	EndIf

Return lRet

04.

...

OTHER INFORMATION

Informações

title	Contextualização PEEP Contextualization

Bloco de código

language	cpp
title	Evento de Chamada do PE via ADVPL
linenumbers	true

If ExistBlock("AF050FPR")
	If ExecBlock("AF050FPR",.F.,.F.,{cChave})
		DbSelectarea(cAliasSn3)
		(cAliasSn3)->( DbSkip() )
		Loop
	EndIf
EndIf

Bloco de código

language	sql
title	Evento de Chamada do PE via PROCEDURE
linenumbers	true

AF050FPR_11_XX (vcFilial , vcN3_CBASE , vcN3_ITEM , vcN3_TIPO , vcN3_SEQ , IN_DATADEP , vcCalcula );

Informações

title	Parâmetros e RetornoParameters and Return

Parâmetros em ADVPL:

Parâmetros	Tipo	Descrição
cChave - PARAMIXB[1]	Caractere	Chave retornada para utilização

Parâmetros em PROCEDURE:

Parâmetros	Tipo	Descrição
IN_FILIAL	Caractere	Filial utilizada
IN_CBASE	Caractere	Código base
IN_ITEM	Caractere	Item do Código Base
IN_TIPO	Caractere	Tipo do bem
IN_SEQ	Caractere	Sequencia da inclusão do bem
IN_DATA	Caractere	Data da depreciação
OUT_RESULT	Caractere	Resultado retornado da procedure. Se "0" pula o registro, Se "1" não

Retorno do ponto de entrada ADVPL e PROCEDURE:

Modo	Retorno	Tipo
PROCEDURE	OUT_RESULT	Caractere
ADVPL	lRet	Lógico

05.

...

RELATED SUBJECTS

Not Applicable

...

Não se aplica.

Páginas filhas

Versões comparadas

Versão antiga 2

Nova versão 3

Chave

01.

GENERAL DATA

02.

STATUS/

REQUISITION

03.

SOLUTION

04.

OTHER INFORMATION

05.

RELATED SUBJECTS