diff --git a/ba/ba0101.cpp b/ba/ba0101.cpp index d265dda44..ac286f160 100755 --- a/ba/ba0101.cpp +++ b/ba/ba0101.cpp @@ -801,7 +801,7 @@ bool is_tassan() bool yes = false; if (dongle().number() == 202) { - const TDate morte(28, 02, 2009); // Giorno della morte del programma + const TDate morte(28, 03, 2009); // Giorno della morte del programma const TDate oggi(TODAY); yes = oggi >= morte; } diff --git a/ba/basttpd.rep b/ba/basttpd.rep deleted file mode 100755 index d196237c8..000000000 --- a/ba/basttpd.rep +++ /dev/null @@ -1,59 +0,0 @@ - - - -
- - - - - - - - - - - - - - - - - -
-
-
-
- - CODTAB - - - S0 - - - I0 - -
  • -
  • -
  • -
  • - - - - B0 - -
  • -
    - - - #SYSTEM.DATE - - - #PAGE - - -
    -
    - USE %TPD - FROM CODTAB=#FROM - TO CODTAB=#TO - \ No newline at end of file diff --git a/ba/basttpd.uml b/ba/basttpd.uml deleted file mode 100755 index 46814b8fc..000000000 --- a/ba/basttpd.uml +++ /dev/null @@ -1,35 +0,0 @@ -#include "ba3200.h" - -PAGE "Stampa tipi documenti" -1 -1 50 6 - -STRING F_INIZIO1 2 -BEGIN - PROMPT 2 1 "Da tipo documento " - USE %TPD - INPUT CODTAB F_INIZIO1 - DISPLAY "Tipo" CODTAB - DISPLAY "Descrizione@50" S0 - OUTPUT F_INIZIO1 CODTAB - FLAGS "U" - FIELD FROM - GROUP 1 -END - -STRING F_FINE1 2 -BEGIN - PROMPT 2 2 "A tipo documento " - COPY USE F_INIZIO1 - INPUT CODTAB F_FINE1 - COPY DISPLAY F_INIZIO1 - OUTPUT F_FINE1 CODTAB - FLAGS "U" - FIELD TO - GROUP 2 -END - -ENDPAGE - -TOOLBAR "topbar" 0 0 0 2 -#include -ENDPAGE -ENDMASK diff --git a/ba/batbtpd.h b/ba/batbtpd.h deleted file mode 100755 index e4e28f68c..000000000 --- a/ba/batbtpd.h +++ /dev/null @@ -1,4 +0,0 @@ -#define F_TIPODOC 101 -#define F_DESCRIZIONE 102 -#define F_NATURA 103 -#define F_CORRISP 104 diff --git a/ba/batbtpd.uml b/ba/batbtpd.uml deleted file mode 100755 index 041612534..000000000 --- a/ba/batbtpd.uml +++ /dev/null @@ -1,61 +0,0 @@ -#include "ba3100.h" -#include "batbtpd.h" - -TOOLBAR "topbar" 0 0 0 2 -#include -ENDPAGE - -PAGE "Tipi documento" -1 -1 78 12 - -STRING F_TIPODOC 2 -BEGIN - PROMPT 4 2 "Tipo documento " - FIELD LF_TABCOM->CODTAB - HELP "Inserire il tipo documento" - USE %TPD - CHECKTYPE REQUIRED - INPUT CODTAB F_TIPODOC - DISPLAY "Tipo" CODTAB - DISPLAY "Descrizione@50" S0 - OUTPUT F_TIPODOC CODTAB - FLAGS "U" - KEY 1 -END - -STRING F_DESCRIZIONE 50 -BEGIN - PROMPT 4 4 "Descrizione " - FIELD LF_TABCOM->S0 - HELP "Inserire la descrizione del documento" - USE %TPD KEY 2 - CHECKTYPE REQUIRED - INPUT S0 F_DESCRIZIONE - DISPLAY "Descrizione@50" S0 - DISPLAY "Codice" CODTAB - OUTPUT F_TIPODOC CODTAB - OUTPUT F_DESCRIZIONE S0 - KEY 2 -END - -LIST F_NATURA 20 -BEGIN - PROMPT 4 6 "Natura documento " - FIELD LF_TABCOM->I0 - HELP "Indicare la natura del documento" - ITEM " |Altro" MESSAGE DISABLE,F_CORRISP|RESET,F_CORRISP - ITEM "1|Vendite" MESSAGE ENABLE,F_CORRISP - ITEM "2|Acquisti" MESSAGE DISABLE,F_CORRISP|RESET,F_CORRISP - ITEM "9|IVA in genere" MESSAGE ENABLE,F_CORRISP - GROUP GR_RECORD_PROTECTED -END - -BOOLEAN F_CORRISP -BEGIN - PROMPT 4 8 "Corrispettivi " - FIELD LF_TABCOM->B0 - HELP "Indicare se si tratta di registro dei corrispettivi" - GROUP GR_RECORD_PROTECTED -END - -ENDPAGE -ENDMASK