campo-sirio/ab/batbpdb.uml
sauro d0542d7ca9 //In ab0 è stato modicata la gestione del piano dei conti:
//ab0 sono stati aggiunti dei commenti
//ab0100.cpp è stato commentato tutto quello che riguarda il livello di struttura
//in quanto questo campo non viene più utilizzato ed è stato aggiornato ab0200.h
//la maschera è stata modificata: aggiunto il compo "conto sospeso" e tolto quello del
//livello di struttura
//AB1 esegue la stampa delle tabelle e del piano dei conti
//sono state aggiunti i relativi file delle maschere


git-svn-id: svn://10.65.10.50/trunk@5434 c028cbd2-c16b-5b4b-a496-9718f37d4682
1997-10-23 15:13:47 +00:00

113 lines
2.0 KiB
Plaintext
Executable File

#include "batbpdb.h"
TOOLBAR "" 0 19 0 2
#include <toolbar.h>
ENDPAGE
PAGE "Tabella periodi di bilancio" 0 -1 0 19
GROUPBOX DLG_NULL 76 6
BEGIN
PROMPT 1 0 ""
FLAGS "R"
END
STRING F_CODTAB 3
BEGIN
PROMPT 2 2 "Codice periodo "
HELP "Inserire il codice identificativo del periodo prescelto"
FLAS "RU"
FIELD CODTAB
KEY 1
USE %PDB KEY 1
INPUT CODTAB F_CODTAB
DISPLAY "Codice@3" CODTAB
DISPLAY "Descrizione@40" S0
DISPLAY "gg.inizio@3" I0
DISPLAY "mm.inizio@3" I1
DISPLAY "gg.fine@3" I2
DISPLAY "mm.fine@3" I3
DISPLAY "Numero anni@3" I4
OUTPUT F_CODTAB CODTAB
OUTPUT F_DESCR S0
CHECKTYPE REQUIRED
END
STRING F_DESCR 70 40
BEGIN
PROMPT 2 4 "Descrizione "
HELP "Descrizione del codice tabella periodi di bilancio"
FIELD S0
KEY 2
USE %PDB KEY 2
INPUT S0 F_DESCR
DISPLAY "Descrizione@40" S0
DISPLAY "Codice@3" CODTAB
DISPLAY "gg.inizio@3" I0
DISPLAY "mm.inizio@3" I1
DISPLAY "gg.fine@3" I2
DISPLAY "mm.fine@3" I3
DISPLAY "Numero anni@3" I4
COPY OUTPUT F_CODTAB
CHECKTYPE REQUIRED
END
NUMBER F_GIORNO_INI 7
BEGIN
PROMPT 2 8 "Inizio periodo: gg "
HELP "Inserire il giorno relativo al periodo di inizio"
FIELD I0
FLAGS "R"
CHECKTYPE REQUIRED
END
NUMBER F_MESE_INI 7
BEGIN
PROMPT 32 8 "mm "
HELP "Inserire il mese relativo al periodo di inizio"
FIELD I1
FLAGS "R"
CHECKTYPE REQUIRED
END
NUMBER F_GIORNO_FINE 7
BEGIN
PROMPT 2 10 "Fine periodo: gg "
HELP "Inserire il giorno relativo alla fine del periodo"
FIELD I2
FLAGS "R"
CHECKTYPE REQUIRED
END
NUMBER F_MESE_FINE 7
BEGIN
PROMPT 32 10 "mm "
HELP "Inserire il mese relativo alla fine del periodo"
FIELD I3
FLAGS "R"
CHECKTYPE REQUIRED
END
NUMBER NUM_ANNI 7
BEGIN
PROMPT 2 16 "Numero di anni "
HELP "Inserire il numero di anni"
FIELD I4
FLAGS "R"
CHECKTYPE REQUIRED
END
STRING F_DESCRAGG 70 30
BEGIN
PROMPT 2 18 "Descrizione alternativa per stampa raffronti "
FIELD S1
END
ENDPAGE
ENDMASK