Árvore de páginas

Versões comparadas

Chave

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


Descrição:

Este ponto de entrada tem a finalidade realizar a inclusão de campos na rotina de troca e devolução, quando acionado o botão Pesquisa, o sistema apresenta os itens dos documentos de saída que preenche os requesitos do filtro que foi feito na tela anterior.

...

A segunda posição vai corresponder as informação do campo que vai ser adicionada no array da estrutura da tabela temporaria que vai montar as informações dos itens dos documentos de saída.

Estrutura da tabela temporaria

1- Nome do campo.

2 -Não usado compatibilidade

3 -  Descrição do campo

4 -  Picture do campo

Vamos exemplificar a montagem desse trecho.

Bloco de código
languagedelphi
themeMidnight
firstline1
titleExemplo de montagem do array
AAdd(aRet,{ 3, {"D2_INFCOM" , ,"Inf. Compl",PesqPict("SD2","D2_INFCOM") }} )        
AAdd(aRet,{ 4, {"D2_CODCOM" , ,"Cod. Compl",PesqPict("SD2","D2_CODCOM") }} ) 

No trecho acima ontem estamos informanda o  conteudo do array, na primeira posição estamos passando a informação da posição 3 e 4 para cada item que vamos adicionar respectivamente.


Exemplo do ponto de entrada 


Bloco de código
languagedelphi
themeMidnight
firstline1
titleExemplo do ponto de entrada
#INCLUDE "PROTHEUS.CH" 

//---------------------------------------------------------------------------------------------------------
/*/{Protheus.doc} LJ720SIT
Realiza a inclusão de campos na rotina de troca e devolução, quando acionado o botão pesquisa
o sistema apresenta os itens dos documentos que preenche os requesitos do filtro que foi feito na tela anterior.
@type 	 Function
@author  Vendas Varejo
@since   17/07/2024
@param	 aHeader	, Array	   , Parametro que possui os itens do aHeader da Tabela SD2
@version P12
@return  aRet		, Retorno do campo e conteudo a ser adicionado no grid da tela.
/*/
//---------------------------------------------------------------------------------------------------------
User Function LJ720SIT()
Local aHeader  := Paramixb[1]
Local aRet     := {}
   
AAdd(aRet,{ 3, {"D2_INFCOM" , ,"Inf. Compl",PesqPict("SD2","D2_INFCOM") }} )        
AAdd(aRet,{ 4, {"D2_CODCOM" , ,"Cod. Compl",PesqPict("SD2","D2_CODCOM") }} ) 

Return aRet 

No exemplo acima temos a criação de uma função, no cabeçalho tem a descrição dos parâmetros e do retorno.

Obs.: Para o teste deste ponto de entrada é necessário a criação desses 2 campos (D2_INFCOM,D2_CODCOM) e preencher esses campos para efeito de teste. 

Exemplo do ponto de entrada após o usuário selecionar os itens.

Image Modified