Adicionar coluna pelo PE MA103F4H

Boa tarde a todos, estou com um problema, sou iniciante em ADVPL e tenho a seguinte demanda:

Na rotina de documento de entrada, quando o usuário entra com as informações da nota fiscal (numero, fornecedor e tipo), ele pressiona a tecla F6 para buscar os pedidos de venda por item que fazem referencia ao fornecedor. Preciso adicionar uma coluna nessa tela, além das informações padrão de Pedido, produto, descrição do produto, vindo da SC7, seria a coluna C7_ZZDCOMP uma coluna customizada com o detalhamento do produto.

Achei essa documentação com o PE que me parece correto, mas não há documentação de como adicionar, apenas poucas informações sobre a rotina.

https://tdn.totvs.com/pages/releaseview.action?pageId=6085338

Alguém já conseguiu fazer esse tipo de alteração? É possivel?

Agradeço qualquer ajuda que puderem fornecer.

pontodeentrada

criado 28 de Jul de 2023
Fabian Ribeiro
9 pontos
editado 28 de Jul de 2023

Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

4 respostas

up 0 down
Esse PE precisa trabalhar em conjunto com o MA103F4I (Um cria o cabeçalho e o outro envia os dados)
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 28 de Jul de 2023
  Thyago Pedro Romeiro
  386 pontos
- 0
  
  Boa tarde Thyago,
  
  consegui com esse fonte:
  
  User Function MA103F4I() Local aRet := {} aRet := { SC7->C7_ZZDCOMP } Return(aRet)
  
  User Function MA103F4H() Local aRet := {} aRet := { GetSx3Cache("C7_ZZDCOMP","X3_TITULO") } Return(aRet)
  
  Mas tem um porém, ele aparece no F5 por pedido, queria pedido por item
  — Fabian Ribeiro 28 de Jul de 2023
- 0
  
  Aí é outro ponto de entrada amigo (MT100C7D e MT100C7C). O MA103F4H e MA103F4I é para o botão de Pedidos
  — Thyago Pedro Romeiro 28 de Jul de 2023
- 0
  
  https://tdn.totvs.com/pages/releaseview.action?pageId=6085389
  — Thyago Pedro Romeiro 28 de Jul de 2023
- 0
  
  Obrigado pelo apoio Thyago.
  — Fabian Ribeiro 31 de Jul de 2023
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações
up 0 down
Olá, Fabian! Veja se esse link consegue lhe ajudar melhor.

https://tdn.totvs.com/pages/releaseview.action?pageId=318604347
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 28 de Jul de 2023
  Francisco Mendonça
  264 pontos
- 0
  
  Obrigado pela resposta Francisco, utilizei o mesmo codigo do exemplo:
  
  User Function MA103F4H()
  
  Local uRet := {}
  
  uRet := { GetSx3Cache("C7_ZZDCOMP","X3_TITULO") }
  
  Return(uRet)
  
  e recebo esse error log:
  
  THREAD ERROR ([1480], fribeiro, NB008) 28/07/2023 16:02:26 array out of bounds ( 6 of 5 ) on {|| {If(aF4For[oListBox:nAt,1],oOk,oNo),aF4For[oListBox:nAT][2],aF4For[oListBox:nAT][3],aF4For[oListBox:nAT][4],aF4For[oListBox:nAT][5],aF4For[oListBox:nAT][6],aF4For[oListBox:nAT][7] } }(MATA103.PRW) 27/06/2023 09:30:48 line : 6087
  — Fabian Ribeiro 28 de Jul de 2023
- 0
  
  Obrigado pelo apoio Francisco.
  — Fabian Ribeiro 31 de Jul de 2023
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações
up 0 down
Telcoline LLC provides one-stop communication solutions to fulfil the needs of call centre businesses. Various services are offered, including VoIP Telephony, toll-free Helpdesk Numbers, Private Telephone Network, and many more. With a strong focus on customer satisfaction and efficiency, Telcoline LLC delivers reliable and scalable communication solutions to cater to the unique needs of call centre operations. By leveraging advanced technology and a team of experienced professionals, Telcoline LLC ensures seamless connectivity, improved productivity, and enhanced customer service for call centre businesses.
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 29 de Jul de 2023
  Liam Smith
  2 pontos
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações
up 0 down
Funcionou perfeitamente, segue código:

// MT100C7D Array que sera usado na consulta User Function MT100C7D aDet := ParamIxb Aadd(aDet, SC7->C7_ZZDCOMP) Return(aDet)

// MT100C7C Array com titulos da consulta User Function MT100C7C aDet := ParamIxb Aadd(aDet, RetTitle("C7_ZZDCOMP")) Return(aDet)
- editar
- x
  
  grosseiro ou ofensivo pouco construtivo obsoleto outro...
  Motivo
- criado 31 de Jul de 2023
  Fabian Ribeiro
  9 pontos
Adicionar comentário

Caracteres restantes: 600
Quero acompanhar este tópico via email.

Comentário
Utilize formatação mini-Markdown: [link](http://exemplo.com) _italico_ **negrito** `codigo`.
Comentarios devem ter, no maximo, 600 caracteres. Se achar necessario, utilize links em vez de copiar código ou ainda edite sua pergunta/resposta para colocar mais informações

Adicionar coluna pelo PE MA103F4H

Comentário

4 respostas

Comentário

Comentário

Comentário

Comentário

Não é a resposta que estava procurando? Procure outras perguntas com as tags pontodeentrada ou faça a sua própria pergunta.