Histórico da Página
...
03. EXEMPLO DE UTILIZAÇÃO
Bloco de código | ||||
---|---|---|---|---|
| ||||
#INCLUDE "PROTHEUS.CH"
USER FUNCTION A390AVU()
LOCAL cMensagem := NIL
// A chamada a este ponto de entrada ocorrerá
// imediatamente após o processo de gravação do Cheque Avulso.
// As tabelas SE5 e SEF estarão posicionadas nos respectivos registros
// para que se possa realizar ações complementares.
IF !Complements('SE5',@cMensagem) .OR. !Complements('SEF',@cMensagem)
MSGINFO(cMensagem,'PE: A390AVU')
ENDIF
RETURN NIL
STATIC FUNCTION Complements(cAlias,cMensagem)
LOCAL lRet := .T.
DEFAULT cMensagem := ""
IF cAlias == 'SE5'
// DO something ...
ENDIF
IF cAlias == 'SEF'
// DO something ...
ENDIF
RETURN lRet
|
04. DEMAIS INFORMAÇÕES
05. ASSUNTOS RELACIONADOS
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas