Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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:

Nome

Tipo

Descrição

Obrigatório

 lRet5235

Ao entrar no menu click antes de selecionar qual tarefa deverá executar.

Serão enviadas as seguintes informações:

cFilGX3: Filial da GX3

cMov: Número do Movimento

cOper: Número da Operação

cSeq: Sequencia Operação

cPtCt: Código do Ponto de Controle

nClick: Numero do menu clicado

cSeqGX4: Sequencia Movimentação Ponto Controle, conforme lista a seguir.

  1. Entrada
  2. Endereçar
  3. Check-List
  4. Doc Carga
  5. ara
  6. Pesagem
  7. Concluir
  8. Retornar
  9. Resumo Pto. Controle
  10. Imprimir Checklist
  11. Hodômetro
  12. Dados Complementares
  13. Avaliar Reprovação
  14. Ocorrência
  15. Ocorrência
  16. Qtd Doc Carga
  17. Unitizadores
  18. Ver agendamentos

Sim

ObservaçãoImportante 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
languagedelphi
firstline1
titleExemplo GFEA5225
#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