Ponto de Entrada TMA940ORI

Linha de Produto:

Microsiga Protheus

Segmento:

Logística

Módulo:

SIGATMS - Gestão de Transportes

ISSUE: 

DLOGTMS03-6679

Ponto de Entrada - TMA940ORI

Descrição:

O Ponto de Entrada TMA940ORI trocar a região de origem na funcionalidade Exibir Grade de Vôo, fazendo com que a grade exibida seja a partir dessa nova região.

Localização:TMSA940
Programa Fonte:TMSA940 - Grade de Vôo
Parâmetro:
NomeTipoDescrição
PARAMIXB[1] CaracterCódigo Região de Origem
Retorno:
NomeTipoDescriçãoObrigatório
cRetCaracterNovo código região de origemSim
Observações:

Exemplo de utilização:

User Function TMA940ORI()
Local cRet := ""
Local cCdROri := PARAMIXB[1]


cRet := "J04557"

Return cRet

#Include "Protheus.ch" 

User Function TM320TOK()
Local nOpcao  := PARAMIXB[1]
Local aManife  := aClone(PARAMIXB[2])
Local lRet        := .T.


If Len(aManife) > 0
      If Ascan( aManife, { |x| x[1] == .F. } ) > 0
            MsgAlert('Existem Manifestos que nao foram marcados')
            lRet:= .F.
      EndIf
EndIf


Return lRet