root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Correzzioni di piergiorgio

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@3637 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
pirro 1996-09-19 16:36:13 +00:00
parent fccc31b3b3
commit 55a4ce0fe7
14 changed files with 2285 additions and 2468 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
ve/bastcaa.uml
View File

@ -1,12 +1,11 @@
#include "../ba/ba3200.h" #include "../ba/ba3200.h"
PAGE "Stampa Tabella Categorie Acquisti Articoli" -1 -1 50 8 PAGE "Stampa Categorie Acquisti Articoli" -1 -1 50 8
STRING F_INIZIO1 3 STRING F_INIZIO1 3
BEGIN BEGIN
PROMPT 2 1 "Da cod. articolo " PROMPT 2 1 "Da codice "
FLAGS "U" FLAGS "U"
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio" HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
FIELD LF_TABCOM->CODTAB
USE CAA USE CAA
INPUT CODTAB F_INIZIO1 INPUT CODTAB F_INIZIO1
DISPLAY "Cod. acquisto articolo" CODTAB DISPLAY "Cod. acquisto articolo" CODTAB
@ -17,10 +16,9 @@ END
STRING F_FINE1 3 STRING F_FINE1 3
BEGIN BEGIN
PROMPT 2 3 "A cod. articolo " PROMPT 2 3 "A codice "
FLAGS "U" FLAGS "U"
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo" HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
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

8
ve/bastcra.uml
View File

@ -1,12 +1,11 @@
#include "../ba/ba3200.h" #include "../ba/ba3200.h"
PAGE "Stampa Tabella Categorie Ricavi Articoli" -1 -1 50 8 PAGE "Stampa Categorie Ricavi Articoli" -1 -1 50 8
STRING F_INIZIO1 3 STRING F_INIZIO1 3
BEGIN BEGIN
PROMPT 2 1 "Da cod. articolo " PROMPT 2 1 "Da codice "
FLAGS "U" FLAGS "U"
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio" HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
FIELD LF_TABCOM->CODTAB
USE CRA USE CRA
INPUT CODTAB F_INIZIO1 INPUT CODTAB F_INIZIO1
DISPLAY "Cod. ricavo articolo" CODTAB DISPLAY "Cod. ricavo articolo" CODTAB
@ -17,10 +16,9 @@ END
STRING F_FINE1 3 STRING F_FINE1 3
BEGIN BEGIN
PROMPT 2 3 "A cod. articolo " PROMPT 2 3 "A codice "
FLAGS "U" FLAGS "U"
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo" HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
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

6
ve/bastrfa.uml
View File

@ -3,10 +3,9 @@
PAGE "Stampa Tabella Raggruppamento Fiscale Articoli " -1 -1 50 8 PAGE "Stampa Tabella Raggruppamento Fiscale Articoli " -1 -1 50 8
STRING F_INIZIO1 5 STRING F_INIZIO1 5
BEGIN BEGIN
PROMPT 2 1 "Da codice art. " PROMPT 2 1 "Da codice "
FLAGS "U" FLAGS "U"
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio" HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
FIELD LF_TABCOM->CODTAB
USE RFA USE RFA
INPUT CODTAB F_INIZIO1 INPUT CODTAB F_INIZIO1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
@ -17,10 +16,9 @@ END
STRING F_FINE1 5 STRING F_FINE1 5
BEGIN BEGIN
PROMPT 2 3 "A codice art. " PROMPT 2 3 "A codice "
FLAGS "U" FLAGS "U"
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo" HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
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

12
ve/batbcaa.rpt
View File

@ -1,17 +1,17 @@
[Relations] [Relations]
19,GRUPPO=S1|CONTO=S2|SOTTOCONTO=S3 LF_PCON;GRUPPO==I0|CONTO==I1|SOTTOCONTO==I2
[Headers] [Headers]
132 132
Tabella Categorie Acquisti Articoli Tabella Categorie Acquisti Articoli
1|@2g%s|Cod. Tabella 1|@2g%s|Cod. Tabella
1|@16g%s|Descrizione 1|@16g%s|Descrizione
1|@68g%s|Codice Conto 1|@68g%s|Conto acquisti
[Rows] [Rows]
1|CODTAB|@2g@3s 1|CODTAB|@2g@3s
1|S0|@16g@50,ls 1|S0|@16g@50,ls
1|S1|@68g@3,ls 1|I0|@68g@3n
1|S2|@73g@3,ls 1|I1|@73g@3n
1|S3|@78g@6,ls 1|I2|@78g@6n
1|19->DESCR|@86g@50,ls 1|LF_PCON->DESCR|@86g@45,ls

62
ve/batbcaa.uml
View File

@ -1,8 +1,7 @@
#include "BATBCAA.H" #include "batbcaa.h"
#define LF_PCON 19 //PIANO DEI CONTI
TOOLBAR "" 0 20 60 2 TOOLBAR "" 0 20 60 2
#include <toolbar.h> #include <toolbar.h>
ENDPAGE ENDPAGE
PAGE "Tabella categoria acquisti articoli " 11 60 14 PAGE "Tabella categoria acquisti articoli " 11 60 14
@ -19,17 +18,13 @@ BEGIN
FIELD CODTAB FIELD CODTAB
KEY 1 KEY 1
USE CAA USE CAA
FLAG "U" FLAG "U"
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
DISPLAY "Codice " CODTAB DISPLAY "Codice " CODTAB
DISPLAY "Descrizione@50 " S0 DISPLAY "Descrizione@50 " S0
OUTPUT F_CODICE CODTAB OUTPUT F_CODICE CODTAB
OUTPUT F_DESCR S0 OUTPUT F_DESCR S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_DESCR 50 STRING F_DESCR 50
@ -39,29 +34,25 @@ BEGIN
KEY 2 KEY 2
USE CAA KEY 2 USE CAA KEY 2
INPUT S0 F_DESCR INPUT S0 F_DESCR
DISPLAY "Codice " CODTAB DISPLAY "Codice " CODTAB
DISPLAY "Descrizione@50 " S0 DISPLAY "Descrizione@50 " S0
OUTPUT F_CODICE CODTAB OUTPUT F_CODICE CODTAB
OUTPUT F_DESCR S0 OUTPUT F_DESCR S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_CODCON 3 NUMBER F_CODCON 3
BEGIN BEGIN
PROMPT 2 8 "Codice conto " PROMPT 2 8 "Conto acquisti "
FIELD S1 FIELD I0
FLAG "R" CHECKTYPE NORMAL
END END
STRING F_CODCON1 3 NUMBER F_CODCON1 3
BEGIN BEGIN
PROMPT 25 8 "" PROMPT 22 8 ""
FIELD S2 FIELD I1
USE LF_PCON SELECT INDBIL=3 USE LF_PCON SELECT INDBIL=="3"
FLAG "R"
INPUT GRUPPO F_CODCON INPUT GRUPPO F_CODCON
INPUT CONTO F_CODCON1 INPUT CONTO F_CODCON1
DISPLAY "Gruppo " GRUPPO DISPLAY "Gruppo " GRUPPO
@ -69,18 +60,19 @@ BEGIN
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
OUTPUT F_CODCON GRUPPO OUTPUT F_CODCON GRUPPO
OUTPUT F_CODCON1 CONTO OUTPUT F_CODCON1 CONTO
OUTPUT F_DESCR1 DESCR CHECKTYPE NORMAL
ADD RUN CG0 -0 ADD RUN CG0 -0
WARNING "Il conto deve essere un costo"
END END
STRING F_CODCON2 6 NUMBER F_CODCON2 6
BEGIN BEGIN
PROMPT 34 8 "" PROMPT 30 8 ""
FIELD S3 FIELD I2
USE LF_PCON SELECT INDBIL=3 USE LF_PCON SELECT (SOTTOCONTO!="") && (500@->INDBIL=="3")
FLAG "R" JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
INPUT GRUPPO F_CODCON INPUT GRUPPO F_CODCON SELECT
INPUT CONTO F_CODCON1 INPUT CONTO F_CODCON1 SELECT
INPUT SOTTOCONTO F_CODCON2 INPUT SOTTOCONTO F_CODCON2
DISPLAY "Gruppo " GRUPPO DISPLAY "Gruppo " GRUPPO
DISPLAY "Conto " CONTO DISPLAY "Conto " CONTO
@ -90,16 +82,28 @@ BEGIN
OUTPUT F_CODCON1 CONTO OUTPUT F_CODCON1 CONTO
OUTPUT F_CODCON2 SOTTOCONTO OUTPUT F_CODCON2 SOTTOCONTO
OUTPUT F_DESCR1 DESCR OUTPUT F_DESCR1 DESCR
CHECKTYPE NORMAL
WARNING "Sottoconto errato"
ADD RUN CG0 -0 ADD RUN CG0 -0
END END
STRING F_DESCR1 50 STRING F_DESCR1 50
BEGIN BEGIN
PROMPT 17 10 "" PROMPT 17 10 ""
FLAG "D" FLAG "U"
USE LF_PCON KEY 2 SELECT (SOTTOCONTO!="") && (500@->INDBIL=="3")
JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
INPUT DESCR F_DESCR1
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_CODCON2
CHECKTYPE NORMAL
WARNING "Il conto deve essere un costo"
ADD RUN CG0 -0
END END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

12
ve/batbcra.rpt
View File

@ -1,17 +1,17 @@
[Relations] [Relations]
19,GRUPPO=S1|CONTO=S2|SOTTOCONTO=S3 LF_PCON;GRUPPO==I0|CONTO==I1|SOTTOCONTO==I2
[Headers] [Headers]
132 132
Tabella Categorie Ricavi Articoli Tabella Categorie Ricavi Articoli
1|@2g%s|Cod. Tabella 1|@2g%s|Cod. Tabella
1|@16g%s|Descrizione 1|@16g%s|Descrizione
1|@68g%s|Codice Conto 1|@68g%s|Conto vendite
[Rows] [Rows]
1|CODTAB|@2g@3s 1|CODTAB|@2g@3s
1|S0|@16g@50,ls 1|S0|@16g@50,ls
1|S1|@68g@3,ls 1|I0|@68g@3n
1|S2|@73g@3,ls 1|I1|@73g@3n
1|S3|@78g@6,ls 1|I2|@78g@6n
1|19->DESCR|@86g@50,ls 1|LF_PCON->DESCR|@86g@45,ls

63
ve/batbcra.uml
View File

@ -1,9 +1,7 @@
#include "BATBCRA.H" #include "batbcra.h"
#define LF_PCON 19 //PIANO DEI CONTI
TOOLBAR "" 0 20 60 2 TOOLBAR "" 0 20 60 2
#include <toolbar.h> #include <toolbar.h>
ENDPAGE ENDPAGE
PAGE "Tabella categoria ricavi articoli " 11 60 14 PAGE "Tabella categoria ricavi articoli " 11 60 14
@ -20,13 +18,10 @@ BEGIN
FIELD CODTAB FIELD CODTAB
KEY 1 KEY 1
USE CRA USE CRA
FLAG "U" FLAG "U"
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE
DISPLAY "Codice " CODTAB DISPLAY "Codice " CODTAB
DISPLAY "Descrizione@50 " S0 DISPLAY "Descrizione@50 " S0
OUTPUT F_CODICE CODTAB OUTPUT F_CODICE CODTAB
OUTPUT F_DESCR S0 OUTPUT F_DESCR S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
@ -39,29 +34,25 @@ BEGIN
KEY 2 KEY 2
USE CRA KEY 2 USE CRA KEY 2
INPUT S0 F_DESCR INPUT S0 F_DESCR
DISPLAY "Codice " CODTAB DISPLAY "Codice " CODTAB
DISPLAY "Descrizione@50 " S0 DISPLAY "Descrizione@50 " S0
OUTPUT F_CODICE CODTAB OUTPUT F_CODICE CODTAB
OUTPUT F_DESCR S0 OUTPUT F_DESCR S0
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_CODCON 3 NUMBER F_CODCON 3
BEGIN BEGIN
PROMPT 2 8 "Codice conto " PROMPT 2 8 "Conto vendita "
FIELD S1 FIELD I0
FLAG "R" CHECKTYPE NORMAL
END END
STRING F_CODCON1 3 NUMBER F_CODCON1 3
BEGIN BEGIN
PROMPT 25 8 "" PROMPT 22 8 ""
FIELD S2 FIELD I1
USE LF_PCON SELECT INDBIL="4" USE LF_PCON SELECT INDBIL=="4"
FLAG "R"
INPUT GRUPPO F_CODCON INPUT GRUPPO F_CODCON
INPUT CONTO F_CODCON1 INPUT CONTO F_CODCON1
DISPLAY "Gruppo " GRUPPO DISPLAY "Gruppo " GRUPPO
@ -69,18 +60,19 @@ BEGIN
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
OUTPUT F_CODCON GRUPPO OUTPUT F_CODCON GRUPPO
OUTPUT F_CODCON1 CONTO OUTPUT F_CODCON1 CONTO
OUTPUT F_DESCR1 DESCR CHECKTYPE NORMAL
ADD RUN CG0 -0 ADD RUN CG0 -0
WARNING "Il conto deve essere un ricavo"
END END
STRING F_CODCON2 6 NUMBER F_CODCON2 6
BEGIN BEGIN
PROMPT 34 8 "" PROMPT 30 8 ""
FIELD S3 FIELD I2
USE LF_PCON SELECT INDBIL="4" USE LF_PCON SELECT (SOTTOCONTO!="") && (500@->INDBIL=="4")
FLAG "R" JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
INPUT GRUPPO F_CODCON INPUT GRUPPO F_CODCON SELECT
INPUT CONTO F_CODCON1 INPUT CONTO F_CODCON1 SELECT
INPUT SOTTOCONTO F_CODCON2 INPUT SOTTOCONTO F_CODCON2
DISPLAY "Gruppo " GRUPPO DISPLAY "Gruppo " GRUPPO
DISPLAY "Conto " CONTO DISPLAY "Conto " CONTO
@ -90,17 +82,28 @@ BEGIN
OUTPUT F_CODCON1 CONTO OUTPUT F_CODCON1 CONTO
OUTPUT F_CODCON2 SOTTOCONTO OUTPUT F_CODCON2 SOTTOCONTO
OUTPUT F_DESCR1 DESCR OUTPUT F_DESCR1 DESCR
CHECKTYPE NORMAL
WARNING "Sottoconto errato"
ADD RUN CG0 -0 ADD RUN CG0 -0
END END
STRING F_DESCR1 50 STRING F_DESCR1 50
BEGIN BEGIN
PROMPT 17 10 "" PROMPT 17 10 ""
FLAG "D" FLAG "U"
USE LF_PCON KEY 2 SELECT (SOTTOCONTO!="") && (500@->INDBIL=="4")
JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
INPUT DESCR F_DESCR1
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_CODCON2
CHECKTYPE NORMAL
WARNING "Il conto deve essere un ricavo"
ADD RUN CG0 -0
END END
ENDPAGE ENDPAGE
ENDMASK ENDMASK

58
ve/batbrfa.rpt
View File

@ -1,30 +1,46 @@
[Relations] [Relations]
ASF;CODTAB=S8,1,0,200 LF_PCON;GRUPPO==I0|CONTO==I1|SOTTOCONTO==I2;1;0;300
LF_PCON;GRUPPO==I3|CONTO==I4|SOTTOCONTO==I5;1;0;200
[Headers] [Headers]
132 132
Tabella Raggruppamenti Fiscali Articoli Tabella Raggruppamenti Fiscali Articoli
1|@2g%s|Codice 1|@2g%s|Cod.
1|@15g%s|Descrizione 1|@10g%s|Descrizione
1|@71g%s|Unita' di Misura 1|@66g%s|U.M.
1|@89g%s|Classe Fiscale 1|@72g%s|IVA
1|@105g%s|Descrizione 1|@78g%s|Classe Fisc.
2|@15g%s|Perc. ricarico medio 1|@92g%s|% ricarico
2|@43g%s|Costo minimo 1|@104g%s|Costo minimo
2|@57g%s|Massimo 1|@118g%s|Costo Massimo
2|@71g%s|Tipo costo 2|@10g%s|Tipo costo
2|@42g%s|Conto vendite
2|@85g%s|Conto acquisti
[Rows] [Rows]
1|CODTAB|@2g@5s 1|CODTAB|@2g@5s
1|S0|@15g@50,ls 1|S0|@10g@50,ls
1|S7|@71g@2,ls 1|S7|@66g@2,ls
1|S8|@89g@1,ls 1|S9|@72g@4,ls
1|-200->S0|@105g@50,ls 1|S8|@78g@2,ls
2|R0|@15g@6,rpn|####,@@ 1|R0|@92g@6,rpn|###,@@
2|R1|@43g@12,rpn|############,@@ 1|R1|@104g@12,rpn|#########,@@
2|R2|@57g@12,rpn|############,@@ 1|R2|@118g@12,rpn|#########,@@
2|I0|@71g@30,ls 2|S6|@10g@30t
2|I3|@42g@3n
2|I4|@47g@3n
2|I5|@52g@6n
2|-200->DESCR|@60g@25,ls
2|I0|@87g@3n
2|I1|@92g@3n
2|I2|@97g@6n
2|-300->DESCR|@105g@25,ls
[Translations]
LF_TAB|S6|1|Costo medio annuale
LF_TAB|S6|2|Costo ultimi 3 mesi
LF_TAB|S6|3|Costo ultimo
LF_TAB|S6|4|Costo standard
LF_TAB|S6|5|Maggiore ultimi due costi
LF_TAB|S6|6|Costo massimo d'acquisto
LF_TAB|S6|7|Costo minimo d'acquisto

178
ve/batbrfa.uml
View File

@ -43,7 +43,7 @@ STRING FLD_TABRFA_S0 50
STRING FLD_TABRFA_S7 2 STRING FLD_TABRFA_S7 2
BEGIN BEGIN
PROMPT 2 8 "Unita' di misura " PROMPT 2 8 "Unita' di misura"
FIELD S7 FIELD S7
FLAG "U" FLAG "U"
USE %UMS USE %UMS
@ -54,14 +54,14 @@ STRING FLD_TABRFA_S7 2
WARNING "Unita' di misura errata" WARNING "Unita' di misura errata"
END END
STRING FLD_TABRFA_S8 1 STRING FLD_TABRFA_S8 2
BEGIN BEGIN
PROMPT 2 9 "Classe fiscale " PROMPT 2 9 "Classe fiscale "
FIELD S8 FIELD S8
USE %ASF USE ASF
INPUT CODTAB FLD_TABRFA_S8 INPUT CODTAB FLD_TABRFA_S8
DISPLAY "Cl. Fisc." CODTAB DISPLAY "Cl. Fisc." CODTAB
DISPLAY "Descrizione@30" S0 DISPLAY "Descrizione@50" S0
OUTPUT FLD_TABRFA_S8 CODTAB OUTPUT FLD_TABRFA_S8 CODTAB
OUTPUT FLD_DESCFA S0 OUTPUT FLD_DESCFA S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
@ -69,8 +69,8 @@ STRING FLD_TABRFA_S8 1
STRING FLD_DESCFA 50 STRING FLD_DESCFA 50
BEGIN BEGIN
PROMPT 30 9 "" PROMPT 28 9 ""
USE %ASF KEY 2 USE ASF KEY 2
INPUT S0 FLD_DESCFA INPUT S0 FLD_DESCFA
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Cl. Fisc." CODTAB DISPLAY "Cl. Fisc." CODTAB
@ -81,13 +81,12 @@ STRING FLD_DESCFA 50
STRING FLD_TABRFA_S9 4 STRING FLD_TABRFA_S9 4
BEGIN BEGIN
PROMPT 2 10 "Cod.IVA riferimento " PROMPT 2 10 "Cod.IVA "
FIELD S9 FIELD S9
USE %IVA USE %IVA
INPUT CODTAB FLD_TABRFA_S9 INPUT CODTAB FLD_TABRFA_S9
DISPLAY "Codice IVA" CODTAB DISPLAY "Codice IVA" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
DISPLAY "Aliquota" R0
OUTPUT FLD_TABRFA_S9 CODTAB OUTPUT FLD_TABRFA_S9 CODTAB
OUTPUT FLD_DESIVA S0 OUTPUT FLD_DESIVA S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
@ -95,19 +94,25 @@ STRING FLD_TABRFA_S9 4
STRING FLD_DESIVA 50 STRING FLD_DESIVA 50
BEGIN BEGIN
PROMPT 30 10 "" PROMPT 28 10 ""
FLAG "D" USE %IVA KEY 2
INPUT S0 FLD_DESIVA
DISPLAY "Descrizione@50" S0
DISPLAY "Codice IVA" CODTAB
OUTPUT FLD_TABRFA_S9 CODTAB
OUTPUT FLD_DESIVA S0
CHECKTYPE NORMAL
END END
NUMBER FLD_TABRFA_R0 6 2 NUMBER FLD_TABRFA_R0 6 2
BEGIN BEGIN
PROMPT 2 11 "% di ricarico medio " PROMPT 2 11 "% ricarico medio"
FIELD R0 FIELD R0
END END
NUMBER FLD_TABRFA_R1 12 2 NUMBER FLD_TABRFA_R1 12 2
BEGIN BEGIN
PROMPT 2 12 "Costo minimo " PROMPT 2 12 "Costo minimo "
FIELD R1 FIELD R1
END END
@ -119,8 +124,8 @@ NUMBER FLD_TABRFA_R2 12 2
LIST FLD_TABRFA_I0 1 30 LIST FLD_TABRFA_I0 1 30
BEGIN BEGIN
PROMPT 2 13 "Tipo costo " PROMPT 2 13 "Tipo costo "
FIELD I0 FIELD S6
HELP "Inserire il tipo di costo" HELP "Inserire il tipo di costo"
ITEM "1|Costo medio annuale" ITEM "1|Costo medio annuale"
ITEM "2|Costo ultimi 3 mesi" ITEM "2|Costo ultimi 3 mesi"
@ -131,69 +136,38 @@ LIST FLD_TABRFA_I0 1 30
ITEM "7|Costo minimo d'acquisto" ITEM "7|Costo minimo d'acquisto"
END END
NUMBER F_GRUPPOA 3
BEGIN
PROMPT 2 14 "Conto d'acquisto "
FIELD I0
END
NUMBER F_CONTOA 3
BEGIN
PROMPT 27 14 ""
FIELD I1
END
NUMBER F_SOTTOCA 6
BEGIN
PROMPT 32 14 ""
FIELD I2
USE LF_PCON
INPUT GRUPPO F_GRUPPOA
INPUT CONTO F_CONTOA
INPUT SOTTOCONTO F_SOTTOCA
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPOA GRUPPO
OUTPUT F_CONTOA CONTO
OUTPUT F_SOTTOCA SOTTOCONTO
OUTPUT F_DESCRA DESCR
CHECKTYPE NORMAL
END
STRING F_DESCRA 50
BEGIN
PROMPT 22 15 ""
FLAG "U"
USE LF_PCON KEY 2
INPUT DESCR F_DESCRA
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_SOTTOCA
END
NUMBER F_GRUPPOV 3 NUMBER F_GRUPPOV 3
BEGIN BEGIN
PROMPT 2 16 "Conto di vendita " PROMPT 2 14 "Conto di vendita"
FIELD I3 FIELD I3
CHECKTYPE NORMAL
END END
NUMBER F_CONTOV 3 NUMBER F_CONTOV 3
BEGIN BEGIN
PROMPT 27 16 "" PROMPT 23 14 ""
FIELD I4 FIELD I4
USE LF_PCON SELECT INDBIL=="4"
INPUT GRUPPO F_GRUPPOV
INPUT CONTO F_CONTOV
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPOV GRUPPO
OUTPUT F_CONTOV CONTO
CHECKTYPE NORMAL
ADD RUN CG0 -0
WARNING "Il conto deve essere un ricavo"
END END
NUMBER F_SOTTOCV 6 NUMBER F_SOTTOCV 6
BEGIN BEGIN
PROMPT 32 16 "" PROMPT 31 14 ""
FIELD I5 FIELD I5
USE LF_PCON USE LF_PCON SELECT (SOTTOCONTO!="") && (500@->INDBIL=="4")
INPUT GRUPPO F_GRUPPOV JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
INPUT CONTO F_CONTOV INPUT GRUPPO F_GRUPPOV SELECT
INPUT CONTO F_CONTOV SELECT
INPUT SOTTOCONTO F_SOTTOCV INPUT SOTTOCONTO F_SOTTOCV
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
@ -204,19 +178,87 @@ BEGIN
OUTPUT F_SOTTOCV SOTTOCONTO OUTPUT F_SOTTOCV SOTTOCONTO
OUTPUT F_DESCRV DESCR OUTPUT F_DESCRV DESCR
CHECKTYPE NORMAL CHECKTYPE NORMAL
WARNING "Sottoconto errato"
ADD RUN CG0 -0
END END
STRING F_DESCRV 50 STRING F_DESCRV 50
BEGIN BEGIN
PROMPT 22 17 "" PROMPT 18 15 ""
FLAG "U" FLAG "U"
USE LF_PCON KEY 2 USE LF_PCON KEY 2 SELECT (SOTTOCONTO!="") && (500@->INDBIL=="4")
JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
INPUT DESCR F_DESCRV INPUT DESCR F_DESCRV
DISPLAY "Descrizione@50" DESCR DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_SOTTOCV COPY OUTPUT F_SOTTOCV
CHECKTYPE NORMAL
WARNING "Il conto deve essere un ricavo"
ADD RUN CG0 -0
END
NUMBER F_GRUPPOA 3
BEGIN
PROMPT 2 16 "Conto d'acquisto"
FIELD I0
END
NUMBER F_CONTOA 3
BEGIN
PROMPT 23 16 ""
FIELD I1
USE LF_PCON SELECT INDBIL=="3"
INPUT GRUPPO F_GRUPPOA
INPUT CONTO F_CONTOA
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPOA GRUPPO
OUTPUT F_CONTOA CONTO
CHECKTYPE NORMAL
WARNING "Il conto deve essere un costo"
ADD RUN CG0 -0
END
NUMBER F_SOTTOCA 6
BEGIN
PROMPT 31 16 ""
FIELD I2
USE LF_PCON SELECT (SOTTOCONTO!="") && (500@->INDBIL=="3")
JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
INPUT GRUPPO F_GRUPPOA SELECT
INPUT CONTO F_CONTOA SELECT
INPUT SOTTOCONTO F_SOTTOCA
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
DISPLAY "Descrizione@50" DESCR
OUTPUT F_GRUPPOA GRUPPO
OUTPUT F_CONTOA CONTO
OUTPUT F_SOTTOCA SOTTOCONTO
OUTPUT F_DESCRA DESCR
CHECKTYPE NORMAL
WARNING "Sottoconto errato"
ADD RUN CG0 -0
END
STRING F_DESCRA 50
BEGIN
PROMPT 18 17 ""
FLAG "U"
USE LF_PCON KEY 2 SELECT (SOTTOCONTO!="") && (500@->INDBIL=="3")
JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
INPUT DESCR F_DESCRA
DISPLAY "Descrizione@50" DESCR
DISPLAY "Gruppo" GRUPPO
DISPLAY "Conto" CONTO
DISPLAY "Sottoconto" SOTTOCONTO
COPY OUTPUT F_SOTTOCA
CHECKTYPE NORMAL
WARNING "Il conto deve essere un ricavo"
ADD RUN CG0 -0
END END
ENDPAGE ENDPAGE

1
ve/batbtri.rpt
View File

@ -13,4 +13,5 @@ LF_TABCOM|S7|M|Merce
LF_TABCOM|S7|S|Spese LF_TABCOM|S7|S|Spese
LF_TABCOM|S7|C|Sconti LF_TABCOM|S7|C|Sconti
LF_TABCOM|S7|D|Descrizioni LF_TABCOM|S7|D|Descrizioni
LF_TABCOM|S7|O|Omaggi"
LF_TABCOM|S7|P|Prestazioni LF_TABCOM|S7|P|Prestazioni

25
ve/bollac.src
View File

@ -10,7 +10,8 @@ TYPE=Bolla di vendita
MSKFILE=BOLLAC MSKFILE=BOLLAC
FRMFILE=BOLLAC.FRM FRMFILE=BOLLAC.FRM
// modifica // modifica
PROGPIEDE=IMPN|SCODOC|IMPS|IMPOSTA|SPESE|TOTALE|PROVVDOC CAMPICALC=IMPN|SCODOC|IMPS|IMPOSTA|SPESE|TOTALE|PROVVDOC
CALCOLI=
// modifica // modifica
// Procedure utente da chiamare per il documento ( preprocessarle? ) // Procedure utente da chiamare per il documento ( preprocessarle? )
NUOVO= NUOVO=
@ -168,15 +169,7 @@ IMPNETTI = S_NORMALE //2200
RAGGR = S_NORMALE //2300 RAGGR = S_NORMALE //2300
RAGGREFF = S_NASCOSTO //2300 RAGGREFF = S_NASCOSTO //2300
SPESEINC = S_NORMALE //2400 SPESEINC = S_NORMALE //2400
GRADD = S_NORMALE //2500 ADDBOLLI = S_NORMALE //2400
ADDBRB = S_NORMALE //2500
ADDBTR = S_NORMALE //2500
ADDBDE = S_NORMALE //2500
GRCODIVA = S_NORMALE //2600
CODIVABRB = S_NORMALE //2600
CODIVABTR = S_NORMALE //2600
CODIVABTRE = S_NORMALE //2600
CODIVABDE = S_NORMALE //2600
UMTARA = S_NORMALE //2710 UMTARA = S_NORMALE //2710
TARA = S_NORMALE //2710 TARA = S_NORMALE //2710
DESUMTARA = S_NASCOSTO //2710 DESUMTARA = S_NASCOSTO //2710
@ -209,13 +202,16 @@ NCOLS=10
10=FR_CODIVA 10=FR_CODIVA
[RIGHE] [RIGHE]
NTIPIRIGA=6 NTIPIRIGA=9
1=01 1=01
2=02 2=02
3=03 3=03
4=04 4=04
5=05 5=05
6=06 6=06
7=07
8=08
9=09
[HANDLERS] [HANDLERS]
NHANDLER=0 NHANDLER=0
@ -251,8 +247,6 @@ NHANDLER=0
2200 = S_NORMALE 2200 = S_NORMALE
2300 = S_NORMALE 2300 = S_NORMALE
2400 = S_NORMALE 2400 = S_NORMALE
2500 = S_NORMALE
2600 = S_NORMALE
2700 = S_NORMALE 2700 = S_NORMALE
2710 = S_NORMALE 2710 = S_NORMALE
2800 = S_NORMALE 2800 = S_NORMALE
@ -260,7 +254,7 @@ NHANDLER=0
4000 = S_NORMALE 4000 = S_NORMALE
[ORDINEGRUPPI] [ORDINEGRUPPI]
NGROUPS=30 NGROUPS=28
1=100 1=100
2=200 2=200
3=300 3=300
@ -289,6 +283,5 @@ NGROUPS=30
26=2710 26=2710
27=1700 27=1700
28=2400 28=2400
29=2500
30=2600


88
ve/fatturac.src
View File

@ -9,7 +9,8 @@ TYPE=Fattura di vendita
MSKFILE=FATTURAC MSKFILE=FATTURAC
FRMFILE=FATTURAC.FRM FRMFILE=FATTURAC.FRM
// modifica // modifica
PROGPIEDE=TOTNETTI CAMPICALC=IMPN|SCODOC|IMPS|IMPOSTA|SPESE|TOTALE|PROVVDOC
CALCOLI=
// modifica // modifica
// Procedure utente da chiamare per il documento ( preprocessarle? ) // Procedure utente da chiamare per il documento ( preprocessarle? )
NUOVO= NUOVO=
@ -61,7 +62,7 @@ STATOFINALE=9
// 1|Prompt|Help|Warning // 1|Prompt|Help|Warning
OCCASEDIT = S_NORMALE //100 OCCASEDIT = S_NORMALE //100
OCFPI = S_NORMALE //100 OCFPI = S_NASCOSTO //100
COFI = S_NORMALE //100 COFI = S_NORMALE //100
STATOPAIV = S_NORMALE //100 STATOPAIV = S_NORMALE //100
PAIVA = S_NORMALE //100 PAIVA = S_NORMALE //100
@ -75,10 +76,13 @@ COMCF = S_DISABILITATO //100
DENCOM = S_DISABILITATO //100 DENCOM = S_DISABILITATO //100
STATOCF = S_DISABILITATO //100 STATOCF = S_DISABILITATO //100
DESSTATOCF = S_DISABILITATO //100 DESSTATOCF = S_DISABILITATO //100
CODVAL = S_NORMALE //200 CODVAL1 = S_NORMALE //200
NOME_VAL = S_NORMALE //200 CODVAL2 = S_NORMALE //200
NOME_VAL1 = S_NORMALE //200
NOME_VAL2 = S_NORMALE //200
CAMBIO = S_NORMALE //200 CAMBIO = S_NORMALE //200
DATA_CAMBIO = S_DISABILITATO //200 DATA_CAMBIO1 = S_NORMALE //200
DATA_CAMBIO2 = S_NORMALE //200
CODLIN = S_NORMALE //300 CODLIN = S_NORMALE //300
DESLIN = S_NORMALE //300 DESLIN = S_NORMALE //300
CODPAG = S_OBBLIGATORIO //400 CODPAG = S_OBBLIGATORIO //400
@ -109,7 +113,9 @@ DESCAMP = S_DISABILITATO //820
SCONTOPERC = S_NORMALE //830 SCONTOPERC = S_NORMALE //830
CODAG = S_NORMALE //1100 CODAG = S_NORMALE //1100
DESAG = S_NORMALE //1100 DESAG = S_NORMALE //1100
CODPORTO = S_OBBLIGATORIO //1210 CODZON = S_NORMALE //1100
DESZON = S_NORMALE //1100
CODPORTO = S_NORMALE //1210
DESPORTO = S_NORMALE //1210 DESPORTO = S_NORMALE //1210
CODVETT1 = S_NORMALE //1500 CODVETT1 = S_NORMALE //1500
CODVETT2 = S_NASCOSTO //1500 CODVETT2 = S_NASCOSTO //1500
@ -117,7 +123,7 @@ CODVETT3 = S_NASCOSTO //1500
NOMEVETT1 = S_NORMALE //1500 NOMEVETT1 = S_NORMALE //1500
NOMEVETT2 = S_NASCOSTO //1500 NOMEVETT2 = S_NASCOSTO //1500
NOMEVETT3 = S_NASCOSTO //1500 NOMEVETT3 = S_NASCOSTO //1500
NCOPIE = S_OBBLIGATORIO //1600 NCOPIE = S_NASCOSTO //1600
IMPPAGATO = S_NORMALE //1800 IMPPAGATO = S_NORMALE //1800
ACCSALDO = S_NORMALE //1800 ACCSALDO = S_NORMALE //1800
DOC1 = S_NASCOSTO //1900 DOC1 = S_NASCOSTO //1900
@ -126,25 +132,8 @@ DOC3 = S_NASCOSTO //1900
IMPNETTI = S_NORMALE //2200 IMPNETTI = S_NORMALE //2200
RAGGREFF = S_NORMALE //2300 RAGGREFF = S_NORMALE //2300
SPESEINC = S_NORMALE //2400 SPESEINC = S_NORMALE //2400
GRADD = S_NORMALE //2500 ADDBOLLI = S_NORMALE //2500
ADDBRB = S_NORMALE //2500 BLANK = S_DISABILITATO //4000
ADDBTR = S_NORMALE //2500
ADDBDE = S_NORMALE //2500
GRCODIVA = S_NORMALE //2600
CODIVABRB = S_NORMALE //2600
CODIVABTR = S_NORMALE //2600
CODIVABTRE = S_NORMALE //2600
CODIVABDE = S_NORMALE //2600
SCONFIS = S_NORMALE //3000
RICFIS = S_NORMALE //3200
//NATTRASP = S_NASCOSTO //3300
//NATTRANS = S_NASCOSTO //3300
//REGIME = S_NASCOSTO //3300
GRSPESEADD = S_NORMALE //3400
SPESEADD1 = S_NORMALE //3400
SPESEADD2 = S_NORMALE //3400
SPESEADD3 = S_NORMALE //3400
SPESEADD4 = S_NORMALE //3400
[DEFAULT] [DEFAULT]
NDEFAULTS=0 NDEFAULTS=0
@ -163,12 +152,19 @@ NCOLS=10
10=FR_CODIVA 10=FR_CODIVA
[RIGHE] [RIGHE]
NTIPIRIGA=1 NTIPIRIGA=9
1=01 1=01
2=02
3=03
4=04
5=05
6=06
7=07
8=08
9=09
[HANDLERS] [HANDLERS]
NHANDLER=0 NHANDLER=0
1 = F_ORAPART|1
[PROFILOGRUPPO] [PROFILOGRUPPO]
101 = S_NASCOSTO 101 = S_NASCOSTO
@ -185,22 +181,17 @@ NHANDLER=0
830 = S_NORMALE 830 = S_NORMALE
1100 = S_NORMALE 1100 = S_NORMALE
1210 = S_NORMALE 1210 = S_NORMALE
1500 = S_OBBLIGATORIO 1500 = S_NORMALE
1600 = S_NORMALE 1600 = S_NASCOSTO
1800 = S_NORMALE 1800 = S_NORMALE
1900 = S_NORMALE 1900 = S_NORMALE
2200 = S_NORMALE 2200 = S_NORMALE
2300 = S_NORMALE 2300 = S_NORMALE
2400 = S_NORMALE 2400 = S_NORMALE
2500 = S_NORMALE 4000 = S_NORMALE
2600 = S_NORMALE
3000 = S_NORMALE
3200 = S_NORMALE
//3300 = S_NASCOSTO
3400 = S_NORMALE
[ORDINEGRUPPI] [ORDINEGRUPPI]
NGROUPS=25 NGROUPS=17
1=100 1=100
2=200 2=200
3=300 3=300
@ -211,19 +202,12 @@ NGROUPS=25
8=800 8=800
9=810 9=810
10=820 10=820
11=1100 11=830
12=1210 12=1100
13=1500 13=1800
14=830 14=1900
15=1800 15=2200
16=1900 16=2300
17=2200 17=2400
18=2300
19=2400
20=2500
21=2600
22=3000
23=3200
24=3400
25=1600


242
ve/ve0300a.src
View File

@ -15,6 +15,7 @@
// T_LISTA // T_LISTA
// T_MEMO // T_MEMO
// T_CORNICE // T_CORNICE
// T_ZOOM (da implementare)
// SIZE = E' la dimesione del campo nella maschera. Per i tipi che richiedono due dimensioni, // SIZE = E' la dimesione del campo nella maschera. Per i tipi che richiedono due dimensioni,
// si fa dimensione1 * 100 + dimesione2 // si fa dimensione1 * 100 + dimesione2
// PROMPT = E' il prompt di default per il campo ( pur essere cambiato nel .INI ) // PROMPT = E' il prompt di default per il campo ( pur essere cambiato nel .INI )
@ -1278,9 +1279,9 @@ X=2
Y=0 Y=0
FIELDNAME=DOC1 FIELDNAME=DOC1
MSKID=F_DOC1 MSKID=F_DOC1
TYPE=T_STRINGA TYPE=T_MEMO
PROMPT="Documento 1 " PROMPT="Documento 1 "
SIZE=12 SIZE=50
[DOC2] [DOC2]
GROUP=1900 GROUP=1900
@ -1288,9 +1289,9 @@ X=2
Y=1 Y=1
FIELDNAME=DOC2 FIELDNAME=DOC2
MSKID=F_DOC2 MSKID=F_DOC2
TYPE=T_STRINGA TYPE=T_MEMO
PROMPT="Documento 2 " PROMPT="Documento 2 "
SIZE=12 SIZE=50
[DOC3] [DOC3]
GROUP=1900 GROUP=1900
@ -1298,9 +1299,9 @@ X=2
Y=2 Y=2
FIELDNAME=DOC3 FIELDNAME=DOC3
MSKID=F_DOC3 MSKID=F_DOC3
TYPE=T_STRINGA TYPE=T_MEMO
PROMPT="Documento 3 " PROMPT="Documento 3 "
SIZE=12 SIZE=50
[DATACONS] [DATACONS]
GROUP=2000 GROUP=2000
@ -1384,112 +1385,18 @@ X=2
Y=0 Y=0
FIELDNAME=SPESEINC FIELDNAME=SPESEINC
MSKID=151 MSKID=151
TYPE=T_CHECKBOX TYPE=T_NUMERO
PROMPT="Spese all'incasso " PROMPT="Spese all'incasso "
SIZE=602
[GRADD] [ADDBOLLI]
GROUP=2500 GROUP=2400
X=1
Y=0
MSKID=DLG_NULL
TYPE=T_CORNICE
PROMPT="Addebiti"
SIZE=7603
[ADDBRB]
GROUP=2500
X=2
Y=1
FIELDNAME=ADDBRB
MSKID=F_ADDBRB
TYPE=T_CHECKBOX
PROMPT="Bolli ricevute bancarie"
SPECIAL=ME 0 DISABLE,F_CODIVABRB~ME 1 ENABLE,F_CODIVABRB
[ADDBTR]
GROUP=2500
X=32
Y=1
FIELDNAME=ADDBTR
MSKID=F_ADDBTR
TYPE=T_CHECKBOX
PROMPT="Bolli tratte"
SPECIAL=ME 0 DISABLE,F_CODIVABTR|DISABLE,F_CODIVABTRE~ME 1 ENABLE,F_CODIVABTR|ENABLE,F_CODIVABTRE
[ADDBDE]
GROUP=2500
X=51
Y=1
FIELDNAME=ADDBDE
MSKID=F_ADDBDE
TYPE=T_CHECKBOX
PROMPT="Bolli documenti esenti"
SPECIAL=ME 0 DISABLE,F_CODIVABDE~ME 1 ENABLE,F_CODIVABDE
[GRCODIVA]
GROUP=2600
X=1
Y=0
MSKID=DLG_NULL
TYPE=T_CORNICE
PROMPT="Codici iva bolli"
SIZE=7604
[CODIVABRB]
GROUP=2600
X=2
Y=1
FIELDNAME=CODIVABRB
MSKID=F_CODIVABRB
TYPE=T_STRINGA
PROMPT="Ricevute bancarie "
USE=%IVA
INPUT=CODTAB F_CODIVABRB
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODIVABRB CODTAB
SIZE=4
[CODIVABTR]
GROUP=2600
X=40 X=40
Y=1 Y=0
FIELDNAME=CODIVABTR FIELDNAME=ADDBOLLI
MSKID=F_CODIVABTR MSKID=F_ADDBOLLI
TYPE=T_STRINGA TYPE=T_CHECKBOX
PROMPT="Tratte " PROMPT="Addebito bolli "
USE=%IVA
INPUT=CODTAB F_CODIVABTR
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODIVABTR CODTAB
SIZE=4
[CODIVABTRE]
GROUP=2600
X=2
Y=2
FIELDNAME=CODIVABTRE
MSKID=F_CODIVABTRE
TYPE=T_STRINGA
PROMPT="Tratte estere "
USE=%IVA
INPUT=CODTAB F_CODIVABTRE
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODIVABTRE CODTAB
SIZE=4
[CODIVABDE]
GROUP=2600
X=40
Y=2
FIELDNAME=CODIVABDE
MSKID=F_CODIVABDE
TYPE=T_STRINGA
PROMPT="Documenti esenti "
USE=%IVA
INPUT=CODTAB F_CODIVABDE
DISPLAY="Codice" CODTAB~"Descrizione@50" S0
OUTPUT=F_CODIVABDE CODTAB
SIZE=4
[UMPNETTO] [UMPNETTO]
GROUP=2700 GROUP=2700
@ -1627,122 +1534,6 @@ PROMPT="Causale di magazzino 2 "
SIZE=50 SIZE=50
FLAG=U FLAG=U
// ??? Campi aggiunti da Andrea
//[SCONFIS]
//GROUP=3000
//X=2
//Y=0
//FIELDNAME=???
//MSKID=F_SCONFIS
//TYPE=T_STRINGA
//PROMPT="Scontrino Fiscale "
//SIZE=30
//[RICFIS]
//GROUP=3200
//X=2
//Y=0
//FIELDNAME=???
//MSKID=F_RICFIS
//TYPE=T_CHECKBOX
//PROMPT="Ricevuta fiscale"
//[GRSPESEADD]
//GROUP=3400
//X=2
//Y=0
//MSKID=DLG_NULL
//TYPE=T_CORNICE
//PROMPT=Spese da addebitare
//SIZE=4004
//[SPESEADD1]
//GROUP=3400
//X=2
//Y=1
//FIELDNAME=???
//MSKID=F_SPESEADD1
//TYPE=T_STRINGA
//PROMPT="Spesa 1 "
//USE=%SAD
//INPUT=CODTAB F_SPESEADD1
//DISPLAY="Codice Spesa " CODTAB~"Descrizione@20" S0
//OUTPUT=F_SPESEADD1 CODTAB
//SIZE=3
//[SPESEADD2]
//GROUP=3400
//X=24
//Y=1
//FIELDNAME=???
//MSKID=F_SPESEADD2
//TYPE=T_STRINGA
//PROMPT="Spesa 2 "
//USE=@F_SPESEADD1
//INPUT=CODTAB F_SPESEADD2
//DISPLAY=@F_SPESEADD1
//OUTPUT=F_SPESEADD2 CODTAB
//SIZE=3
//[SPESEADD3]
//GROUP=3400
//X=2
//Y=2
//FIELDNAME=???
//MSKID=F_SPESEADD3
//TYPE=T_STRINGA
//PROMPT="Spesa 3 "
//USE=@F_SPESEADD1
//INPUT=CODTAB F_SPESEADD3
//DISPLAY=@F_SPESEADD1
//OUTPUT=F_SPESEADD3 CODTAB
//SIZE=3
//[SPESEADD4]
//GROUP=3400
//X=24
//Y=2
//FIELDNAME=???
//MSKID=F_SPESEADD4
//TYPE=T_STRINGA
//PROMPT="Spesa 4 "
//USE=@F_SPESEADD1
//INPUT=CODTAB F_SPESEADD4
//DISPLAY=@F_SPESEADD1
//OUTPUT=F_SPESEADD4 CODTAB
//SIZE=3
//[NATTRASP]
//GROUP=3300
//X=2
//Y=0
//FIELDNAME=???
//MSKID=F_NATTRASP
//TYPE=T_STRINGA
//PROMPT="Natura trasporto "
//SIZE=3
//[NATTRANS]
//GROUP=3300
//X=2
//Y=1
//FIELDNAME=???
//MSKID=F_NATRANS
//TYPE=T_STRINGA
//PROMPT="Natura transazione "
//SIZE=3
//[REGIME]
//GROUP=3300
//X=40
//Y=1
//FIELDNAME=???
//MSKID=F_REGIME
//TYPE=T_STRINGA
//PROMPT="Regime "
//SIZE=3
[BLANK] [BLANK]
GROUP=4000 GROUP=4000
X=100 X=100
@ -1752,3 +1543,4 @@ TYPE=T_STRINGA
PROMPT="" PROMPT=""
SIZE=1 SIZE=1


14
ve/veuml.h
View File

@ -53,13 +53,7 @@
#define F_IMPNETTI 149 #define F_IMPNETTI 149
#define F_RAGGREFF 150 // GESTITO DAL MOTORE #define F_RAGGREFF 150 // GESTITO DAL MOTORE
#define F_SPESEINC 151 #define F_SPESEINC 151
#define F_ADDBRB 152 #define F_ADDBOLLI 152
#define F_ADDBTR 153
#define F_ADDBDE 154
#define F_CODIVABRB 155
#define F_CODIVABTR 156
#define F_CODIVABTRE 157
#define F_CODIVABDE 158
#define F_UMTARA 159 #define F_UMTARA 159
#define F_TARA 160 #define F_TARA 160
#define F_UMPNETTO 161 #define F_UMPNETTO 161
@ -82,12 +76,6 @@
#define F_ATTIVAANNO 179 // GESTITO DAL MOTORE #define F_ATTIVAANNO 179 // GESTITO DAL MOTORE
#define F_OCCASEDIT 180 // GESTITO DAL MOTORE #define F_OCCASEDIT 180 // GESTITO DAL MOTORE
#define F_CATVEN 181 #define F_CATVEN 181
#define F_SCONFIS 182 // Andrea ?? verificare
#define F_RICFIS 183 // Andrea ?? verificare
#define F_SPESEADD1 184 // Andrea ?? verificare
#define F_SPESEADD2 185 // Andrea ?? verificare
#define F_SPESEADD3 186 // Andrea ?? verificare
#define F_SPESEADD4 187 // Andrea ?? verificare
#define F_CODVAL1 200 #define F_CODVAL1 200
#define F_NOMEVAL1 201 #define F_NOMEVAL1 201