Página 1 de 2

Ajuda com totalização balanço patrimonial

Enviado: 25 Jul 2019 17:40
por Softwhouse
Preciso de uma idéia para totalização das contas títulos no balanço patrimonial.


Tabela do Plano de contas:

17 T 1 ATIVO
52 T 1.1 ATIVO CIRCULANTE
98 T 1.1.1 DISPONIBILIDADES
106 T 1.1.1.1 CAIXA
129 A 1.1.1.1.1 Caixa
112 T 1.1.1.2 BANCOS CONTA CORRENTE
135 A 1.1.1.2.1 Banco x
2915 A 1.1.1.3 Banco y



Tabela dos Lançamentos:

Data Debito Credito Valor Histórico Complem
01/01/2019 129 100,00 015 xxxxxxx
01/01/2019 135 100,00 020 yyyyyyy


Para totalizar as contas analíticas:

Código: Selecionar todos

Do While !Eof()
   If Plano->Tipo = ‘T’
      DbSkip()
      Loop
   Else
      Sum Lancamen->Valor To nDebitos For Lancamen->Debito == Plano->Codigo
      Sum Lancamen->Valor To nCreditos For Lancamen->Credito == Plano->Código
   EndIf
EndDo
O problema está em totalizar as contas títulos. Como vcs fazem ? Incluem a máscara na tabela de lançamentos para poder fazer isso ?

Ajuda com totalização balanço patrimonial

Enviado: 25 Jul 2019 19:19
por JoséQuintas
Porque não atualiza as contas analíticas durante os lançamentos?
Essa rotina deve estar uma carroça, percorrer todos os lançamentos duas vezes para cada conta....
Se os lançamentos tiverem ordem de conta, seria muuuuito mais rápido, ou percorrer os lançamentos ao invés das contas.

Pra atualizar as sintéticas, talvez melhor trabalhar com um nível de cada vez e/ou fazer de trás pra frente.

Ajuda com totalização balanço patrimonial

Enviado: 25 Jul 2019 20:49
por Softwhouse
José,

Na verdade estou trabalhando com os dados exportados de um sistema contábil da WK Sistemas. Não vejo qual a utilidade prática em atualizar os saldos durante a digitação, somente se o sistema emitisse balanços ou balancetes mensais, o que não é o caso. Vc pode emitir por exemplo um balanço do dia 10 ao dia 20 de julho ou entre dois ou mais exercícios se estiverem abertos. Não é carroça não. Não conheço sistema contábil melhor do que os da WK.

Ajuda com totalização balanço patrimonial

Enviado: 26 Jul 2019 02:38
por JoséQuintas
Softwhouse escreveu:Não conheço sistema contábil melhor do que os da WK.
É porque ainda não vi o meu.
Softwhouse escreveu:Na verdade estou trabalhando com os dados exportados de um sistema contábil da WK Sistemas.
Não vejo qual a utilidade prática em atualizar os saldos durante a digitação, somente se o sistema emitisse balanços ou balancetes mensais, o que não é o caso
Isso confundiu. Diz que importa os dados, mas diz que não precisa atualizar durante digitação...

Sei lá... dependendo do que for fazer, pode ser que o meu contábil já tenha pronto, e está liberado.

Ajuda com totalização balanço patrimonial

Enviado: 26 Jul 2019 08:35
por Softwhouse
José,

Posso ver um demo seu sistema ? Vc diz que está liberado ? No seu site ?

Obrigado

Ajuda com totalização balanço patrimonial

Enviado: 26 Jul 2019 09:50
por JoséQuintas
Mas diga, afinal o que vai fazer?
Porque precisa importar dados?

Ajuda com totalização balanço patrimonial

Enviado: 26 Jul 2019 15:08
por Itamar M. Lins Jr.
Ola!
Como vcs fazem ?
FOR NEXT Na hora do lançamento... Fica tudo pronto...

Idade da pedra lascada...rsrsrs

Código: Selecionar todos

 if dc = 'D'
   trava_registro('pl')
   repl pl->debito with pl->debito + la->valor
   NetFlush('pl')
   for n = param to 1 step -1
    ct := 'gr'+str(n,1)
    if pl->(dbseek(substr(ctadeb,1,&ct)))
       trava_registro('pl')
       repl pl->debito with pl->debito + la->valor
       NetFlush('pl')
    endi
   next
 else
   trava_registro('pl')
   repl pl->credito with pl->credito + la->valor
   NetFlush('pl')
   for n = param to 1 step -1
    ct := 'gr'+str(n,1)
    if pl->(dbseek(substr(ctacre,1,&ct )))
       trava_registro('pl')
       repl pl->credito with pl->credito + la->valor
       NetFlush('pl')
    endi
   next
 endi
Rápido, da época do 386(SX) sem o co-processador matemático!

Se fosse fazer isso hoje, faria pouco, diferente... quem sabe um treeview da hwgi, mas não tenho mais nenhum cliente que precisa do plano de contas.

Saudações,
Itamar M. Lins Jr.

Ajuda com totalização balanço patrimonial

Enviado: 26 Jul 2019 16:44
por JoséQuintas
Eu faço diferente...

Tenho um controle se houve alteração.
Quando for emitir alguma coisa que precise disso, aí faço a atualização das sintéticas.
Ou seja... só atualizo quando precisar, assim não perde tempo à toa.

Ajuda com totalização balanço patrimonial

Enviado: 27 Jul 2019 13:16
por Softwhouse
E se faltar luz durante a atualização tanto das contas analíticas como das das sintéticas ?

Prefiro lançamentos sem qualquer atualização de saldos, sem lotes (não sei se alguém ainda utiliza isso), totalização na hora da necessidade da informação.

Problema resolvido, podemos fechar o tópico.

Ajuda com totalização balanço patrimonial

Enviado: 27 Jul 2019 17:24
por JoséQuintas
E porque não as duas coisas?
Uma rotina para os casos eventuais de recálculo.

Ajuda com totalização balanço patrimonial

Enviado: 27 Jul 2019 17:30
por JoséQuintas
Meu aplicativo permite TODOS os meses em aberto, no momento 96 meses.
Podem estar sendo emitidos relatórios de um mês, e sendo digitado outro mês.
Se for recalcular com usuário digitando... ferrou... nunca conseguiria terminar esse recálculo a tempo.

É exagero tudo isso em aberto? sim. Mas já foi usado.

Mas tem outro porém....
No meu aplicativo, em aberto significa apenas... em uso, disponível.
O fechamento é mesmo somente pra apagar informações.

Ajuda com totalização balanço patrimonial

Enviado: 27 Jul 2019 18:03
por JoséQuintas
Sobre o aplicativo.....
Com certeza WMK tem recursos infinitos.

O aplicativo fica em josequintas.com.br, seção download, JPA.EXE
Baixe também josequintas.com/arquivos/sjpa.exe, que vai servir como atalho.

Importante deixar tudo em uma pasta, porque cria DBFs, índices, etc. etc., sempre trabalhando nessa pasta.
O aplicativo cria um backup a cada novo dia de uso, e faz uma pergunta se envia pra mim esse backup.
Se estiver em pasta errada, vém mais coisas junto, caso responda sim.

Usuário CT senha ENTER, ou talvez CT senha CT.
Vai ter que confirmar, porque não lembro mais.

Se quiser continuar atualizando on-line, vai precisar instalar o ODBC MySQL 5.3

Ajuda com totalização balanço patrimonial

Enviado: 27 Jul 2019 18:59
por Itamar M. Lins Jr.
Ola!
E se faltar luz durante a atualização tanto das contas analíticas como das das sintéticas ?
Na época que usa, já tinha no-breaks... Os lançamentos eram feitos simultaneamente por várias pessoas ao mesmo tempo... Na mesma empresa...
E mesmo assim, mesmo depois que o vírus stoned... atacava era só recuperar o backup do disquete, e recalculava, tudo rapidinho, replace with 0, abrir o arquivo de lancamento(razão) e recalcular os saldos.... etc...
1)plano plano001.dbf empresa x
2)lacamentos.dbf (razao ou diáro) empresa x...
É só um DU UAILEZINHO não demora não.
Lembrei do COBOL... rebuild...Nessa época eu apenas digitava, não programava.

Saudações,
Itamar M. Lins Jr.

Ajuda com totalização balanço patrimonial

Enviado: 27 Jul 2019 19:40
por JoséQuintas
O que destaca no meu é o encerramento automático.

O cara vai lá, lança uma despesa, e, se quiser, já emite diário, balanço, etc. que já sai todo encerrado e calculado.
E pode fazer isso em 2009, e emitir o balanço de 2019, sem problemas.
Mais que isso... pode digitar o lançamento, e em seguida já gerar o SPED Contábil, sem nenhuma operação intermediária.
Não existe lançamento de encerramento ou apuração de resultado por parte do usuário.
Isso facilitou muito gerar o SPED Contábil.

Ajuda com totalização balanço patrimonial

Enviado: 27 Jul 2019 20:02
por Softwhouse
José,

Se eu tiver um lançamento em 01/01/2019, partidas dobradas, posso alterar para 31/12/2019, partida simples, se for crédito, pode virar débito, se for débito pode virar crédito, se for partida dobrada pode virar simples, se for simples pode virar dobrada, desde que o débito feche com o crédito da data, isso com com tantos quantos lançamentos houverem na data. Não entendo o porque atualização de saldos. Volto a perguntar: os balanços e/ou balancetes que vcs fazem referem-se ao último dia do mês? Não é possível fazer um balanço do dia 10 ao dia 15 do mesmo mês ?