Corretta lunghezza del campo codice sulla tabella Assoggettamento fiscale.

git-svn-id: svn://10.65.10.50/trunk@1181 c028cbd2-c16b-5b4b-a496-9718f37d4682

ba/bastasf.uml

@@ -1,41 +1,41 @@
 #include "ba3200.h"
 
 PAGE "Stampa Assoggettamento" -1 -1 50 8
-STRING F_INIZIO1 3
+STRING F_INIZIO1 4
 BEGIN
-	PROMPT 2 1 "Da codice "
-	FLAGS "U"
-        HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
-        FIELD LF_TABCOM->CODTAB
-	USE %ASF
-	INPUT CODTAB F_INIZIO1
-	DISPLAY "Codice" CODTAB
-	DISPLAY "Descrizione@50" S0
-	OUTPUT F_INIZIO1 CODTAB
-	GROUP 1
+PROMPT 2 1 "Da codice "
+FLAGS "U"
+HELP "Codice da cui iniziare la stampa. Vuoto = inizio archivio"
+FIELD LF_TABCOM->CODTAB
+USE %ASF
+INPUT CODTAB F_INIZIO1
+DISPLAY "Codice" CODTAB
+DISPLAY "Descrizione@50" S0
+OUTPUT F_INIZIO1 CODTAB
+GROUP 1
 END
 
-STRING F_FINE1 3
+STRING F_FINE1 4
 BEGIN
-	PROMPT 2 3 "A codice  "
-	FLAGS "U"
-        HELP "Codice di fine. Vuoto = fine archivio"
-        FIELD LF_TABCOM->CODTAB
-	COPY USE F_INIZIO1
-	INPUT CODTAB F_FINE1
-	COPY DISPLAY F_INIZIO1
-	OUTPUT F_FINE1 CODTAB
-	GROUP 2
+PROMPT 2 3 "A codice  "
+FLAGS "U"
+HELP "Codice di fine. Vuoto = fine archivio"
+FIELD LF_TABCOM->CODTAB
+COPY USE F_INIZIO1
+INPUT CODTAB F_FINE1
+COPY DISPLAY F_INIZIO1
+OUTPUT F_FINE1 CODTAB
+GROUP 2
 END
 
 BUTTON DLG_OK 8 2
 BEGIN
-	PROMPT -12 -1 ""
+PROMPT -12 -1 ""
 END
 
 BUTTON DLG_QUIT 8 2
 BEGIN
-	PROMPT -22 -1 ""
+PROMPT -22 -1 ""
 END
 
 ENDPAGE

ba/batbasf.rpt

@@ -5,6 +5,6 @@ Tabella Assoggettamento fiscale
 1|@14g%s|Descrizione
 
 [Rows]
-1|CODTAB|@3g@2,ls
+1|CODTAB|@3g@4,ls
 1|S0|@14g@50,ls
 

ba/batbasf.uml

@@ -1,44 +1,44 @@
-#include "batbasf.h"
-
-TOOLBAR "" 0 20 0 2
-
-#include <toolbar.h>
-
-ENDPAGE
-
-PAGE "Codici assoggettamento fiscale" -1 -1 78 8
-
-NUMBER F_CODICE 2
-BEGIN
-PROMPT 4 2 "Codice      "
-HELP "Codice di assoggettamento fiscale"
-FIELD CODTAB
-FLAGS "U"
-KEY 1
-USE %ASF 
-INPUT CODTAB F_CODICE
-DISPLAY "Codice" CODTAB
-DISPLAY "Descrizione @50" S0
-OUTPUT F_CODICE CODTAB
-OUTPUT F_DESCR S0
-CHECKTYPE REQUIRED
-END
-
-STRING F_DESCR 50
-BEGIN
-PROMPT 4 4 "Descrizione "
-HELP "Descrizione dell'assoggettamento fiscale"
-FIELD LF_TABCOM->S0
-KEY 2
-USE %ASF KEY 2
-INPUT CODTAB F_CODICE
-INPUT S0 F_DESCR
-DISPLAY "Descrizione @50" S0
-DISPLAY "Codice" CODTAB
-OUTPUT F_CODICE CODTAB
-OUTPUT F_DESCR S0
-CHECKTYPE REQUIRED
-END
-
-ENDPAGE
-ENDMASK
+#include "batbasf.h"
+
+TOOLBAR "" 0 20 0 2
+
+#include <toolbar.h>
+
+ENDPAGE
+
+PAGE "Codici assoggettamento fiscale" -1 -1 78 8
+
+NUMBER F_CODICE 4
+BEGIN
+PROMPT 4 2 "Codice      "
+HELP "Codice di assoggettamento fiscale"
+FIELD CODTAB
+FLAGS "U"
+KEY 1
+USE %ASF 
+INPUT CODTAB F_CODICE
+DISPLAY "Codice" CODTAB
+DISPLAY "Descrizione @50" S0
+OUTPUT F_CODICE CODTAB
+OUTPUT F_DESCR S0
+CHECKTYPE REQUIRED
+END
+
+STRING F_DESCR 50
+BEGIN
+PROMPT 4 4 "Descrizione "
+HELP "Descrizione dell'assoggettamento fiscale"
+FIELD LF_TABCOM->S0
+KEY 2
+USE %ASF KEY 2
+INPUT CODTAB F_CODICE
+INPUT S0 F_DESCR
+DISPLAY "Descrizione @50" S0
+DISPLAY "Codice" CODTAB
+OUTPUT F_CODICE CODTAB
+OUTPUT F_DESCR S0
+CHECKTYPE REQUIRED
+END
+
+ENDPAGE
+ENDMASK