Histórico da Página
GFEA5235 - Possibilidade de incluir regras na entrada de veículo no programa Operar Pto Controle
Características do Requisito
Linha de Produto: | Microsiga Protheus |
Segmento: | Supply Chain - Logística |
Módulo: | SIGAGFE |
Ponto de Entrada
Descrição: | Permite a inclusão de regras/validações antes da execução da entrada do veículo de alguma opção do menu 'Registrar Informações' através do programa Operar Pto Controle. | ||||||||
Localização: | Na ação menuclick, ao acionar alguma das ações do menu 'Registrar Informações' | ||||||||
Programa Fonte: | GFEA523 | ||||||||
Retorno: |
| ||||||||
Observação | Importante inserir mensagem de aviso ao usuário via ponto de entrada, pois o ponto de entrada não prevê essa situação. |
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE 'PROTHEUS.CH' User Function GFEA5235() Local cFilGX3 := PARAMIXB[1] Loacl cMov := PARAMIXB[2] Local cOper := PARAMIXB[3] Local cSeq := PARAMIXB[4] Local cPtCt := PARAMIXB[5] Local nClick := PARAMIXB[6] Local cSeqGX4 := PARAMIXB[7] Local lRet5235 := .T. GX4->(dbSetOrder(1)) If GX4->(dbSeek(cFilial + cNrMov)) If nClick == "1" lRet5235 := .F. EndIf EndIf Return lRet5235 |