MATA241-MT241LOK - Validar a linha do Item do Movimento múltiplos

Salve salve....

Ponto de entrada MT241LOK - ( PCP  - Movimento múltiplos )

MATA241-MT241LOK - Validar a linha do Item do Movimento múltiplos

#INCLUDE "TOTVS.CH"


/*/{Protheus.doc} MT241LOK
Validar a linha do Item do Movimento múltiplos

@type 		function
@author    	Eurai Rapelli
@since     	2023.01.01
/*/
User Function MT241LOK()
Local n 			:= ParamIxb[1] as numeric
Local lRet 			:= .T. as logical
Local fD3COD 		:= GdFieldPos('D3_COD') as numeric

Begin Sequence

If FunName() == "MATA241" 
	If !SB1->( dbSeek( xFilial("SB1") + aCols[n][fD3COD ) )
		MsgInfo("XXX.", "MT241LOK")
		lRet := .F.; Break
	Endif
EndIf

End Sequence

Return( lRet )

Gostou? Compartilhe com seus amigos e deixe um comentário! 😎  

Um abraço, e até a próxima