Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAATF) |
Function: | ATFA040 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
You can use Entry Point AF040BAD to define the data of the new asset generated during the process of posting by advance of fixed assets. This entry point enables the customization of data of the asset to be created, in accordance with the specific rules of the customer.
If ExistBlock("AF040BAD")
aDadNBem := ExecBlock("AF040BAD",.F.,.F.)
cbase = aDadNBem[1]
cItemAtivo = aDadNBem[2]
cDescr = aDadNBem[3]
lAtBase = aDadNBem[4]
EndIf |
User Function AF040BAD()
Local aDadNBem := array(4)
aDadNBem:= {"1234567890", "0123", "TESTE PE", .T.}
Return aDadNBem |
|