Histórico da Página
PONTO DE ENTRADA PARA VALIDAÇÕES COMPLEMENTARES NOS CAMPOS DA TABELA SD3 NO ABASTECIMENTO MANUAL (MNTA655)
Características do Requisito
Linha de Produto: | Microsiga Protheus. | ||
Segmento: | Manufatura. | ||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas. | ||
Rotina: |
|
MNTA080
|
| ||
País(es): | Todos. | |
Banco(s) de Dados: | Todos. | |
Sistema(s) Operacional(is): | Todos. |
Ponto
...
de Entrada
Descrição: | Ponto de Entrada chamado na rotina de Abastecimento Manual (MNTA655), para fazer as validações finais na tabela SD3 antes da gravação. |
Localização: | SIGAMNT: Atualizações/Controle de Combustíveis/Abastecimento/Abastecimento Manual. |
Programa Fonte: | MNTA655.prx |
Função: | MNT655D3CC() |
Parâmetros: |
|
|
|
|
|
| |||||||||
| Retorno: |
|
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#Include 'Protheus.ch' User Function MNT655D3CC() Local lRet := .T. //Parâmetros cTipo := PARAMIXB[1] // requisição ou devolução cVeic := PARAMIXB[2] // Código do Veículo/Bem cCCust := PARAMIXB[3] // Código de Centro de Custo cFilTQF := PARAMIXB[4] // Parâmetro nRecnoSD3 Código da filial do Posto If IsInCallStack( "MNTA655" ) nRecno := PARAMIXB[5] // Último registro dbSelectArea("SD3") dbGoTo(nRecnoSD3nRecno) RecLock("SD3",.F.) SD3->D3_EMISSAO := dDataBase MsUnlock("SD3") EndIf Return lRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas