Sistemazione tabelle etc...
git-svn-id: svn://10.65.10.50/trunk@3530 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
pirro
parent
db82d5d19f
commit
ec750c7e02
42
ve/basteld.uml
Executable file
42
ve/basteld.uml
Executable file
@ -0,0 +1,42 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Elaborazioni differite" -1 -1 50 8
|
||||
STRING F_INIZIO1 8
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da cod. elaborazione "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
USE %ELD
|
||||
INPUT CODTAB F_INIZIO1
|
||||
DISPLAY "Cod. elaborazione differita" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FINE1 8
|
||||
BEGIN
|
||||
PROMPT 2 3 "A cod. elaborazione "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||
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 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
42
ve/bastfrd.uml
Executable file
42
ve/bastfrd.uml
Executable file
@ -0,0 +1,42 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Formule documenti" -1 -1 50 8
|
||||
STRING F_INIZIO1 10
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da cod. formula "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
USE %FRD
|
||||
INPUT CODTAB F_INIZIO1
|
||||
DISPLAY "Cod. formula documento" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FINE1 10
|
||||
BEGIN
|
||||
PROMPT 2 3 "A cod. formula "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||
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 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
42
ve/bastfrr.uml
Executable file
42
ve/bastfrr.uml
Executable file
@ -0,0 +1,42 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Formule righe documenti" -1 -1 50 8
|
||||
STRING F_INIZIO1 10
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da cod. formula "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
USE %FRR
|
||||
INPUT CODTAB F_INIZIO1
|
||||
DISPLAY "Cod. formula documento" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FINE1 10
|
||||
BEGIN
|
||||
PROMPT 2 3 "A cod. formula "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||
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 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
66
ve/bastmag.uml
Executable file
66
ve/bastmag.uml
Executable file
@ -0,0 +1,66 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Magazzini e depositi" -1 -1 58 8
|
||||
|
||||
STRING F_INIZIO1 3
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da magazzino "
|
||||
HELP "Inserire il codice d'inizio "
|
||||
FIELD LF_TABCOM->CODTAB[1,3]
|
||||
USE MAG
|
||||
INPUT CODTAB[1,3] F_INIZIO1
|
||||
INPUT CODTAB[4,5] F_INIZIO2
|
||||
DISPLAY "Codice Magazzino" CODTAB[1,3]
|
||||
DISPLAY "Codice Deposito" CODTAB[4,5]
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB[1,3]
|
||||
OUTPUT F_INIZIO2 CODTAB[4,5]
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_INIZIO2 2
|
||||
BEGIN
|
||||
PROMPT 28 1 "Da deposito "
|
||||
HELP "Inserire il codice d'inizio "
|
||||
FIELD LF_TABCOM->CODTAB[4,5]
|
||||
COPY ALL F_INIZIO1
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
|
||||
STRING F_FINE1 3
|
||||
BEGIN
|
||||
PROMPT 2 3 "A magazzino "
|
||||
HELP "Inserire il codice di fine "
|
||||
FIELD LF_TABCOM->CODTAB[1,3]
|
||||
COPY USE F_INIZIO1
|
||||
INPUT CODTAB[1,3] F_FINE1
|
||||
INPUT CODTAB[4,5] F_FINE2
|
||||
COPY DISPLAY F_INIZIO1
|
||||
OUTPUT F_FINE1 CODTAB[1,3]
|
||||
OUTPUT F_FINE2 CODTAB[4,5]
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
|
||||
STRING F_FINE2 2
|
||||
BEGIN
|
||||
PROMPT 28 3 "A deposito "
|
||||
HELP "Inserire il codice di fine "
|
||||
FIELD LF_TABCOM->CODTAB[4,5]
|
||||
COPY ALL F_FINE1
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
42
ve/bastnum.uml
Executable file
42
ve/bastnum.uml
Executable file
@ -0,0 +1,42 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Numerazione documenti" -1 -1 50 8
|
||||
STRING F_INIZIO1 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da cod. numerazione "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
USE %NUM
|
||||
INPUT CODTAB F_INIZIO1
|
||||
DISPLAY "Cod. numerazione" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FINE1 4
|
||||
BEGIN
|
||||
PROMPT 2 3 "A cod. numerazione "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||
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 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
42
ve/bastprs.uml
Executable file
42
ve/bastprs.uml
Executable file
@ -0,0 +1,42 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Prestazioni" -1 -1 50 8
|
||||
STRING F_INIZIO1 8
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da cod. prestazione "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
USE PRS
|
||||
INPUT CODTAB F_INIZIO1
|
||||
DISPLAY "Cod. prestazione" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FINE1 8
|
||||
BEGIN
|
||||
PROMPT 2 3 "A cod. prestazione "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||
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 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
42
ve/bastspp.uml
Executable file
42
ve/bastspp.uml
Executable file
@ -0,0 +1,42 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Spese" -1 -1 50 8
|
||||
STRING F_INIZIO1 8
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da cod. spesa "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
USE SPP
|
||||
INPUT CODTAB F_INIZIO1
|
||||
DISPLAY "Cod. spesa" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FINE1 8
|
||||
BEGIN
|
||||
PROMPT 2 3 "A cod. spesa "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||
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 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
42
ve/basttip.uml
Executable file
42
ve/basttip.uml
Executable file
@ -0,0 +1,42 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Tipi documento" -1 -1 50 8
|
||||
STRING F_INIZIO1 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da cod. tipo documento "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
USE %NUM
|
||||
INPUT CODTAB F_INIZIO1
|
||||
DISPLAY "Cod. tipo documento" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FINE1 4
|
||||
BEGIN
|
||||
PROMPT 2 3 "A cod. tipo documento "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||
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 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
42
ve/basttri.uml
Executable file
42
ve/basttri.uml
Executable file
@ -0,0 +1,42 @@
|
||||
#include "../ba/ba3200.h"
|
||||
|
||||
PAGE "Stampa Tabella Profilo righe documento" -1 -1 50 8
|
||||
STRING F_INIZIO1 4
|
||||
BEGIN
|
||||
PROMPT 2 1 "Da cod. tipo riga doc. "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
USE %TRI
|
||||
INPUT CODTAB F_INIZIO1
|
||||
DISPLAY "Cod. profilo riga doc." CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_INIZIO1 CODTAB
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_FINE1 4
|
||||
BEGIN
|
||||
PROMPT 2 3 "A cod. tipo riga doc. "
|
||||
FLAGS "U"
|
||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||
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 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
92
ve/batbeld.rpt
Executable file
92
ve/batbeld.rpt
Executable file
@ -0,0 +1,92 @@
|
||||
[Headers]
|
||||
132
|
||||
Tabella Elaborazioni differite
|
||||
1|@2g%s|Cod. Tabella
|
||||
1|@16g%s|Descrizione
|
||||
1|@68g%s|Tipo elaborazione
|
||||
2|@2g%s|Documento originale
|
||||
2|@80g%s|Documento finale
|
||||
2|@120g%s|Tipo Num.
|
||||
3|@2g%s|Num.
|
||||
3|@10g%s|Tipo 1
|
||||
3|@18g%s|Tipo 2
|
||||
3|@26g%s|Tipo 3
|
||||
3|@34g%s|Tipo 4
|
||||
3|@42g%s|Tipo 5
|
||||
3|@50g%s|S.1
|
||||
3|@54g%s|S.2
|
||||
3|@58g%s|S.3
|
||||
3|@62g%s|S.4
|
||||
3|@66g%s|S.5
|
||||
3|@70g%s|S.f
|
||||
3|@80g%s|Tipo
|
||||
3|@88g%s|S.f
|
||||
3|@92g%s|Num.
|
||||
4|@2g%s|Condizioni per raggruppamento documento
|
||||
4|@86g%s|Ragg. righe
|
||||
5|@2g%s|Cambio
|
||||
5|@9g%s|Sconto
|
||||
5|@16g%s|Doc.
|
||||
5|@23g%s|Num.
|
||||
5|@30g%s|Spediz.
|
||||
5|@37g%s|Porto
|
||||
5|@44g%s|Pag.
|
||||
5|@51g%s|App.
|
||||
5|@58g%s|List.
|
||||
5|@65g%s|Agente
|
||||
5|@72g%s|Trasp.
|
||||
5|@79g%s|Vett.
|
||||
5|@86g%s|Somma
|
||||
5|@93g%s|Mag.
|
||||
5|@100g%s|IVA
|
||||
5|@106g%s|P.zzo
|
||||
5|@112g%s|G.rif.
|
||||
5|@119g%s|Rif.t.
|
||||
5|@126g%s|I.r.d.
|
||||
[Rows]
|
||||
1|CODTAB|@2g@8s
|
||||
1|S0|@16g@50,ls
|
||||
1|S3|@68g@50t
|
||||
2|S5|@2g@8,ls
|
||||
2|S2[1,4]|@10g@8,ls
|
||||
2|S2[5,8]|@18g@8,ls
|
||||
2|S2[9,12]|@26g@8,ls
|
||||
2|S2[13,15]|@34g@8,ls
|
||||
2|S2[16,19]|@42g@8,ls
|
||||
2|S7[1,1]|@50g@4,cs
|
||||
2|S7[2,2]|@54g@4,cs
|
||||
2|S7[3,3]|@58g@4,cs
|
||||
2|S7[4,4]|@62g@4,cs
|
||||
2|S7[5,5]|@66g@4,cs
|
||||
2|S4|@70g@4,cs
|
||||
2|S8|@80g@8,ls
|
||||
2|S9|@88g@4,cs
|
||||
2|S6|@92g@8,ls
|
||||
2|B4|@120g@12t
|
||||
3|S1[1,1]|@2g@7,cs
|
||||
3|S1[2,2]|@9g@7,cs
|
||||
3|S1[3,3]|@16g@7,cs
|
||||
3|S1[4,4]|@23g@7,cs
|
||||
3|S1[5,5]|@30g@7,cs
|
||||
3|S1[6,6]|@37g@7,cs
|
||||
3|S1[7,7]|@44g@7,cs
|
||||
3|S1[8,8]|@51g@7,cs
|
||||
3|S1[9,9]|@58g@7,cs
|
||||
3|S1[10,10]|@65g@7,cs
|
||||
3|S1[11,11]|@72g@7,cs
|
||||
3|S1[12,12]|@79g@7,cs
|
||||
3|B0|@86g@7,cf
|
||||
3|S1[40,40]|@93g@7,cs
|
||||
3|S1[41,41]|@100g@6,cs
|
||||
3|S1[42,42]|@106g@6,cs
|
||||
3|B1|@112g@7,cf
|
||||
3|B2|@119g@7,cf
|
||||
3|B3|@128g@4,cf
|
||||
[Translations]
|
||||
4|S3| |Altro
|
||||
4|S3|CO|Consegna Ordini
|
||||
4|S3|FB|Fatturazione bolle
|
||||
4|S3|SM|Scarico magazzino
|
||||
4|S3|TC|Trasferimento a contabilita'
|
||||
4|B4| |Definitiva
|
||||
4|B4|X|Provvisoria
|
||||
17
ve/batbfrd.rpt
Executable file
17
ve/batbfrd.rpt
Executable file
@ -0,0 +1,17 @@
|
||||
[Headers]
|
||||
132
|
||||
Tabella Formule documento
|
||||
1|@2g%s|Cod. Tabella
|
||||
1|@16g%s|Descrizione
|
||||
2|@16g%s|Picture presentazione
|
||||
2|@40g%s|Tipo formula
|
||||
2|@70g%s|Formula
|
||||
[Rows]
|
||||
1|CODTAB|@2g@8s
|
||||
1|S0|@16g@50,ls
|
||||
2|S3|@16g@20,ls
|
||||
2|B0|@40g@15t
|
||||
2|S1|@70g@50,ls
|
||||
[Translations]
|
||||
4|B0| |Non numerica
|
||||
4|B0|X|Numerica
|
||||
17
ve/batbfrr.rpt
Executable file
17
ve/batbfrr.rpt
Executable file
@ -0,0 +1,17 @@
|
||||
[Headers]
|
||||
132
|
||||
Tabella Formule righe documento
|
||||
1|@2g%s|Cod. Tabella
|
||||
1|@16g%s|Descrizione
|
||||
2|@16g%s|Picture presentazione
|
||||
2|@40g%s|Tipo formula
|
||||
2|@70g%s|Formula
|
||||
[Rows]
|
||||
1|CODTAB|@2g@8s
|
||||
1|S0|@16g@50,ls
|
||||
2|S3|@16g@20,ls
|
||||
2|B0|@40g@15t
|
||||
2|S1|@70g@50,ls
|
||||
[Translations]
|
||||
4|B0| |Non numerica
|
||||
4|B0|X|Numerica
|
||||
70
ve/batbmag.h
70
ve/batbmag.h
@ -1,37 +1,37 @@
|
||||
#define F_CODICE 101
|
||||
#define F_DESCR 102
|
||||
#define F_CODDEP 123
|
||||
#define F_DESDEP 124
|
||||
#define F_IND 103
|
||||
#define F_LOC 104
|
||||
#define F_CAP 105
|
||||
#define F_PROV 106
|
||||
#define F_CIV 127
|
||||
#define F_COM 128
|
||||
#define F_NATMAG 107
|
||||
#define F_CODMAGSTA 108
|
||||
#define F_CODLGIOR 109
|
||||
#define F_CODLUNICO 110
|
||||
#define F_GESTGIA 111
|
||||
#define F_STALDIS 112
|
||||
#define F_FREQSTA 113
|
||||
#define F_STAFISART 114
|
||||
#define F_STAFISCAU 115
|
||||
#define F_ULTCORR 116
|
||||
#define F_PAGULTCORR 117
|
||||
#define F_ULTPREC 118
|
||||
#define F_PAGULTPREC 119
|
||||
#define F_STARIS 120
|
||||
#define F_LUNGMOD 121
|
||||
#define F_INTDITTA 122
|
||||
#define H_CODICE 125
|
||||
#define H_DESCR 126
|
||||
#define F_DITTA 127
|
||||
#define F_UNLOC 128
|
||||
#define H_IND 129
|
||||
#define H_CIV 130
|
||||
#define H_CAP 131
|
||||
#define H_COM 132
|
||||
#define H_LOC 133
|
||||
#define H_PROV 134
|
||||
#define F_ANNO 135
|
||||
#define F_CODDEP 103
|
||||
#define F_DESDEP 104
|
||||
#define F_IND 105
|
||||
#define F_LOC 106
|
||||
#define F_CAP 107
|
||||
#define F_PROV 108
|
||||
#define F_CIV 109
|
||||
#define F_COM 110
|
||||
#define F_NATMAG 111
|
||||
#define F_CODMAGSTA 112
|
||||
#define F_CODLGIOR 113
|
||||
#define F_CODLUNICO 114
|
||||
#define F_GESTGIA 115
|
||||
#define F_STALDIS 116
|
||||
#define F_FREQSTA 117
|
||||
#define F_STAFISART 118
|
||||
#define F_STAFISCAU 119
|
||||
#define F_ULTCORR 120
|
||||
#define F_PAGULTCORR 121
|
||||
#define F_ULTPREC 122
|
||||
#define F_PAGULTPREC 123
|
||||
#define F_STARIS 124
|
||||
#define F_LUNGMOD 125
|
||||
#define F_INTDITTA 126
|
||||
#define H_CODICE 127
|
||||
#define H_DESCR 128
|
||||
#define F_DITTA 129
|
||||
#define F_UNLOC 130
|
||||
#define H_IND 131
|
||||
#define H_CIV 132
|
||||
#define H_CAP 133
|
||||
#define H_COM 134
|
||||
#define H_LOC 135
|
||||
#define H_PROV 136
|
||||
#define F_ANNO 137
|
||||
|
||||
64
ve/batbmag.rpt
Executable file
64
ve/batbmag.rpt
Executable file
@ -0,0 +1,64 @@
|
||||
[Relations]
|
||||
13;COM==S5
|
||||
[Headers]
|
||||
132
|
||||
Tabella Banche
|
||||
1|@2g%s|Cod.Mag.
|
||||
1|@12g%s|Cod.Dep.
|
||||
1|@22g%s|Descrizione
|
||||
1|@74g%s|U.Loc.
|
||||
1|@82g%s|Natura del magazzino
|
||||
2|@12g%s|Sede : Indirizzo
|
||||
2|@49g%s|N.
|
||||
2|@61g%s|C.A.P.
|
||||
2|@69g%s|Comune
|
||||
2|@125g%s|Pr.
|
||||
3|@12g%s|Mag.
|
||||
3|@19g%s|L.G.
|
||||
3|@26g%s|L.U.
|
||||
3|@34g%s|Dep.
|
||||
3|@42g%s|C.F.A.
|
||||
3|@50g%s|Freq.
|
||||
3|@58g%s|R.F.A.
|
||||
3|@66g%s|R.F.C.
|
||||
3|@74g%s|Pag.
|
||||
3|@81g%s|Data
|
||||
3|@93g%s|Pag.
|
||||
3|@100g%s|Data
|
||||
3|@112g%s|Intest.
|
||||
3|@120g%s|St.r.
|
||||
3|@127g%s|L.mod.
|
||||
|
||||
[Rows]
|
||||
1|CODTAB[1,3]|@2g@3s
|
||||
1|CODTAB[4,5]|@12g@2s
|
||||
1|S0|@22g@50,ls
|
||||
1|I1|@74g@3n
|
||||
1|I2|@82g@50t
|
||||
2|S2|@12g@35,ls
|
||||
2|S7|@49g@10,ls
|
||||
2|S3|@61g@5,ls
|
||||
2|13->DENCOM|@69g@50,ls
|
||||
2|13->PROVCOM|@125g@2,ls
|
||||
3|S6|@12g@3s
|
||||
3|S8|@19g@3s
|
||||
3|S9|@26g@3s
|
||||
3|B0|@34g@2f
|
||||
3|B1|@42g@2f
|
||||
3|I4|@50g@2n
|
||||
3|B2|@58g@2f
|
||||
3|B3|@66g@2f
|
||||
3|I5|@74g@3n
|
||||
3|D0|@81g@10d
|
||||
3|I6|@93g@3n
|
||||
3|D1|@100g@10d
|
||||
3|B4|@112g@2f
|
||||
3|B5|@120g@2f
|
||||
3|I7|@127g@2n
|
||||
[Translations]
|
||||
5|I2|1|Proprietà dell'azienda
|
||||
5|I2|2|Materiale nostro in lavorazione presso terzi
|
||||
5|I2|3|Materiale nostro in deposito presso terzi
|
||||
5|I2|4|Materiale di terzi in lavorazione presso l'azienda
|
||||
5|I2|5|Materiale di terzi in deposito presso l'azienda
|
||||
|
||||
@ -229,7 +229,7 @@ END
|
||||
LISTBOX F_NATMAG 1 50
|
||||
BEGIN
|
||||
PROMPT 2 17 "Natura del magazzino "
|
||||
FIELD MAG->I1
|
||||
FIELD MAG->I2
|
||||
ITEM "1|Proprietà dell'azienda "
|
||||
ITEM "2|Materiale nostro in lavorazione presso terzi"
|
||||
ITEM "3|Materiale nostro in deposito presso terzi"
|
||||
|
||||
25
ve/batbnum.rpt
Executable file
25
ve/batbnum.rpt
Executable file
@ -0,0 +1,25 @@
|
||||
[Headers]
|
||||
132
|
||||
Tabella Numerazione documenti
|
||||
1|@2g%s|Cod. Tabella
|
||||
1|@16g%s|Descrizione
|
||||
1|@68g%s|Prefisso
|
||||
1|@77g%s|Suffisso
|
||||
1|@86g%s|Provv/def.
|
||||
1|@100g%s|Aut.
|
||||
1|@105g%s|Tipi documenti validi
|
||||
[Rows]
|
||||
1|CODTAB|@2g@8s
|
||||
1|S0|@16g@50,ls
|
||||
1|S6|@68g@7,ls
|
||||
1|S7|@77g@7,ls
|
||||
1|B0|@86g@10t
|
||||
1|B1|@100g@2,cf
|
||||
1|S2[1,4]|@105g@4,ls
|
||||
1|S2[5,8]|@110g@4,ls
|
||||
1|S2[9,12]|@115g@4,ls
|
||||
1|S2[13,16]|@120g@4,ls
|
||||
1|S2[17,20]|@125g@4,ls
|
||||
[Translations]
|
||||
4|B0| |Definitiva
|
||||
4|B0|X|Provvisoria
|
||||
12
ve/batbprs.h
Executable file
12
ve/batbprs.h
Executable file
@ -0,0 +1,12 @@
|
||||
#define F_CODICE 101
|
||||
#define F_DESCR 102
|
||||
#define F_CODASSFIS 103
|
||||
#define F_CODASSFIS1 104
|
||||
#define F_CODDIV 105
|
||||
#define F_CODDIV1 106
|
||||
#define F_PREZZO 107
|
||||
#define F_UM 108
|
||||
#define F_GRUPPO 109
|
||||
#define F_CONTO 110
|
||||
#define F_SOTTO 111
|
||||
#define F_DESCRCONTO 112
|
||||
25
ve/batbprs.rpt
Executable file
25
ve/batbprs.rpt
Executable file
@ -0,0 +1,25 @@
|
||||
[Relations]
|
||||
19;GRUPPO==I0|CONTO==I1|SOTTOCONTO==I2
|
||||
|
||||
[Headers]
|
||||
132
|
||||
Tabella prestazioni
|
||||
1|@2g%s|Cod. Tabella
|
||||
1|@16g%s|Descrizione
|
||||
1|@68g%s|IVA
|
||||
1|@74g%s|Valuta
|
||||
1|@82g%s|Prezzo
|
||||
1|@97g%s|UM
|
||||
2|@16g%s|Cod. Conto
|
||||
2|@36g%s|Descrizione conto
|
||||
[Rows]
|
||||
1|CODTAB|@2g@8s
|
||||
1|S0|@16g@50,ls
|
||||
1|S3|@68g@4s
|
||||
1|S4|@74g@4s
|
||||
1|R0|@82g@13n
|
||||
1|S7|@97g@2s
|
||||
2|I0|@16g@3n
|
||||
2|I1|@21g@3n
|
||||
2|I2|@26g@7n
|
||||
2|19->DESCR|@36g@40,ls
|
||||
154
ve/batbprs.uml
Executable file
154
ve/batbprs.uml
Executable file
@ -0,0 +1,154 @@
|
||||
#include "batbprs.h"
|
||||
|
||||
TOOLBAR "" 0 20 60 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella prestazioni" 11 60 14
|
||||
|
||||
GROUPBOX DLG_NULL 75 7
|
||||
BEGIN
|
||||
PROMPT 1 0 ""
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
STRING F_CODICE 8
|
||||
BEGIN
|
||||
PROMPT 2 2 "Cod. tabella "
|
||||
FIELD SPP->CODTAB
|
||||
KEY 1
|
||||
USE PRS
|
||||
FLAGS "U"
|
||||
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 2 4 "Descrizione "
|
||||
FIELD SPP->S0
|
||||
KEY 2
|
||||
USE SPP KEY 2
|
||||
INPUT S0 F_DESCR
|
||||
DISPLAY "Descrizione@50 " S0
|
||||
DISPLAY "Codice " CODTAB
|
||||
OUTPUT F_CODICE CODTAB
|
||||
OUTPUT F_DESCR S0
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
|
||||
STRING F_CODASSFIS 4
|
||||
BEGIN
|
||||
PROMPT 2 7 "Codice IVA "
|
||||
FIELD SPP->S3
|
||||
FLAGS "U"
|
||||
USE %IVA
|
||||
INPUT CODTAB F_CODASSFIS
|
||||
DISPLAY "Codice " CODTAB
|
||||
DISPLAY "D2escrizione@50" S0
|
||||
OUTPUT F_CODASSFIS CODTAB
|
||||
OUTPUT F_CODASSFIS1 S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_CODASSFIS1 50
|
||||
BEGIN
|
||||
PROMPT 25 7 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
STRING F_CODDIV 4
|
||||
BEGIN
|
||||
PROMPT 2 8 "Codice valuta"
|
||||
FIELD SPP->S4
|
||||
FLAGS "U"
|
||||
USE %VAL
|
||||
INPUT CODTAB F_CODDIV
|
||||
DISPLAY "Codice " CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODDIV CODTAB
|
||||
OUTPUT F_CODDIV1 S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_CODDIV1 50
|
||||
BEGIN
|
||||
PROMPT 25 8 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
NUMBER F_PREZZO 13 2
|
||||
BEGIN
|
||||
PROMPT 2 10 "Prezzo "
|
||||
FIELD SPP->R0
|
||||
END
|
||||
|
||||
STRING F_UM 2
|
||||
BEGIN
|
||||
PROMPT 35 10 "U.M. "
|
||||
FIELD S7
|
||||
FLAGS "U"
|
||||
USE %UMS
|
||||
INPUT CODTAB F_UM
|
||||
DISPLAY "U.M." CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_UM CODTAB
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
NUMBER F_GRUPPO 3
|
||||
BEGIN
|
||||
PROMPT 2 12 "Codice conto "
|
||||
FIELD SPP->I0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
NUMBER F_CONTO 3
|
||||
BEGIN
|
||||
PROMPT 20 12 ""
|
||||
FIELD SPP->I1
|
||||
USE LF_PCON
|
||||
INPUT GRUPPO F_GRUPPO
|
||||
INPUT CONTO F_CONTO
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT F_GRUPPO GRUPPO
|
||||
OUTPUT F_CONTO CONTO
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN CG0 -0
|
||||
END
|
||||
|
||||
NUMBER F_SOTTO 6
|
||||
BEGIN
|
||||
PROMPT 28 12 ""
|
||||
FIELD SPP->I2
|
||||
USE LF_PCON
|
||||
INPUT GRUPPO F_GRUPPO
|
||||
INPUT CONTO F_CONTO
|
||||
INPUT SOTTOCONTO F_SOTTO
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
DISPLAY "Sottoconto" SOTTOCONTO
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT F_GRUPPO GRUPPO
|
||||
OUTPUT F_CONTO CONTO
|
||||
OUTPUT F_SOTTO SOTTOCONTO
|
||||
OUTPUT F_DESCRCONTO DESCR
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN CG0 -0
|
||||
END
|
||||
|
||||
STRING F_DESCRCONTO 50
|
||||
BEGIN
|
||||
PROMPT 15 14 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
ENDMASK
|
||||
@ -1,5 +1,5 @@
|
||||
[Relations]
|
||||
ASF,CODTAB=S8,1,0,200
|
||||
ASF;CODTAB=S8,1,0,200
|
||||
|
||||
[Headers]
|
||||
132
|
||||
@ -16,7 +16,7 @@ Tabella Raggruppamenti Fiscali Articoli
|
||||
|
||||
[Rows]
|
||||
1|CODTAB|@2g@5s
|
||||
1|S0|@15g@50,ls
|
||||
1|S0|@15g@50,ls
|
||||
1|S7|@71g@2,ls
|
||||
1|S8|@89g@1,ls
|
||||
1|-200->S0|@105g@50,ls
|
||||
|
||||
43
ve/batbspp.h
43
ve/batbspp.h
@ -1,26 +1,17 @@
|
||||
#define F_CODICE 101
|
||||
#define F_DESCR 102
|
||||
#define F_CODASSFIS 103
|
||||
#define F_CODASSFIS1 125
|
||||
#define F_CODDIV 104
|
||||
#define F_CODDIV1 105
|
||||
#define F_PREZZO 106
|
||||
#define F_VALORE 107
|
||||
#define F_NCAMPOCAL 108
|
||||
#define F_NCAMPOCAL1 122
|
||||
#define F_PERCENTUALE 109
|
||||
#define F_TIPO 110
|
||||
#define F_INCASSO 111
|
||||
#define F_STAMPA 112
|
||||
#define F_CODTABAGG 113
|
||||
#define F_CODTABAGG1 114
|
||||
#define F_NCAMPOAUTOM 115
|
||||
#define F_NCAMPOAUTOM1 116
|
||||
#define F_SEGNO 117
|
||||
#define F_GRUPPO 118
|
||||
#define F_CONTO 119
|
||||
#define F_SOTTO 120
|
||||
#define F_DESCRCONTO 121
|
||||
#define F_CODMOVCOM 123
|
||||
#define F_CODMOVCOM1 124
|
||||
#define F_CAMPI 125
|
||||
#define F_CODICE 101
|
||||
#define F_DESCR 102
|
||||
#define F_CODASSFIS 103
|
||||
#define F_CODASSFIS1 104
|
||||
#define F_CODDIV 105
|
||||
#define F_CODDIV1 106
|
||||
#define F_PREZZO 107
|
||||
#define F_QTA 108
|
||||
#define F_NCAMPOCAL 109
|
||||
#define F_NCAMPOCAL1 110
|
||||
#define F_PERCENTUALE 111
|
||||
#define F_GRUPPO 112
|
||||
#define F_CONTO 113
|
||||
#define F_SOTTO 114
|
||||
#define F_DESCRCONTO 115
|
||||
#define F_CAMPI 116
|
||||
#define F_UM 117
|
||||
|
||||
34
ve/batbspp.rpt
Executable file
34
ve/batbspp.rpt
Executable file
@ -0,0 +1,34 @@
|
||||
[Relations]
|
||||
19;GRUPPO==I0|CONTO==I1|SOTTOCONTO==I2
|
||||
%FRD;CODTAB==S5;1;0;200
|
||||
|
||||
[Headers]
|
||||
132
|
||||
Tabella Spese
|
||||
1|@2g%s|Cod. Tabella
|
||||
1|@16g%s|Descrizione
|
||||
1|@68g%s|IVA
|
||||
1|@74g%s|Valuta
|
||||
1|@82g%s|Prezzo
|
||||
1|@97g%s|Q.ta
|
||||
1|@112g%s|%
|
||||
1|@120g%s|U.M.
|
||||
2|@16g%s|Cod.form.
|
||||
2|@28g%s|Formula
|
||||
2|@80g%s|Cod. Conto
|
||||
2|@92g%s|Descrizione conto
|
||||
[Rows]
|
||||
1|CODTAB|@2g@8s
|
||||
1|S0|@16g@50,ls
|
||||
1|S3|@68g@4s
|
||||
1|S4|@74g@4s
|
||||
1|R0|@82g@13n
|
||||
1|R1|@97g@13n
|
||||
1|R2|@112g@5n
|
||||
1|S7|@120g@2s
|
||||
2|S5|@16g@10,ls
|
||||
2|-200->S1|@28g@50,ls
|
||||
2|I0|@80g@3n
|
||||
2|I1|@85g@3n
|
||||
2|I2|@90g@7n
|
||||
2|19->DESCR|@92g@40,ls
|
||||
146
ve/batbspp.uml
146
ve/batbspp.uml
@ -4,7 +4,7 @@ TOOLBAR "" 0 20 60 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella spese e prestazioni " 11 60 14
|
||||
PAGE "Tabella spese " 11 60 14
|
||||
|
||||
GROUPBOX DLG_NULL 75 7
|
||||
BEGIN
|
||||
@ -12,7 +12,7 @@ BEGIN
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
STRING F_CODICE 3
|
||||
STRING F_CODICE 8
|
||||
BEGIN
|
||||
PROMPT 2 2 "Cod. tabella "
|
||||
FIELD SPP->CODTAB
|
||||
@ -45,14 +45,16 @@ END
|
||||
|
||||
STRING F_CODASSFIS 4
|
||||
BEGIN
|
||||
PROMPT 2 7 "Codice IVA "
|
||||
PROMPT 2 7 "Codice IVA "
|
||||
FIELD SPP->S3
|
||||
FLAG "U"
|
||||
USE %IVA
|
||||
INPUT CODTAB F_CODASSFIS
|
||||
DISPLAY "Codice " CODTAB
|
||||
DISPLAY "D2escrizione@50" S0
|
||||
OUTPUT F_CODASSFIS CODTAB
|
||||
OUTPUT F_CODASSFIS1 S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_CODASSFIS1 50
|
||||
@ -63,14 +65,16 @@ END
|
||||
|
||||
STRING F_CODDIV 4
|
||||
BEGIN
|
||||
PROMPT 2 8 "Codice valuta "
|
||||
PROMPT 2 8 "Codice valuta"
|
||||
FIELD SPP->S4
|
||||
USE VAL
|
||||
FLAG "U"
|
||||
USE %VAL
|
||||
INPUT CODTAB F_CODDIV
|
||||
DISPLAY "Codice " CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODDIV CODTAB
|
||||
OUTPUT F_CODDIV1 S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_CODDIV1 50
|
||||
@ -81,111 +85,79 @@ END
|
||||
|
||||
LISTBOX F_CAMPI 15
|
||||
BEGIN
|
||||
PROMPT 2 10 "Campo da proporre "
|
||||
PROMPT 2 10 "Campo da proporre "
|
||||
FIELD SPP->S6
|
||||
ITEM "Q|Qta prezzo "
|
||||
MESSAGE HIDE,F_VALORE|HIDE,F_PERCENTUALE|SHOW,F_PREZZO
|
||||
MESSAGE HIDE,F_PERCENTUALE|SHOW,F_PREZZO|SHOW,F_QTA|ENABLE,F_QTA|RESET,F_PERCENTUALE|RESET,F_QTA|SHOW,F_UM
|
||||
ITEM "V|Valore "
|
||||
MESSAGE HIDE,F_PREZZO|HIDE,F_PERCENTUALE|SHOW,F_VALORE
|
||||
MESSAGE HIDE,F_PERCENTUALE|SHOW,F_PREZZO|SHOW,F_QTA|"1",F_QTA|DISABLE,F_QTA|RESET,F_PERCENTUALE|SHOW,F_UM
|
||||
ITEM "P|Percentuale "
|
||||
MESSAGE HIDE,F_PREZZO|HIDE,F_VALORE|SHOW,F_PERCENTUALE
|
||||
MESSAGE HIDE,F_PREZZO|SHOW,F_PERCENTUALE|HIDE,F_QTA|RESET,F_PREZZO|RESET,F_QTA|HIDE,F_UM
|
||||
END
|
||||
|
||||
NUMBER F_PREZZO 13 2
|
||||
BEGIN
|
||||
PROMPT 50 10 "Prezzo "
|
||||
PROMPT 2 11 "Prezzo "
|
||||
FIELD SPP->R0
|
||||
END
|
||||
|
||||
NUMBER F_VALORE 13 2
|
||||
NUMBER F_QTA 13 2
|
||||
BEGIN
|
||||
PROMPT 50 10 "Valore "
|
||||
PROMPT 35 11 "Quantita' "
|
||||
FIELD SPP->R1
|
||||
END
|
||||
|
||||
STRING F_UM 2
|
||||
BEGIN
|
||||
PROMPT 63 11 "U.M. "
|
||||
FIELD S7
|
||||
FLAGS "U"
|
||||
USE %UMS
|
||||
INPUT CODTAB F_UM
|
||||
DISPLAY "U.M." CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_UM CODTAB
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
NUMBER F_PERCENTUALE 5 2
|
||||
BEGIN
|
||||
PROMPT 50 10 "Percentuale "
|
||||
PROMPT 2 11 "Percentuale "
|
||||
FIELD SPP->R2
|
||||
END
|
||||
|
||||
STRING F_NCAMPOCAL 2
|
||||
STRING F_NCAMPOCAL 10
|
||||
BEGIN
|
||||
PROMPT 2 12 "N. calcolo "
|
||||
FIELD SPP->I0
|
||||
PROMPT 2 13 "Formula Doc. "
|
||||
FIELD SPP->S5
|
||||
FLAG "U"
|
||||
USE %FRD
|
||||
INPUT CODTAB F_NCAMPOCAL
|
||||
DISPLAY "Codice " CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_NCAMPOCAL CODTAB
|
||||
OUTPUT F_NCAMPOCAL1 S0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
STRING F_NCAMPOCAL1 50
|
||||
BEGIN
|
||||
PROMPT 25 12 ""
|
||||
PROMPT 15 14 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
LISTBOX F_TIPO 8
|
||||
BEGIN
|
||||
PROMPT 2 14 "Tipo spesa "
|
||||
FIELD SPP->S7
|
||||
ITEM "S|Spesa "
|
||||
ITEM "M|Merce "
|
||||
END
|
||||
|
||||
BOOLEAN F_INCASSO
|
||||
BEGIN
|
||||
PROMPT 2 16 "Spesa da incassare su prima rata "
|
||||
FIELD SPP->B0
|
||||
END
|
||||
|
||||
BOOLEAN F_STAMPA
|
||||
BEGIN
|
||||
PROMPT 2 17 "Stampa riga su corpo documento "
|
||||
FIELD SPP->B1
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella spese e prestazioni " 11 60 14
|
||||
|
||||
NUMBER F_CODTABAGG 2
|
||||
BEGIN
|
||||
PROMPT 2 2 "N. agg. piede "
|
||||
FIELD SPP->I3
|
||||
END
|
||||
|
||||
STRING F_CODTABAGG1 50
|
||||
BEGIN
|
||||
PROMPT 25 2 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
NUMBER F_NCAMPOAUTOM 2
|
||||
BEGIN
|
||||
PROMPT 2 4 "N. calcolo spese "
|
||||
FIELD SPP->I4
|
||||
END
|
||||
|
||||
STRING F_NCAMPOAUTOM1 50
|
||||
BEGIN
|
||||
PROMPT 25 4 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
STRING F_SEGNO 1
|
||||
BEGIN
|
||||
PROMPT 2 6 "Segno "
|
||||
FIELD SPP->S8
|
||||
END
|
||||
|
||||
NUMBER F_GRUPPO 3
|
||||
BEGIN
|
||||
PROMPT 2 8 "Conto ric./costo "
|
||||
FIELD SPP->S2
|
||||
PROMPT 2 16 "Codice conto "
|
||||
FIELD SPP->I0
|
||||
CHECKTYPE NORMAL
|
||||
END
|
||||
|
||||
NUMBER F_CONTO 3
|
||||
BEGIN
|
||||
PROMPT 28 8 ""
|
||||
PROMPT 20 16 ""
|
||||
FIELD SPP->I1
|
||||
USE LF_PCON SELECT (INDBIL="3")||(INDBIL="4")
|
||||
USE LF_PCON
|
||||
INPUT GRUPPO F_GRUPPO
|
||||
INPUT CONTO F_CONTO
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
@ -193,16 +165,17 @@ BEGIN
|
||||
DISPLAY "Descrizione@50" DESCR
|
||||
OUTPUT F_GRUPPO GRUPPO
|
||||
OUTPUT F_CONTO CONTO
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN CG0 -0
|
||||
END
|
||||
|
||||
NUMBER F_SOTTO 6
|
||||
BEGIN
|
||||
PROMPT 38 8 ""
|
||||
PROMPT 28 16 ""
|
||||
FIELD SPP->I2
|
||||
USE LF_PCON
|
||||
INPUT GRUPPO F_GRUPPO SELECT
|
||||
INPUT CONTO F_CONTO SELECT
|
||||
INPUT GRUPPO F_GRUPPO
|
||||
INPUT CONTO F_CONTO
|
||||
INPUT SOTTOCONTO F_SOTTO
|
||||
DISPLAY "Gruppo" GRUPPO
|
||||
DISPLAY "Conto" CONTO
|
||||
@ -212,27 +185,14 @@ BEGIN
|
||||
OUTPUT F_CONTO CONTO
|
||||
OUTPUT F_SOTTO SOTTOCONTO
|
||||
OUTPUT F_DESCRCONTO DESCR
|
||||
CHECKTYPE NORMAL
|
||||
ADD RUN CG0 -0
|
||||
END
|
||||
|
||||
STRING F_DESCRCONTO 50
|
||||
BEGIN
|
||||
PROMPT 25 10 ""
|
||||
PROMPT 15 17 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
STRING F_CODMOVCOM 3
|
||||
BEGIN
|
||||
PROMPT 2 12 "Mov. commessa "
|
||||
FIELD SPP->S9
|
||||
END
|
||||
|
||||
STRING F_CODMOVCOM1 50
|
||||
BEGIN
|
||||
PROMPT 25 12 ""
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
16
ve/batbtip.rpt
Executable file
16
ve/batbtip.rpt
Executable file
@ -0,0 +1,16 @@
|
||||
[Headers]
|
||||
132
|
||||
Tabella Formule documento
|
||||
1|@2g%s|Cod.
|
||||
1|@7g%s|Descrizione
|
||||
1|@58g%s|Riferimento
|
||||
1|@109g%s|Pr.doc.
|
||||
1|@118g%s|Pr.st.
|
||||
1|@127g%s|Caus.
|
||||
[Rows]
|
||||
1|CODTAB|@2g@4s
|
||||
1|S0|@7g@50,ls
|
||||
1|S1|@58g@50,ls
|
||||
1|S4|@109g@8,ls
|
||||
1|S5|@118g@8,ls
|
||||
1|S6|@127g@3,ls
|
||||
@ -4,7 +4,7 @@ TOOLBAR "" 0 20 60 2
|
||||
|
||||
#include "toolbar.h"
|
||||
|
||||
ENDPAGE
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella tipi di documento" -1 -1 60 14
|
||||
|
||||
@ -45,7 +45,7 @@ END
|
||||
|
||||
STRING F_RIFERIMENTO 50
|
||||
BEGIN
|
||||
PROMPT 2 6 "Riferimento "
|
||||
PROMPT 2 6 "Riferimento "
|
||||
FIELD S1
|
||||
END
|
||||
|
||||
|
||||
15
ve/batbtri.rpt
Executable file
15
ve/batbtri.rpt
Executable file
@ -0,0 +1,15 @@
|
||||
[Headers]
|
||||
132
|
||||
Tabella Tipo riga documento
|
||||
1|@2g%s|Cod. Tabella
|
||||
1|@16g%s|Descrizione
|
||||
1|@68g%s|Tipo riga
|
||||
[Rows]
|
||||
1|CODTAB|@2g@8s
|
||||
1|S0|@16g@50,ls
|
||||
1|S7|@68g@12t
|
||||
[Translations]
|
||||
4|S7|M|Merce
|
||||
4|S7|S|Spese
|
||||
4|S7|C|Sconti
|
||||
4|S7|D|Descrizioni
|
||||
583
ve/bollac.src
583
ve/bollac.src
@ -1,289 +1,294 @@
|
||||
#include "veini.h"
|
||||
#include "veuml.h"
|
||||
#include "verig.h"
|
||||
// Esempio di profilo documento : Profilo Bolla Vendita
|
||||
|
||||
[MAIN]
|
||||
// Descrizione a caratteri del documento
|
||||
TYPE=Bolla di vendita
|
||||
// Dove sono le risorse per il documento
|
||||
MSKFILE=BOLLAC
|
||||
FRMFILE=BOLLAC.FRM
|
||||
// modifica
|
||||
PROGPIEDE=TOTNETTI|TRASPORTO|IMBALLO|GENERALI
|
||||
// modifica
|
||||
// Procedure utente da chiamare per il documento ( preprocessarle? )
|
||||
NUOVO=
|
||||
MODIFICA=
|
||||
CANCELLA=
|
||||
STAMPA=
|
||||
RAGGRUPPA=
|
||||
USER=
|
||||
// Indica se il documento è indirizzato ad un cliente o ad un fornitore
|
||||
TIPOCF=C
|
||||
|
||||
[INSERIMENTO]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=1,2,3,4,5,6,7,8,9
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=1
|
||||
|
||||
[MODIFICA]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=1,2,3,4,5
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=N
|
||||
|
||||
[CANCELLAZIONE]
|
||||
STATIVALIDI = 1,6,7
|
||||
STATOFINALE = 4
|
||||
REMOVE = 0
|
||||
|
||||
[STAMPA]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=1,2,3,4,5
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=6
|
||||
|
||||
[RAGGRUPPA]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=6,7,8,9
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=1
|
||||
|
||||
[SPECIALE]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=1,2,3,4,5,6,7,8,9
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=9
|
||||
|
||||
[PROFILO]
|
||||
// Si possono indicare, dopo il numero, PROMPT, HELP, WARNING cosi:
|
||||
// 1|Prompt|Help|Warning
|
||||
|
||||
// TIPOCF = S_NORMALE
|
||||
// CODCF = S_OBBLIGATORIO
|
||||
// RAGSOC = S_NORMALE
|
||||
OCCASEDIT = S_NORMALE //100
|
||||
OCFPI = S_NASCOSTO //100
|
||||
COFI = S_NORMALE //100
|
||||
STATOPAIV = S_NORMALE //100
|
||||
PAIVA = S_NORMALE //100
|
||||
GRRECAPITO = S_NORMALE //100
|
||||
INDCF = S_DISABILITATO //100
|
||||
CIVCF = S_DISABILITATO //100
|
||||
LOCALITACF = S_DISABILITATO //100
|
||||
CAPCF = S_DISABILITATO //100
|
||||
PROVCOM = S_DISABILITATO //100
|
||||
COMCF = S_DISABILITATO //100
|
||||
DENCOM = S_DISABILITATO //100
|
||||
STATOCF = S_DISABILITATO //100
|
||||
DESSTATOCF = S_DISABILITATO //100
|
||||
CODVAL1 = S_NORMALE //200
|
||||
CODVAL2 = S_NORMALE //200
|
||||
NOME_VAL1 = S_NORMALE //200
|
||||
NOME_VAL2 = S_NORMALE //200
|
||||
CAMBIO = S_NORMALE //200
|
||||
DATA_CAMBIO1 = S_NORMALE //200
|
||||
DATA_CAMBIO2 = S_NORMALE //200
|
||||
CODLIN = S_NORMALE //300
|
||||
DESLIN = S_NORMALE //300
|
||||
CODPAG = S_OBBLIGATORIO //400
|
||||
DESCODPAG = S_NORMALE //400
|
||||
GRSCADENZE = S_NORMALE //500
|
||||
DATAINSC = S_NORMALE //500
|
||||
DATASCAD1 = S_DISABILITATO //500
|
||||
DATASCAD2 = S_DISABILITATO //500
|
||||
DATASCAD3 = S_DISABILITATO //500
|
||||
DATASCAD4 = S_DISABILITATO //500
|
||||
DATASCAD5 = S_DISABILITATO //500
|
||||
CODABIA = S_OBBLIGATORIO //600
|
||||
CODCABA = S_OBBLIGATORIO //600
|
||||
DESBANAPP = S_NORMALE //600
|
||||
CODABIP = S_NORMALE //700
|
||||
CODCABP = S_NORMALE //700
|
||||
DESBANPRE = S_NORMALE //700
|
||||
CATVEN = S_NORMALE //800
|
||||
DESCATVEN = S_DISABILITATO //800
|
||||
CODLIST1 = S_NORMALE //800
|
||||
CODLIST2 = S_NORMALE //800
|
||||
DESLIST = S_DISABILITATO //800
|
||||
CODCONT1 = S_NORMALE //810
|
||||
CODCONT2 = S_NORMALE //810
|
||||
DESCONT = S_DISABILITATO //810
|
||||
CODCAMP = S_NORMALE //820
|
||||
DESCAMP = S_DISABILITATO //820
|
||||
SCONTOPERC = S_NORMALE //830
|
||||
GRINDSPED = S_NORMALE //900
|
||||
CODINDSP = S_NORMALE //900
|
||||
RAGSOCSP = S_DISABILITATO //900
|
||||
INDSP = S_DISABILITATO //900
|
||||
CIVSP = S_DISABILITATO //900
|
||||
LOCALITASP = S_DISABILITATO //900
|
||||
CAPSP = S_DISABILITATO //900
|
||||
COMSP = S_DISABILITATO //900
|
||||
DENCOMSP = S_DISABILITATO //900
|
||||
PROVCOMSP = S_DISABILITATO //900
|
||||
STATOSP = S_DISABILITATO //900
|
||||
DESSTATOSP = S_DISABILITATO //900
|
||||
DATADOCRIF = S_NASCOSTO //1000
|
||||
NUMDOCRIF = S_NASCOSTO //1000
|
||||
CODAGVIS = S_NASCOSTO //1110
|
||||
DESAGVIS = S_NASCOSTO //1110
|
||||
CODAG = S_NASCOSTO //1100
|
||||
DESAG = S_NASCOSTO //1100
|
||||
CODZON = S_NORMALE //1100
|
||||
DESZON = S_NORMALE //1100
|
||||
CODSPMEZZO = S_OBBLIGATORIO //1200
|
||||
DESSPMEZZO = S_NORMALE //1200
|
||||
CODPORTO = S_OBBLIGATORIO //1210
|
||||
DESPORTO = S_NORMALE //1210
|
||||
CODNOTESP1 = S_NORMALE //1300
|
||||
DESNOTESP1 = S_NORMALE //1300
|
||||
CODNOTESP2 = S_NASCOSTO //1300
|
||||
DESNOTESP2 = S_NASCOSTO //1300
|
||||
CAUSTRASP = S_OBBLIGATORIO //1400
|
||||
DENCAUSTRASP = S_NORMALE //1400
|
||||
CODVETT1 = S_OBBLIGATORIO //1500
|
||||
CODVETT2 = S_NASCOSTO //1500
|
||||
CODVETT3 = S_NASCOSTO //1500
|
||||
NOMEVETT1 = S_NORMALE //1500
|
||||
NOMEVETT2 = S_NASCOSTO //1500
|
||||
NOMEVETT3 = S_NASCOSTO //1500
|
||||
NCOPIE = S_OBBLIGATORIO //1600
|
||||
GRPARTENZA = S_NORMALE //1700
|
||||
DATAPART = S_NORMALE //1700
|
||||
ORAPART = S_NORMALE //1700
|
||||
IMPPAGATO = S_NASCOSTO //1800
|
||||
ACCSALDO = S_NASCOSTO //1800
|
||||
DOC1 = S_NASCOSTO //1900
|
||||
DOC2 = S_NASCOSTO //1900
|
||||
DOC3 = S_NASCOSTO //1900
|
||||
DATACONS = S_NASCOSTO //2000
|
||||
ASPBENI1 = S_OBBLIGATORIO //2100
|
||||
DESCRBENI1 = S_NORMALE //2100
|
||||
ASPBENI2 = S_NASCOSTO //2100
|
||||
DESCRBENI2 = S_NASCOSTO //2100
|
||||
IMPNETTI = S_NASCOSTO //2200
|
||||
RAGGR = S_NORMALE //2300
|
||||
RAGGREFF = S_NASCOSTO //2300
|
||||
SPESEINC = S_NASCOSTO //2400
|
||||
GRADD = S_NASCOSTO //2500
|
||||
ADDBRB = S_NASCOSTO //2500
|
||||
ADDBTR = S_NASCOSTO //2500
|
||||
ADDBDE = S_NASCOSTO //2500
|
||||
GRCODIVA = S_NASCOSTO //2600
|
||||
CODIVABRB = S_NASCOSTO //2600
|
||||
CODIVABTR = S_NASCOSTO //2600
|
||||
CODIVABTRE = S_NASCOSTO //2600
|
||||
CODIVABDE = S_NASCOSTO //2600
|
||||
UMTARA = S_NORMALE //2710
|
||||
TARA = S_NORMALE //2710
|
||||
DESUMTARA = S_NASCOSTO //2710
|
||||
UMPNETTO = S_NORMALE //2700
|
||||
PNETTO = S_NORMALE //2700
|
||||
DESUMPNETTO = S_NASCOSTO //2700
|
||||
NCOLLI = S_NORMALE //2800
|
||||
CAUSMAG1 = S_NASCOSTO //2900
|
||||
DESCRMAG1 = S_NASCOSTO //2900
|
||||
CAUSMAG2 = S_NASCOSTO //2900
|
||||
DESCRMAG2 = S_NASCOSTO //2900
|
||||
|
||||
|
||||
[DEFAULT]
|
||||
NDEFAULTS=1
|
||||
1=F_CAUSTRASP|VEN
|
||||
|
||||
[SHEET]
|
||||
NCOLS=10
|
||||
1=FR_CODMAG
|
||||
2=FR_CODDEP
|
||||
3=FR_CODART
|
||||
4=FR_DESCR
|
||||
5=FR_UMQTA
|
||||
6=FR_QTA
|
||||
7=FR_PREZZO
|
||||
8=FR_SCONTO
|
||||
9=FR_PERCPROV
|
||||
10=FR_CODIVA
|
||||
|
||||
[RIGHE]
|
||||
NTIPIRIGA=4
|
||||
1=01
|
||||
2=02
|
||||
3=03
|
||||
4=04
|
||||
|
||||
[HANDLERS]
|
||||
NHANDLER=0
|
||||
1 = F_ORAPART|1
|
||||
|
||||
[PROFILOGRUPPO]
|
||||
101 = S_NASCOSTO
|
||||
100 = S_NORMALE
|
||||
200 = S_NORMALE
|
||||
300 = S_NORMALE
|
||||
400 = S_NORMALE
|
||||
500 = S_NORMALE
|
||||
600 = S_NORMALE
|
||||
700 = S_NORMALE
|
||||
800 = S_NORMALE
|
||||
810 = S_NORMALE
|
||||
820 = S_NORMALE
|
||||
830 = S_NORMALE
|
||||
900 = S_NORMALE
|
||||
1000 = S_NASCOSTO
|
||||
1100 = S_NORMALE
|
||||
1200 = S_NORMALE
|
||||
1210 = S_NORMALE
|
||||
1300 = S_NORMALE
|
||||
1400 = S_NORMALE
|
||||
1500 = S_NORMALE
|
||||
1600 = S_NORMALE
|
||||
1700 = S_NORMALE
|
||||
1800 = S_NORMALE
|
||||
1900 = S_NORMALE
|
||||
2000 = S_NASCOSTO
|
||||
2100 = S_NORMALE
|
||||
2200 = S_NORMALE
|
||||
2300 = S_NORMALE
|
||||
2400 = S_NORMALE
|
||||
2500 = S_NASCOSTO
|
||||
2600 = S_NORMALE
|
||||
2700 = S_NORMALE
|
||||
2710 = S_NORMALE
|
||||
2800 = S_NORMALE
|
||||
2900 = S_NORMALE
|
||||
|
||||
[ORDINEGRUPPI]
|
||||
NGROUPS=29
|
||||
1=100
|
||||
2=200
|
||||
3=300
|
||||
4=400
|
||||
5=500
|
||||
6=600
|
||||
7=700
|
||||
8=800
|
||||
9=810
|
||||
10=820
|
||||
11=830
|
||||
12=2300
|
||||
13=900
|
||||
14=1100
|
||||
15=1200
|
||||
16=1210
|
||||
17=1300
|
||||
18=1400
|
||||
19=1700
|
||||
20=1800
|
||||
21=1900
|
||||
22=2100
|
||||
23=2200
|
||||
24=2400
|
||||
25=2700
|
||||
26=2710
|
||||
27=2800
|
||||
28=1500
|
||||
29=1600
|
||||
|
||||
#include "veini.h"
|
||||
#include "veuml.h"
|
||||
#include "verig.h"
|
||||
// Esempio di profilo documento : Profilo Bolla Vendita
|
||||
|
||||
[MAIN]
|
||||
// Descrizione a caratteri del documento
|
||||
TYPE=Bolla di vendita
|
||||
// Dove sono le risorse per il documento
|
||||
MSKFILE=BOLLAC
|
||||
FRMFILE=BOLLAC.FRM
|
||||
// modifica
|
||||
PROGPIEDE=IMPN|SCODOC|IMPS|IMPOSTA|SPESE|TOTALE|PROVVDOC
|
||||
// modifica
|
||||
// Procedure utente da chiamare per il documento ( preprocessarle? )
|
||||
NUOVO=
|
||||
MODIFICA=
|
||||
CANCELLA=
|
||||
STAMPA=
|
||||
RAGGRUPPA=
|
||||
USER=
|
||||
// Indica se il documento è indirizzato ad un cliente o ad un fornitore
|
||||
TIPOCF=C
|
||||
|
||||
[INSERIMENTO]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=1,2,3,4,5,6,7,8,9
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=1
|
||||
|
||||
[MODIFICA]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=1,2,3,4,5
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=N
|
||||
|
||||
[CANCELLAZIONE]
|
||||
STATIVALIDI = 1,6,7
|
||||
STATOFINALE = 4
|
||||
REMOVE = 0
|
||||
|
||||
[STAMPA]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=1,2,3,4,5
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=6
|
||||
|
||||
[RAGGRUPPA]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=6,7,8,9
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=1
|
||||
|
||||
[SPECIALE]
|
||||
// Stati in cui è possibile effettuare la operazione
|
||||
STATIVALIDI=1,2,3,4,5,6,7,8,9
|
||||
// Stato finale del documento dopo la operazione
|
||||
STATOFINALE=9
|
||||
|
||||
[PROFILO]
|
||||
// Si possono indicare, dopo il numero, PROMPT, HELP, WARNING cosi:
|
||||
// 1|Prompt|Help|Warning
|
||||
|
||||
// TIPOCF = S_NORMALE
|
||||
// CODCF = S_OBBLIGATORIO
|
||||
// RAGSOC = S_NORMALE
|
||||
OCCASEDIT = S_NORMALE //100
|
||||
OCFPI = S_NASCOSTO //100
|
||||
COFI = S_NORMALE //100
|
||||
STATOPAIV = S_NORMALE //100
|
||||
PAIVA = S_NORMALE //100
|
||||
GRRECAPITO = S_NORMALE //100
|
||||
INDCF = S_DISABILITATO //100
|
||||
CIVCF = S_DISABILITATO //100
|
||||
LOCALITACF = S_DISABILITATO //100
|
||||
CAPCF = S_DISABILITATO //100
|
||||
PROVCOM = S_DISABILITATO //100
|
||||
COMCF = S_DISABILITATO //100
|
||||
DENCOM = S_DISABILITATO //100
|
||||
STATOCF = S_DISABILITATO //100
|
||||
DESSTATOCF = S_DISABILITATO //100
|
||||
CODVAL1 = S_NORMALE //200
|
||||
CODVAL2 = S_NORMALE //200
|
||||
NOME_VAL1 = S_NORMALE //200
|
||||
NOME_VAL2 = S_NORMALE //200
|
||||
CAMBIO = S_NORMALE //200
|
||||
DATA_CAMBIO1 = S_NORMALE //200
|
||||
DATA_CAMBIO2 = S_NORMALE //200
|
||||
CODLIN = S_NORMALE //300
|
||||
DESLIN = S_NORMALE //300
|
||||
CODPAG = S_OBBLIGATORIO //400
|
||||
DESCODPAG = S_NORMALE //400
|
||||
GRSCADENZE = S_NORMALE //500
|
||||
DATAINSC = S_NORMALE //500
|
||||
DATASCAD1 = S_DISABILITATO //500
|
||||
DATASCAD2 = S_DISABILITATO //500
|
||||
DATASCAD3 = S_DISABILITATO //500
|
||||
DATASCAD4 = S_DISABILITATO //500
|
||||
DATASCAD5 = S_DISABILITATO //500
|
||||
CODABIA = S_OBBLIGATORIO //600
|
||||
CODCABA = S_OBBLIGATORIO //600
|
||||
DESBANAPP = S_NORMALE //600
|
||||
CODABIP = S_NORMALE //700
|
||||
CODCABP = S_NORMALE //700
|
||||
DESBANPRE = S_NORMALE //700
|
||||
CATVEN = S_NORMALE //800
|
||||
DESCATVEN = S_DISABILITATO //800
|
||||
CODLIST1 = S_NORMALE //800
|
||||
CODLIST2 = S_NORMALE //800
|
||||
DESLIST = S_DISABILITATO //800
|
||||
CODCONT1 = S_NORMALE //810
|
||||
CODCONT2 = S_NORMALE //810
|
||||
DESCONT = S_DISABILITATO //810
|
||||
CODCAMP = S_NORMALE //820
|
||||
DESCAMP = S_DISABILITATO //820
|
||||
SCONTOPERC = S_NORMALE //830
|
||||
GRINDSPED = S_NORMALE //900
|
||||
CODINDSP = S_NORMALE //900
|
||||
RAGSOCSP = S_DISABILITATO //900
|
||||
INDSP = S_DISABILITATO //900
|
||||
CIVSP = S_DISABILITATO //900
|
||||
LOCALITASP = S_DISABILITATO //900
|
||||
CAPSP = S_DISABILITATO //900
|
||||
COMSP = S_DISABILITATO //900
|
||||
DENCOMSP = S_DISABILITATO //900
|
||||
PROVCOMSP = S_DISABILITATO //900
|
||||
STATOSP = S_DISABILITATO //900
|
||||
DESSTATOSP = S_DISABILITATO //900
|
||||
DATADOCRIF = S_NASCOSTO //1000
|
||||
NUMDOCRIF = S_NASCOSTO //1000
|
||||
CODAGVIS = S_NASCOSTO //1110
|
||||
DESAGVIS = S_NASCOSTO //1110
|
||||
CODAG = S_NORMALE //1100
|
||||
DESAG = S_NORMALE //1100
|
||||
CODZON = S_NORMALE //1100
|
||||
DESZON = S_NORMALE //1100
|
||||
CODSPMEZZO = S_OBBLIGATORIO //1200
|
||||
DESSPMEZZO = S_NORMALE //1200
|
||||
CODPORTO = S_NORMALE //1210
|
||||
DESPORTO = S_NORMALE //1210
|
||||
CODNOTESP1 = S_NORMALE //1300
|
||||
DESNOTESP1 = S_NORMALE //1300
|
||||
CODNOTESP2 = S_NASCOSTO //1300
|
||||
DESNOTESP2 = S_NASCOSTO //1300
|
||||
CAUSTRASP = S_OBBLIGATORIO //1400
|
||||
DENCAUSTRASP = S_NORMALE //1400
|
||||
CODVETT1 = S_NORMALE //1500
|
||||
CODVETT2 = S_NASCOSTO //1500
|
||||
CODVETT3 = S_NASCOSTO //1500
|
||||
NOMEVETT1 = S_NORMALE //1500
|
||||
NOMEVETT2 = S_NASCOSTO //1500
|
||||
NOMEVETT3 = S_NASCOSTO //1500
|
||||
NCOPIE = S_NASCOSTO //1600
|
||||
GRPARTENZA = S_NORMALE //1700
|
||||
DATAPART = S_NORMALE //1700
|
||||
ORAPART = S_NORMALE //1700
|
||||
IMPPAGATO = S_NASCOSTO //1800
|
||||
ACCSALDO = S_NASCOSTO //1800
|
||||
DOC1 = S_NASCOSTO //1900
|
||||
DOC2 = S_NASCOSTO //1900
|
||||
DOC3 = S_NASCOSTO //1900
|
||||
DATACONS = S_NASCOSTO //2000
|
||||
ASPBENI1 = S_OBBLIGATORIO //2100
|
||||
DESCRBENI1 = S_NORMALE //2100
|
||||
ASPBENI2 = S_NASCOSTO //2100
|
||||
DESCRBENI2 = S_NASCOSTO //2100
|
||||
IMPNETTI = S_NORMALE //2200
|
||||
RAGGR = S_NORMALE //2300
|
||||
RAGGREFF = S_NASCOSTO //2300
|
||||
SPESEINC = S_NORMALE //2400
|
||||
GRADD = S_NORMALE //2500
|
||||
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
|
||||
TARA = S_NORMALE //2710
|
||||
DESUMTARA = S_NASCOSTO //2710
|
||||
UMPNETTO = S_NORMALE //2700
|
||||
PNETTO = S_NORMALE //2700
|
||||
DESUMPNETTO = S_NASCOSTO //2700
|
||||
NCOLLI = S_NORMALE //2800
|
||||
CAUSMAG1 = S_NASCOSTO //2900
|
||||
DESCRMAG1 = S_NASCOSTO //2900
|
||||
CAUSMAG2 = S_NASCOSTO //2900
|
||||
DESCRMAG2 = S_NASCOSTO //2900
|
||||
BLANK = S_DISABILITATO //4000
|
||||
|
||||
|
||||
[DEFAULT]
|
||||
NDEFAULTS=1
|
||||
1=F_CAUSTRASP|VEN
|
||||
|
||||
[SHEET]
|
||||
NCOLS=10
|
||||
1=FR_CODMAG
|
||||
2=FR_CODDEP
|
||||
3=FR_CODART
|
||||
4=FR_DESCR
|
||||
5=FR_UMQTA
|
||||
6=FR_QTA
|
||||
7=FR_PREZZO
|
||||
8=FR_SCONTO
|
||||
9=FR_PERCPROV
|
||||
10=FR_CODIVA
|
||||
|
||||
[RIGHE]
|
||||
NTIPIRIGA=5
|
||||
1=01
|
||||
2=02
|
||||
3=03
|
||||
4=04
|
||||
5=05
|
||||
|
||||
[HANDLERS]
|
||||
NHANDLER=0
|
||||
1 = F_ORAPART|1
|
||||
|
||||
[PROFILOGRUPPO]
|
||||
101 = S_NASCOSTO
|
||||
100 = S_NORMALE
|
||||
200 = S_NORMALE
|
||||
300 = S_NORMALE
|
||||
400 = S_NORMALE
|
||||
500 = S_NORMALE
|
||||
600 = S_NORMALE
|
||||
700 = S_NORMALE
|
||||
800 = S_NORMALE
|
||||
810 = S_NORMALE
|
||||
820 = S_NORMALE
|
||||
830 = S_NORMALE
|
||||
900 = S_NORMALE
|
||||
1000 = S_NASCOSTO
|
||||
1100 = S_NORMALE
|
||||
1200 = S_NORMALE
|
||||
1210 = S_NORMALE
|
||||
1300 = S_NORMALE
|
||||
1400 = S_NORMALE
|
||||
1500 = S_NORMALE
|
||||
1600 = S_NASCOSTO
|
||||
1700 = S_NORMALE
|
||||
1800 = S_NORMALE
|
||||
1900 = S_NORMALE
|
||||
2000 = S_NASCOSTO
|
||||
2100 = S_NORMALE
|
||||
2200 = S_NORMALE
|
||||
2300 = S_NORMALE
|
||||
2400 = S_NORMALE
|
||||
2500 = S_NORMALE
|
||||
2600 = S_NORMALE
|
||||
2700 = S_NORMALE
|
||||
2710 = S_NORMALE
|
||||
2800 = S_NORMALE
|
||||
2900 = S_NORMALE
|
||||
4000 = S_NORMALE
|
||||
|
||||
[ORDINEGRUPPI]
|
||||
NGROUPS=30
|
||||
1=100
|
||||
2=200
|
||||
3=300
|
||||
4=400
|
||||
5=500
|
||||
6=600
|
||||
7=700
|
||||
8=800
|
||||
9=810
|
||||
10=820
|
||||
11=830
|
||||
12=900
|
||||
13=1100
|
||||
14=1200
|
||||
15=1500
|
||||
16=1210
|
||||
17=1300
|
||||
18=1400
|
||||
19=1800
|
||||
20=1900
|
||||
21=2100
|
||||
22=2300
|
||||
23=2200
|
||||
24=2800
|
||||
25=2700
|
||||
26=2710
|
||||
27=1700
|
||||
28=2400
|
||||
29=2500
|
||||
30=2600
|
||||
|
||||
|
||||
3520
ve/ve0300a.src
3520
ve/ve0300a.src
File diff suppressed because it is too large
Load Diff
246
ve/ve0300c.ini
246
ve/ve0300c.ini
@ -1,121 +1,125 @@
|
||||
[100]
|
||||
HEIGHT=7
|
||||
CONFIGS=
|
||||
|
||||
[101]
|
||||
HEIGHT=1
|
||||
|
||||
[200]
|
||||
HEIGHT=2
|
||||
|
||||
[300]
|
||||
HEIGHT=1
|
||||
|
||||
[400]
|
||||
HEIGHT=1
|
||||
|
||||
[500]
|
||||
HEIGHT=5
|
||||
|
||||
[600]
|
||||
HEIGHT=2
|
||||
|
||||
[700]
|
||||
HEIGHT=2
|
||||
|
||||
[800]
|
||||
HEIGHT=2
|
||||
|
||||
[810]
|
||||
HEIGHT=1
|
||||
|
||||
[820]
|
||||
HEIGHT=1
|
||||
|
||||
[830]
|
||||
HEIGHT=1
|
||||
|
||||
[900]
|
||||
HEIGHT=8
|
||||
|
||||
[1000]
|
||||
HEIGHT=2
|
||||
|
||||
[1100]
|
||||
HEIGHT=2
|
||||
|
||||
[1110]
|
||||
HEIGHT=1
|
||||
|
||||
[1200]
|
||||
HEIGHT=1
|
||||
|
||||
[1210]
|
||||
HEIGHT=1
|
||||
|
||||
[1300]
|
||||
HEIGHT=2
|
||||
|
||||
[1400]
|
||||
HEIGHT=1
|
||||
|
||||
[1500]
|
||||
HEIGHT=3
|
||||
|
||||
[1600]
|
||||
HEIGHT=1
|
||||
|
||||
[1700]
|
||||
HEIGHT=3
|
||||
|
||||
[1800]
|
||||
HEIGHT=2
|
||||
|
||||
[1900]
|
||||
HEIGHT=3
|
||||
|
||||
[2000]
|
||||
HEIGHT=1
|
||||
|
||||
[2100]
|
||||
HEIGHT=2
|
||||
|
||||
[2200]
|
||||
HEIGHT=1
|
||||
|
||||
[2300]
|
||||
HEIGHT=1
|
||||
|
||||
[2400]
|
||||
HEIGHT=1
|
||||
|
||||
[2500]
|
||||
HEIGHT=3
|
||||
|
||||
[2600]
|
||||
HEIGHT=3
|
||||
|
||||
[2700]
|
||||
HEIGHT=2
|
||||
|
||||
[2710]
|
||||
HEIGHT=2
|
||||
|
||||
[2800]
|
||||
HEIGHT=1
|
||||
|
||||
[2900]
|
||||
HEIGHT=2
|
||||
|
||||
[3000]
|
||||
HEIGHT=1
|
||||
|
||||
[3200]
|
||||
HEIGHT=1
|
||||
|
||||
[3400]
|
||||
HEIGHT=4
|
||||
|
||||
[0]
|
||||
HEIGHT =
|
||||
|
||||
[100]
|
||||
HEIGHT=7
|
||||
CONFIGS=
|
||||
|
||||
[101]
|
||||
HEIGHT=1
|
||||
|
||||
[200]
|
||||
HEIGHT=2
|
||||
|
||||
[300]
|
||||
HEIGHT=1
|
||||
|
||||
[400]
|
||||
HEIGHT=1
|
||||
|
||||
[500]
|
||||
HEIGHT=5
|
||||
|
||||
[600]
|
||||
HEIGHT=2
|
||||
|
||||
[700]
|
||||
HEIGHT=2
|
||||
|
||||
[800]
|
||||
HEIGHT=2
|
||||
|
||||
[810]
|
||||
HEIGHT=1
|
||||
|
||||
[820]
|
||||
HEIGHT=1
|
||||
|
||||
[830]
|
||||
HEIGHT=1
|
||||
|
||||
[900]
|
||||
HEIGHT=8
|
||||
|
||||
[1000]
|
||||
HEIGHT=2
|
||||
|
||||
[1100]
|
||||
HEIGHT=2
|
||||
|
||||
[1110]
|
||||
HEIGHT=1
|
||||
|
||||
[1200]
|
||||
HEIGHT=1
|
||||
|
||||
[1210]
|
||||
HEIGHT=1
|
||||
|
||||
[1300]
|
||||
HEIGHT=1
|
||||
|
||||
[1400]
|
||||
HEIGHT=1
|
||||
|
||||
[1500]
|
||||
HEIGHT=1
|
||||
|
||||
[1600]
|
||||
HEIGHT=1
|
||||
|
||||
[1700]
|
||||
HEIGHT=3
|
||||
|
||||
[1800]
|
||||
HEIGHT=2
|
||||
|
||||
[1900]
|
||||
HEIGHT=3
|
||||
|
||||
[2000]
|
||||
HEIGHT=1
|
||||
|
||||
[2100]
|
||||
HEIGHT=1
|
||||
|
||||
[2200]
|
||||
HEIGHT=1
|
||||
|
||||
[2300]
|
||||
HEIGHT=1
|
||||
|
||||
[2400]
|
||||
HEIGHT=1
|
||||
|
||||
[2500]
|
||||
HEIGHT=3
|
||||
|
||||
[2600]
|
||||
HEIGHT=4
|
||||
|
||||
[2700]
|
||||
HEIGHT=1
|
||||
|
||||
[2710]
|
||||
HEIGHT=1
|
||||
|
||||
[2800]
|
||||
HEIGHT=1
|
||||
|
||||
[2900]
|
||||
HEIGHT=2
|
||||
|
||||
[3000]
|
||||
HEIGHT=1
|
||||
|
||||
[3200]
|
||||
HEIGHT=1
|
||||
|
||||
[3400]
|
||||
HEIGHT=4
|
||||
|
||||
[4000]
|
||||
HEIGHT=1
|
||||
|
||||
[0]
|
||||
HEIGHT =
|
||||
|
||||
|
||||
36
ve/ve6200a.h
36
ve/ve6200a.h
@ -1,18 +1,18 @@
|
||||
// Include file per ve6000.uml
|
||||
|
||||
#define F_DATA_ELAB 101
|
||||
#define F_CODICE_CLIFO_DA 102
|
||||
#define F_CODICE_CLIFO_A 103
|
||||
#define F_DATA_DOCUMENTO_DA 104
|
||||
#define F_DATA_DOCUMENTO_A 105
|
||||
#define F_CODICE_AGENTE_DA 106
|
||||
#define F_CODICE_AGENTE_A 107
|
||||
#define F_CODICE_ZONA_DA 108
|
||||
#define F_CODICE_ZONA_A 109
|
||||
#define F_NUMERO_DOCUMENTO_DA 110
|
||||
#define F_NUMERO_DOCUMENTO_A 111
|
||||
#define F_ORDINAMENTO 112
|
||||
#define F_CODICE_ELAB 113
|
||||
#define F_ANNO_ELAB 114
|
||||
#define F_CODICE_NUMERAZIONE 115
|
||||
#define F_DESCR_ELAB 116
|
||||
// Include file per ve6000.uml
|
||||
|
||||
#define F_DATA_ELAB 101
|
||||
#define F_CODICE_CLIFO_DA 102
|
||||
#define F_CODICE_CLIFO_A 103
|
||||
#define F_DATA_DOCUMENTO_DA 104
|
||||
#define F_DATA_DOCUMENTO_A 105
|
||||
#define F_CODICE_AGENTE_DA 106
|
||||
#define F_CODICE_AGENTE_A 107
|
||||
#define F_CODICE_ZONA_DA 108
|
||||
#define F_CODICE_ZONA_A 109
|
||||
#define F_NUMERO_DOCUMENTO_DA 110
|
||||
#define F_NUMERO_DOCUMENTO_A 111
|
||||
#define F_ORDINAMENTO 112
|
||||
#define F_CODICE_ELAB 113
|
||||
#define F_ANNO_ELAB 114
|
||||
#define F_CODICE_NUMERAZIONE 115
|
||||
#define F_DESCR_ELAB 116
|
||||
|
||||
430
ve/ve6200a.uml
430
ve/ve6200a.uml
@ -1,215 +1,215 @@
|
||||
#include "ve6200a.h"
|
||||
|
||||
PAGE "Fatturazione" -1 -1 70 15
|
||||
|
||||
GROUPBOX DLG_NULL 68 4
|
||||
BEGIN
|
||||
PROMPT 1 0 "Elaborazione differita"
|
||||
END
|
||||
|
||||
STRING F_CODICE_ELAB 8
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FLAG "U"
|
||||
USE %ELD
|
||||
INPUT CODTAB F_CODICE_ELAB
|
||||
DISPLAY "Codice@8" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Numerazione" S5
|
||||
OUTPUT F_CODICE_ELAB CODTAB
|
||||
OUTPUT F_DESCR_ELAB S0
|
||||
OUTPUT F_CODICE_NUMERAZIONE S5
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_DESCR_ELAB 50
|
||||
BEGIN
|
||||
PROMPT 2 2 "Descrizione "
|
||||
USE %ELD KEY 2
|
||||
INPUT S0 F_DESCR_ELAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice@8" CODTAB
|
||||
DISPLAY "Numerazione" S5
|
||||
COPY OUTPUT F_CODICE_ELAB
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
DATE F_DATA_ELAB
|
||||
BEGIN
|
||||
PROMPT 32 1 "Data "
|
||||
FLAG "A"
|
||||
VALIDATE DATE_CMP_FUNC >= F_DATA_DOCUMENTO_A
|
||||
WARNING "Specificare una data maggiore o uguale a 'a data documento'"
|
||||
CHECKTYPE REQUIRED
|
||||
MESSAGE COPY,F_ANNO_ELAB,7,10
|
||||
END
|
||||
|
||||
NUMBER F_ANNO_ELAB 4
|
||||
BEGIN
|
||||
PROMPT 55 1 "Anno "
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 68 10
|
||||
BEGIN
|
||||
PROMPT 1 4 "Estremi dei documenti da elaborare:"
|
||||
END
|
||||
|
||||
RADIOBUTTON F_ORDINAMENTO 16
|
||||
BEGIN
|
||||
PROMPT 3 5 "Ordinamento per"
|
||||
ITEM "C|Clienti"
|
||||
MESSAGE ENABLE,1@|CLEAR,2@|CLEAR,3@
|
||||
ITEM "A|Agenti"
|
||||
MESSAGE CLEAR,1@|ENABLE,2@|CLEAR,3@
|
||||
ITEM "Z|Zone"
|
||||
MESSAGE CLEAR,1@|CLEAR,2@|ENABLE,3@
|
||||
END
|
||||
|
||||
NUMBER F_CODICE_CLIFO_DA 6
|
||||
BEGIN
|
||||
PROMPT 20 6 "da codice cliente "
|
||||
FLAG "UR"
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "C"
|
||||
INPUT CODCF F_CODICE_CLIFO_DA
|
||||
DISPLAY "Codice cliente," CODCF
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
OUTPUT F_CODICE_CLIFO_DA CODCF
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
NUMBER F_CODICE_CLIFO_A 6
|
||||
BEGIN
|
||||
PROMPT 55 6 "a "
|
||||
FLAG "UR"
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "C"
|
||||
INPUT CODCF F_CODICE_CLIFO_A
|
||||
COPY DISPLAY F_CODICE_CLIFO_DA
|
||||
OUTPUT F_CODICE_CLIFO_A CODCF
|
||||
NUM_EXPR #F_CODICE_CLIFO_A>=#F_CODICE_CLIFO_DA
|
||||
WARNING "Digitare un codice maggiore o uguale al campo 'da codice cliente'"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_CODICE_AGENTE_DA 5
|
||||
BEGIN
|
||||
PROMPT 20 7 "da codice agente "
|
||||
FLAG "UR"
|
||||
USE AGE
|
||||
INPUT CODTAB F_CODICE_AGENTE_DA
|
||||
DISPLAY "Codice agente" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODICE_AGENTE_DA CODTAB
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRING F_CODICE_AGENTE_A 5
|
||||
BEGIN
|
||||
PROMPT 55 7 "a "
|
||||
FLAG "UR"
|
||||
USE AGE
|
||||
INPUT CODTAB F_CODICE_AGENTE_A
|
||||
COPY DISPLAY F_CODICE_AGENTE_DA
|
||||
OUTPUT F_CODICE_AGENTE_A CODTAB
|
||||
NUM_EXPR #F_CODICE_AGENTE_A>=#F_CODICE_AGENTE_DA
|
||||
WARNING "Digitare un codice maggiore o uguale al campo 'da codice agente'"
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRING F_CODICE_ZONA_DA 2
|
||||
BEGIN
|
||||
PROMPT 20 8 "da codice zona "
|
||||
FLAG "UR"
|
||||
USE ZON
|
||||
INPUT CODTAB F_CODICE_ZONA_DA
|
||||
DISPLAY "Codice Zona" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODICE_ZONA_DA CODTAB
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRING F_CODICE_ZONA_A 2
|
||||
BEGIN
|
||||
PROMPT 55 8 "a "
|
||||
FLAG "UR"
|
||||
USE ZON
|
||||
INPUT CODTAB F_CODICE_ZONA_A
|
||||
COPY DISPLAY F_CODICE_ZONA_DA
|
||||
OUTPUT F_CODICE_ZONA_A CODTAB
|
||||
STR_EXPR #F_CODICE_ZONA_A>=#F_CODICE_ZONA_DA
|
||||
WARNING "Digitare un codice maggiore o uguale al campo 'da codice zona'"
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
DATE F_DATA_DOCUMENTO_DA
|
||||
BEGIN
|
||||
PROMPT 20 10 "da data documento "
|
||||
WARNING "E' necessario specificare una data"
|
||||
END
|
||||
|
||||
DATE F_DATA_DOCUMENTO_A
|
||||
BEGIN
|
||||
PROMPT 55 10 "a "
|
||||
VALIDATE DATE_CMP_FUNC >= F_DATA_DOCUMENTO_DA
|
||||
WARNING "Specificare una data maggiore o uguale a 'da data documento'"
|
||||
END
|
||||
|
||||
STRING F_CODICE_NUMERAZIONE 4
|
||||
BEGIN
|
||||
PROMPT 20 11 "Codice numerazione "
|
||||
FLAG "UZ"
|
||||
USE %NUM
|
||||
INPUT CODTAB F_CODICE_NUMERAZIONE
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODICE_NUMERAZIONE CODTAB
|
||||
CHECKTYPE NORMAL
|
||||
MESSAGE EMPTY CLEAR,F_NUMERO_DOCUMENTO_DA|CLEAR,F_NUMERO_DOCUMENTO_A
|
||||
MESSAGE ENABLE,F_NUMERO_DOCUMENTO_DA|ENABLE,F_NUMERO_DOCUMENTO_A
|
||||
END
|
||||
|
||||
NUMBER F_NUMERO_DOCUMENTO_DA 7
|
||||
BEGIN
|
||||
PROMPT 20 12 "da numero documento "
|
||||
USE LF_DOC
|
||||
JOIN %TIP ALIAS 104 INTO CODTAB=TIPODOC
|
||||
JOIN LF_CLIFO INTO TIPOCF=TIPOCF CODCF=CODCF
|
||||
INPUT PROVV "D"
|
||||
INPUT ANNO F_ANNO_ELAB SELECT
|
||||
INPUT CODNUM F_CODICE_NUMERAZIONE SELECT
|
||||
INPUT NDOC F_NUMERO_DOCUMENTO_DA
|
||||
DISPLAY "Numero" NDOC
|
||||
DISPLAY "Tipo@50" 104@->S0
|
||||
DISPLAY "Ragione sociale@50" LF_CLIFO->RAGSOC
|
||||
OUTPUT F_NUMERO_DOCUMENTO_DA NDOC
|
||||
END
|
||||
|
||||
NUMBER F_NUMERO_DOCUMENTO_A 7
|
||||
BEGIN
|
||||
PROMPT 55 12 "a "
|
||||
COPY USE F_NUMERO_DOCUMENTO_DA
|
||||
INPUT PROVV "D"
|
||||
INPUT ANNO F_ANNO_ELAB SELECT
|
||||
INPUT CODNUM F_CODICE_NUMERAZIONE SELECT
|
||||
INPUT NDOC F_NUMERO_DOCUMENTO_A
|
||||
COPY DISPLAY F_NUMERO_DOCUMENTO_DA
|
||||
OUTPUT F_NUMERO_DOCUMENTO_A NDOC
|
||||
NUM_EXPR (#THIS_FIELD==0)||(#THIS_FIELD>=#F_NUMERO_DOCUMENTO_DA)
|
||||
WARNING "Specificare un numero documento superiore a quello di partenza"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
#include "ve6200a.h"
|
||||
|
||||
PAGE "Fatturazione" -1 -1 70 15
|
||||
|
||||
GROUPBOX DLG_NULL 68 4
|
||||
BEGIN
|
||||
PROMPT 1 0 "Elaborazione differita"
|
||||
END
|
||||
|
||||
STRING F_CODICE_ELAB 8
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FLAG "U"
|
||||
USE %ELD
|
||||
INPUT CODTAB F_CODICE_ELAB
|
||||
DISPLAY "Codice@8" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Numerazione" S5
|
||||
OUTPUT F_CODICE_ELAB CODTAB
|
||||
OUTPUT F_DESCR_ELAB S0
|
||||
OUTPUT F_CODICE_NUMERAZIONE S5
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING F_DESCR_ELAB 50
|
||||
BEGIN
|
||||
PROMPT 2 2 "Descrizione "
|
||||
USE %ELD KEY 2
|
||||
INPUT S0 F_DESCR_ELAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice@8" CODTAB
|
||||
DISPLAY "Numerazione" S5
|
||||
COPY OUTPUT F_CODICE_ELAB
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
DATE F_DATA_ELAB
|
||||
BEGIN
|
||||
PROMPT 32 1 "Data "
|
||||
FLAG "A"
|
||||
VALIDATE DATE_CMP_FUNC >= F_DATA_DOCUMENTO_A
|
||||
WARNING "Specificare una data maggiore o uguale a 'a data documento'"
|
||||
CHECKTYPE REQUIRED
|
||||
MESSAGE COPY,F_ANNO_ELAB,7,10
|
||||
END
|
||||
|
||||
NUMBER F_ANNO_ELAB 4
|
||||
BEGIN
|
||||
PROMPT 55 1 "Anno "
|
||||
FLAG "D"
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 68 10
|
||||
BEGIN
|
||||
PROMPT 1 4 "Estremi dei documenti da elaborare:"
|
||||
END
|
||||
|
||||
RADIOBUTTON F_ORDINAMENTO 16
|
||||
BEGIN
|
||||
PROMPT 3 5 "Ordinamento per"
|
||||
ITEM "C|Clienti"
|
||||
MESSAGE ENABLE,1@|CLEAR,2@|CLEAR,3@
|
||||
ITEM "A|Agenti"
|
||||
MESSAGE CLEAR,1@|ENABLE,2@|CLEAR,3@
|
||||
ITEM "Z|Zone"
|
||||
MESSAGE CLEAR,1@|CLEAR,2@|ENABLE,3@
|
||||
END
|
||||
|
||||
NUMBER F_CODICE_CLIFO_DA 6
|
||||
BEGIN
|
||||
PROMPT 20 6 "da codice cliente "
|
||||
FLAG "UR"
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "C"
|
||||
INPUT CODCF F_CODICE_CLIFO_DA
|
||||
DISPLAY "Codice cliente," CODCF
|
||||
DISPLAY "Ragione sociale@50" RAGSOC
|
||||
OUTPUT F_CODICE_CLIFO_DA CODCF
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
NUMBER F_CODICE_CLIFO_A 6
|
||||
BEGIN
|
||||
PROMPT 55 6 "a "
|
||||
FLAG "UR"
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "C"
|
||||
INPUT CODCF F_CODICE_CLIFO_A
|
||||
COPY DISPLAY F_CODICE_CLIFO_DA
|
||||
OUTPUT F_CODICE_CLIFO_A CODCF
|
||||
NUM_EXPR #F_CODICE_CLIFO_A>=#F_CODICE_CLIFO_DA
|
||||
WARNING "Digitare un codice maggiore o uguale al campo 'da codice cliente'"
|
||||
GROUP 1
|
||||
END
|
||||
|
||||
STRING F_CODICE_AGENTE_DA 5
|
||||
BEGIN
|
||||
PROMPT 20 7 "da codice agente "
|
||||
FLAG "UR"
|
||||
USE AGE
|
||||
INPUT CODTAB F_CODICE_AGENTE_DA
|
||||
DISPLAY "Codice agente" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODICE_AGENTE_DA CODTAB
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRING F_CODICE_AGENTE_A 5
|
||||
BEGIN
|
||||
PROMPT 55 7 "a "
|
||||
FLAG "UR"
|
||||
USE AGE
|
||||
INPUT CODTAB F_CODICE_AGENTE_A
|
||||
COPY DISPLAY F_CODICE_AGENTE_DA
|
||||
OUTPUT F_CODICE_AGENTE_A CODTAB
|
||||
NUM_EXPR #F_CODICE_AGENTE_A>=#F_CODICE_AGENTE_DA
|
||||
WARNING "Digitare un codice maggiore o uguale al campo 'da codice agente'"
|
||||
GROUP 2
|
||||
END
|
||||
|
||||
STRING F_CODICE_ZONA_DA 2
|
||||
BEGIN
|
||||
PROMPT 20 8 "da codice zona "
|
||||
FLAG "UR"
|
||||
USE ZON
|
||||
INPUT CODTAB F_CODICE_ZONA_DA
|
||||
DISPLAY "Codice Zona" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODICE_ZONA_DA CODTAB
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
STRING F_CODICE_ZONA_A 2
|
||||
BEGIN
|
||||
PROMPT 55 8 "a "
|
||||
FLAG "UR"
|
||||
USE ZON
|
||||
INPUT CODTAB F_CODICE_ZONA_A
|
||||
COPY DISPLAY F_CODICE_ZONA_DA
|
||||
OUTPUT F_CODICE_ZONA_A CODTAB
|
||||
STR_EXPR #F_CODICE_ZONA_A>=#F_CODICE_ZONA_DA
|
||||
WARNING "Digitare un codice maggiore o uguale al campo 'da codice zona'"
|
||||
GROUP 3
|
||||
END
|
||||
|
||||
DATE F_DATA_DOCUMENTO_DA
|
||||
BEGIN
|
||||
PROMPT 20 10 "da data documento "
|
||||
WARNING "E' necessario specificare una data"
|
||||
END
|
||||
|
||||
DATE F_DATA_DOCUMENTO_A
|
||||
BEGIN
|
||||
PROMPT 55 10 "a "
|
||||
VALIDATE DATE_CMP_FUNC >= F_DATA_DOCUMENTO_DA
|
||||
WARNING "Specificare una data maggiore o uguale a 'da data documento'"
|
||||
END
|
||||
|
||||
STRING F_CODICE_NUMERAZIONE 4
|
||||
BEGIN
|
||||
PROMPT 20 11 "Codice numerazione "
|
||||
FLAG "UZ"
|
||||
USE %NUM
|
||||
INPUT CODTAB F_CODICE_NUMERAZIONE
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_CODICE_NUMERAZIONE CODTAB
|
||||
CHECKTYPE NORMAL
|
||||
MESSAGE EMPTY CLEAR,F_NUMERO_DOCUMENTO_DA|CLEAR,F_NUMERO_DOCUMENTO_A
|
||||
MESSAGE ENABLE,F_NUMERO_DOCUMENTO_DA|ENABLE,F_NUMERO_DOCUMENTO_A
|
||||
END
|
||||
|
||||
NUMBER F_NUMERO_DOCUMENTO_DA 7
|
||||
BEGIN
|
||||
PROMPT 20 12 "da numero documento "
|
||||
USE LF_DOC
|
||||
JOIN %TIP ALIAS 104 INTO CODTAB=TIPODOC
|
||||
JOIN LF_CLIFO INTO TIPOCF=TIPOCF CODCF=CODCF
|
||||
INPUT PROVV "D"
|
||||
INPUT ANNO F_ANNO_ELAB SELECT
|
||||
INPUT CODNUM F_CODICE_NUMERAZIONE SELECT
|
||||
INPUT NDOC F_NUMERO_DOCUMENTO_DA
|
||||
DISPLAY "Numero" NDOC
|
||||
DISPLAY "Tipo@50" 104@->S0
|
||||
DISPLAY "Ragione sociale@50" LF_CLIFO->RAGSOC
|
||||
OUTPUT F_NUMERO_DOCUMENTO_DA NDOC
|
||||
END
|
||||
|
||||
NUMBER F_NUMERO_DOCUMENTO_A 7
|
||||
BEGIN
|
||||
PROMPT 55 12 "a "
|
||||
COPY USE F_NUMERO_DOCUMENTO_DA
|
||||
INPUT PROVV "D"
|
||||
INPUT ANNO F_ANNO_ELAB SELECT
|
||||
INPUT CODNUM F_CODICE_NUMERAZIONE SELECT
|
||||
INPUT NDOC F_NUMERO_DOCUMENTO_A
|
||||
COPY DISPLAY F_NUMERO_DOCUMENTO_DA
|
||||
OUTPUT F_NUMERO_DOCUMENTO_A NDOC
|
||||
NUM_EXPR (#THIS_FIELD==0)||(#THIS_FIELD>=#F_NUMERO_DOCUMENTO_DA)
|
||||
WARNING "Specificare un numero documento superiore a quello di partenza"
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 10 2
|
||||
BEGIN
|
||||
PROMPT -12 -1 ""
|
||||
END
|
||||
|
||||
BUTTON DLG_QUIT 10 2
|
||||
BEGIN
|
||||
PROMPT -22 -1 ""
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
||||
31
ve/verig.h
31
ve/verig.h
@ -1,30 +1,33 @@
|
||||
#ifndef __VERIG_H
|
||||
#define __VERIG_H
|
||||
#define __VERIG_H
|
||||
|
||||
|
||||
#define FR_STATORIGA 101
|
||||
#define FR_TIPORIGA 102
|
||||
#define FR_CODMAG 103
|
||||
#define FR_CODDEP 104
|
||||
// CODART CODSPV CODSPQ CODSPP alternativi definirne uno solo
|
||||
#define FR_CODART 105
|
||||
#define FR_CODSPV 105
|
||||
#define FR_CODSPQ 105
|
||||
#define FR_CODSPP 105
|
||||
// DESCR DESCRSPV DESCPSPQ DESCRSPP alternativi definirne uno solo
|
||||
#define FR_DESCR 106
|
||||
#define FR_CODDEP 104
|
||||
// CODART CODSPV CODSPQ CODSPP CODPRS alternativi definirne uno solo
|
||||
#define FR_CODART 105
|
||||
#define FR_CODSPV 105
|
||||
#define FR_CODSPQ 105
|
||||
#define FR_CODSPP 105
|
||||
#define FR_CODPRS 105
|
||||
// DESCR DESCRSPV DESCPSPQ DESCRSPP DESCPRS alternativi definirne uno solo
|
||||
#define FR_DESCR 106
|
||||
#define FR_DESCRSPV 106
|
||||
#define FR_DESCRSPQ 106
|
||||
#define FR_DESCRSPP 106
|
||||
// UMQTA UMQTASP alternativi definirne uno solo
|
||||
#define FR_DESCRPRS 106
|
||||
// UMQTA UMQTASP UMQTAPR alternativi definirne uno solo
|
||||
#define FR_UMQTA 107
|
||||
#define FR_UMQTASP 107
|
||||
// QTA PERCSP alternativi definirne uno solo
|
||||
#define FR_QTA 108
|
||||
#define FR_PERCSP 108
|
||||
// PREZZO VALORE alternativi definirne uno solo
|
||||
#define FR_PREZZO 109
|
||||
#define FR_PREZZO 109
|
||||
#define FR_VALORE 109
|
||||
|
||||
#define FR_QTAEVASA 110
|
||||
#define FR_RIGAEVASA 111
|
||||
#define FR_TARA 112
|
||||
@ -37,8 +40,8 @@
|
||||
#define FR_IMPFISSO 119
|
||||
#define FR_CODIVA 120
|
||||
#define FR_ADDIVA 121
|
||||
#define FR_ASPBENI 122
|
||||
#define FR_END 123
|
||||
#define FR_ASPBENI 122
|
||||
#define FR_END 123
|
||||
#define MAX_COLUMNS FR_END-FR_STATORIGA
|
||||
|
||||
#define FR_DESMAG 150
|
||||
@ -46,4 +49,4 @@
|
||||
#define FR_DESIVA 152
|
||||
#define FR_DESASP 153
|
||||
#define FR_DESTIPORIGA 154
|
||||
#endif
|
||||
#endif
|
||||
|
||||
97
ve/verig.uml
97
ve/verig.uml
@ -36,6 +36,7 @@ STRING FR_STATORIGA 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Stato riga "
|
||||
FLAGS "DG"
|
||||
FIELD STATORIGA
|
||||
END
|
||||
|
||||
STRING FR_TIPORIGA 2
|
||||
@ -46,6 +47,7 @@ BEGIN
|
||||
OU FR_DESTIPORIGA S0
|
||||
CHECKTYPE REQUIRED
|
||||
FLAGS "DG"
|
||||
FIELD TIPORIGA
|
||||
END
|
||||
|
||||
#ifdef FULL_SCREEN
|
||||
@ -83,6 +85,7 @@ IFDEF(FL_CODMAG)
|
||||
FLAGS FL_CODMAG
|
||||
ENDIF
|
||||
KEY 1
|
||||
FIELD CODMAG[1,3]
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -130,6 +133,7 @@ IFDEF(FL_CODDEP)
|
||||
ENDIF
|
||||
FLAGS "U"
|
||||
KEY 1
|
||||
FIELD CODMAG[4,5]
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -165,12 +169,13 @@ ENDIF
|
||||
IFDEF(FL_CODART)
|
||||
FLAGS FL_CODART
|
||||
ENDIF
|
||||
FIELD CODART
|
||||
ADD RUN ve2 -3
|
||||
END
|
||||
ENDIF
|
||||
|
||||
IFDEF(F_CODSPV)
|
||||
STRING FR_CODSPV 3
|
||||
STRING FR_CODSPV 8
|
||||
BEGIN
|
||||
IFDEF(X_CODSPV)
|
||||
PROMPT X_CODSPV Y_CODSPV PR_CODSPV
|
||||
@ -183,9 +188,12 @@ ENDIF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FR_CODSPV CODTAB
|
||||
OUTPUT FR_DESCRSPV S0
|
||||
OUTPUT FR_VALORE R1
|
||||
OUTPUT FR_VALORE R0
|
||||
OUTPUT FR_QTA R1
|
||||
OUTPUT F_UMQTASP S7
|
||||
OUTPUT FR_CODIVA S3
|
||||
MESSAGE DIRTY,FR_CODIVA|K_TAB,FR_CODIVA
|
||||
MESSAGE DIRTY,FR_CODIVA|K_TAB,FR_CODIVA|DISABLE,FR_QTA
|
||||
FIELD CODART
|
||||
IFDEF(CH_CODSPV)
|
||||
CHECKTYPE CH_CODSPV
|
||||
ELSEIF
|
||||
@ -195,7 +203,7 @@ END
|
||||
ENDIF
|
||||
|
||||
IFDEF(F_CODSPQ)
|
||||
STRING FR_CODSPQ 3
|
||||
STRING FR_CODSPQ 8
|
||||
BEGIN
|
||||
IFDEF(X_CODSPQ)
|
||||
PROMPT X_CODSPQ Y_CODSPQ PR_CODSPQ
|
||||
@ -209,8 +217,10 @@ ENDIF
|
||||
OUTPUT FR_CODSPQ CODTAB
|
||||
OUTPUT FR_DESCRSPQ S0
|
||||
OUTPUT FR_PREZZO R0
|
||||
OUTPUT F_UMQTASP S7
|
||||
OUTPUT FR_CODIVA S3
|
||||
MESSAGE DIRTY,FR_CODIVA|K_TAB,FR_CODIVA
|
||||
FIELD CODART
|
||||
IFDEF(CH_CODSPQ)
|
||||
CHECKTYPE CH_CODSPQ
|
||||
ELSEIF
|
||||
@ -220,7 +230,7 @@ END
|
||||
ENDIF
|
||||
|
||||
IFDEF(F_CODSPP)
|
||||
STRING FR_CODSPP 3
|
||||
STRING FR_CODSPP 8
|
||||
BEGIN
|
||||
IFDEF(X_CODSPP)
|
||||
PROMPT X_CODSPP Y_CODSPP PR_CODSPP
|
||||
@ -235,6 +245,7 @@ ENDIF
|
||||
OUTPUT FR_DESCRSPP S0
|
||||
OUTPUT FR_PERCSP R2
|
||||
OUTPUT FR_CODIVA S3
|
||||
FIELD CODART
|
||||
MESSAGE DIRTY,FR_CODIVA|K_TAB,FR_CODIVA
|
||||
IFDEF(CH_CODSPP)
|
||||
CHECKTYPE CH_CODSPP
|
||||
@ -244,6 +255,33 @@ ENDIF
|
||||
END
|
||||
ENDIF
|
||||
|
||||
IFDEF(F_CODPRS)
|
||||
STRING FR_CODPRS 8
|
||||
BEGIN
|
||||
IFDEF(X_CODPRS)
|
||||
PROMPT X_CODPRS Y_CODPRS PR_CODPRS
|
||||
ELSEIF
|
||||
PROMPT 2 6 "Prestazione "
|
||||
ENDIF
|
||||
USE PRS
|
||||
INPUT CODTAB FR_CODPRS
|
||||
DISPLAY "Codice prestazione" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FR_CODPRS CODTAB
|
||||
OUTPUT FR_DESCRPRS S0
|
||||
OUTPUT FR_PREZZO R0
|
||||
OUTPUT F_UMQTASP S7
|
||||
OUTPUT FR_CODIVA S3
|
||||
MESSAGE DIRTY,FR_CODIVA|K_TAB,FR_CODIVA
|
||||
FIELD CODART
|
||||
IFDEF(CH_CODPRS)
|
||||
CHECKTYPE CH_CODPRS
|
||||
ELSEIF
|
||||
CHECKTYPE REQUIRED
|
||||
ENDIF
|
||||
END
|
||||
ENDIF
|
||||
|
||||
IFDEF(F_DESCR)
|
||||
ZOOM FR_DESCR 50
|
||||
BEGIN
|
||||
@ -252,6 +290,7 @@ IFDEF(X_DESCR)
|
||||
ELSEIF
|
||||
PROMPT 2 7 "Descrizione "
|
||||
ENDIF
|
||||
FIELD DESCR
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -269,7 +308,7 @@ ENDIF
|
||||
DISPLAY "Codice@20" CODART
|
||||
OUTPUT FR_DESCRART DESCR
|
||||
ADD RUN ve2 -3
|
||||
FIELD DUMMY
|
||||
FIELD DESCR
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -286,7 +325,7 @@ ENDIF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice spesa" CODTAB
|
||||
COPY OUTPUT FR_CODSPV
|
||||
FIELD DUMMY
|
||||
FIELD DESCR
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -303,7 +342,7 @@ ENDIF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice spesa" CODTAB
|
||||
COPY OUTPUT FR_CODSPQ
|
||||
FIELD DUMMY
|
||||
FIELD DESCR
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -320,7 +359,24 @@ ENDIF
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice spesa" CODTAB
|
||||
COPY OUTPUT FR_CODSPP
|
||||
FIELD DUMMY
|
||||
FIELD DESCR
|
||||
END
|
||||
ENDIF
|
||||
|
||||
IFDEF(F_DESCRPRS)
|
||||
ZOOM FR_DESCRPRS 50
|
||||
BEGIN
|
||||
IFDEF(X_DESCRPRS)
|
||||
PROMPT X_DESCRPRS Y_DESCRPRS PR_DESCRPRS
|
||||
ELSEIF
|
||||
PROMPT 2 7 "Descrizione "
|
||||
ENDIF
|
||||
USE PRS KEY 2
|
||||
INPUT S0 FR_DESCRPRS
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice prestazione" CODTAB
|
||||
COPY OUTPUT FR_CODPRS
|
||||
FIELD DESCR
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -339,6 +395,7 @@ ENDIF
|
||||
DISPLAY "Codice@20" UM
|
||||
DISPLAY "Descrizione@50" %UMS->S0
|
||||
OUTPUT FR_UMQTA UM
|
||||
FIELD UMQTA
|
||||
IFDEF(CH_UMQTA)
|
||||
CHECKTYPE CH_UMQTA
|
||||
ELSEIF
|
||||
@ -360,6 +417,7 @@ ENDIF
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FR_UMQTASP CODTAB
|
||||
FIELD UMQTA
|
||||
IFDEF(CH_UMQTASP)
|
||||
CHECKTYPE CH_UMQTASP
|
||||
ELSEIF
|
||||
@ -376,6 +434,7 @@ IFDEF(X_QTA)
|
||||
ELSEIF
|
||||
PROMPT 22 9 "Qta' "
|
||||
ENDIF
|
||||
FIELD QTA
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -387,7 +446,7 @@ IFDEF(X_PERCSP)
|
||||
ELSEIF
|
||||
PROMPT 22 9 "%Spesa "
|
||||
ENDIF
|
||||
FIELD DUMMY
|
||||
FIELD PSPESA
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -399,7 +458,7 @@ IFDEF(X_PREZZO)
|
||||
ELSEIF
|
||||
PROMPT 42 9 "Prezzo "
|
||||
ENDIF
|
||||
FIELD DUMMY
|
||||
FIELD PREZZO
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -411,7 +470,7 @@ IFDEF(X_VALORE)
|
||||
ELSEIF
|
||||
PROMPT 42 9 "Valore "
|
||||
ENDIF
|
||||
FIELD DUMMY
|
||||
FIELD PREZZO
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -423,6 +482,7 @@ IFDEF(X_QTAEVASA)
|
||||
ELSEIF
|
||||
PROMPT 17 10 "Q.ta evasa "
|
||||
ENDIF
|
||||
FIELD QTAEVASA
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -434,6 +494,7 @@ IFDEF(X_RIGAEVASA)
|
||||
ELSEIF
|
||||
PROMPT 42 10 "Saldata "
|
||||
ENDIF
|
||||
FIELD RIGAEVASA
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -445,6 +506,7 @@ IFDEF(X_TARA)
|
||||
ELSEIF
|
||||
PROMPT 2 11 "Tara "
|
||||
ENDIF
|
||||
FIELD TARA
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -456,6 +518,7 @@ IFDEF(X_PNETTO)
|
||||
ELSEIF
|
||||
PROMPT 30 11 "Peso netto "
|
||||
ENDIF
|
||||
FIELD PNETTO
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -467,6 +530,7 @@ IFDEF(X_NCOLLI)
|
||||
ELSEIF
|
||||
PROMPT 2 12 "N.Colli "
|
||||
ENDIF
|
||||
FIELD NCOLLI
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -478,6 +542,7 @@ IFDEF(X_DAEVADERE)
|
||||
ELSEIF
|
||||
PROMPT 22 12 "Da evadere "
|
||||
ENDIF
|
||||
FIELD DAEVADERE
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -489,6 +554,7 @@ IFDEF(X_SCONTO)
|
||||
ELSEIF
|
||||
PROMPT 2 13 "Sconto "
|
||||
ENDIF
|
||||
FIELD SCONTO
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -500,6 +566,7 @@ IFDEF(X_PERCPROV)
|
||||
ELSEIF
|
||||
PROMPT 42 13 "Perc.Provv. "
|
||||
ENDIF
|
||||
FIELD PERCPROV
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -511,6 +578,7 @@ IFDEF(X_IMPFISUN)
|
||||
ELSEIF
|
||||
PROMPT 2 14 "Importo provv.unitario"
|
||||
ENDIF
|
||||
FIELD IMPFISUN
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -523,6 +591,7 @@ IFDEF(X_IMPFISSO)
|
||||
ELSEIF
|
||||
PROMPT 42 14 "Imp.Provv. "
|
||||
ENDIF
|
||||
FIELD IMPFISSO
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -547,7 +616,7 @@ IFDEF(CH_CODIVA)
|
||||
ELSEIF
|
||||
CHECKTYPE NORMAL
|
||||
ENDIF
|
||||
FIELD DUMMY
|
||||
FIELD CODIVA
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -571,6 +640,7 @@ IFDEF(X_ADDIVA)
|
||||
ELSEIF
|
||||
PROMPT 2 16 "Addebito IVA"
|
||||
ENDIF
|
||||
FIELD ADDIVA
|
||||
END
|
||||
ENDIF
|
||||
|
||||
@ -594,6 +664,7 @@ IFDEF(CH_ASPBENI)
|
||||
ELSEIF
|
||||
CHECKTYPE NORMAL
|
||||
ENDIF
|
||||
FIELD ASPBENI
|
||||
END
|
||||
ENDIF
|
||||
|
||||
|
||||
@ -1,15 +1,17 @@
|
||||
#include "verigdef.h"
|
||||
|
||||
#define FULL_SCREEN
|
||||
#define FULL_SCREEN
|
||||
|
||||
#define MASK_TITLE1 "Spese di tipo (Valore)"
|
||||
|
||||
DEFINE_FIELD(CODSPV)
|
||||
DEFINE_FIELD(DESCRSPV)
|
||||
DEFINE_FIELD(UMQTASP)
|
||||
DEFINE_FIELD(VALORE)
|
||||
DEFINE_FIELD(QTA)
|
||||
DEFINE_FIELD(SCONTO)
|
||||
DEFINE_FIELD(CODIVA)
|
||||
DEFINE_FIELD(DESIVA)
|
||||
DEFINE_FIELD(DESIVA)
|
||||
|
||||
#include "verig.uml"
|
||||
|
||||
|
||||
17
ve/verig06.uml
Executable file
17
ve/verig06.uml
Executable file
@ -0,0 +1,17 @@
|
||||
#include "verigdef.h"
|
||||
|
||||
#define FULL_SCREEN
|
||||
|
||||
#define MASK_TITLE1 "Prestazioni"
|
||||
|
||||
DEFINE_FIELD(CODPRS)
|
||||
DEFINE_FIELD(DESCRPRS)
|
||||
DEFINE_FIELD(UMQTASP)
|
||||
DEFINE_FIELD(QTA)
|
||||
DEFINE_FIELD(PREZZO)
|
||||
DEFINE_FIELD(SCONTO)
|
||||
DEFINE_FIELD(CODIVA)
|
||||
DEFINE_FIELD(DESIVA)
|
||||
|
||||
#include "verig.uml"
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user