Salve salve....
Ponto de entrada F240TBOR- ( Financeiro- Bordero de Pagamento)
FINA240-F240TBOR- Executado após a gravação dos dados do borderô de pagamento
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} F240TBOR
Executado após a gravação dos dados do borderô de pagamento
@type function
@author Eurai Rapelli
@since 2023.01.01
/*/
User Function F240TBOR()
Local aArea := GetArea()
Local lRet := .T.
If RecLock("SE2",.F.)
SE2->E2_CODBAR := 'XXX'
SE2->( MsUnlock() )
EndIf
Restarea(aArea)
Return(lRet)
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima