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
|
||||
|
||||
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
|
||||
@ -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
|
||||
@ -10,7 +10,7 @@ TYPE=Bolla di vendita
|
||||
MSKFILE=BOLLAC
|
||||
FRMFILE=BOLLAC.FRM
|
||||
// modifica
|
||||
PROGPIEDE=TOTNETTI|TRASPORTO|IMBALLO|GENERALI
|
||||
PROGPIEDE=IMPN|SCODOC|IMPS|IMPOSTA|SPESE|TOTALE|PROVVDOC
|
||||
// modifica
|
||||
// Procedure utente da chiamare per il documento ( preprocessarle? )
|
||||
NUOVO=
|
||||
@ -130,13 +130,13 @@ DATADOCRIF = S_NASCOSTO //1000
|
||||
NUMDOCRIF = S_NASCOSTO //1000
|
||||
CODAGVIS = S_NASCOSTO //1110
|
||||
DESAGVIS = S_NASCOSTO //1110
|
||||
CODAG = S_NASCOSTO //1100
|
||||
DESAG = S_NASCOSTO //1100
|
||||
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_OBBLIGATORIO //1210
|
||||
CODPORTO = S_NORMALE //1210
|
||||
DESPORTO = S_NORMALE //1210
|
||||
CODNOTESP1 = S_NORMALE //1300
|
||||
DESNOTESP1 = S_NORMALE //1300
|
||||
@ -144,13 +144,13 @@ CODNOTESP2 = S_NASCOSTO //1300
|
||||
DESNOTESP2 = S_NASCOSTO //1300
|
||||
CAUSTRASP = S_OBBLIGATORIO //1400
|
||||
DENCAUSTRASP = S_NORMALE //1400
|
||||
CODVETT1 = S_OBBLIGATORIO //1500
|
||||
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_OBBLIGATORIO //1600
|
||||
NCOPIE = S_NASCOSTO //1600
|
||||
GRPARTENZA = S_NORMALE //1700
|
||||
DATAPART = S_NORMALE //1700
|
||||
ORAPART = S_NORMALE //1700
|
||||
@ -164,19 +164,19 @@ ASPBENI1 = S_OBBLIGATORIO //2100
|
||||
DESCRBENI1 = S_NORMALE //2100
|
||||
ASPBENI2 = S_NASCOSTO //2100
|
||||
DESCRBENI2 = S_NASCOSTO //2100
|
||||
IMPNETTI = S_NASCOSTO //2200
|
||||
IMPNETTI = S_NORMALE //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
|
||||
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
|
||||
@ -188,6 +188,7 @@ CAUSMAG1 = S_NASCOSTO //2900
|
||||
DESCRMAG1 = S_NASCOSTO //2900
|
||||
CAUSMAG2 = S_NASCOSTO //2900
|
||||
DESCRMAG2 = S_NASCOSTO //2900
|
||||
BLANK = S_DISABILITATO //4000
|
||||
|
||||
|
||||
[DEFAULT]
|
||||
@ -208,11 +209,12 @@ NCOLS=10
|
||||
10=FR_CODIVA
|
||||
|
||||
[RIGHE]
|
||||
NTIPIRIGA=4
|
||||
NTIPIRIGA=5
|
||||
1=01
|
||||
2=02
|
||||
3=03
|
||||
4=04
|
||||
5=05
|
||||
|
||||
[HANDLERS]
|
||||
NHANDLER=0
|
||||
@ -239,7 +241,7 @@ NHANDLER=0
|
||||
1300 = S_NORMALE
|
||||
1400 = S_NORMALE
|
||||
1500 = S_NORMALE
|
||||
1600 = S_NORMALE
|
||||
1600 = S_NASCOSTO
|
||||
1700 = S_NORMALE
|
||||
1800 = S_NORMALE
|
||||
1900 = S_NORMALE
|
||||
@ -248,15 +250,16 @@ NHANDLER=0
|
||||
2200 = S_NORMALE
|
||||
2300 = S_NORMALE
|
||||
2400 = S_NORMALE
|
||||
2500 = S_NASCOSTO
|
||||
2500 = S_NORMALE
|
||||
2600 = S_NORMALE
|
||||
2700 = S_NORMALE
|
||||
2710 = S_NORMALE
|
||||
2800 = S_NORMALE
|
||||
2900 = S_NORMALE
|
||||
4000 = S_NORMALE
|
||||
|
||||
[ORDINEGRUPPI]
|
||||
NGROUPS=29
|
||||
NGROUPS=30
|
||||
1=100
|
||||
2=200
|
||||
3=300
|
||||
@ -268,22 +271,24 @@ NGROUPS=29
|
||||
9=810
|
||||
10=820
|
||||
11=830
|
||||
12=2300
|
||||
13=900
|
||||
14=1100
|
||||
15=1200
|
||||
12=900
|
||||
13=1100
|
||||
14=1200
|
||||
15=1500
|
||||
16=1210
|
||||
17=1300
|
||||
18=1400
|
||||
19=1700
|
||||
20=1800
|
||||
21=1900
|
||||
22=2100
|
||||
19=1800
|
||||
20=1900
|
||||
21=2100
|
||||
22=2300
|
||||
23=2200
|
||||
24=2400
|
||||
24=2800
|
||||
25=2700
|
||||
26=2710
|
||||
27=2800
|
||||
28=1500
|
||||
29=1600
|
||||
27=1700
|
||||
28=2400
|
||||
29=2500
|
||||
30=2600
|
||||
|
||||
|
||||
154
ve/ve0300a.src
154
ve/ve0300a.src
@ -1116,17 +1116,6 @@ OUTPUT=F_CAUSTRASP CODTAB~F_DENCAUSTRASP S0
|
||||
WARNING=Codice di causale non trovato
|
||||
HELP=Inserisci il codice dalla causale del trasporto
|
||||
|
||||
//[TRASPORTO] //???Va messo???
|
||||
//GROUP=1500
|
||||
//X=2
|
||||
//Y=0
|
||||
//FIELDNAME=???
|
||||
//MSKID=F_TRASPORTO
|
||||
//TYPE=T_LISTA
|
||||
//PROMPT="Trasporto "
|
||||
//SIZE=12
|
||||
//ITEMS=0|Vettore~DISABLE CODVETT1~DISABLE CODVETT2~DISABLE CODVETT3@1|Mittente~ENABLE CODVETT1~ENABLE CODVETT2~ENABLE CODVETT3@2|Destinatario~ENABLE CODVETT1~ENABLE CODVETT2~ENABLE CODVETT3
|
||||
|
||||
[CODVETT1]
|
||||
GROUP=1500
|
||||
X=2
|
||||
@ -1640,89 +1629,89 @@ FLAG=U
|
||||
|
||||
// ??? Campi aggiunti da Andrea
|
||||
|
||||
[SCONFIS]
|
||||
GROUP=3000
|
||||
X=2
|
||||
Y=0
|
||||
//[SCONFIS]
|
||||
//GROUP=3000
|
||||
//X=2
|
||||
//Y=0
|
||||
//FIELDNAME=???
|
||||
MSKID=F_SCONFIS
|
||||
TYPE=T_STRINGA
|
||||
PROMPT="Scontrino Fiscale "
|
||||
SIZE=30
|
||||
//MSKID=F_SCONFIS
|
||||
//TYPE=T_STRINGA
|
||||
//PROMPT="Scontrino Fiscale "
|
||||
//SIZE=30
|
||||
|
||||
[RICFIS]
|
||||
GROUP=3200
|
||||
X=2
|
||||
Y=0
|
||||
//[RICFIS]
|
||||
//GROUP=3200
|
||||
//X=2
|
||||
//Y=0
|
||||
//FIELDNAME=???
|
||||
MSKID=F_RICFIS
|
||||
TYPE=T_CHECKBOX
|
||||
PROMPT="Ricevuta fiscale"
|
||||
//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
|
||||
//[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
|
||||
//[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
|
||||
//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
|
||||
//[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
|
||||
//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
|
||||
//[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
|
||||
//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
|
||||
//[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
|
||||
//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
|
||||
@ -1763,3 +1752,4 @@ TYPE=T_STRINGA
|
||||
PROMPT=""
|
||||
SIZE=1
|
||||
|
||||
|
||||
@ -54,13 +54,13 @@ HEIGHT=1
|
||||
HEIGHT=1
|
||||
|
||||
[1300]
|
||||
HEIGHT=2
|
||||
HEIGHT=1
|
||||
|
||||
[1400]
|
||||
HEIGHT=1
|
||||
|
||||
[1500]
|
||||
HEIGHT=3
|
||||
HEIGHT=1
|
||||
|
||||
[1600]
|
||||
HEIGHT=1
|
||||
@ -78,7 +78,7 @@ HEIGHT=3
|
||||
HEIGHT=1
|
||||
|
||||
[2100]
|
||||
HEIGHT=2
|
||||
HEIGHT=1
|
||||
|
||||
[2200]
|
||||
HEIGHT=1
|
||||
@ -93,13 +93,13 @@ HEIGHT=1
|
||||
HEIGHT=3
|
||||
|
||||
[2600]
|
||||
HEIGHT=3
|
||||
HEIGHT=4
|
||||
|
||||
[2700]
|
||||
HEIGHT=2
|
||||
HEIGHT=1
|
||||
|
||||
[2710]
|
||||
HEIGHT=2
|
||||
HEIGHT=1
|
||||
|
||||
[2800]
|
||||
HEIGHT=1
|
||||
@ -116,6 +116,10 @@ HEIGHT=1
|
||||
[3400]
|
||||
HEIGHT=4
|
||||
|
||||
[4000]
|
||||
HEIGHT=1
|
||||
|
||||
[0]
|
||||
HEIGHT =
|
||||
|
||||
|
||||
@ -6,17 +6,19 @@
|
||||
#define FR_TIPORIGA 102
|
||||
#define FR_CODMAG 103
|
||||
#define FR_CODDEP 104
|
||||
// CODART CODSPV CODSPQ CODSPP alternativi definirne uno solo
|
||||
// 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
|
||||
// DESCR DESCRSPV DESCPSPQ DESCRSPP alternativi definirne uno solo
|
||||
#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
|
||||
@ -25,6 +27,7 @@
|
||||
// PREZZO VALORE alternativi definirne uno solo
|
||||
#define FR_PREZZO 109
|
||||
#define FR_VALORE 109
|
||||
|
||||
#define FR_QTAEVASA 110
|
||||
#define FR_RIGAEVASA 111
|
||||
#define FR_TARA 112
|
||||
|
||||
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
|
||||
|
||||
|
||||
@ -6,7 +6,9 @@
|
||||
|
||||
DEFINE_FIELD(CODSPV)
|
||||
DEFINE_FIELD(DESCRSPV)
|
||||
DEFINE_FIELD(UMQTASP)
|
||||
DEFINE_FIELD(VALORE)
|
||||
DEFINE_FIELD(QTA)
|
||||
DEFINE_FIELD(SCONTO)
|
||||
DEFINE_FIELD(CODIVA)
|
||||
DEFINE_FIELD(DESIVA)
|
||||
|
||||
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