Árvore de páginas

Versões comparadas

Chave

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

...

Portuguese

Pagetitle
TM141COL - Inclusão de Campos
TM141COL - Inclusão de Campos

Ponto-de-Entrada: TM141COL - Inclusão de Campos


Versões:Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países:Todos
Sistemas Operacionais:Todos
Compatível às Bases de Dados:Todos
Idiomas:Espanhol , Inglês


Descrição:

Este

Ponto

de

Entrada,

localizado

no

TMSA140.PRW(Geração

de

Viagens

-

Transporte)

e

TMSA141.PRW(Geração

de

Viagens

-

Coleta/Entrega),

permite

ao

usuário

incluir

novos

campos

nos

itens

dos

documentos

na

Geração

de

Viagens

(Coleta,

Transporte

e

Entrega)

dos

tipos

(Rodoviário,

Aéreo

e

Fluvial).

Eventos


 

Programa Fonte
TMSA141.PRW
Sintaxe

TM141COL - Inclusão de Campos ( [ Nulo ] ) --> aNewCol

Parâmetros:



Nome

Tipo

Descrição

Default

Obrigatório

Referência

Nulo

Array of Record













Retorno
aNewCol
    (vetor)
  • Array com os novos campos a serem adicionados.
Observações

No exemplo estamos adicionando nos itens os campos: Filial do Documento, Número do Documento e Série do Documento.

Essa informação também está disponível na Central de Atendimento através do link:

https://centraldeatendimento.totvs.com/hc/pt-br/articles/360007485671

Exemplos
User Function TM141COL() If cSerTms == '2' //Transporte Aadd( aNewCol,{Posicione('SX3',2,'DUD_FILDOC','X3_TITULO'),'DUD_FILDOC'}) Aadd( aNewCol,{Posicione('SX3',2,'DUD_DOC'   ,'X3_TITULO'),'DUD_DOC'   }) Aadd( aNewCol,{Posicione('SX3',2,'DUD_SERIE' ,'X3_TITULO'),'DUD_SERIE' })Endif If cSerTms == '1' .Or. cSerTms == '3' //Coleta ou Entrega Aadd( aNewCol,{Posicione('SX3',2,'DUD_FILDOC','X3_TITULO'),'(cAliasDoc)->DUD_FILDOC'}) Aadd( aNewCol,{Posicione('SX3',2,'DUD_DOC'   ,'X3_TITULO'),'(cAliasDoc)->DUD_DOC'   }) Aadd( aNewCol,{Posicione('SX3',2,'DUD_SERIE' ,'X3_TITULO'),'(cAliasDoc)->DUD_SERIE' }) Aadd( aNewCol,{Posicione('SX3',2,'DUD_NUMNFC','X3_TITULO'),'Posicione('DUD',1,xFilial('DUD')+(cAliasDoc)->DUD_FILDOC+(cAliasDoc)->DUD_DOC+(cAliasDoc)->DUD_SERIE,'DUD_NUMNFC')' })Endif Return aNewCol