Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Revertida da versão 5

01. DADOS GERAIS

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

02. DESCRIÇÃO

O ponto de entrada TM850MEC permite adicionar, alterar e remover campos do vetor aCampos.

Localizado dentro da função TMSA850Aut, ao gerar fatura por documento.

Importante: Não faz parte do escopo deste ponto de entrada alterar as posições dos campos dentro do array aCampos.

03. EXEMPLO DE UTILIZAÇÃO

Parâmetros:


Nome
Tipo
Descrição
Default
Obrigatório
Referência
aCampos
Array of Record
Vetor contendo as colunas de aCampos


Sim


Variáveis

Nome
Tipo

Escopo

Pode Alterar
Descrição
aCampos
Array of Record

Local

Sim
Vetor contendo as colunas de aCampos
nTam
Numérico

Local

Não
Quantidade de elementos presente no vetor aCampos
Bloco de código
languagejava
themeMidnight
title TM850MEC
Programa Fonte
TMSA850.PRW

Sintaxe 

TM850MEC - Manipulação de Elementos do aCampos ( < aCampos> ) --> aCampos  

Retorno 
aCampos(array_of_record)
Vetor contendo as colunas de aCampos.   

Exemplos

#INCLUDE "Protheus.ch"

//-------------------------------------------------------------------
/*{Protheus.doc} TM850MEC
Manipulação de Elementos do aCampos
https://tdn.totvs.com.br/pages/releaseview.action?pageId=6093569
@type Ponto de Entrada
@author TOTVS 
*/
//------------------------------------------------------------------- 
User Function TM850MEC()
Local aCmp:= PARAMIXB[1]
Local nTam := len(aCmp) 

If ValType(aCmp)== "A" .And. Len(aCmp) > 0     
	
	//-- Exclui campo do array para exibição na tela.
	aDel(aCmp,8)      
	aSize(aCmp,nTam-1)

	//--Adiciona campo no array
	Aadd(aCmp, {"DT6_NCONTR", ""} )

EndIf 

Return aCmp   


04. DEMAIS INFORMAÇÕES

No exemplo, foi removido o campo de data de emissão e adicionado o do número de contrato:

Image AddedNão há.


05. ASSUNTOS RELACIONADOS

  • Não há.



Templatedocumentos

...