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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/trunk@17172 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
rajitgill 2008-09-05 14:47:54 +00:00
parent 4c1da0b1b3
commit adbc4a2dce
9 changed files with 446 additions and 88 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lv/f168.dir
View File

@ -1,3 +1,3 @@
168 168
0 0
$lvcondv|||169|0|Tabella testate di contratto||| $lvcondv|||166|0|Tabella testate di contratto|||

2
lv/f168.trr
View File

@ -12,7 +12,7 @@ STRCONS|8|1|0|Stampa riepilogo consegne
TIPOLIS|2|1|0|Tipo listino TIPOLIS|2|1|0|Tipo listino
STPRZBOL|8|1|0|Stampa dei prezzi in bolla STPRZBOL|8|1|0|Stampa dei prezzi in bolla
CONTSPOR|2|1|0|Conta dello sporco CONTSPOR|2|1|0|Conta dello sporco
TIPODOC|1|4|0|Tipo documento DOCCP|2|1|0|Documenti alla consegna/ritiro
PERFAT|2|1|0|Periodicità di fatturazione PERFAT|2|1|0|Periodicità di fatturazione
INPERFAT|5|8|0|Inizio primo periodo di fatturazione INPERFAT|5|8|0|Inizio primo periodo di fatturazione
FATTPARZ|8|1|0|Fatturazione parziale FATTPARZ|8|1|0|Fatturazione parziale

1
lv/lv0.cpp
View File

@ -7,6 +7,7 @@ int main(int argc, char** argv)
const int r = (argc > 1) ? argv[1][1] - '0' : 0; const int r = (argc > 1) ? argv[1][1] - '0' : 0;
switch (r) switch (r)
{ {
case 2: lv0300(argc, argv); break; // parametri lavanderie lv0300
case 3: lv0400(argc, argv); break; // gestione contratti lv0400 case 3: lv0400(argc, argv); break; // gestione contratti lv0400
case 4: lv0500(argc, argv); break; // passaggi planning per contratto lv0500 case 4: lv0500(argc, argv); break; // passaggi planning per contratto lv0500
case 5: lv0600(argc, argv); break; // periodi di sospensione lv0600 case 5: lv0600(argc, argv); break; // periodi di sospensione lv0600

2
lv/lv0.h
View File

@ -2,7 +2,7 @@
#define __LV0_H #define __LV0_H
int lv0100(int argc, char* argv[]); int lv0100(int argc, char* argv[]);
//int lv0200(int argc, char* argv[]); int lv0300(int argc, char* argv[]);
int lv0400(int argc, char* argv[]); int lv0400(int argc, char* argv[]);
int lv0500(int argc, char* argv[]); int lv0500(int argc, char* argv[]);
int lv0600(int argc, char* argv[]); int lv0600(int argc, char* argv[]);

29
lv/lv0300.cpp Executable file
View File

@ -0,0 +1,29 @@
#include <confapp.h>
#include "lvconf.h"
class TConf_Lavanderie : public TConfig_application
{
public:
virtual bool user_create( );
TConf_Lavanderie() : TConfig_application( CONFIG_DITTA ){ }
virtual ~TConf_Lavanderie( ){ }
};
bool TConf_Lavanderie::user_create( )
{
TConfig conf(CONFIG_DITTA );
conf.set( "EdMask", "lv0300a", "lv" );
return true;
}
int lv0300(int argc, char* argv[])
{
TConf_Lavanderie appc;
appc.run(argc, argv, TR("Parametri gestione Lavanderie industriali"));
return 0;
}

263
lv/lv0300a.uml Executable file
View File

@ -0,0 +1,263 @@
#include "lvconf.h"
TOOLBAR "" 0 0 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -14 -1 ""
END
BUTTON DLG_INFO 10 2
BEGIN
PROMPT -24 -11 ""
END
BUTTON DLG_HELP 10 2
BEGIN
PROMPT -34 -11 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -44 -1 ""
END
ENDPAGE
PAGE "Parametri" 0 0 0 0
GROUPBOX DLG_NULL 78 4
BEGIN
PROMPT 1 1 "@bDocumenti di trasporto"
END
STRING F_CODNUM_DDT 4
BEGIN
PROMPT 2 2 "Numerazione "
FIELD NUM(DDT)
HELP "Codice numerazione"
USE %NUM
INPUT CODTAB F_CODNUM_DDT
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CODNUM_DDT CODTAB
OUTPUT F_DESNUM_DDT S0
CHECKTYPE REQUIRED
FLAG "UPA"
WARNING "Numerazione assente"
END
STRING F_DESNUM_DDT 50
BEGIN
PROMPT 24 2 ""
HELP "Descrizione numerazione"
USE %NUM KEY 2
INPUT S0 F_DESNUM_DDT
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_CODNUM_DDT
END
STRING F_TIPODOC_DDT 4
BEGIN
PROMPT 2 3 "Tipo "
FIELD TIPODOC(DDT)
HELP "Codice tipo documento"
USE %TIP
INPUT CODTAB F_TIPODOC_DDT
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_TIPODOC_DDT CODTAB
OUTPUT F_DESTIPODOC_DDT S0
CHECKTYPE REQUIRED
FLAG "UP"
END
STRING F_DESTIPODOC_DDT 50
BEGIN
PROMPT 24 3 ""
HELP "Descrizione tipo documento"
USE %TIP KEY 2
INPUT S0 F_DESTIPODOC_DDT
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_TIPODOC_DDT
END
GROUPBOX DLG_NULL 78 4
BEGIN
PROMPT 1 5 "@bBuoni Ritiro"
END
STRING F_CODNUM_RIT 4
BEGIN
PROMPT 2 6 "Numerazione "
FIELD NUM(RIT)
HELP "Codice numerazione"
USE %NUM
INPUT CODTAB F_CODNUM_RIT
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CODNUM_RIT CODTAB
OUTPUT F_DESNUM_RIT S0
CHECKTYPE REQUIRED
FLAG "UPA"
WARNING "Numerazione assente"
END
STRING F_DESNUM_RIT 50
BEGIN
PROMPT 24 6 ""
HELP "Descrizione numerazione"
USE %NUM KEY 2
INPUT S0 F_DESNUM_RIT
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_CODNUM_RIT
END
STRING F_TIPODOC_RIT 4
BEGIN
PROMPT 2 7 "Tipo "
FIELD TIPODOC(RIT)
HELP "Codice tipo documento"
USE %TIP
INPUT CODTAB F_TIPODOC_RIT
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_TIPODOC_RIT CODTAB
OUTPUT F_DESTIPODOC_RIT S0
CHECKTYPE REQUIRED
FLAG "UP"
END
STRING F_DESTIPODOC_RIT 50
BEGIN
PROMPT 24 7 ""
HELP "Descrizione tipo documento"
USE %TIP KEY 2
INPUT S0 F_DESTIPODOC_RIT
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_TIPODOC_RIT
END
GROUPBOX DLG_NULL 78 4
BEGIN
PROMPT 1 9 "@bBuoni Prelievo"
END
STRING F_CODNUM_PRE 4
BEGIN
PROMPT 2 10 "Numerazione "
FIELD NUM(PRE)
HELP "Codice numerazione"
USE %NUM
INPUT CODTAB F_CODNUM_PRE
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CODNUM_PRE CODTAB
OUTPUT F_DESNUM_PRE S0
CHECKTYPE REQUIRED
FLAG "UPA"
WARNING "Numerazione assente"
END
STRING F_DESNUM_PRE 50
BEGIN
PROMPT 24 10 ""
HELP "Descrizione numerazione"
USE %NUM KEY 2
INPUT S0 F_DESNUM_PRE
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_CODNUM_PRE
END
STRING F_TIPODOC_PRE 4
BEGIN
PROMPT 2 11 "Tipo "
FIELD TIPODOC(PRE)
HELP "Codice tipo documento"
USE %TIP
INPUT CODTAB F_TIPODOC_PRE
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_TIPODOC_PRE CODTAB
OUTPUT F_DESTIPODOC_PRE S0
CHECKTYPE REQUIRED
FLAG "UP"
END
STRING F_DESTIPODOC_PRE 50
BEGIN
PROMPT 24 11 ""
HELP "Descrizione tipo documento"
USE %TIP KEY 2
INPUT S0 F_DESTIPODOC_PRE
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_TIPODOC_PRE
END
GROUPBOX DLG_NULL 78 4
BEGIN
PROMPT 1 13 "@bBuoni Anticipo"
END
STRING F_CODNUM_ANT 4
BEGIN
PROMPT 2 14 "Numerazione "
FIELD NUM(ANT)
HELP "Codice numerazione"
USE %NUM
INPUT CODTAB F_CODNUM_ANT
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_CODNUM_ANT CODTAB
OUTPUT F_DESNUM_ANT S0
CHECKTYPE REQUIRED
FLAG "UPA"
WARNING "Numerazione assente"
END
STRING F_DESNUM_ANT 50
BEGIN
PROMPT 24 14 ""
HELP "Descrizione numerazione"
USE %NUM KEY 2
INPUT S0 F_DESNUM_ANT
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_CODNUM_ANT
END
STRING F_TIPODOC_ANT 4
BEGIN
PROMPT 2 15 "Tipo "
FIELD TIPODOC(ANT)
HELP "Codice tipo documento"
USE %TIP
INPUT CODTAB F_TIPODOC_ANT
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_TIPODOC_ANT CODTAB
OUTPUT F_DESTIPODOC_ANT S0
CHECKTYPE REQUIRED
FLAG "UP"
END
STRING F_DESTIPODOC_ANT 50
BEGIN
PROMPT 24 15 ""
HELP "Descrizione tipo documento"
USE %TIP KEY 2
INPUT S0 F_DESTIPODOC_ANT
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_TIPODOC_ANT
END
ENDPAGE
ENDMASK

3
lv/lv0400.h
View File

@ -52,6 +52,9 @@
#define F_CONSMESE 252 #define F_CONSMESE 252
#define F_CONSANNO 253 #define F_CONSANNO 253
#define DLG_PLANNING 254 #define DLG_PLANNING 254
#define F_INDSPED 255
#define F_INDIR 256
#define F_DOCCP 257
#define S_CODART 101 #define S_CODART 101
#define S_DESCR 102 #define S_DESCR 102
#define S_UM 103 #define S_UM 103

207
lv/lv0400a.uml
View File

@ -8,12 +8,12 @@ PAGE "Contratto" 0 2 0 0
GROUPBOX DLG_NULL 78 5 GROUPBOX DLG_NULL 78 5
BEGIN BEGIN
PROMPT 1 1 "@bContratti" PROMPT 1 0 "@bContratti"
END END
NUMBER F_CODCF 6 NUMBER F_CODCF 6
BEGIN BEGIN
PROMPT 2 2 "Cliente " PROMPT 2 1 "Cliente "
FIELD CODCF FIELD CODCF
FLAGS "U" FLAGS "U"
KEY 1 KEY 1
@ -27,9 +27,9 @@ BEGIN
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_RAGSOC 50 30 STRING F_RAGSOC 50
BEGIN BEGIN
PROMPT 2 3 "Ragione soc. " PROMPT 25 1 ""
KEY 2 KEY 2
USE LF_CLIFO KEY 2 USE LF_CLIFO KEY 2
INPUT TIPOCF "C" INPUT TIPOCF "C"
@ -42,7 +42,7 @@ END
NUMBER F_CODCONT 6 NUMBER F_CODCONT 6
BEGIN BEGIN
PROMPT 2 4 "Contratto N. " PROMPT 2 2 "Contratto N. "
USE LF_LVCONDV USE LF_LVCONDV
JOIN LF_CLIFO INTO TIPOCF="C" CODCF=CODCF JOIN LF_CLIFO INTO TIPOCF="C" CODCF=CODCF
INPUT CODCF F_CODCF INPUT CODCF F_CODCF
@ -63,27 +63,49 @@ END
DATE F_DATAIN DATE F_DATAIN
BEGIN BEGIN
PROMPT 51 2 "Inizio " PROMPT 25 2 "Inizio "
FIELD DATAIN FIELD DATAIN
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
DATE F_DATASC DATE F_DATASC
BEGIN BEGIN
PROMPT 51 3 "Scadenza " PROMPT 45 2 "Scadenza "
FIELD DATASC FIELD DATASC
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
BUTTON DLG_PLANNING 10 NUMBER F_INDSPED 3
BEGIN BEGIN
PROMPT 51 4 "~Planning" PROMPT 2 3 "Indirizzo sped. "
USE LF_INDSP KEY 1
INPUT TIPOCF "C"
INPUT CODCF F_CODCF SELECT
INPUT CODIND F_INDSPED
DISPLAY "Codice" CODCF
DISPLAY "Cod.Ind.Sped." CODIND
DISPLAY "Indirizzo@30" INDIR
DISPLAY "C.A.P." CAP
OUTPUT F_INDSPED CODIND
OUTPUT F_INDIR INDIR
CHECKTYPE NORMAL
END
STRING F_INDIR 50 39
BEGIN
PROMPT 25 3 ""
FLAGS "D"
END
BUTTON DLG_PLANNING 10 2
BEGIN
PROMPT 66 2 "~Planning"
MESSAGE RUN,lv0 -4 #F_CODCF #F_CODCONT MESSAGE RUN,lv0 -4 #F_CODCF #F_CODCONT
END END
SPREADSHEET F_RIGHE 0 -7 SPREADSHEET F_RIGHE 0 9
BEGIN BEGIN
PROMPT 0 6 "Righe contratto" PROMPT 0 5 "Righe contratto"
ITEM "Articolo@20" ITEM "Articolo@20"
ITEM "Descrizione@50" ITEM "Descrizione@50"
ITEM "UM" ITEM "UM"
@ -110,15 +132,20 @@ BEGIN
ITEM "Arrotondamento" ITEM "Arrotondamento"
END END
GROUPBOX DLG_NULL 78 8
BEGIN
PROMPT 1 14 "@bDettaglio"
END
NUMBER F_DOTOD 9 NUMBER F_DOTOD 9
BEGIN BEGIN
PROMPT 1 -6 "Dotazione odierna " PROMPT 2 15 "Dotazione odierna "
FLAGS "D" FLAGS "D"
END END
STRING F_GRMERC 3 STRING F_GRMERC 3
BEGIN BEGIN
PROMPT 30 -6 "Tipologia " PROMPT 32 15 "Tipologia "
FLAG "UD" FLAG "UD"
USE GMC KEY 1 SELECT CODTAB[4,5]=="" USE GMC KEY 1 SELECT CODTAB[4,5]==""
INPUT CODTAB F_GRMERC INPUT CODTAB F_GRMERC
@ -130,94 +157,93 @@ END
STRING F_COLORE 20 15 STRING F_COLORE 20 15
BEGIN BEGIN
PROMPT 52 -6 "Colore " PROMPT 54 15 "Colore "
FLAGS "D" FLAGS "D"
END END
NUMBER F_PPCONF 9 NUMBER F_PPCONF 9
BEGIN BEGIN
PROMPT 1 -5 "Pz. per Pacco " PROMPT 2 16 "Pz. per Pacco "
FLAGS "D" FLAGS "D"
END END
NUMBER F_PPCOLLO 9 NUMBER F_PPCOLLO 9
BEGIN BEGIN
PROMPT 30 -5 "Per Sacco " PROMPT 32 16 "Per Sacco "
FLAGS "D" FLAGS "D"
END END
NUMBER F_PPPALLET 9 NUMBER F_PPPALLET 9
BEGIN BEGIN
PROMPT 52 -5 "Per Carrello " PROMPT 54 16 "Per Carrello "
FLAGS "D"
END
NUMBER F_CONSMESE 9
BEGIN
PROMPT 1 -4 "Qtà. consegnata nel mese "
FLAGS "D"
END
NUMBER F_CONSANNO 9
BEGIN
PROMPT 38 -4 "Qtà. consegnata nell' anno "
FLAGS "D"
END
STRING F_LAVATRICE 3
BEGIN
PROMPT 1 -3 "Lavatrice "
FLAGS "D"
END
STRING F_ARTLAVCONT 4
BEGIN
PROMPT 30 -3 "Art.Lavacont "
FLAGS "D" FLAGS "D"
END END
STRING F_MANGDEST 3 STRING F_MANGDEST 3
BEGIN BEGIN
PROMPT 50 -3 "Mangano Destinazione " PROMPT 2 17 "Mangano Destinazione "
FLAGS "D"
END
STRING F_ARTLAVCONT 4
BEGIN
PROMPT 32 17 "Art.Lava.cont. "
FLAGS "D"
END
STRING F_LAVATRICE 4
BEGIN
PROMPT 54 17 "Lavatrice "
FLAGS "D" FLAGS "D"
END END
STRING F_CODLAV1 3 STRING F_CODLAV1 3
BEGIN BEGIN
PROMPT 1 -2 "Cod. Lavaggio 1 " PROMPT 2 18 "Cod. Lavaggio 1 "
FLAGS "D" FLAGS "D"
END END
STRING F_CODLAV2 3 STRING F_CODLAV2 3
BEGIN BEGIN
PROMPT 30 -2 "Cod. Lavaggio 2 " PROMPT 32 18 "Cod. Lavaggio 2 "
FLAGS "D" FLAGS "D"
END END
STRING F_LIVELLO 1 STRING F_TIPOPARTE 1
BEGIN BEGIN
PROMPT 60 -2 "Livello " PROMPT 65 18 "Tipo Parte "
FLAGS "D" FLAGS "D"
END END
STRING F_LINDEST1 3 STRING F_LINDEST1 3
BEGIN BEGIN
PROMPT 1 -1 "Linea destinazione 1" PROMPT 2 19 "Linea destinazione 1 "
FLAGS "D" FLAGS "D"
END END
STRING F_LINDEST2 3 STRING F_LINDEST2 3
BEGIN BEGIN
PROMPT 30 -1 "Linea destinazione 2 " PROMPT 32 19 "Linea destinazione 2 "
FLAGS "D" FLAGS "D"
END END
STRING F_TIPOPARTE 1 STRING F_LIVELLO 1
BEGIN BEGIN
PROMPT 60 -1 "Tipo Parte " PROMPT 65 19 "Livello "
FLAGS "D" FLAGS "D"
END END
NUMBER F_CONSMESE 9
BEGIN
PROMPT 2 20 "Qtà. consegnata nel mese"
FLAGS "D"
END
NUMBER F_CONSANNO 9
BEGIN
PROMPT 41 20 "Qtà. consegnata nell' anno "
FLAGS "D"
END
ENDPAGE ENDPAGE
@ -286,7 +312,7 @@ END
RADIOBUTTON F_TIPOLIS 1 25 RADIOBUTTON F_TIPOLIS 1 25
BEGIN BEGIN
PROMPT 40 7 "@bTipo Listino:" PROMPT 40 7 "@bTipo Listino"
ITEM "0|Prezzo nel contratto" ITEM "0|Prezzo nel contratto"
ITEM "1|Listino in anag.Articoli" ITEM "1|Listino in anag.Articoli"
FIELD TIPOLIS FIELD TIPOLIS
@ -294,7 +320,7 @@ END
RADIOBUTTON F_TIPOIMB 1 14 RADIOBUTTON F_TIPOIMB 1 14
BEGIN BEGIN
PROMPT 66 7 "@bTipo imballo:" PROMPT 66 7 "@bTipo imballo"
ITEM "0|Sacco" ITEM "0|Sacco"
ITEM "1|Carrello" ITEM "1|Carrello"
FIELD TIPOIMB FIELD TIPOIMB
@ -335,7 +361,7 @@ END
STRING F_CAUSMAG 4 STRING F_CAUSMAG 4
BEGIN BEGIN
PROMPT 1 18 "Causale di default:" PROMPT 1 18 "Causale di default"
USE CAU USE CAU
INPUT CODTAB F_CAUSMAG INPUT CODTAB F_CAUSMAG
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
@ -348,7 +374,7 @@ END
STRING F_CAUSMAGDESC 50 STRING F_CAUSMAGDESC 50
BEGIN BEGIN
PROMPT 1 19 "Descrizione " PROMPT 27 18 ""
USE CAU KEY 2 USE CAU KEY 2
INPUT S0 F_CAUSMAGDESC INPUT S0 F_CAUSMAGDESC
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
@ -357,6 +383,17 @@ BEGIN
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
LISTBOX F_DOCCP 23
BEGIN
PROMPT 1 19 "Documenti alla consegna/Ritiro "
ITEM "0|"
ITEM "1|Documenti di trasporto"
ITEM "2|Buoni di Ritiro"
ITEM "3|Buoni di Prelievo"
ITEM "4|Buoni di Anticipo"
FIELD DOCCP
END
RADIOBUTTON F_CONTSPOR 1 80 RADIOBUTTON F_CONTSPOR 1 80
BEGIN BEGIN
PROMPT 1 20 "@bConta dello sporco" PROMPT 1 20 "@bConta dello sporco"
@ -374,91 +411,91 @@ PAGE "Opzioni" 0 2 0 0
GROUPBOX DLG_NULL 58 16 GROUPBOX DLG_NULL 58 16
BEGIN BEGIN
PROMPT 15 2 "" PROMPT 9 2 ""
END END
BOOLEAN F_ATTFATNODT BOOLEAN F_ATTFATNODT
BEGIN BEGIN
PROMPT 16 3 "Attiva fatturazione indipendentemente dalla data" PROMPT 10 3 "Attiva fatturazione indipendentemente dalla data"
FIELD ATTFATNODT FIELD ATTFATNODT
END END
BOOLEAN F_FORFNOCONS BOOLEAN F_FORFNOCONS
BEGIN BEGIN
PROMPT 16 4 "Non fatturare forfait se senza consegne" PROMPT 10 4 "Non fatturare forfait se senza consegne"
FIELD FORFNOCONS FIELD FORFNOCONS
END END
BOOLEAN F_SSCONS BOOLEAN F_SSCONS
BEGIN BEGIN
PROMPT 16 5 "Spese di spedizione alla consegna" PROMPT 10 5 "Spese di spedizione alla consegna"
FIELD SSCONS FIELD SSCONS
END END
BOOLEAN F_RIFBOLFAT BOOLEAN F_RIFBOLFAT
BEGIN BEGIN
PROMPT 16 6 "Riferimenti bolle in fattura" PROMPT 10 6 "Riferimenti bolle in fattura"
FIELD RIFBOLFAT FIELD RIFBOLFAT
END END
BOOLEAN F_ADDCAPROT BOOLEAN F_ADDCAPROT
BEGIN BEGIN
PROMPT 16 7 "Addebita capi rotti in fattura" PROMPT 10 7 "Addebita capi rotti in fattura"
FIELD ADDCAPROT FIELD ADDCAPROT
END END
BOOLEAN F_PROFORME BOOLEAN F_PROFORME
BEGIN BEGIN
PROMPT 16 8 "Proforme(progetti)" PROMPT 10 8 "Proforme(progetti)"
FIELD PROFORME FIELD PROFORME
END END
BOOLEAN F_STRCONS BOOLEAN F_STRCONS
BEGIN BEGIN
PROMPT 16 9 "Stampa di riepilogo consegne" PROMPT 10 9 "Stampa di riepilogo consegne"
FIELD STRCONS FIELD STRCONS
END END
BOOLEAN F_CICLAGGIO BOOLEAN F_CICLAGGIO
BEGIN BEGIN
PROMPT 16 10 "Ciclaggio su 2 righe" PROMPT 10 10 "Ciclaggio su 2 righe"
FIELD CICLAGGIO FIELD CICLAGGIO
END END
BOOLEAN F_STPRZBOL BOOLEAN F_STPRZBOL
BEGIN BEGIN
PROMPT 16 11 "Visualizza prezzo in bolla" PROMPT 10 11 "Visualizza prezzo in bolla"
FIELD STPRZBOL FIELD STPRZBOL
END END
BOOLEAN F_STETIMATI BOOLEAN F_STETIMATI
BEGIN BEGIN
PROMPT 16 12 "Stampa etichette con MATI" PROMPT 10 12 "Stampa etichette con MATI"
FIELD STETIMATI FIELD STETIMATI
END END
BOOLEAN F_STETITS BOOLEAN F_STETITS
BEGIN BEGIN
PROMPT 16 13 "Stampa etic. con Touch-Screen" PROMPT 10 13 "Stampa etic. con Touch-Screen"
FIELD STETITS FIELD STETITS
END END
BOOLEAN F_STDDTPTS BOOLEAN F_STDDTPTS
BEGIN BEGIN
PROMPT 16 14 "Stampa DDT da pulito con Touch-Screen" PROMPT 10 14 "Stampa DDT da pulito con Touch-Screen"
FIELD STDDTPTS FIELD STDDTPTS
END END
BOOLEAN F_STDICITURA BOOLEAN F_STDICITURA
BEGIN BEGIN
PROMPT 16 15 "Stampa dicitura '..COME DA ELENCO CONSEGNE'" PROMPT 10 15 "Stampa dicitura '..COME DA ELENCO CONSEGNE'"
FIELD STDICITURA FIELD STDICITURA
END END
BOOLEAN F_RITAUDTTMP BOOLEAN F_RITAUDTTMP
BEGIN BEGIN
PROMPT 16 16 "Ritiro automatico dotazione temporanea" PROMPT 10 16 "Ritiro automatico dotazione temporanea"
FIELD RITAUDTTMP FIELD RITAUDTTMP
END END
ENDPAGE ENDPAGE
@ -589,7 +626,7 @@ END
STRING S_CAUSMAG 4 STRING S_CAUSMAG 4
BEGIN BEGIN
PROMPT 52 9 "Causale di default: " PROMPT 52 9 "Causale di default "
USE CAU USE CAU
INPUT CODTAB S_CAUSMAG INPUT CODTAB S_CAUSMAG
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB

25
lv/lvconf.h Executable file
View File

@ -0,0 +1,25 @@
#define DDT 1
#define RIT 2
#define PRE 3
#define ANT 4
#define F_CODNUM_DDT 101
#define F_DESNUM_DDT 102
#define F_TIPODOC_DDT 103
#define F_DESTIPODOC_DDT 104
#define F_CODNUM_RIT 105
#define F_DESNUM_RIT 106
#define F_TIPODOC_RIT 107
#define F_DESTIPODOC_RIT 108
#define F_CODNUM_PRE 109
#define F_DESNUM_PRE 110
#define F_TIPODOC_PRE 111
#define F_DESTIPODOC_PRE 112
#define F_CODNUM_ANT 113
#define F_DESNUM_ANT 114
#define F_TIPODOC_ANT 115
#define F_DESTIPODOC_ANT 116