Árvore de páginas

Versões comparadas

Chave

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


01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Logística
Módulo:SIGATMS - Gestão de Transportes 


02. DESCRIÇÃO

Este Ponto de Entrada localizado no TMSA144 (Viagem), será executado na alteração da viagem modelo 2. Ele será executado para as viagens de coleta, transferência e entrega.


03. EXEMPLO DE UTILIZAÇÃO

Parâmetros:

Nome
Tipo
Descrição
Default
Obrigatório
Referência
aAlter
Array of Record
Campos que podem ser alterados no browse.





...

Bloco de código
languagejava
themeMidnight
titleAT250INI
Programa Fonte
TMSA144.PRW

Sintaxe
TM144INC- Ponto de Entrada será executado na alteração da viagem modelo 2. Ele será executado para as viagens de coleta, transferência e entrega.

Retorno
Array


Exemplos

User Function TM144INC()

Local _cSerTmsDoc    := (PARAMIXB[1])
Local _nCntFor       := (PARAMIXB[2])
Local _aCols         := (PARAMIXB[3])
Local _nDoc          := ""
Local _cSerie        := ""

    If _cSerTmsDoc = "1" //-Viagem de Coleta
        _nDoc   := iif(!Empty(_aCols[_nCntFor][6]), _aCols[_nCntFor][6], "")       
        _cSerie := iif(!Empty(_aCols[_nCntFor][7]), _aCols[_nCntFor][7], "")
    ElseIf _cSerTmsDoc = "2" //-- Viagem de Transferencia
        _nDoc   := iif(!Empty(_aCols[_nCntFor][4]), _aCols[_nCntFor][4], "")       
        _cSerie := iif(!Empty(_aCols[_nCntFor][5]), _aCols[_nCntFor][5], "")
    Else //-- Viagem de Entrega
        _nDoc   := iif(!Empty(_aCols[_nCntFor][4]), _aCols[_nCntFor][4], "")       
        _cSerie := iif(!Empty(_aCols[_nCntFor][5]), _aCols[_nCntFor][5], "")
    EndIf
    If _nDoc <> ""
        MsgAlert('Documento: ' + _nDoc + ' - ' + _cSerie )
    Else 
        MsgAlert('Nenhum documento foi selecionado !!')
    EndIf

Return


04. DEMAIS INFORMAÇÕES

  • Não há.


05. ASSUNTOS RELACIONADOS

  • Não há.



Templatedocumentos

...