diff --git a/ba/batbesc.h b/ba/batbesc.h index a301bd901..e9ccea03f 100755 --- a/ba/batbesc.h +++ b/ba/batbesc.h @@ -1,11 +1,10 @@ +// campi maschera batbesc.msk - -// campi maschera batbesc.msk - -#define F_ANNO 131 -#define F_DATAINI 132 -#define F_DATAFIN 133 -#define F_CODDITTA 141 -#define F_RAGSOC 142 -#define F_DATASCARICO 143 - +#define F_ANNO 131 +#define F_DATAINI 132 +#define F_DATAFIN 133 +#define F_CODDITTA 141 +#define F_RAGSOC 142 +#define F_DATASCARICO 143 +#define F_DATACHIUSURA 144 +#define BUT_CHECK 145 diff --git a/ba/batbesc.uml b/ba/batbesc.uml index 03b873805..61221ddab 100755 --- a/ba/batbesc.uml +++ b/ba/batbesc.uml @@ -30,23 +30,29 @@ END NUMBER F_ANNO 4 BEGIN - PROMPT 4 5 "Anno esercizio " - HELP "Anno d'esercizio da assegnare" + PROMPT 4 5 "Codice esercizio " + HELP "Codice d'esercizio da assegnare" FLAGS "ZR" FIELD LF_TAB->CODTAB KEY 1 USE ESC INPUT CODTAB F_ANNO - DISPLAY "Anno esercizio" CODTAB + DISPLAY "Codice esercizio" CODTAB DISPLAY "Data inizio esercizio" D0 DISPLAY "Data fine esercizio" D1 + DISPLAY "Data chiusura esercizio" D3 OUTPUT F_ANNO CODTAB CHECKTYPE REQUIRED END +BUTTON BUT_CHECK 10 1 +BEGIN + PROMPT 40 5 "Controllo" +END + DATE F_DATAINI BEGIN - PROMPT 4 7 "Data inizio esercizio " + PROMPT 4 7 "Data inizio esercizio " HELP "Data di inizio dell'esercizio" FIELD LF_TAB->D0 CHECKTYPE REQUIRED @@ -55,21 +61,31 @@ END DATE F_DATAFIN BEGIN - PROMPT 4 9 "Data fine esercizio " + PROMPT 4 9 "Data fine esercizio " HELP "Data di fine dell'esercizio" FIELD LF_TAB->D1 CHECKTYPE REQUIRED - VALIDATE DATE_CMP_FUNC >= F_DATAINI + VALIDATE DATE_CMP_FUNC > F_DATAINI WARNING "La data fine esercizio deve essere indicata e deve essere maggiore della data di inizio esercizio" END DATE F_DATASCARICO -BEGIN - PROMPT 4 11 "Data di scarico " +BEGIN + PROMPT 4 11 "Data di scarico " HELP "Data in cui e' stato effettuato l'ultimo scarico su dischetto" FIELD LF_TAB->D2 END +DATE F_DATACHIUSURA +BEGIN + PROMPT 4 13 "Data chiusura esercizio " + HELP "Data di chiusura dell'esercizio" + FIELD LF_TAB->D3 + VALIDATE DATE_CMP_FUNC >= F_DATAFIN + WARNING "La data chiusura esercizio deve essere maggiore o uguale alla data di fine esercizio" +END + + ENDPAGE ENDMASK diff --git a/ba/prassi.mnu b/ba/prassi.mnu index 27ab93d05..581d615a9 100755 --- a/ba/prassi.mnu +++ b/ba/prassi.mnu @@ -84,7 +84,7 @@ 7|Clienti/Fornitori|cg0 -1 7|Agenti|ba3 -0 age 7|Cambi giornalieri|ba3 -0 cam -7|Esercizi|ba3 -0 esc +7|Esercizi|cg0 -5 esc 8|Stampa tabelle ditta|3|7 8|Registri|ba3 -1 reg 8|Piano dei conti|cg1 -0