Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin

Ponto de Entrada

Descrição:

Ponto de Entrada na rotina de Conferência de Entrada por Volume, executado após a mudança de Status da Conferencia.

Localização:

Atualizações / Mov Peças / Conferencia de Itens por Volume de Entrada

Eventos:

...

If lMudouStatus

If ExistBlock("OA340STA")

ExecBlock("OA340STA",.f.,.f.,{ cConferencia , cStatus , cTpOrigem })

EndIf

EndIf

...

Programa Fonte:

OFIA340.PRW

Função:

OA3400111_STATUSCONFERENCIA()

Parâmetros:
NomeTipoDescrição

cConferencia

Caracter

Numero da Conferência

cStatus

Caracter

Status Novo ( 2=Conf.Parcial;3=Conf.Finalizada;4=Conf.Aprovada;5=Conf.Reprovada )

cTpOrigem

Caracter

Tipo de Origem ( 1=Desktop ou 2=Coletor )

Retorno:


Não há.

Exemplo:

Include totvs.ch

////////////////////////////////////////////////////////////////////////////////////

// //

// OA340STA - Ponto de Entrada na rotina de Conferência de Entrada por Volume, //

// executado após a mudança de Status da Conferencia. //

// //

////////////////////////////////////////////////////////////////////////////////////

User Function OA340STA()

Local cConferencia := ParamIxb[1] // Nro.da Conferencia

Local cStatus := ParamIxb[2] // Status Novo ( 2=Conf.Parcial;3=Conf.Finalizada;4=Conf.Aprovada;5=Conf.Reprovada )

Local cTpOrigem := ParamIxb[3] // Tipo de Origem ( 1=Desktop ou 2=Coletor )


If cTpOrigem == "2" // 2=Coletor de Dados

VTAlert("Ponto de entrada OA340STA executado com sucesso!" )

Else // 1=DeskTop

MsgInfo("Ponto de entrada OA340STA executado com sucesso!" )

EndIf


Return