Fórum

Estatística Forum

  • Total Users: 16.19k
  • Latest Member: Layze
  • Total Posts: 27.8k
  • Total Topics: 8496
  • Total Sections: 16
  • Total Categories: 62
  • Today Open: 0
  • Yesterday Open: 0
  • Today Answer: 0
  • Yesterday Answer: 0

Pesquisa Forum

Keyword

Pesquisar Videos

Open Panel
Bem-Vindo, Visitante
Nome de usuário: Senha: Lembrar-me

TÓPICO: PE Gravar SC6->SD2

PE Gravar SC6->SD2 22 Jun 2017 16:19 #32243

  • Diego Martins
  • OFFLINE
  • Membro Ouro
  • Postagens: 141
  • Obrigados Recebidos: 2
Sucesso...
Obrigado Kanaãm.
O administrador desabilitou o acesso público de escrita.

PE Gravar SC6->SD2 19 Jun 2017 17:36 #32237

Nessa caso o ideal é você realizar um While dentro do P.E. percorrendo todos os itens da SC6 e gravando no respectivo da SD2.

Ficaria mais ou menos assim:
Local cNumPV := SD2->D2_PEDIDO

SC6->(dbSetOrder(1))
SC6->(dbSeek(xFilial("SC6")+cNumPV))

SD2->(dbSetOrder(8))

While SC6->(!Eof()) .AND. xFilial("SC6")+cNumPV == SC6->(C6_FILIAL+C6_NUM)

   If SD2->(dbSeek(xFilial("SD2")+SC6->(C6_NUM+C6_ITEM)))
      Reclock ("SD2",.F.)
      SD2->D2_OF	:= SC6->C6_OF
      SD2->(MsUnlock())
   EndIf
   SC6->(dbSkip())
EndDo

Abraço!
Última Edição: 19 Jun 2017 17:41 por Kanaãm Luz Romero Rodrigues.
O administrador desabilitou o acesso público de escrita.

PE Gravar SC6->SD2 19 Jun 2017 16:11 #32236

  • Diego Martins
  • OFFLINE
  • Membro Ouro
  • Postagens: 141
  • Obrigados Recebidos: 2
Utiliei o PE M460FIM, porém só grava o último item.

User Function M460FIM()

Local aAreaSD2 := sd2->(GetArea())

DbSelectArea("SD2")
Reclock ("SD2",.F.)
SD2->D2_OF := SC6->C6_OF
MsUnlock ()

RestArea(aAreaSD2)

Return
O administrador desabilitou o acesso público de escrita.

PE Gravar SC6->SD2 19 Jun 2017 14:59 #32233

  • Diego Martins
  • OFFLINE
  • Membro Ouro
  • Postagens: 141
  • Obrigados Recebidos: 2
Pessoal, boa tarde.

Preciso de um PE que grave um campo da SC6 na SD2.

Alguém sabe qual PE devo utilizar?

Att,
O administrador desabilitou o acesso público de escrita.
Tempo para a criação da página:1.565 segundos

Últimas Forum

More Topics »

Facebook

Twitter

Facebook