01. GENERAL DATA

Product:

TOTVS Backoffice

Product Line:

Protheus Line

Industry:

Services

Module:

TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAATF)

Function:

FISXATF

Country:

Brazil

Ticket:

Internal

Requisite/Story/Issue

DSERCTR1-46748

02. DESCRIPTION

Entry point DEPREATF returns the depreciation of the fixed asset.

03. OTHER INFORMATION

nBaseItem         := ExecBlock("DEPREATF",.f.,.f.,{cAliasTMP,cAliasTMP, "F120"})

nVlrBCPIS :=nVlrBCCOF := ExecBlock("DEPREATF",.f.,.f.,{cAliasSN1,cAliasSN1, "F130"})
#Include 'Protheus.ch'

User Function DEPREATF()

Local nRetorno    := 0

Local cArqTmp   := ParamIXB[1]

Local cAliasTmp := ParamIXB[2]

Local cTipReg    := ParamIXB[3]



If cTipReg == "F120"

  Alert("Example of entry point DEPREATF for record F120")

  nRetorno := 15000

ElseIf  cTipReg == "F130"

  Alert("Example of entry point DEPREATF for record F130")

  nRetorno := 25000

Else

  Alert("Example of entry point DEPREATF ")

  nRetorno := 45000

EndIf



Return(nRetorno)
  • It is noteworthy that the customer is responsible for EP utilization and its impacts on the system.
  • The examples used in this documentation are for demonstration purposes only. Each customer must check what behavior they want to perform according to the scope of the entry point.

04. RELATED SUBJECTS