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 verificação de qual inclusão de regras/validações antes da execução 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. Tabelas GX3 e GX4 estao posicionadas no momento da execução do ponto de entrada. |
Bloco de código | ||||||
---|---|---|---|---|---|---|
| ||||||
#INCLUDE 'PROTHEUS.CH' User Function GFEA5234GFEA5235() Local cFilGX3 := PARAMIXB[1] Local cMov cOper := PARAMIXB[12] Local cOper := PARAMIXB[23] Local cSeq := PARAMIXB[34] Local cPtCt := PARAMIXB[45] Local nClick := PARAMIXB[6] Local cSeqGX4 := PARAMIXB[57] Local lRet5234lRet5235 := .T. GX4->(dbSetOrder(1)) If GX4->(dbSeek(cFilial + cNrMov)) If nClick == "1" lRet5233 lRet5235 := .F. EndIf EndIf Return lRet5234lRet5235 |