Product: | TOTVS Backoffice |
Product Line: | Protheus Line |
Industry: | Services |
Module: | TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAATF) |
Function: | ATFA125 |
Country: | Brazil |
Ticket: | Internal |
Requisite/Story/Issue | DSERCTR1-46748 |
Entry Point AF125GTL is activated after recording the transfer request in batch, if selected in table SNM. You can use it to perform complementary actions soon after confirming the batch transfer, so you can adjust or add any information required to complete the process.
AF125GTL makes specific logical implementations possible, such as adjustments to request records, updates to related tables, or other operations that guarantee the compliance and consistency of data processed in batches, ensuring that the transfer flow is appropriate to the needs of the business.
If ExistBlock( "AF125GTL" ) ExecBlock( "AF125GTL", .F., .F. ) EndIf |
#Include "Protheus.ch" User Function AF125GTL() Local cNota := "" Local cCodSol := "" cCodSol := SNM->NM_CODIGO cNota := '1234' DbSelectArea("SNM") SNM->(DbSetOrder(1)) SNM->(DbSeek(xFilial("SNM")+cCodSol)) While SNM->(!EOF()) .And. xFilial( "SNM" ) == SNM->NM_FILIAL .And. cCodSol == SNM->NM_CODIGO RecLock("SNM",.F.) SNM->NM_NOTA := cNota SNM->(MsUnlock()) SNM->(DbSkip()) EndDo Retur |
|