Histórico da Página
MNTA655E - Exclusão de Abastecimentos
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Manufatura | ||||||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||||||
Rotina: |
| ||||||||
Issues Relacionadas | 12.1.17. | ||||||||
País(es): | Todos. | ||||||||
Banco(s) de Dados: | Todos. | ||||||||
Sistema(s) Operacional(is): | Todos. |
Ponto de Entrada
Descrição: | Ponto de entrada para bloquear a exclusão de abastecimentos já conciliados. | ||||||||
Localização: | SIGAMNT: Atualizações/Controle de Combustível/Abastecimento/Abastecimento Manual. | ||||||||
Eventos: | Digitação de Nota Fiscal de Abastecimento. (MNTA655). | ||||||||
Programa Fonte: | MNTA655.prx | ||||||||
Função: | MNTA655E() | ||||||||
Retorno |
|
Exemplo:
Bloco de código | ||||
---|---|---|---|---|
| ||||
User Function MNTA655E() Local aOldArea := GetArea() Local lRet := .T. //Checando se o abastecimento já foi conciliado. If !Empty(TQN->TQN_DTCON) .And. !Empty(TQN->TQN_NOTFIS) MSGSTOP("Esse abastecimento já foi conciliado e é atendido por nota fiscal, logo é impossível sua exclusão.") lRet := .F. EndIf RestArea(aOldArea) Return lRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas