DT AF050FPR - Disregard assets to be depreciated in Monthly Calculation

01. GENERAL DATA

Product:	TOTVS Backoffice
Product Line:	Microsiga Protheus Line
Industry:	Services
Module:	TOTVS Backoffice (Protheus Line) - Fixed Asset (SIGAFIS)
Function:	ATFA050 - AF050FPR
Country:	Brazil
Ticket:	Internal
Requirement/Story/Issue:	DSERCTR1-39974

02. STATUS/REQUISITION

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

Attention

The examples used in this document are merely illustrative.

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 via PROCEDURE

03. SOLUTION

Explanation and contextualization regarding the use of the EP.

04. OTHER INFORMATION

EP Contextualization

EP Call Event via ADVPL

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

EP Call Event via PROCEDURE

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

Parameters and Return

Parameters in ADVPL:

Parameters	Type	Description
cChave - PARAMIXB[1]	Character	Key returned for use

Parameters in PROCEDURE:

Parameters	Type	Description
IN_FILIAL	Character	Branch used
IN_CBASE	Character	Base Code
IN_ITEM	Character	Base Code Item
IN_TIPO	Character	Asset Type
IN_SEQ	Character	Asset addition sequence
IN_DATA	Character	Depreciation Date
OUT_RESULT	Character	Result returned from procedure. If "0" skip the record, If "1" do not

Return of Entry Point ADVPL and PROCEDURE:

Mode	Return	Type
PROCEDURE	OUT_RESULT	Character
ADVPL	lRet	Logical

05. RELATED SUBJECTS

Not Applicable.

Páginas filhas