Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Usuário desconhecido (amanda.vieira)

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Usuário desconhecido (amanda.vieira)

Gravado em

Chave

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

...

GFEA032B  - Executar

...

Procedimentos na

...

Aprovação da

...

Ocorrência

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Distribuição e Supply Chain - Logística

Módulo:

SIGAGFE

Ponto de Entrada:GFEA3210GFEA032B

Descrição:

Possibilidade de realizar alguma outra ação ao aprovar a ocorrência como, por exemplo, a cópia da ocorrência para outro documento de carga.executar procedimentos na aprovação da ocorrência

Localização:

Chamado no final da função de aprovação manual e no final da função de aprovação automática da ocorrência.

Programa Fonte:

GFEA032 - Ocorrências

Parâmetros:Necessário enviar as informações da ocorrência na seguinte sequência:

NomeTipoDescriçãoObrigatório
PARAMIXB[1] 
= Número
CaractereNúmero da Ocorrência (GWD_NROCO)
;
Sim
PARAMIXB[2] 
= Situação
CaractereSituação da Ocorrência (GWD_SIT)
;
Sim
PARAMIXB[3]
  =
Numérico

Indica de qual ponto do programa a função foi chamada.

  • Recebe 1 se chamado por meio da função de aprovação manual da ocorrência
ou
  • .
  • Recebe 2 se chamado por meio da função de aprovação automática da ocorrência.
Sim

.

Retorno:

Nada é retornado.
Bloco de código
languagedelphi
firstline1
titleExemplo: GFEA3210
linenumberstrue
#INCLUDE "PROTHEUS.CH"
User Function GFEA032B()
Local nNrOcor   := PARAMIXB[1] 
Local cSituacao := PARAMIXB[2] 
Local cPonto    := PARAMIXB[3] 
  
	If  cPonto  == 1 .And.  cSituacao = "2" //Valida se a função foi chamada da aprovação manual e se  é uma aprovação da ocorrência 
		//Realizar  procedimento necessário
	EndIf
 
Return