Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAATF) |
Function: | ATFA035 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46829 |
You can use entry point AF035VAL to handle the values added to the Asset Posting (ATFA035) routine. It enables specific customizations, allowing the customer to apply personalized business rules on the values processed during asset posting operations.
This entry point is useful to meet scenarios in which the calculations or default system values must be adjusted or validated, in accordance with the specific criteria of the customer.
nVlVend := Iif(ExistBlock( "AF035VAL" ),ExecBlock("AF035VAL",.F.,.F.), 0) |
User Function AF035VAL()
Local nVlVend := 0
Local aBxAtivo := {}
Alert("Entry Point AF035VAL() executed.")
AADD( aBxAtivo, { "N3_CBASE" , SN1->N1_CBASE } )
AADD( aBxAtivo, { "CNOTA" , SN4->N4_NOTA } )
AADD( aBxAtivo, { "CITEM" , SN1->N1_ITEM } )
AADD( aBxAtivo, { "N3_TIPO" , SN3->N3_TIPO } )
AADD( aBxAtivo, { "CSERIE" , SN4->N4_SERIE } )
AADD( aBxAtivo, { "VLRBAIXA", SN3->N3_VORIG1 } )
AADD( aBxAtivo, { "NQUANT" , SN1->N1_QUANTD } )
AADD( aBxAtivo, { "AUTPERCBX" , 100 } )
AADD( aBxAtivo, { "NVLVEND" , SN4->N4_VENDA } )
nVlVend := aBxAtivo[9][2]
Return nVlVend |
|