Linha Microsiga Protheus

Árvore de páginas

Descrição

A140IPED - Adiciona campos na interface de vínculo com pedido de compras.

Observações

Ponto de entrada utilizado para adicionar campos para visualização na interface de amarração da nota com pedido de compras.
LOCALIZAÇÃO: ProcPCxNFe e MarkBrwPC
EM QUE PONTO: Ao clicar no botão Pedido por item, após selecionar a opção Vincular Documento.
------------------------------------------------------------------------------------------
Disponível somente para Top Connect e somente para a opção Pedido por Item.
Este ponto de entrada é executado duas vezes no programa.
A primeira vez, quando recebe o primeiro parâmetro igual a 1, deve retornar um array com os campos da tabela SC7 a incluir na query de pesquisa de pedidos, para montagem da tabela de trabalho.
Na segunda vez, quando recebe o primeiro parâmetro igual a 2, deve retornar um array em 3 dimensões:
A primeira dimensão deve retornar novamente os campos da tabela SC7.
A segunda dimensão deve retornar um array com a estrutura [CAMPO,TIPO,TAMANHO,CASAS DECIMAIS].
A terceira dimensão deve retornar um array com a estrutura [CAMPO, EM BRANCO, TÍTULO DA COLUNA A EXIBIR NA TELA, PICTURE DO CAMPO].
ATENÇÃO: O nome do campo deve obrigatoriamente seguir o padrão CAMPO1, CAMPO2, CAMPO3... nesta sequência, acrescentando 1 no final do nome a cada campo a incluir, para que o programa compreenda a inclusão dos campos no browse.

Exemplos

User Function A140IPED
Local nSeq := PARAMIXB[1]
Local alEstru := PARAMIXB[2]
Local alCampos:= PARAMIXB[3]
Local aRet := {}
If nSeq == 1
// Campos a adicionar na query de pesquisa de pedidos
AADD(aRet,{"C7_DATPRF","C7_QUJE"})
Else
// Campos a adicionar na query de pesquisa de pedidos
AADD(aRet,{"C7_DATPRF","C7_QUJE"})
// Campos que irão compor a tabela temporária
AADD(alEstru,{"CAMPO1", "D", TamSx3("C7_DATPRF")[1], 0 })
AADD(alEstru,{"CAMPO2", "N", TamSx3("C7_QUJE")[1] , TamSx3("C7_QUJE")[2] })
AADD(aRet,{alEstru})
// Campos que serão exibidos na tela
aAdd(alCampos,{"CAMPO1" , , "Dt.Entrega" ,PesqPict("SC7","C7_DATPRF") })
aAdd(alCampos,{"CAMPO2" , , "Qtd.Entregue",PesqPict("SC7","C7_QUJE") })
AADD(aRet,{alCampos})
EndIf
Return aRet

Preview

Veja também

Idioma

Português(Brasil)

Versões

Todas

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Topconnect

Updates

Parâmetros

Paramixb
Array
Parâmetro tipo array contendo:
Elemento 01 – Indica se é a primeira ou segunda execução do ponto de entrada.
Elemento 02 - Campos que irão compor a tabela temporária em formato array.
Elemento 03 - Campos que serão exibidos na tela em formato array.

Retorno

Na primeira execução:
Array com campos a adicionar na query.
Na segunda execução:
Array com 3 dimensões.
1 - Campos a adicionar na query.
2 - Array com a estrutura [CAMPO,TIPO,TAMANHO,CASAS DECIMAIS].
3 - Array com a estrutura [CAMPO,EM BRANCO,TÍTULO DA COLUNA A EXIBIR NA TELA,PICTURE DO CAMPO].

Eventos de chamada do Ponto de Entrada

Variáveis

Programa Fonte

MATA140I/COMXCOL

  • Sem rótulos