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

Subject Assunto:
SE5 E5_IDORIG
Versão:
.
Plataforma:
.
Complemento:
DB:
.
Complemento:
LinkedIn
Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário NETOTOTVS NETOTOTVS em 12/08/2019, 15:47 h
Local: PE  Registro: 29/01/2019  Postagens: 17
Boa tarde a todos.

Alguém sabe como o campo E5_IDORIG está preenchido (são dados criptografados) e não sei de onde ele é tirado, e menos com que função ele criptografa.

O que acontece se eu gerar um registro sem gravar este campo?
E que como posso gerar ele?

Se vocês pudessem me ajudar, eu agradeceria muito


Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário ARISSATO ARISSATO em 12/08/2019, 16:38 h
Local: SP  Registro: 12/08/2008  Postagens: 3
Boa tarde.
Este campo foi criado para rastreamento das movimentação dos títulos financeiros (tabelas FK?).
Se este campo não for gravado, os registros nas novas tabelas não serão criados, e relatórios/rotinas padrões, ou personalizações, não conseguirão rastrear estas movimentações
Por este motivo, é aconselhável utilizar as rotinas padrões do sistema, através de MSEXECAUTO.


Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário NETOTOTVS NETOTOTVS em 14/08/2019, 23:06 h
Local: PE  Registro: 29/01/2019  Postagens: 17
E como utilizo a rotina padrão de baixa de titulo através do MSEXECAUTO? pois estou desenvolvendo uma função para baixar vários títulos de uma vez só.

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário ARISSATO ARISSATO em 15/08/2019, 09:47 h
Local: SP  Registro: 12/08/2008  Postagens: 3
Bom dia.
Segue abaixo um exemplo para uso de baixa da rotina automática, e o link com a documentação da Totvs.
Link: tdn.totvs.com/pages/releaseview.action?pageId=6070728
Exemplo:

Aadd(aBaixa, {‘E1_FILIAL‘   , SE1->E1_FILIAL     , Nil})   // 01
Aadd(aBaixa, {‘E1_PREFIXO‘ , SE1->E1_PREFIXO    , Nil})   // 02
Aadd(aBaixa, {‘E1_NUM‘      , SE1->E1_NUM        , Nil})   // 03
Aadd(aBaixa, {‘E1_PARCELA‘ , SE1->E1_PARCELA    , Nil})   // 04
Aadd(aBaixa, {‘E1_TIPO‘     , SE1->E1_TIPO       , Nil})   // 05
Aadd(aBaixa, {‘E1_CLIENTE‘ , SE1->E1_CLIENTE    , Nil})   // 06
Aadd(aBaixa, {‘E1_LOJA‘     , SE1->E1_LOJA       , Nil})   // 07
Aadd(aBaixa, {‘AUTMOTBX‘    , ‘NOR‘              , Nil})   // 08
Aadd(aBaixa, {‘AUTBANCO‘    , ‘CX‘               , Nil})   // 09
Aadd(aBaixa, {‘AUTAGENCIA‘ , ‘001‘              , Nil})   // 10
Aadd(aBaixa, {‘AUTCONTA‘    , ‘001‘              , Nil})   // 11
Aadd(aBaixa, {‘AUTDTBAIXA‘ , dDataBase          , Nil})   // 12
Aadd(aBaixa, {‘AUTDTCREDITO‘, dDataBase          , Nil})   // 13
Aadd(aBaixa, {‘AUTHIST‘     , ‘Baixa Automatica‘ , Nil})   // 14
Aadd(aBaixa, {‘AUTJUROS‘    , 0                  , Nil})   // 15
Aadd(aBaixa, {‘AUTOUTGAS‘   , 0                  , Nil})   // 16
Aadd(aBaixa, {‘AUTVLRPG‘    , 0                  , Nil})   // 17
Aadd(aBaixa, {‘AUTVLRME‘    , 0                  , Nil})   // 18
Aadd(aBaixa, {‘AUTCHEQUE‘   , ‘‘                 , Nil})   // 19
Aadd(aBaixa, {‘AUTVALREC‘   , nValRec            , Nil})   // 20

lMSErroAuto := .F.
lMSHelpAuto := .F.
MSExecAuto({|x, y| FINA070(x, y) }, aBaixa, 3)   // 3 = Baixar; 5 = Cancelar a baixa.

If lMsErroAuto   // Em caso de erro na baixa.
   DisarmTransaction()
   MostraErro()
   Exit
EndIf


Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário CRISTIAM CRISTIAM em 15/08/2019, 11:49 h
Local: SP  Registro: 10/05/2012  Postagens: 113
Parceiro, o crime não compensa rssss

usa o execauto que vc será feliz :-)

atenciosamente

Cristiam

Foto
Mensagem do Enviar e-mail Abrir o Perfil do usuário ALVESSGU ALVESSGU em 15/08/2019, 14:23 h
Local: SP  Registro: 23/10/2013  Postagens: 8
Boa tarde.

E5_IDORIG e E5_TABORI são os campos relacionados.

Esta vinculado a FK1 Baixas do Contas a Receber e FK6 Valores Acessórios, também para a FK2 Baixas do Contas a Pagar e FK5 Movimento Bancário.

Att.
Gustavo Santos

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