Salve salve....
Ponto de entrada M410STTS- ( Faturamento - Pedido de venda )
MATA410-M410STTS - Finalização Inclusão, alteração, exclusão, cópia e devolução
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} M410STTS
Finalização Inclusão, alteração, exclusão, cópia e devolução
@type function
@author Eurai Rapelli
@since 2023.01.01
/*/
User Function M410STTS()
Local aArea := GetArea() as array
Local nOper := ParamIXB[1] as numeric
If nOper == 3 .OR. nOper == 6 //Inclusão ou cópia
RecLock('SC5',.F.)
SC5->C5_XX := 'EURAI'
SC5->(MsUnlock())
ElseIf nOper == 4 //Alteração
ElseIf nOper == 5 //Exclusão
EndIf
RestArea(aArea)
Return( Nil )
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima