Linha Microsiga Protheus

Árvore de páginas

Descrição

Este Ponto de Entrada está localizado na rotina Cálculo do Frete (TMSA200) e permite estornar ou não o documento.

Observações


Exemplos

#Include 'Protheus.ch' 

User Function TM200MOK()

Local lRet:= .T.

Local aDocExc:= ParamIXB[1] 

If !Empty (aDocExc)

                MsgInfo('Estorno será efetuado!')

                lRet := .T.              

EndIf 

Return (lRet)

Preview

Veja também


Idioma

Português(Brasil)

Versões

Versões_Anteriores

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Retorno

Booleano

Eventos de chamada do Ponto de Entrada

O PE TM200MOK é executado no estorno do documento.

Variáveis

lRet - Booleano ( .T./ .F. )
aDocExc - Array contendo os documentos de Exclusão. (A primeira posição do array indica se o documento está ou não selecionado)

Programa Fonte

TMSA200.PRW




aDocExc