Recalcular saldo bancário
Enviado: 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.
Código: Selecionar todos
EXEC SQL
SELECT EMP_LNAME,
DEPT_ID
INTO :EMP-LNAME,
:DEPT-ID
WHERE EMP_ID = :WK-EMP-ID
END-EXEC.
Código: Selecionar todos
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 )
Código: Selecionar todos
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 )