Bella botta, quasi finale, alle configurazioni. Rimosso tutto l'inutile.
Cio' che èper ora non serve e' stato spostato in excluded.fld. git-svn-id: svn://10.65.10.50/trunk@3605 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo
parent
af13fe4e16
commit
a659346f5e
@ -16,19 +16,17 @@
|
|||||||
#include <tabutil.h>
|
#include <tabutil.h>
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
#define SINTASSI "Sintassi: VE0 -2 -[1|2|3|4|5]"
|
#include "veconf.h"
|
||||||
|
|
||||||
|
#define SINTASSI "Usage: VE0 -2 -[1|2|3|4|5|6]"
|
||||||
|
|
||||||
class TConf_vendite : public TConfig_application
|
class TConf_vendite : public TConfig_application
|
||||||
{
|
{
|
||||||
private:
|
char _current;
|
||||||
|
|
||||||
bool _changed;
|
|
||||||
|
|
||||||
public:
|
public:
|
||||||
|
|
||||||
virtual bool preprocess_config (TMask& mask, TConfig& config);
|
virtual bool preprocess_config (TMask& mask, TConfig& config);
|
||||||
virtual bool postprocess_config_changed (const char* par, const char* var,
|
|
||||||
const char* oldv, const char* newv);
|
|
||||||
virtual bool postprocess_config (TMask& mask, TConfig& config);
|
virtual bool postprocess_config (TMask& mask, TConfig& config);
|
||||||
virtual bool user_create( );
|
virtual bool user_create( );
|
||||||
virtual bool user_destroy( );
|
virtual bool user_destroy( );
|
||||||
@ -41,6 +39,28 @@ bool TConf_vendite::preprocess_config (TMask& mask, TConfig& config)
|
|||||||
{
|
{
|
||||||
disable_menu_item(M_FILE_NEW);
|
disable_menu_item(M_FILE_NEW);
|
||||||
disable_menu_item(M_FILE_REVERT);
|
disable_menu_item(M_FILE_REVERT);
|
||||||
|
if (_current == '5') // solo per configurazione "e"
|
||||||
|
{
|
||||||
|
TToken_string ric(config.get("RICERCACR"));
|
||||||
|
TString ana_items("AR|GM|SM|RF");
|
||||||
|
int nor_order = 0, ana_order = 0;
|
||||||
|
TString it;
|
||||||
|
for (it = ric.get();it.not_empty();it = ric.get())
|
||||||
|
{
|
||||||
|
if (ana_items.find(it) >= 0)
|
||||||
|
{
|
||||||
|
mask.set(F_RICERCAAN1+ana_order,it);
|
||||||
|
if (ana_order>0) // Se e' la prima volta...
|
||||||
|
mask.set(F_RICERCACR1+nor_order,"AN");
|
||||||
|
ana_order++;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
mask.set(F_RICERCACR1+nor_order,it);
|
||||||
|
nor_order++;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -48,47 +68,56 @@ bool TConf_vendite::postprocess_config (TMask& mask, TConfig& config)
|
|||||||
{
|
{
|
||||||
enable_menu_item(M_FILE_NEW);
|
enable_menu_item(M_FILE_NEW);
|
||||||
enable_menu_item(M_FILE_REVERT);
|
enable_menu_item(M_FILE_REVERT);
|
||||||
|
if (_current == '5') // solo per configurazione "e"
|
||||||
|
{
|
||||||
|
TToken_string ric;
|
||||||
|
TString r;
|
||||||
|
for (short i=F_RICERCACR1;i<=F_RICERCACR5;i++)
|
||||||
|
{
|
||||||
|
r = mask.get(i);
|
||||||
|
if (r == "AN")
|
||||||
|
for (short j=F_RICERCAAN1;j<=F_RICERCAAN4;j++)
|
||||||
|
ric.add(mask.get(j));
|
||||||
|
else
|
||||||
|
ric.add(r);
|
||||||
|
}
|
||||||
|
config.set("RICERCACR",ric);
|
||||||
|
}
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
bool TConf_vendite::postprocess_config_changed (const char* par, const char* var,
|
|
||||||
const char* oldv, const char* newv)
|
|
||||||
{
|
|
||||||
// Notifica al motore che la configurazione è cambiata: occorre rigenerare le maschere
|
|
||||||
_changed = TRUE;
|
|
||||||
return TRUE;
|
|
||||||
}
|
|
||||||
|
|
||||||
bool TConf_vendite::user_create( )
|
bool TConf_vendite::user_create( )
|
||||||
{
|
{
|
||||||
TString16 arg( argv(2) );
|
TString16 arg( argv(2) );
|
||||||
_changed = FALSE;
|
|
||||||
// Il fottuto meno serve per evitare fottutamente che la fottuta confapp
|
// Il fottuto meno serve per evitare fottutamente che la fottuta confapp
|
||||||
// si fotta il fottuto parametro
|
// si fotta il fottuto parametro
|
||||||
if( arg[ 0 ] != '-' )
|
if( arg[ 0 ] != '-' )
|
||||||
fatal_box( SINTASSI );
|
fatal_box( SINTASSI );
|
||||||
char msk = arg[1];
|
_current = arg[1];
|
||||||
// Devo usare un puntatore così deletandolo si registra
|
TConfig conf(_current == '6' ? CONFIG_STUDIO : CONFIG_DITTA );
|
||||||
TConfig confditta( CONFIG_DITTA );
|
if (_current == '6') set_config(CONFIG_STUDIO);
|
||||||
// Prima usavo le lettere ma la fottuta confapp si fotte il fottuto -c per i suoi fottuti
|
// Prima usavo le lettere ma la fottuta confapp si fotte il fottuto -c per i suoi fottuti
|
||||||
// motivi, così uso i fottuti numeri
|
// motivi, così uso i fottuti numeri
|
||||||
switch( msk )
|
switch( _current )
|
||||||
{
|
{
|
||||||
case '1':
|
case '1':
|
||||||
confditta.set( "EdMask", "ve0200a", "ve" );
|
conf.set( "EdMask", "ve0200a", "ve" );
|
||||||
break;
|
break;
|
||||||
case '2':
|
case '2':
|
||||||
confditta.set( "EdMask", "ve0200b", "ve" );
|
conf.set( "EdMask", "ve0200b", "ve" );
|
||||||
break;
|
break;
|
||||||
case '3':
|
case '3':
|
||||||
confditta.set( "EdMask", "ve0200c", "ve" );
|
conf.set( "EdMask", "ve0200c", "ve" );
|
||||||
break;
|
break;
|
||||||
case '4':
|
case '4':
|
||||||
confditta.set( "EdMask", "ve0200d", "ve" );
|
conf.set( "EdMask", "ve0200d", "ve" );
|
||||||
break;
|
break;
|
||||||
case '5':
|
case '5':
|
||||||
confditta.set( "EdMask", "ve0200e", "ve" );
|
conf.set( "EdMask", "ve0200e", "ve" );
|
||||||
|
break;
|
||||||
|
case '6':
|
||||||
|
conf.set( "EdMask", "ve0200f", "ve" );
|
||||||
break;
|
break;
|
||||||
default:
|
default:
|
||||||
fatal_box( SINTASSI );
|
fatal_box( SINTASSI );
|
||||||
@ -100,12 +129,6 @@ bool TConf_vendite::user_create( )
|
|||||||
|
|
||||||
bool TConf_vendite::user_destroy( )
|
bool TConf_vendite::user_destroy( )
|
||||||
{
|
{
|
||||||
if( _changed )
|
|
||||||
{
|
|
||||||
TConfig confditta( CONFIG_DITTA );
|
|
||||||
confditta.set( "EdMask", "", "ve" );
|
|
||||||
confditta.set( "CHANGED", "X", "ve" );
|
|
||||||
}
|
|
||||||
return TRUE;
|
return TRUE;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
161
ve/ve0200a.uml
161
ve/ve0200a.uml
@ -1,5 +1,5 @@
|
|||||||
/* toolbar */
|
#include "veconf.h"
|
||||||
#include "VECONF.H"
|
|
||||||
TOOLBAR "" 0 20 0 2
|
TOOLBAR "" 0 20 0 2
|
||||||
|
|
||||||
BUTTON DLG_OK 10 2
|
BUTTON DLG_OK 10 2
|
||||||
@ -14,61 +14,58 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
|
PAGE "Tabelle di installazione" 1 1 60 14
|
||||||
|
|
||||||
PAGE "Tab. di installazione" 1 1 60 14
|
GROUPBOX DLG_NULL 78 7
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 15
|
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 "Gestione listini/contratti/campagne 1/2"
|
PROMPT 1 1 "Gestione listini"
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN F_CUMULAALC
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 2 "Cumula articolo/listino/listino"
|
|
||||||
FIELD CUMULAALC
|
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESLISTINI
|
BOOLEAN F_GESLISTINI
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Gestione archivio listini"
|
PROMPT 2 2 "Gestione archivio listini"
|
||||||
MESSAGE FALSE DISABLE,1@
|
MESSAGE FALSE CLEAR,1@
|
||||||
MESSAGE TRUE ENABLE,1@
|
MESSAGE TRUE ENABLE,1@
|
||||||
FIELD GES[A_LISTINI]
|
FIELD GES[A_LISTINI]
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESLISCV
|
BOOLEAN F_GESLISCV
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Gestione codice categoria vendite+codice listino"
|
PROMPT 2 3 "Gestione codice categoria vendite+codice listino"
|
||||||
FIELD GESLISCV
|
FIELD GESLISCV
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESUM
|
BOOLEAN F_GESUM
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Gestione listini per unita di misura"
|
PROMPT 2 4 "Gestione listini per unita di misura"
|
||||||
FIELD GESUM[A_LISTINI]
|
FIELD GESUM[A_LISTINI]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESSCALISTINI
|
BOOLEAN F_GESSCALISTINI
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 6 "Gestione listino a scaglioni"
|
PROMPT 2 5 "Gestione listino a scaglioni"
|
||||||
FIELD GESSCA[A_LISTINI]
|
FIELD GESSCA[A_LISTINI]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
BOOLEAN F_GESSOLISTINI
|
BOOLEAN F_GESSOLISTINI
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 7 "Gestione sconti/omaggio articoli"
|
PROMPT 2 6 "Gestione sconti/omaggio articoli"
|
||||||
FIELD GESSO[A_LISTINI]
|
FIELD GESSO[A_LISTINI]
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
|
GROUPBOX DLG_NULL 78 7
|
||||||
|
BEGIN
|
||||||
|
PROMPT 1 8 "Gestione contratti"
|
||||||
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESCONTRATTI
|
BOOLEAN F_GESCONTRATTI
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 9 "Gestione archivio contratti"
|
PROMPT 2 9 "Gestione archivio contratti"
|
||||||
MESSAGE FALSE DISABLE,2@
|
MESSAGE FALSE CLEAR,2@
|
||||||
MESSAGE TRUE ENABLE,2@
|
MESSAGE TRUE ENABLE,2@
|
||||||
FIELD GES[A_CONTRATTI]
|
FIELD GES[A_CONTRATTI]
|
||||||
END
|
END
|
||||||
@ -83,7 +80,7 @@ END
|
|||||||
BOOLEAN F_GESCONTRATTIUM
|
BOOLEAN F_GESCONTRATTIUM
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 11 "Gestione contratti per unita di misura"
|
PROMPT 2 11 "Gestione contratti per unita di misura"
|
||||||
FIELD GES[A_CONTRATTI]
|
FIELD GESUM[A_CONTRATTI]
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -94,7 +91,6 @@ FIELD GESSCA[A_CONTRATTI]
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
BOOLEAN F_GESSOCONTRATTI
|
BOOLEAN F_GESSOCONTRATTI
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 13 "Gestione sconti/omaggio articoli"
|
PROMPT 2 13 "Gestione sconti/omaggio articoli"
|
||||||
@ -102,102 +98,47 @@ FIELD GESSO[A_CONTRATTI]
|
|||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
GROUPBOX DLG_NULL 78 6
|
||||||
|
|
||||||
PAGE "Tab. di installazione" 1 1 60 14
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 15
|
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 "Gestione listini/contratti/campagne 2/2"
|
PROMPT 1 15 "Gestione campagne"
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
BOOLEAN F_GESCAMPAGNE
|
BOOLEAN F_GESCAMPAGNE
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 "Gestione archivio campagne"
|
PROMPT 2 16 "Gestione archivio campagne"
|
||||||
MESSAGE TRUE ENABLE,3@
|
MESSAGE TRUE ENABLE,3@
|
||||||
MESSAGE FALSE DISABLE,3@
|
MESSAGE FALSE CLEAR,3@
|
||||||
FIELD GES[A_CAMPAGNE]
|
FIELD GES[A_OFFERTE]
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESCAMPAGNEUM
|
BOOLEAN F_GESCAMPAGNEUM
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Gestione campagne per unita di misura"
|
PROMPT 2 17 "Gestione campagne per unita di misura"
|
||||||
FIELD GESUM[A_CAMPAGNE]
|
FIELD GESUM[A_OFFERTE]
|
||||||
GROUP 3
|
GROUP 3
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESSCACAMPAGNE
|
BOOLEAN F_GESSCACAMPAGNE
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Gestione campagne a scaglioni"
|
PROMPT 2 18 "Gestione campagne a scaglioni"
|
||||||
FIELD GESSCA[A_CAMPAGNE]
|
FIELD GESSCA[A_OFFERTE]
|
||||||
GROUP 3
|
GROUP 3
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|
||||||
BOOLEAN F_GESSOCAMPAGNE
|
BOOLEAN F_GESSOCAMPAGNE
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Gestione sconti/omaggio articoli"
|
PROMPT 2 19 "Gestione sconti/omaggio articoli"
|
||||||
FIELD GESSO[A_CAMPAGNE]
|
FIELD GESSO[A_OFFERTE]
|
||||||
GROUP 3
|
GROUP 3
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_SEQRICRIGHE1 40
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 7 "Sequenza di ricerca righe "
|
|
||||||
ITEM "A|Codice articolo"
|
|
||||||
ITEM "L|Codice linea"
|
|
||||||
ITEM "C|Codice linea/categoria"
|
|
||||||
ITEM "R|Codice raggruppamento fiscale"
|
|
||||||
ITEM " | "
|
|
||||||
FIELD SEQRICRIGHE[ 1 ]
|
|
||||||
END
|
|
||||||
|
|
||||||
LIST F_SEQRICRIGHE2 40
|
|
||||||
BEGIN
|
|
||||||
PROMPT 28 8 ""
|
|
||||||
ITEM "A|Codice articolo"
|
|
||||||
ITEM "L|Codice linea"
|
|
||||||
ITEM "C|Codice linea/categoria"
|
|
||||||
ITEM "R|Codice raggruppamento fiscale"
|
|
||||||
ITEM " | "
|
|
||||||
FIELD SEQRICRIGHE[ 2 ]
|
|
||||||
END
|
|
||||||
|
|
||||||
LIST F_SEQRICRIGHE3 40
|
|
||||||
BEGIN
|
|
||||||
PROMPT 28 9 ""
|
|
||||||
ITEM "A|Codice articolo"
|
|
||||||
ITEM "L|Codice linea"
|
|
||||||
ITEM "C|Codice linea/categoria"
|
|
||||||
ITEM "R|Codice raggruppamento fiscale"
|
|
||||||
ITEM " | "
|
|
||||||
FIELD SEQRICRIGHE[ 3 ]
|
|
||||||
END
|
|
||||||
|
|
||||||
LIST F_SEQRICRIGHE4 40
|
|
||||||
BEGIN
|
|
||||||
PROMPT 28 10 ""
|
|
||||||
ITEM "A|Codice articolo"
|
|
||||||
ITEM "L|Codice linea"
|
|
||||||
ITEM "C|Codice linea/categoria"
|
|
||||||
ITEM "R|Codice raggruppamento fiscale"
|
|
||||||
ITEM " | "
|
|
||||||
FIELD SEQRICRIGHE[ 4 ]
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Tab. gestione sconti " 1 1 60 14
|
PAGE "Tabella gestione sconti " 1 1 60 14
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 10
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 "Gestione Sconti"
|
|
||||||
END
|
|
||||||
|
|
||||||
LIST F_GESSCO 36
|
LIST F_GESSCO 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Tipo gestione sconti documenti "
|
PROMPT 2 2 "Tipo gestione sconti documenti "
|
||||||
ITEM "N|Non gestire"
|
ITEM "N|Non gestire"
|
||||||
ITEM "P|Percentuale su anagrafica "
|
ITEM "P|Percentuale su anagrafica "
|
||||||
ITEM "T|Gestione tabella sconti "
|
ITEM "T|Gestione tabella sconti "
|
||||||
@ -207,64 +148,54 @@ END
|
|||||||
|
|
||||||
BOOLEAN F_SCOKEY1
|
BOOLEAN F_SCOKEY1
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 "Tabella categoria vendite in chiave"
|
PROMPT 2 3 "Tabella categoria vendite in chiave"
|
||||||
FLAG "D"
|
MESSAGE TRUE ENABLE, 4@
|
||||||
MESSAGE TRUE SHOW, 4@
|
MESSAGE FALSE CLEAR,4@|CLEAR,5@|CLEAR,6@
|
||||||
MESSAGE FALSE HIDE, 4@
|
|
||||||
MESSAGE FALSE COPY, 4@
|
|
||||||
MESSAGE FALSE HIDE, 5@
|
|
||||||
MESSAGE FALSE COPY, 5@
|
|
||||||
MESSAGE FALSE HIDE, 6@
|
|
||||||
MESSAGE FALSE COPY, 6@
|
|
||||||
FIELD SCOKEY[1]
|
FIELD SCOKEY[1]
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_SCOKEY2
|
BOOLEAN F_SCOKEY2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Tabella sconti clienti"
|
PROMPT 2 4 "Tabella sconti clienti"
|
||||||
MESSAGE TRUE SHOW, 5@
|
MESSAGE TRUE ENABLE, 5@
|
||||||
MESSAGE FALSE HIDE, 5@
|
MESSAGE FALSE CLEAR,5@|CLEAR,6@
|
||||||
MESSAGE FALSE COPY, 5@
|
|
||||||
MESSAGE FALSE HIDE, 6@
|
|
||||||
MESSAGE FALSE COPY, 6@
|
|
||||||
GROUP 4
|
GROUP 4
|
||||||
FIELD SCOKEY[2]
|
FIELD SCOKEY[2]
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_SCOKEY3
|
BOOLEAN F_SCOKEY3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Tabella zone in chiave"
|
PROMPT 2 5 "Tabella zone in chiave"
|
||||||
MESSAGE TRUE SHOW, 6@
|
MESSAGE TRUE ENABLE, 6@
|
||||||
MESSAGE FALSE HIDE, 6@
|
MESSAGE FALSE CLEAR, 6@
|
||||||
MESSAGE FALSE COPY, 6@
|
|
||||||
GROUP 5
|
GROUP 5
|
||||||
FIELD SCOKEY[3]
|
FIELD SCOKEY[3]
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_SCOKEY4
|
BOOLEAN F_SCOKEY4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Tabella modalita' di pagamento in chiave"
|
PROMPT 2 6 "Tabella modalita' di pagamento in chiave"
|
||||||
GROUP 6
|
GROUP 6
|
||||||
FIELD SCOKEY[4]
|
FIELD SCOKEY[4]
|
||||||
END
|
END
|
||||||
|
|
||||||
LIST F_GESSCORIGA 40
|
LIST F_GESSCORIGA 45
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 8 "Tipo gestione sconti riga "
|
PROMPT 2 8 "Tipo gestione sconti riga "
|
||||||
ITEM "N|Non gestire"
|
ITEM "N|Non gestire"
|
||||||
MESSAGE HIDE,F_GESSCORIGACV
|
MESSAGE HIDE,F_GESSCORIGACV
|
||||||
ITEM "L|Perc. su anagrafica/listini/contratti "
|
ITEM "L|Percentuale su anagrafica/listini/contratti "
|
||||||
MESSAGE HIDE,F_GESSCORIGACV
|
MESSAGE HIDE,F_GESSCORIGACV
|
||||||
ITEM "A|Gest. arch. sconti "
|
ITEM "A|Gestione archivio sconti "
|
||||||
MESSAGE SHOW,F_GESSCORIGACV
|
MESSAGE SHOW,F_GESSCORIGACV
|
||||||
ITEM "C|Perc. indicata su anagrafica cliente "
|
ITEM "C|Percentuale indicata su anagrafica cliente "
|
||||||
MESSAGE HIDE,F_GESSCORIGACV
|
MESSAGE HIDE,F_GESSCORIGACV
|
||||||
FIELD GESSCORIGA
|
FIELD GESSCORIGA
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESSCORIGACV
|
BOOLEAN F_GESSCORIGACV
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 9 "Gest. arch. sconti con cat. vendita cliente "
|
PROMPT 2 9 "Gestione archivio sconti con categorie vendita cliente "
|
||||||
FIELD GESSCORIGACV
|
FIELD GESSCORIGACV
|
||||||
END
|
END
|
||||||
|
|
||||||
|
|||||||
16
ve/ve0200b.h
16
ve/ve0200b.h
@ -1,12 +1,6 @@
|
|||||||
#define F_TIPOPERC 101
|
#define F_TIPOPERC 101
|
||||||
#define F_GESARCHPROV 102
|
#define F_GESVAL 102
|
||||||
#define F_ARCHPROV1 103
|
#define F_GESLIN 103
|
||||||
#define F_ARCHPROV2 104
|
#define F_GESSOSPIMP 104
|
||||||
#define F_ARCHPROV3 105
|
#define F_GESOCCAS 105
|
||||||
#define F_ARCHPROV4 106
|
|
||||||
#define F_TIPOLIQPROV 107
|
|
||||||
#define F_GESVAL 108
|
|
||||||
#define F_GESLIN 109
|
|
||||||
#define F_GESSOSPIMP 110
|
|
||||||
#define F_GESOCCAS 111
|
|
||||||
#define F_GESOCCHK 112
|
|
||||||
|
|||||||
@ -1,5 +1,4 @@
|
|||||||
/* toolbar */
|
#include "veconf.h"
|
||||||
#include "ve0200b.h"
|
|
||||||
|
|
||||||
TOOLBAR "" 0 20 0 2
|
TOOLBAR "" 0 20 0 2
|
||||||
|
|
||||||
@ -17,16 +16,14 @@ ENDPAGE
|
|||||||
|
|
||||||
PAGE "Tabelle di installazione" 1 1 60 14
|
PAGE "Tabelle di installazione" 1 1 60 14
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 10
|
GROUPBOX DLG_NULL 78 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 "Gestione degli agenti"
|
PROMPT 1 1 "Gestione degli agenti"
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
BOOLEAN F_GESAGE
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Gestione agenti "
|
PROMPT 2 2 "Gestione agenti "
|
||||||
MESSAGE FALSE DISABLE,8@
|
|
||||||
MESSAGE TRUE ENABLE,8@
|
|
||||||
FIELD GESAGE
|
FIELD GESAGE
|
||||||
END
|
END
|
||||||
|
|
||||||
@ -38,101 +35,44 @@ ITEM "V|Categoria vendita"
|
|||||||
ITEM "A|Agenti "
|
ITEM "A|Agenti "
|
||||||
ITEM "C|Clienti "
|
ITEM "C|Clienti "
|
||||||
ITEM "L|Condizioni di vendita"
|
ITEM "L|Condizioni di vendita"
|
||||||
GROUP 1
|
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESARCHPROV
|
GROUPBOX DLG_NULL 78 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Gestione archivio provvigioni "
|
PROMPT 1 6 "Gestione dati generali"
|
||||||
FIELD AGEARCPROVV
|
|
||||||
GROUP 1
|
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_ARCHPROV1 4
|
BOOLEAN F_GESVAL
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Chiavi archivio provvigioni "
|
PROMPT 2 7 "Gestione documenti in valuta"
|
||||||
FIELD AGEKEYPROVV[1]
|
|
||||||
GROUP 1
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING F_ARCHPROV2 4
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 6 " "
|
|
||||||
FIELD AGEKEYPROVV[2]
|
|
||||||
GROUP 1
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING F_ARCHPROV3 4
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 7 " "
|
|
||||||
FIELD AGEKEYPROVV[3]
|
|
||||||
GROUP 1
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING F_ARCHPROV4 4
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 8 " "
|
|
||||||
FIELD AGEKEYPROVV[4]
|
|
||||||
GROUP 1
|
|
||||||
END
|
|
||||||
|
|
||||||
LIST F_TIPOLIQPROV 41
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 9 "Tipo liquidazione provvigione "
|
|
||||||
ITEM "F|Liquidate sul valore del fatturato "
|
|
||||||
ITEM "M|Liq. sul valore fatt. e sul valore merce "
|
|
||||||
FIELD AGELIQPROVV
|
|
||||||
GROUP 1
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
PAGE "Tabelle di installazione" 1 1 60 14
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 10
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 "Gestione dati generali"
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 2 "Gestione documenti in valuta"
|
|
||||||
MESSAGE TRUE ENABLE,7@
|
|
||||||
MESSAGE FALSE DISABLE,7@
|
|
||||||
FIELD GESVAL
|
FIELD GESVAL
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
BOOLEAN F_GESVALAC
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Gestione archivio cambi "
|
PROMPT 2 8 "Gestione archivio cambi "
|
||||||
FIELD GESVALAC
|
FIELD GESVALAC
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESLIN
|
BOOLEAN F_GESLIN
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Gestione documenti in lingua"
|
PROMPT 2 9 "Gestione documenti in lingua"
|
||||||
FIELD GESLIN
|
FIELD GESLIN
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESSOSPIMP
|
BOOLEAN F_GESSOSPIMP
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 6 "Gestione documenti in sospensione di imposta"
|
PROMPT 2 10 "Gestione documenti in sospensione di imposta"
|
||||||
FIELD GESSOSPIMP
|
FIELD GESSOSPIMP
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN F_GESOCCAS
|
BOOLEAN F_GESOCCAS
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 8 "Gestione archivio clienti occasionali"
|
PROMPT 2 11 "Gestione archivio clienti occasionali"
|
||||||
FIELD GESOCCAS
|
FIELD GESOCCAS
|
||||||
MESSAGE FALSE DISABLE,F_GESOCCHK
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN F_GESOCCHK
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Controllo p.iva/cod.fiscale cliente occasionale"
|
|
||||||
FIELD GESOCCCHK
|
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
|
||||||
|
|||||||
167
ve/ve0200c.uml
167
ve/ve0200c.uml
@ -1,5 +1,4 @@
|
|||||||
/* toolbar */
|
#include "veconf.h"
|
||||||
#include "ve0200b.h"
|
|
||||||
|
|
||||||
TOOLBAR "" 0 20 0 2
|
TOOLBAR "" 0 20 0 2
|
||||||
|
|
||||||
@ -15,116 +14,116 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
|
PAGE "Tabella gestione sconti" 1 1 60 14
|
||||||
|
|
||||||
PAGE "Tabella gestione sconto a percentuale " 1 1 60 14
|
GROUPBOX DLG_NULL 78 4
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 9
|
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 "Gestione spese/sconti "
|
PROMPT 1 1 "Gestione sconto a percentuale"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 3
|
STRING F_SCOPRCODCON1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Codice tabella sconto cliente "
|
PROMPT 2 2 "Codice contabilita' "
|
||||||
FIELD SCOPRCOD
|
FIELD SCOPRCODCON[1]
|
||||||
|
USE LF_PCON
|
||||||
|
INPUT GRUPPO F_SCOPRCODCON1
|
||||||
|
INPUT CONTO F_SCOPRCODCON2
|
||||||
|
INPUT SOTTOCONTO F_SCOPRCODCON3
|
||||||
|
DISPLAY "Gruppo" GRUPPO
|
||||||
|
DISPLAY "Conto" CONTO
|
||||||
|
DISPLAY "Sottoconto" SOTTOCONTO
|
||||||
|
DISPLAY "Descrizione@50" DESCR
|
||||||
|
OUTPUT F_SCOPRCODCON1 GRUPPO
|
||||||
|
OUTPUT F_SCOPRCODCON2 CONTO
|
||||||
|
OUTPUT F_SCOPRCODCON3 SOTTOCONTO
|
||||||
|
OUTPUT F_SCOPRDESCON DESCR
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
STRING F_SCOPRCODCON2 3
|
||||||
|
BEGIN
|
||||||
|
PROMPT 30 2 ""
|
||||||
|
FIELD SCOPRCODCON[2]
|
||||||
|
COPY ALL F_SCOPRCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_SCOPRCODCON3 6
|
||||||
|
BEGIN
|
||||||
|
PROMPT 36 2 ""
|
||||||
|
FIELD SCOPRCODCON[3]
|
||||||
|
COPY ALL F_SCOPRCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_SCOPRDESCON 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Descrizione "
|
PROMPT 2 3 "Descrizione "
|
||||||
|
USE LF_PCON KEY 2
|
||||||
|
INPUT DESCR F_SCOPRDESCON
|
||||||
|
DISPLAY "Descrizione@50" DESCR
|
||||||
|
DISPLAY "Gruppo" GRUPPO
|
||||||
|
DISPLAY "Conto" CONTO
|
||||||
|
DISPLAY "Sottoconto" SOTTOCONTO
|
||||||
|
COPY OUTPUT F_SCOPRCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
GROUPBOX DLG_NULL 78 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Cod. contabilità "
|
PROMPT 1 6 "Gestione sconto ad importo "
|
||||||
FIELD SCOPRCODCON[1,2]
|
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
STRING F_SCOIMCODCON1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 29 5 ""
|
PROMPT 2 7 "Codice contabilita' "
|
||||||
FIELD SCOPRCODCON[3,4]
|
FIELD SCOIMCODCON[1]
|
||||||
|
USE LF_PCON
|
||||||
|
INPUT GRUPPO F_SCOIMCODCON1
|
||||||
|
INPUT CONTO F_SCOIMCODCON2
|
||||||
|
INPUT SOTTOCONTO F_SCOIMCODCON3
|
||||||
|
DISPLAY "Gruppo" GRUPPO
|
||||||
|
DISPLAY "Conto" CONTO
|
||||||
|
DISPLAY "Sottoconto" SOTTOCONTO
|
||||||
|
DISPLAY "Descrizione@50" DESCR
|
||||||
|
OUTPUT F_SCOIMCODCON1 GRUPPO
|
||||||
|
OUTPUT F_SCOIMCODCON2 CONTO
|
||||||
|
OUTPUT F_SCOIMCODCON3 SOTTOCONTO
|
||||||
|
OUTPUT F_SCOIMDESCON DESCR
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 6
|
STRING F_SCOIMCODCON2 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 35 5 ""
|
PROMPT 30 7 ""
|
||||||
FIELD SCOPRCODCON[5,10]
|
FIELD SCOIMCODCON[2]
|
||||||
|
COPY ALL F_SCOIMCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
STRING F_SCOIMCODCON3 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 47 5 ""
|
PROMPT 36 7 ""
|
||||||
|
FIELD SCOIMCODCON[3]
|
||||||
|
COPY ALL F_SCOIMCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
STRING F_SCOIMDESCON 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 7 "Num. campo piede documento "
|
PROMPT 2 8 "Descrizione "
|
||||||
FIELD SCOPRNPIEDE
|
USE LF_PCON KEY 2
|
||||||
END
|
INPUT DESCR F_SCOIMDESCON
|
||||||
|
DISPLAY "Descrizione@50" DESCR
|
||||||
STRING DLG_NULL 26
|
DISPLAY "Gruppo" GRUPPO
|
||||||
BEGIN
|
DISPLAY "Conto" CONTO
|
||||||
PROMPT 34 7 ""
|
DISPLAY "Sottoconto" SOTTOCONTO
|
||||||
|
COPY OUTPUT F_SCOIMCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Tabella gestione sconto ad importo " 1 1 60 14
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 "Gestione sconto ad importo "
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 1 "Codice tabella sconto ad importo "
|
|
||||||
FIELD SCOIMCOD
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 3 "Descrizione "
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 5 "Cod. contabilità "
|
|
||||||
FIELD SCOIMCODCON[1,2]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 5 ""
|
|
||||||
FIELD SCOIMCODCON[3,4]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 35 5 ""
|
|
||||||
FIELD SCOIMCODCON[5,10]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 47 5 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 7 "Num. campo piede documento "
|
|
||||||
FIELD SCOIMNPIEDE
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 34 7 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
|
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
686
ve/ve0200d.uml
686
ve/ve0200d.uml
@ -1,6 +1,4 @@
|
|||||||
|
#include "veconf.h"
|
||||||
/* toolbar */
|
|
||||||
#include "ve0200b.h"
|
|
||||||
|
|
||||||
TOOLBAR "" 0 20 0 2
|
TOOLBAR "" 0 20 0 2
|
||||||
|
|
||||||
@ -16,611 +14,161 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Tabella gestione spese d'incasso " 1 1 60 14
|
PAGE "Tabella gestione spese" 1 1 60 14
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 17
|
GROUPBOX DLG_NULL 78 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 "Gestione spese d'incasso"
|
PROMPT 1 1 "Gestione spese d'incasso"
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
STRING F_SPINCODIVA 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Addebito spese d'incasso "
|
PROMPT 2 2 "Codice IVA "
|
||||||
FIELD SPINADD
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 2 "Codice tabelle spese "
|
|
||||||
FIELD SPINCODSP
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 3 "Descrizione "
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 4 "Cod. Iva "
|
|
||||||
FIELD SPINCODIVA
|
FIELD SPINCODIVA
|
||||||
|
USE %IVA
|
||||||
|
INPUT CODTAB F_SPINCODIVA
|
||||||
|
DISPLAY "Codice" CODTAB
|
||||||
|
DISPLAY "Descrizione@50" S0
|
||||||
|
OUTPUT F_SPINCODIVA CODTAB
|
||||||
|
OUTPUT F_SPINDESIVA S0
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
STRING F_SPINDESIVA 50
|
||||||
BEGIN
|
|
||||||
PROMPT 29 4 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 5 "Cod. contabilita' "
|
|
||||||
FIELD SPINCODCON[ 1,2]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 5 ""
|
|
||||||
FIELD SPINCODCON[3,4]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 35 5 ""
|
|
||||||
FIELD SPINCODCON[5,10]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 47 5 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 6 "Incasso prima rata "
|
|
||||||
FIELD SPININCPR
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 7 "Num. campo piede documento "
|
|
||||||
FIELD SPINNPIEDE
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 34 7 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 8 "Importo spese per rimesse dirette "
|
|
||||||
FIELD SPINIMRD
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 9 "Importo spese per tratte "
|
|
||||||
FIELD SPINIMTR
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Importo spese per ricevute bancarie "
|
|
||||||
FIELD SPINIMRB
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 11 "Importo spese per cessioni "
|
|
||||||
FIELD SPINIMCES
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 12 "Importo spese per paghero' "
|
|
||||||
FIELD SPINIMPAG
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 12 "Importo spese per lettere di credito "
|
|
||||||
FIELD SPINIMLET
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 13 "Importo spese per tratte accettate "
|
|
||||||
FIELD SPINIMTA
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 14 "Importo spese per R.I.D. "
|
|
||||||
FIELD SPINIMRID
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 15 "Importo spese per bonifici "
|
|
||||||
FIELD SPINIMBON
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
PAGE "Tabella gestione spese d'incasso " 1 1 60 14
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 19
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 "Gestione spese bolli ricevute bancarie"
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 1 "Addebito spese bolli ricevute bancarie "
|
|
||||||
FIELD SPBRBADD
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 2 "Codice tabelle spese "
|
|
||||||
FIELD SPBRBCODSP
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "Descrizione "
|
PROMPT 2 3 "Descrizione "
|
||||||
|
USE %IVA KEY 2
|
||||||
|
INPUT S0 F_SPINDESIVA
|
||||||
|
DISPLAY "Descrizione@50" S0
|
||||||
|
DISPLAY "Codice" CODTAB
|
||||||
|
COPY OUTPUT F_SPINCODIVA
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
STRING F_SPINCODCON1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Cod. Iva "
|
PROMPT 2 4 "Codice contabilita' "
|
||||||
FIELD SPBRBCODIVA
|
FIELD SPINCODCON[1]
|
||||||
|
USE LF_PCON
|
||||||
|
INPUT GRUPPO F_SPINCODCON1
|
||||||
|
INPUT CONTO F_SPINCODCON2
|
||||||
|
INPUT SOTTOCONTO F_SPINCODCON3
|
||||||
|
DISPLAY "Gruppo" GRUPPO
|
||||||
|
DISPLAY "Conto" CONTO
|
||||||
|
DISPLAY "Sottoconto" SOTTOCONTO
|
||||||
|
DISPLAY "Descrizione@50" DESCR
|
||||||
|
OUTPUT F_SPINCODCON1 GRUPPO
|
||||||
|
OUTPUT F_SPINCODCON2 CONTO
|
||||||
|
OUTPUT F_SPINCODCON3 SOTTOCONTO
|
||||||
|
OUTPUT F_SPINDESCON DESCR
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
STRING F_SPINCODCON2 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 29 4 ""
|
PROMPT 29 4 ""
|
||||||
|
FIELD SPINCODCON[2]
|
||||||
|
COPY ALL F_SPINCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
STRING F_SPINCODCON3 6
|
||||||
BEGIN
|
|
||||||
PROMPT 2 5 "Cod. contabilita' "
|
|
||||||
FIELD SPBRBCODCONT[1,2]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 5 ""
|
|
||||||
FIELD SPBRBCODCONT[3,4]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 35 5 ""
|
|
||||||
FIELD SPBRBCODCONT[5,10]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 47 5 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 6 "Incasso prima rata "
|
|
||||||
FIELD SPBRBINCPR
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 7 "Num. campo piede documento "
|
|
||||||
FIELD SPBRBNPIEDE
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 34 7 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 8 "Scaglione "
|
|
||||||
FIELD SPBRBSCA[1]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 25 8 "Importo "
|
|
||||||
FIELD SPBRBIMP[1]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 9 "Scaglione "
|
|
||||||
FIELD SPBRBSCA[2]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 25 9 "Importo "
|
|
||||||
FIELD SPBRBIMP[2]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Scaglione "
|
|
||||||
FIELD SPBRBSCA[3]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 25 10 "Importo "
|
|
||||||
FIELD SPBRBIMP[3]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 11 "Scaglione "
|
|
||||||
FIELD SPBRBSCA[4]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 25 11 "Importo "
|
|
||||||
FIELD SPBRBIMP[4]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 12 "Scaglione "
|
|
||||||
FIELD SPBRBSCA[5]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 25 12 "Importo "
|
|
||||||
FIELD SPBRBIMP[5]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 13 "Scaglione "
|
|
||||||
FIELD SPBRBSCA[6]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 25 13 "Importo "
|
|
||||||
FIELD SPBRBIMP[6]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 14 "Scaglione "
|
|
||||||
FIELD SPBRBSCA[7]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 25 14 "Importo "
|
|
||||||
FIELD SPBRBIMP[7]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 5
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 15 "Importo minimo R.B./1000 "
|
|
||||||
FIELD SPBRBIMPMINRB
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 16 "Cod. pag. alternativo "
|
|
||||||
FIELD SPBRBCODPAGALT
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 36 16 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 17 "Classif. pag. RB a richiesta "
|
|
||||||
FIELD SPBRBCLAPAGRB
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 36 17 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
PAGE "Tabella gestione spese d'incasso " 1 1 60 14
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 11
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 "Gestione bolli fatture esenti"
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 1 "Addebito bolli fatture esenti "
|
|
||||||
FIELD SPBFEADD
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 2 "Codice tabelle spese "
|
|
||||||
FIELD SPBFECODSP
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 3 "Descrizione "
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 4 "Cod. Iva "
|
|
||||||
FIELD SPBFECODIVA
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 4 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 5 "Cod. contabilità "
|
|
||||||
FIELD SPBFECODCONT[1,2]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 5 ""
|
|
||||||
FIELD SPBFECODCONT[3,4]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 35 5 ""
|
|
||||||
FIELD SPBFECODCONT[5,10]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 47 5 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 6 "Incasso prima rata "
|
|
||||||
FIELD SPBFEINCPR
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 7 "Num. campo piede documento "
|
|
||||||
FIELD SPBFENPIEDE
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 34 7 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 9
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 8 "Importo minimo fattura "
|
|
||||||
FIELD SPBFEIMPMINFAT
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 9 "Importo bollo "
|
|
||||||
FIELD SPBFEIMPBOLLO
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
PAGE "Tabella gestione bolli tratte Italia " 1 1 60 14
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 14
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 "Gestione bolli su tratte Italia"
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 1 "Addebito bolli su tratte Italia "
|
|
||||||
FIELD SPTRADD
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 2 "Codice tabelle spese "
|
|
||||||
FIELD SPTRCODSP
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 3 "Descrizione "
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 4 "Cod. Iva "
|
|
||||||
FIELD SPTRCODIVA
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 4 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 5 "Cod. contabilità "
|
|
||||||
FIELD SPTRCODCON[1,2]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 5 ""
|
|
||||||
FIELD SPTRCODCON[3,4]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 6
|
|
||||||
BEGIN
|
|
||||||
PROMPT 35 5 ""
|
|
||||||
FIELD SPTRCODCON[5,10]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 47 5 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 6 "Incasso prima rata "
|
|
||||||
FIELD SPTRINCPR
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 7 "Num. campo piede documento "
|
|
||||||
FIELD SPTRNPIEDE
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 34 7 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 5 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 8 "Percentuale spese tratte "
|
|
||||||
FIELD SPTRPERCSPTR
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 5
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 9 "Importo minimo bollo "
|
|
||||||
FIELD SPTRIMPMINBOL
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 5
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Importo minimo tratte /1000 "
|
|
||||||
FIELD SPTRIMPMINTR
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 11 "Condizione pagam. alternativa "
|
|
||||||
FIELD SPTRCODPAGALT
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 42 11 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 12 "Classif. pagamento TR a richiesta "
|
|
||||||
FIELD SPTRCLASPAG
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 42 12 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
|
|
||||||
PAGE "Tabella gestione bolli tratte estero " 1 1 60 14
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 10
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 "Gestione spese tratta estera"
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 3
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 1 "Codice tabella spesa tratta estera "
|
|
||||||
FIELD SPTECODSP
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 2 "Descrizione "
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 3 "Cod. Iva "
|
|
||||||
FIELD SPTECODIVA
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 3 ""
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 4 "Cod. contabilità "
|
|
||||||
FIELD SPTECODCON[1,2]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 29 4 ""
|
|
||||||
FIELD SPTECODCON[3,4]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 6
|
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 35 4 ""
|
PROMPT 35 4 ""
|
||||||
FIELD SPTECODCON[5,10]
|
FIELD SPINCODCON[3]
|
||||||
|
COPY ALL F_SPINCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
STRING F_SPINDESCON 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 47 4 ""
|
PROMPT 2 5 "Descrizione "
|
||||||
|
USE LF_PCON KEY 2
|
||||||
|
INPUT DESCR F_SPINDESCON
|
||||||
|
DISPLAY "Descrizione@50" DESCR
|
||||||
|
DISPLAY "Gruppo" GRUPPO
|
||||||
|
DISPLAY "Conto" CONTO
|
||||||
|
DISPLAY "Sottoconto" SOTTOCONTO
|
||||||
|
COPY OUTPUT F_SPINCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
GROUPBOX DLG_NULL 78 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 5 "Incasso prima rata "
|
PROMPT 1 7 "Gestione spese bolli RB"
|
||||||
FIELD SPTEINCPR
|
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
STRING F_SPBRBCODIVA 4
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 6 "Num. campo piede documento "
|
PROMPT 2 8 "Codice IVA "
|
||||||
FIELD SPTENPIEDE
|
FIELD SPBRBCODIVA
|
||||||
|
USE %IVA
|
||||||
|
INPUT CODTAB F_SPBRBCODIVA
|
||||||
|
DISPLAY "Codice" CODTAB
|
||||||
|
DISPLAY "Descrizione@50" S0
|
||||||
|
OUTPUT F_SPBRBCODIVA CODTAB
|
||||||
|
OUTPUT F_SPBRBDESIVA S0
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 26
|
STRING F_SPBRBDESIVA 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 6 ""
|
PROMPT 2 9 "Descrizione "
|
||||||
|
USE %IVA KEY 2
|
||||||
|
INPUT S0 F_SPBRBDESIVA
|
||||||
|
DISPLAY "Descrizione@50" S0
|
||||||
|
DISPLAY "Codice" CODTAB
|
||||||
|
COPY OUTPUT F_SPBRBCODIVA
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
NUMBER DLG_NULL 5 2
|
|
||||||
|
STRING F_SPBRBCODCON1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 7 "Percentuale spese tratte "
|
PROMPT 2 10 "Codice contabilita' "
|
||||||
FIELD SPTEPERCSPTR
|
FIELD SPBRBCODCON[1]
|
||||||
|
USE LF_PCON
|
||||||
|
INPUT GRUPPO F_SPBRBCODCON1
|
||||||
|
INPUT CONTO F_SPBRBCODCON2
|
||||||
|
INPUT SOTTOCONTO F_SPBRBCODCON3
|
||||||
|
DISPLAY "Gruppo" GRUPPO
|
||||||
|
DISPLAY "Conto" CONTO
|
||||||
|
DISPLAY "Sottoconto" SOTTOCONTO
|
||||||
|
DISPLAY "Descrizione@50" DESCR
|
||||||
|
OUTPUT F_SPBRBCODCON1 GRUPPO
|
||||||
|
OUTPUT F_SPBRBCODCON2 CONTO
|
||||||
|
OUTPUT F_SPBRBCODCON3 SOTTOCONTO
|
||||||
|
OUTPUT F_SPBRBDESCON DESCR
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 5
|
STRING F_SPBRBCODCON2 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 8 "Importo minimo bollo "
|
PROMPT 29 10 ""
|
||||||
FIELD SPTEIMPMINBOL
|
FIELD SPBRBCODCON[2]
|
||||||
|
COPY ALL F_SPBRBCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_SPBRBCODCON3 6
|
||||||
|
BEGIN
|
||||||
|
PROMPT 35 10 ""
|
||||||
|
FIELD SPBRBCODCON[3]
|
||||||
|
COPY ALL F_SPBRBCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
|
END
|
||||||
|
|
||||||
|
STRING F_SPBRBDESCON 50
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 11 "Descrizione "
|
||||||
|
USE LF_PCON KEY 2
|
||||||
|
INPUT DESCR F_SPBRBDESCON
|
||||||
|
DISPLAY "Descrizione@50" DESCR
|
||||||
|
DISPLAY "Gruppo" GRUPPO
|
||||||
|
DISPLAY "Conto" CONTO
|
||||||
|
DISPLAY "Sottoconto" SOTTOCONTO
|
||||||
|
COPY OUTPUT F_SPBRBCODCON1
|
||||||
|
CHECKTYPE NORMAL
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|||||||
340
ve/ve0200e.uml
340
ve/ve0200e.uml
@ -1,5 +1,4 @@
|
|||||||
/* toolbar */
|
#include "veconf.h"
|
||||||
#include "ve0200b.h"
|
|
||||||
|
|
||||||
TOOLBAR "" 0 20 0 2
|
TOOLBAR "" 0 20 0 2
|
||||||
|
|
||||||
@ -15,287 +14,130 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Tabella descrizione codice articolo " 1 1 60 14
|
PAGE "Tabelle contabilizzazione" 1 1 60 14
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 18
|
GROUPBOX DLG_NULL 78 7
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 0 0 "Personalizzazione procedura"
|
PROMPT 1 1 "Gruppi di ricerca del conto di costo ricavo"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
LIST F_RICERCACR1 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Descr. Cod. "
|
PROMPT 2 2 "Primo gruppo "
|
||||||
|
ITEM "CF|Clienti/Fornitori"
|
||||||
|
ITEM "CA|Causale contabile"
|
||||||
|
ITEM "AN|Anagrafica magazzino"
|
||||||
|
ITEM "CV|Categoria di vendita"
|
||||||
|
ITEM "CC|Categoria contabile"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
LIST F_RICERCACR2 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 14 1 "Descrizione "
|
PROMPT 2 3 "Secondo gruppo "
|
||||||
|
ITEM "-|Nessuno" MESSAGE CLEAR,1@
|
||||||
|
ITEM "CF|Clienti/Fornitori" MESSAGE ENABLE,F_RICERCACR3
|
||||||
|
ITEM "CA|Causale contabile" MESSAGE ENABLE,F_RICERCACR3
|
||||||
|
ITEM "AN|Anagrafica magazzino" MESSAGE ENABLE,F_RICERCACR3
|
||||||
|
ITEM "CV|Categoria di vendita" MESSAGE ENABLE,F_RICERCACR3
|
||||||
|
ITEM "CC|Categoria contabile" MESSAGE ENABLE,F_RICERCACR3
|
||||||
|
STR_EXPR (#THIS_FIELD=="-")||(#THIS_FIELD!=#F_RICERCACR1)
|
||||||
|
WARNING "La sequenza di ricerca deve indicare cinque tipi diversi"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
LIST F_RICERCACR3 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 48 1 "Lungh. campi "
|
PROMPT 2 4 "Terzo gruppo "
|
||||||
|
ITEM "-|Nessuno" MESSAGE CLEAR,2@
|
||||||
|
ITEM "CF|Clienti/Fornitori" MESSAGE ENABLE,F_RICERCACR4
|
||||||
|
ITEM "CA|Causale contabile" MESSAGE ENABLE,F_RICERCACR4
|
||||||
|
ITEM "AN|Anagrafica magazzino" MESSAGE ENABLE,F_RICERCACR4
|
||||||
|
ITEM "CV|Categoria di vendita" MESSAGE ENABLE,F_RICERCACR4
|
||||||
|
ITEM "CC|Categoria contabile" MESSAGE ENABLE,F_RICERCACR4
|
||||||
|
GROUP 1
|
||||||
|
STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCACR1)&&(#THIS_FIELD!=#F_RICERCACR2))
|
||||||
|
WARNING "La sequenza di ricerca deve indicare cinque tipi diversi"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
LIST F_RICERCACR4 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 63 1 "Tipo campi "
|
PROMPT 2 5 "Quarto gruppo "
|
||||||
|
ITEM "-|Nessuno" MESSAGE CLEAR,F_RICERCACR5
|
||||||
|
ITEM "CF|Clienti/Fornitori" MESSAGE ENABLE,F_RICERCACR5
|
||||||
|
ITEM "CA|Causale contabile" MESSAGE ENABLE,F_RICERCACR5
|
||||||
|
ITEM "AN|Anagrafica magazzino" MESSAGE ENABLE,F_RICERCACR5
|
||||||
|
ITEM "CV|Categoria di vendita" MESSAGE ENABLE,F_RICERCACR5
|
||||||
|
ITEM "CC|Categoria contabile" MESSAGE ENABLE,F_RICERCACR5
|
||||||
|
GROUP 1 2
|
||||||
|
STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCACR1)&&(#THIS_FIELD!=#F_RICERCACR2)&&(#THIS_FIELD!=#F_RICERCACR3))
|
||||||
|
WARNING "La sequenza di ricerca deve indicare cinque tipi diversi di righe"
|
||||||
END
|
END
|
||||||
|
|
||||||
TEXT DLG_NULL
|
LIST F_RICERCACR5 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 "Cod. art. "
|
PROMPT 2 6 "Quinto gruppo "
|
||||||
|
ITEM "-|Nessuno"
|
||||||
|
ITEM "CF|Clienti/Fornitori"
|
||||||
|
ITEM "CA|Causale contabile"
|
||||||
|
ITEM "AN|Anagrafica magazzino"
|
||||||
|
ITEM "CV|Categoria di vendita"
|
||||||
|
ITEM "CC|Categoria contabile"
|
||||||
|
GROUP 1 2
|
||||||
|
STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCACR1)&&(#THIS_FIELD!=#F_RICERCACR2)&&(#THIS_FIELD!=#F_RICERCACR3)&&(#THIS_FIELD!=#F_RICERCACR4))
|
||||||
|
WARNING "La sequenza di ricerca deve indicare cinque tipi diversi di righe"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
GROUPBOX DLG_NULL 78 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 14 2 ""
|
PROMPT 1 8 "Gruppi di ricerca sugli articoli anagrafica"
|
||||||
FIELD CODARTDES
|
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
LIST F_RICERCAAN1 25
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 48 2 ""
|
PROMPT 2 9 "Primo gruppo "
|
||||||
FIELD CODARTLUN[1]
|
ITEM "AR|Articolo"
|
||||||
|
ITEM "GM|Gruppo merceologico"
|
||||||
|
ITEM "SM|Sottogruppo merceologico"
|
||||||
|
ITEM "RF|Raggruppamento fiscale"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
LIST F_RICERCAAN2 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 52 2 ""
|
PROMPT 2 10 "Secondo gruppo "
|
||||||
FIELD CODARTLUN[2]
|
ITEM "-|Nessuno" MESSAGE CLEAR,3@
|
||||||
|
ITEM "AR|Articolo" MESSAGE ENABLE,F_RICERCAAN3
|
||||||
|
ITEM "GM|Gruppo merceologico" MESSAGE ENABLE,F_RICERCAAN3
|
||||||
|
ITEM "SM|Sottogruppo merceologico" MESSAGE ENABLE,F_RICERCAAN3
|
||||||
|
ITEM "RF|Raggruppamento fiscale" MESSAGE ENABLE,F_RICERCAAN3
|
||||||
|
STR_EXPR (#THIS_FIELD=="-")||(#THIS_FIELD!=#F_RICERCAAN1)
|
||||||
|
WARNING "La sequenza di ricerca deve indicare quattro tipi diversi"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
LIST F_RICERCAAN3 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 56 2 ""
|
PROMPT 2 11 "Terzo gruppo "
|
||||||
FIELD CODARTLUN[3]
|
ITEM "-|Nessuno" MESSAGE CLEAR,F_RICERCAAN4
|
||||||
|
ITEM "AR|Articolo" MESSAGE ENABLE,F_RICERCAAN4
|
||||||
|
ITEM "GM|Gruppo merceologico" MESSAGE ENABLE,F_RICERCAAN4
|
||||||
|
ITEM "SM|Sottogruppo merceologico" MESSAGE ENABLE,F_RICERCAAN4
|
||||||
|
ITEM "RF|Raggruppamento fiscale" MESSAGE ENABLE,F_RICERCAAN4
|
||||||
|
GROUP 3
|
||||||
|
STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCAAN1)&&(#THIS_FIELD!=#F_RICERCAAN2))
|
||||||
|
WARNING "La sequenza di ricerca deve indicare quattro tipi diversi"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
LIST F_RICERCAAN4 36
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 63 2 ""
|
PROMPT 2 12 "Quarto gruppo "
|
||||||
FIELD CODARTPIC[1]
|
ITEM "-|Nessuno"
|
||||||
END
|
ITEM "AR|Articolo"
|
||||||
|
ITEM "GM|Gruppo merceologico"
|
||||||
STRING DLG_NULL 2
|
ITEM "SM|Sottogruppo merceologico"
|
||||||
BEGIN
|
ITEM "RF|Raggruppamento fiscale"
|
||||||
PROMPT 67 2 ""
|
STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCAAN1)&&(#THIS_FIELD!=#F_RICERCAAN2)&&(#THIS_FIELD!=#F_RICERCAAN3))
|
||||||
FIELD CODARTPIC[2]
|
GROUP 3
|
||||||
END
|
WARNING "La sequenza di ricerca deve indicare quattro tipi diversi"
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 71 2 ""
|
|
||||||
FIELD CODARTPIC[3]
|
|
||||||
END
|
|
||||||
|
|
||||||
TEXT DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 3 "I° indice "
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 14 3 ""
|
|
||||||
FIELD INDARTDES[1]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 48 3 ""
|
|
||||||
FIELD INDARTLUN[1]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 63 3 ""
|
|
||||||
FIELD INDARTPIC[1]
|
|
||||||
END
|
|
||||||
|
|
||||||
TEXT DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 4 "II° indice "
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 30
|
|
||||||
BEGIN
|
|
||||||
PROMPT 14 4 ""
|
|
||||||
FIELD INDARTDES[2]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 48 4 ""
|
|
||||||
FIELD INDARTLUN[2]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 2
|
|
||||||
BEGIN
|
|
||||||
PROMPT 63 4 ""
|
|
||||||
FIELD INDARTPIC[2]
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 6 "Gestione articoli in lingua "
|
|
||||||
FIELD ARTGESLIN
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 1
|
|
||||||
BEGIN
|
|
||||||
PROMPT 5 7 "Codice lingua n.1 "
|
|
||||||
FIELD ARTCODLIN[1]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 1
|
|
||||||
BEGIN
|
|
||||||
PROMPT 5 8 "Codice lingua n.2 "
|
|
||||||
FIELD ARTCODLIN[2]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 1
|
|
||||||
BEGIN
|
|
||||||
PROMPT 5 9 "Codice lingua n.3 "
|
|
||||||
FIELD ARTCODLIN[3]
|
|
||||||
END
|
|
||||||
|
|
||||||
NUMBER DLG_NULL 1
|
|
||||||
BEGIN
|
|
||||||
PROMPT 5 10 "Codice lingua n.4 "
|
|
||||||
FIELD ARTCODLIN[4]
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 11 "Gestione più magazzini "
|
|
||||||
FIELD ARTGESMAG
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 12 "Gestione depositi "
|
|
||||||
FIELD ARTGESDEP
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 13 "Gestione commesse "
|
|
||||||
FIELD ARTGESCOMM
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 14 "Gestione quantita' in decimali "
|
|
||||||
FIELD ARTGESQDEC
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 15 "Gestione valuta "
|
|
||||||
FIELD ARTGESVAL
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 16 "Ripetizione primo indice "
|
|
||||||
FIELD ARTRIPIND
|
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Tabella personalizzazione anagrafico articoli " 1 1 60 14
|
|
||||||
|
|
||||||
GROUPBOX DLG_NULL 78 18
|
|
||||||
BEGIN
|
|
||||||
PROMPT 0 0 "Gestione archivio articoli"
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 1 "Gestione descrizioni estese "
|
|
||||||
FIELD ARTGESDESCEST
|
|
||||||
END
|
|
||||||
|
|
||||||
LIST DLG_NULL 35
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 2 "Gestione art. per lotti "
|
|
||||||
ITEM "N|Non gestire"
|
|
||||||
ITEM "D|Gestiti con lotto data "
|
|
||||||
ITEM "Q|Gestiti con lotto descr. qualità "
|
|
||||||
FIELD ARTGESLOTTI
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 3 "Gestione articoli per taglia "
|
|
||||||
FIELD ARTGESTAGLIA
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 10
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 4 "Descrizione campi chiave "
|
|
||||||
FIELD ARTDESCHI[1]
|
|
||||||
END
|
|
||||||
|
|
||||||
STRING DLG_NULL 10
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 5 "Descrizione campi chiave "
|
|
||||||
FIELD ARTDESCHI[2]
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 6 "Gestione piu' unita' di misura "
|
|
||||||
FIELD ARTGESUM
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 7 "Gestione secondo codice iva "
|
|
||||||
FIELD ARTGESCODIVA
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 8 "Gestione campi peso lordo/netto "
|
|
||||||
FIELD ARTGESPLN
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 9 "Gestione campo aspetto dei beni "
|
|
||||||
FIELD ARTGESASPBEN
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 10 "Gestione campo codice gruppo articolo "
|
|
||||||
FIELD ARTGESCODGR
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 11 "Gestione campo distinta base "
|
|
||||||
FIELD ARTGESDB
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 12 "Gestione campo categorie vendite "
|
|
||||||
FIELD ARTGESCATVEN
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 13 "Gestione campo categorie acquisti "
|
|
||||||
FIELD ARTGESCATACQ
|
|
||||||
END
|
|
||||||
|
|
||||||
BOOLEAN DLG_NULL
|
|
||||||
BEGIN
|
|
||||||
PROMPT 2 14 "Gestione codice fornitore "
|
|
||||||
FIELD ARTGESCODFOR
|
|
||||||
END
|
|
||||||
|
|
||||||
ENDPAGE
|
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
|||||||
187
ve/ve0200f.uml
Executable file
187
ve/ve0200f.uml
Executable file
@ -0,0 +1,187 @@
|
|||||||
|
#include "veconf.h"
|
||||||
|
|
||||||
|
TOOLBAR "" 0 20 0 2
|
||||||
|
|
||||||
|
BUTTON DLG_OK 10 2
|
||||||
|
BEGIN
|
||||||
|
PROMPT -12 -1 ""
|
||||||
|
END
|
||||||
|
|
||||||
|
BUTTON DLG_QUIT 10 2
|
||||||
|
BEGIN
|
||||||
|
PROMPT -22 -1 ""
|
||||||
|
END
|
||||||
|
|
||||||
|
ENDPAGE
|
||||||
|
|
||||||
|
PAGE "Gestione spese incasso" 1 1 60 14
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC1 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 2 "Importo spese per rimesse dirette "
|
||||||
|
FIELD IMPSPINC[1]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC2 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 3 "Importo spese per tratte "
|
||||||
|
FIELD IMPSPINC[2]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC3 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 4 "Importo spese per ricevute bancarie "
|
||||||
|
FIELD IMPSPINC[3]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC4 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 5 "Importo spese per cessioni "
|
||||||
|
FIELD IMPSPINC[4]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC5 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 6 "Importo spese per paghero' "
|
||||||
|
FIELD IMPSPINC[5]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC6 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 7 "Importo spese per lettere di credito "
|
||||||
|
FIELD F_IMPSPINC[6]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC7 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 8 "Importo spese per tratte accettate "
|
||||||
|
FIELD IMPSPINC[7]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC8 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 9 "Importo spese per R.I.D. "
|
||||||
|
FIELD IMPSPINC[8]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_IMPSPINC9 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 10 "Importo spese per bonifici "
|
||||||
|
FIELD IMPSPINC[9]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
ENDPAGE
|
||||||
|
|
||||||
|
|
||||||
|
PAGE "Gestione spese bolli" 1 1 60 14
|
||||||
|
|
||||||
|
NUMBER F_SPBOSCA1 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 2 "Scaglione "
|
||||||
|
FIELD SPBOBSCA[1]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOIMP1 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 25 2 "Importo "
|
||||||
|
FIELD SPBOIMP[1]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOSCA2 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 3 "Scaglione "
|
||||||
|
FIELD SPBOSCA[2]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOIMP2 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 25 3 "Importo "
|
||||||
|
FIELD SPBOIMP[2]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOSCA3 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 4 "Scaglione "
|
||||||
|
FIELD SPBOSCA[3]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOIMP3 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 25 4 "Importo "
|
||||||
|
FIELD SPBOIMP[3]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOSCA4 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 5 "Scaglione "
|
||||||
|
FIELD SPBOSCA[4]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOIMP4 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 25 5 "Importo "
|
||||||
|
FIELD SPBOIMP[4]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOSCA5 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 6 "Scaglione "
|
||||||
|
FIELD SPBOSCA[5]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOIMP5 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 25 6 "Importo "
|
||||||
|
FIELD SPBOIMP[5]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOSCA6 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 7 "Scaglione "
|
||||||
|
FIELD SPBOSCA[6]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOIMP6 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 25 7 "Importo "
|
||||||
|
FIELD SPBOIMP[6]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOSCA7 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 2 8 "Scaglione "
|
||||||
|
FIELD SPBOSCA[7]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
NUMBER F_SPBOIMP7 9
|
||||||
|
BEGIN
|
||||||
|
PROMPT 25 8 "Importo "
|
||||||
|
FIELD SPBOIMP[7]
|
||||||
|
PICTURE "."
|
||||||
|
END
|
||||||
|
|
||||||
|
ENDPAGE
|
||||||
|
|
||||||
|
ENDMASK
|
||||||
78
ve/veconf.h
78
ve/veconf.h
@ -5,7 +5,7 @@
|
|||||||
#define A_CONTRATTI 2
|
#define A_CONTRATTI 2
|
||||||
#define A_OFFERTE 3
|
#define A_OFFERTE 3
|
||||||
|
|
||||||
#define F_CUMULAALC 101
|
// Campi per ve0200a.uml
|
||||||
#define F_GESLISTINI 102
|
#define F_GESLISTINI 102
|
||||||
#define F_GESLISCV 103
|
#define F_GESLISCV 103
|
||||||
#define F_GESUM 104
|
#define F_GESUM 104
|
||||||
@ -21,11 +21,6 @@
|
|||||||
#define F_GESSCACAMPAGNE 114
|
#define F_GESSCACAMPAGNE 114
|
||||||
#define F_GESSOCAMPAGNE 115
|
#define F_GESSOCAMPAGNE 115
|
||||||
|
|
||||||
#define F_SEQRICRIGHE1 116
|
|
||||||
#define F_SEQRICRIGHE2 117
|
|
||||||
#define F_SEQRICRIGHE3 118
|
|
||||||
#define F_SEQRICRIGHE4 119
|
|
||||||
|
|
||||||
#define F_GESSCO 120
|
#define F_GESSCO 120
|
||||||
#define F_SCOKEY1 121
|
#define F_SCOKEY1 121
|
||||||
#define F_SCOKEY2 122
|
#define F_SCOKEY2 122
|
||||||
@ -39,5 +34,76 @@
|
|||||||
#define F_GESSCOSCA 128
|
#define F_GESSCOSCA 128
|
||||||
#define F_GESSCOUM 129
|
#define F_GESSCOUM 129
|
||||||
|
|
||||||
|
// Campi per ve0200b.uml
|
||||||
|
#define F_GESAGE 101
|
||||||
|
#define F_TIPOPERC 102
|
||||||
|
#define F_GESVAL 103
|
||||||
|
#define F_GESVALAC 104
|
||||||
|
#define F_GESLIN 105
|
||||||
|
#define F_GESSOSPIMP 106
|
||||||
|
#define F_GESOCCAS 107
|
||||||
|
|
||||||
|
|
||||||
|
// Campi per ve0200c.uml
|
||||||
|
#define F_SCOPRCODCON1 101
|
||||||
|
#define F_SCOPRCODCON2 102
|
||||||
|
#define F_SCOPRCODCON3 103
|
||||||
|
#define F_SCOPRDESCON 104
|
||||||
|
#define F_SCOIMCODCON1 105
|
||||||
|
#define F_SCOIMCODCON2 106
|
||||||
|
#define F_SCOIMCODCON3 107
|
||||||
|
#define F_SCOIMDESCON 108
|
||||||
|
|
||||||
|
// Campi per ve0200d.uml
|
||||||
|
#define F_SPINCODIVA 101
|
||||||
|
#define F_SPINDESIVA 102
|
||||||
|
#define F_SPINCODCON1 103
|
||||||
|
#define F_SPINCODCON2 104
|
||||||
|
#define F_SPINCODCON3 105
|
||||||
|
#define F_SPINDESCON 106
|
||||||
|
#define F_SPBRBCODIVA 107
|
||||||
|
#define F_SPBRBDESIVA 108
|
||||||
|
#define F_SPBRBCODCON1 109
|
||||||
|
#define F_SPBRBCODCON2 110
|
||||||
|
#define F_SPBRBCODCON3 111
|
||||||
|
#define F_SPBRBDESCON 112
|
||||||
|
|
||||||
|
// Campi per ve0200e.uml
|
||||||
|
#define F_RICERCACR1 101
|
||||||
|
#define F_RICERCACR2 102
|
||||||
|
#define F_RICERCACR3 103
|
||||||
|
#define F_RICERCACR4 104
|
||||||
|
#define F_RICERCACR5 105
|
||||||
|
#define F_RICERCAAN1 106
|
||||||
|
#define F_RICERCAAN2 107
|
||||||
|
#define F_RICERCAAN3 108
|
||||||
|
#define F_RICERCAAN4 109
|
||||||
|
|
||||||
|
// Campi per ve0200f.uml
|
||||||
|
#define F_IMPSPINC1 101
|
||||||
|
#define F_IMPSPINC2 102
|
||||||
|
#define F_IMPSPINC3 103
|
||||||
|
#define F_IMPSPINC4 104
|
||||||
|
#define F_IMPSPINC5 105
|
||||||
|
#define F_IMPSPINC6 106
|
||||||
|
#define F_IMPSPINC7 107
|
||||||
|
#define F_IMPSPINC8 108
|
||||||
|
#define F_IMPSPINC9 109
|
||||||
|
#define F_SPBOSCA1 110
|
||||||
|
#define F_SPBOIMP1 111
|
||||||
|
#define F_SPBOSCA2 112
|
||||||
|
#define F_SPBOIMP2 113
|
||||||
|
#define F_SPBOSCA3 114
|
||||||
|
#define F_SPBOIMP3 115
|
||||||
|
#define F_SPBOSCA4 116
|
||||||
|
#define F_SPBOIMP4 117
|
||||||
|
#define F_SPBOSCA5 118
|
||||||
|
#define F_SPBOIMP5 119
|
||||||
|
#define F_SPBOSCA6 120
|
||||||
|
#define F_SPBOIMP6 121
|
||||||
|
#define F_SPBOSCA7 122
|
||||||
|
#define F_SPBOIMP7 123
|
||||||
|
|
||||||
|
|
||||||
#endif
|
#endif
|
||||||
|
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user