Descrição: | Este ponto de entrada tem como objetivo permitir criar validações para os dados contidos dentro do arquivo xml. O ponto de entrada é executado ao final das validações padrões da função Rs170Grava(). | ||||||||
Programa Fonte: | RSPA170.PRW | ||||||||
Parâmetros: |
| ||||||||
Retorno: |
|
Exemplo:
#INCLUDE 'PROTHEUS.CH'
#INCLUDE 'PARMTYPE.CH'
User Function PA170TOK()
Local lRet := .T.
Local aDados := PARAMIXB[1]
If Len(aDados) > 0
lRet := .T.
Else
Help( ,, "Help",, + CRLF + "Nenhum dado encontrado no arquivo Xml.", 1, 0)
lRet := .F.
EndIf
Return lRet