Recalcular saldo bancário

por **Vlademiro** » 22 Jul 2020 17:04

No próximo fonte, não nesse, talvez valha a pena usar o comando Text / endtext mandando para uma variável. Depois substitui as tags com strtran.

por **Vlademiro** » 22 Jul 2020 17:11

Tipo assim

EXEC SQL
    SELECT EMP_LNAME,
           DEPT_ID
      INTO :EMP-LNAME,
           :DEPT-ID
      WHERE EMP_ID = :WK-EMP-ID
  END-EXEC.

Esse aí já tem mais de 40 anos, é do tempo do Cobol. Dava até pra criar um comando no Harbour para simular o Exec sql.

por **Ana Mitoooo** » 24 Jul 2020 14:25

Lentidão garantida com o acumulo de dados:

 CREATE TABLE MOVIMENTACAO (
  NUM_LANCAMENTO INTEGER PRIMARY KEY,
  DATA_HORA DATE NOT NULL,
  DEBITO_CREDITO CHAR(1) NOT NULL,
  VALOR NUMBER (16,2)NOT NULL,
  SALDO NUMBER (16,2)NOT NULL )

Transações em tempo real:

 CREATE TABLE MOVIMENTACAO (
  NUM_LANCAMENTO INTEGER PRIMARY KEY,
  DATA_HORA DATE NOT NULL,
  DEBITO_CREDITO CHAR(1) NOT NULL,
  VALOR NUMBER (16,2)NOT NULL )

 CREATE TABLE SALDO (
  DATA_HORA DATE NOT NULL,
  SALDO NUMBER (16,2)NOT NULL )

*Nada de novo, sistema bancário usa isso a décadas
**Saldo atualizado a cada inclusão/alteração na tabela de movimento (e somente a partir da data afetada pela operação)