PERGUNTAS E RESPOSTAS
 
Bem Vindo, Visitante  Todos os Fórums
  PCP/Estoque/Custos
Enviar para a impressoraImprimir  Enviar e-mail para um amigoEnviar Para um Amigo
Precisa estar Logado

Subject Assunto:
Campos MATA261
Versão:
12.1.2210
Plataforma:
Microsoft
Complemento:
DB:
SQL Server
Complemento:
LinkedIn
Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário PAULO0210 PAULO0210 em 14/11/2024, 14:01 h
Local: MG  Registro: 18/09/2023  Postagens: 37
Boa tarde, pessoal!

Estava verificando aqui, e alguns campos, sejam eles customizados ou não, não estão apresentando os valores digitados na rotina de transferências. Os campos em questão são D3_OBSERVA (Padrão) e D3_ZPEDIDO (Customizado).

Vi alguns docs quanto a alguns pontos de entrada, mas não estou conseguindo fazer com que esses campos recebam os valores digitados. Grava no banco de dados, mas não aparece em tela.

#INCLUDE "TOTVS.CH"
#Include ‘Protheus.ch‘

User Function MA261IN()
Local nPosObserv := aScan(aHeader, {|x| AllTrim(Upper(x[2]))==‘D3_OBSERVA‘})
Local nPosPedido := aScan(aHeader, {|x| AllTrim(Upper(x[2]))==‘D3_ZPEDIDO‘})
Local aAreaSD3   := FWGetArea()
Local nRecnoSD3 := 0

IF nPosObserv > 0
aCols[Len(aCols),nPosObserv] := SD3->D3_OBSERVA
EndIf
IF nPosPedido > 0
aCols[Len(aCols),nPosPedido] := SD3->D3_ZPEDIDO
EndIf

RestArea(aAreaSD3)
Return(Nil)

Sabem me dizer o que há de errado?

Para postar no Fórum você precisa efetuar o seu login ou se registrar

 Mudar para Fórum

 

 

 
 
   
Pagina Principal Shopping PROTHEUS Tire suas duvidas Vagas Microsiga em todo Brasil Aprofunde seus conhecimentos Noticias Online Fale Conosco Pagina Principal