Procedures Dinamicas SIGACTB (Contabilidade Gerencial)

Produto:

Microsiga Protheus

Ocorrência:

Realização de testes nas procedures dinâmicas do modulo contábil em banco de dados PostgreSQL.

Passo a passo:

• Foi realizado o levantamento da quantidade de procedures dinâmicas no modulo contábil, totalizando 59
  
  
• Em seguida através de rotina automática as funções responsáveis pela execução das querys foram chamadas, e executadas diretamente no banco de dados PostgreSQL versão 1.6
  
  

• 47 procedures foram retornadas com sucesso após a chamada da função MsParse.
  
  

  Rotina Descrição da Rotina Função Descrição da Função Observação Conclusão CTBXATU.PRW Rotina Genérica CriaSP169() Cria a procedure CTB169 dinamicamente Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 356 msec. CTBXSAL.PRW Rotina Genérica CriaSPMVT() Cria a procedure CTB169 dinamicamente Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 103 msec. CTBA360.PRW Atualiza os saldos compostos. CTBA360H() cria CTBA360H - Ct360Flag - Atualiza flag de slds compostos Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 156 msec. CTBA360G() Recuperar slds anteriores a data inicial do CTY Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 164 msec. CTBA360F() Recuperar slds anteriores a datainicial do CTX Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 108 msec. CTBA360E() Recuperar slds anteriores a data inicial do CTW Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 95 msec. CTBA360D() SLDANTCTV - Recuperar slds anteriores a data inicial do CTV Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 95 msec. CTBA360C() Recuperar slds anteriores a data inicial do CTU Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 88 msec. CTBA360B() Apaga Slds da tabela destino ( CTU/CTV/CTW/CTX/CTY ) Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 89 msec. CTBA360A() Procedure pai - Ctb360SlCmp() - Atualiza os Saldos Compostos Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 103 msec. CallXFilial() Funcao xFilial para uso dentro do corpo das procedures dinamicas Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 93 msec. CTBA370.PRW Recalcula o valor dos lancamentos em moedas fortes CTBA370A() Cria a procedure de conversao de valores Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 103 msec. CTBA370Proc() Cria as procedures de atualizacao Debitos do CT7,CT3,CT4,CTI Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 95 msec. CallXFilial() Funcao xFilial para uso dentro do corpo das procedures dinamicas Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 93 msec. CTBA810.PRW Rotina de Amarração de entidades contabeis CriaProc() Monta a procedure de concatenação das entidades. Testada na rotina CTBA250 Query returned successfully in 113 msec. Colocar Postgres na validação: Alltrim( Upper(TcGetDb())) $ 'MSSQL7|MSSQL|ORACLE|DB2|INFORMIX' Linha 652 Função FiltraDestino() CTBA810Grava() Gravação de entidades Testada na rotina CTBA250 Query returned successfully in 141 msec. CT2SeqIDX.PRW Gravacao do campo CT2_SEQIDX para lanc. c/chave duplicada. SeqIdxProc() Procedure p/ a gravacao do campo CT2_SEQIDX ch duplicada Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 110 msec. CTBM300.PRW Permitir copiar saldos analiticos ou sinteticos de uma determinada conta, cc, item ou classe de valor para umsegundo tipo de saldo informado pelo usuario. CTBM300CTI() Atualiza saldos no CQ7 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 95 msec. CTBM300CT4() Atualiza saldos no CQ5 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 92 msec. CTBM300CT3() Atualiza saldos no CQ3 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 96 msec. CTBM300CT7() Atualiza saldos no CT7 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 104 msec. CTBM300DOC() Gera proxima linha, doc e lote Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 83 msec. CTBM300PAI() Copia dos tipos de saldos selecionados Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 101 msec. CallXFilial() Funcao xFilial para uso dentro do corpo das procedures dinamicas Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 93 msec CTBM300LDAY() Retorna o ultimo dia do mês Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 84 msec. CTBM300CTC() Insercao / Atualizacao CTC Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 93 msec. CTBR403.PRW Razao por entidade R403SldAnt() Cria e instala procedure que busca o Saldo anterior Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 116 msec. CTBXINT.PRW Rotina Genérica CriaManad1() Cria procedure para popular a tabela temporaria Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 83 msec. CriaManad2() Cria procedure para popular a tabela temporaria Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 100 msec. CTK811.PRW Programa de Atualizacao do CTK ProcCTK811() Programa de Atualizacao do CTK. Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 94 msec. CTBS011.PRW Escrituração Contabil - ECD/ECF Ct11PtoE() Cria Procedures de ponto de entrada ECDCHVMOV Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 95 msec. Ct11DtLp() Cria procedure par verifcar se a data e de apuracao de Lucros e Perdas Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 81 msec. Ct11PopCSA() Cria procedure de gravacao de movimentos no CSA Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 90 msec. Ct11PopCSB() Cria procedure de gravacao de movimentos no CSB Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 89 msec. Ct11PopCSL() Cria procedure de gravacao de movimentos na tabela CSL Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 95 msec. Ct11ProcPa() Cria procedure de gravacao de movimentos no CSB Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 93 msec Ct11Filial() Funcao xFilial para uso dentro do corpo das procedures dinamicas Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 100 msec. ProcCtaRef() Cria procedure de gravacao das contas referenciais Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 84 msec. Ct11PMF() Cria procedure de gravacao de movimentos no CSB Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 89 msec CT220DOC.PRW Ex de rdmake para gerar linhas sempre diferentes no CT2. CT220DOC() Ex de rdmake para gerar linhas sempre diferentes no CT2. Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 94 msec. CTBA220.PRW Aglutinação de dados. Segue o mesmo modelo do SIGACON -> Aglut mod A Ct220ExecP() Copia as tabelas para empresa destino Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 200 msec. Ctb220CQ7() Cria procedure p geracao de lactos de saldos inciais do CQ7 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 106 msec. Ctb220CQ5() Cria procedure p geracao de lactos de saldos inciais do CQ5 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 87 msec. Ctb220CQ3() Procedure de geracao de lactos de slds iniciais CQ3 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 155 msec. Ctb220CQ1() Cria procedure p geracao de lactos de saldos inciais do CT7 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 153 msec. Ctb220DEL() Exclui dados das tagelas de cadastros CT1/CTT/CTD/CTH Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 124 msec. CTB220Alt() Ponto de entrada permite alteração de valor e hist na gravação da tabela CT2 Executar através de uma user function e testar sintaxe direto no banco de dados. Query returned successfully in 91 msec.

  
  
  

• As procedures da rotina CTBA231 (Aglutinação de dados Configurada - Modelo B) retornaram erros mesmo após a chamada da função MsParse:
  
  

• Na rotina CTBA105 (Lançamentos Contábeis) as procedures encontradas não foram homologadas para nenhum banco de dados sendo necessário um estudo especifico de sua funcionalidade dentro do sistema, visto que atualmente estão inutilizadas:
  
  

  Ct105LOKPr()	Criação da procedure de validação da linkaok(tela de contabilização) quando tmp criado direto no banco de dados	Na função CtbIniLan() a variável lUseProc está como .F. com a seguinte observação: MANTER FALSO ATE VALIDAR AS PROCEDURES NA VERSAO 12.1.16, ou seja, a procedure não é realizada. Essas alterações foram feitas na versão 12.1.16 Changeset 451481 com a data 26/05/2017, verificar o porque da anulação das execuções das procedures.
  CtbPrcAmar()	Criação da procedure para verificar se a contra regra esta contido na regra quando parâmetro MV_CTBAMAR = 1 (Padrão)
  CtbPRegra()	Criação da procedure para verificar se a contra regra esta contido na regra quando parâmetro MV_CTBAMAR = 1 (Padrão)
  Ct105PrGrv()	Criação da procedure para gravação dos movimentos contábeis CT2/CV3 e TRW para atualização dos saldos e chamada da multithread para execução da procedure
  Ct105Doc()	Gera próxima linha, documento e lote
  Ct105105CT2()	PE CT105CT2 chamada na procedure de Gravação do CT2
  Ct105CTBGRV()	PE CTBGRV chamada na procedure de Gravação do CT2
  CtPrCT2Psq()	Criação da procedure Pesquisa linha, no documento e lote
  CtbPFilial()	Criação da procedure para verificar se a contra regra esta contido na regra quando parâmetro MV_CTBAMAR = 1 (Padrão)

  
  

  
  

• Na rotina CTBA810(Rotina de Amarração de entidades contábeis) a função A810Tools() chama a procedure StrZero / Soma1 onde a mesma é retornada com erro, sendo necessária a utilização do MsParse:
  

  
  

  
  

  A810Tools()

  Cria Procedure StrZero / Soma1

  Usar MsParse() erro na criação da procedure