Salve salve....
Ponto de entrada CT105CHK- ( Lançamento contábil )
CTBA105-CT105CHK - Valida lançamento contábil
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} CT105CHK
Valida lançamento contábil
@type function
@author Eurai Rapelli
@since 2023.01.01
/*/
User Function CT105CHK()
Local lRet := .T. as logical
Local lModified := ParamIXB[01] as logical
Do While TMP->( !EOF() )
If TMP->CT2_FLAG
TMP->( dbSkip() )
Loop
Endif
TMP->( dbSkip() )
EndDo
Return( lRet )
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima