correzioni tabelle e stampe tabelle di Pg

git-svn-id: svn://10.65.10.50/trunk@3638 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
pirro 1996-09-19 16:43:23 +00:00
parent 55a4ce0fe7
commit a9d8514fce
5 changed files with 27 additions and 17 deletions

View File

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

View File

@ -1,10 +1,10 @@
[Headers] [Headers]
80 80
Tabella Assoggettamento fiscale Tabella Classi fiscali articoli
1|@3g%s|Codice 1|@3g%s|Codice
1|@14g%s|Descrizione 1|@14g%s|Descrizione
[Rows] [Rows]
1|CODTAB|@3g@4,ls 1|CODTAB|@3g@2,ls
1|S0|@14g@50,ls 1|S0|@14g@50,ls

View File

@ -8,14 +8,20 @@ ENDPAGE
PAGE "Codici assoggettamento fiscale" -1 -1 78 8 PAGE "Codici assoggettamento fiscale" -1 -1 78 8
STRING F_CODICE 1 GROUPBOX DLG_NULL 75 7
BEGIN
PROMPT 1 0 ""
FLAGS "R"
END
STRING F_CODICE 2
BEGIN BEGIN
PROMPT 4 2 "Codice " PROMPT 4 2 "Codice "
HELP "Codice di assoggettamento fiscale" HELP "Codice di assoggettamento fiscale"
FIELD CODTAB FIELD CODTAB
FLAGS "U" FLAGS "U"
KEY 1 KEY 1
USE %ASF USE ASF
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione @50" S0 DISPLAY "Descrizione @50" S0
@ -24,13 +30,13 @@ OUTPUT F_DESCR S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_DESCR 30 STRING F_DESCR 50
BEGIN BEGIN
PROMPT 4 4 "Descrizione " PROMPT 4 4 "Descrizione "
HELP "Descrizione dell'assoggettamento fiscale" HELP "Descrizione dell'assoggettamento fiscale"
FIELD LF_TABCOM->S0 FIELD S0
KEY 2 KEY 2
USE %ASF KEY 2 USE ASF KEY 2
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
INPUT S0 F_DESCR INPUT S0 F_DESCR
DISPLAY "Descrizione @50" S0 DISPLAY "Descrizione @50" S0

View File

@ -1,9 +1,9 @@
[Headers] [Headers]
80 80
Tabella Sconti incondizionati Tabella Sconti cliente
1|@3g%s|Codice 1|@3g%s|Codice
1|@14g%s|Descrizione 1|@14g%s|Descrizione
1|@70g%s|Percentuale 1|@70g%s|Sconto
[Rows] [Rows]
1|CODTAB|@3g@2,ls 1|CODTAB|@3g@2,ls

View File

@ -8,6 +8,12 @@ ENDPAGE
PAGE "Tabella Sconti clienti" -1 -1 78 8 PAGE "Tabella Sconti clienti" -1 -1 78 8
GROUPBOX DLG_NULL 78 7
BEGIN
PROMPT 1 0 ""
FLAGS "R"
END
STRING F_CODICE 2 STRING F_CODICE 2
BEGIN BEGIN
PROMPT 4 2 "Codice " PROMPT 4 2 "Codice "
@ -15,7 +21,7 @@ HELP "Codice sconto cliente"
FIELD CODTAB FIELD CODTAB
FLAGS "U" FLAGS "U"
KEY 1 KEY 1
USE %SCC USE %SCC
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione @50" S0 DISPLAY "Descrizione @50" S0
@ -39,7 +45,7 @@ END
STRING F_PERC 20 STRING F_PERC 20
BEGIN BEGIN
PROMPT 4 6 "Percentuale " PROMPT 4 8 "Percentuale "
HELP "Percentuale sconto incondizionato" HELP "Percentuale sconto incondizionato"
FIELD S1 FIELD S1
END END