Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Caio Bruno Murakami Y Cruces

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Caio Bruno Murakami Y Cruces

Gravado em

Chave

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

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


Bloco de código
#Include "Protheus.ch" 

User Function TM320TOKTMA940ORI()
Local nOpcaocRet  := PARAMIXB[1]""
Local aManife cCdROri := 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
cRet := "J04557"

Return cRet