Modifiche estetiche e funzionali alle varie maschere.
git-svn-id: svn://10.65.10.50/trunk@300 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
ba280a1c47
commit
254d6b64fb
33
ba/ba0.cpp
33
ba/ba0.cpp
@ -6,9 +6,12 @@
|
||||
|
||||
#if XVT_OS == XVT_OS_WIN
|
||||
extern "C"
|
||||
{
|
||||
#include <cpb.h>
|
||||
{
|
||||
#include <cpb.h>
|
||||
}
|
||||
#include <dos.h>
|
||||
#else
|
||||
#include <dirent.h>
|
||||
#endif
|
||||
|
||||
#include "ba0.h"
|
||||
@ -74,7 +77,7 @@ void TPicture_mask::handler(WINDOW win, EVENT* ep)
|
||||
{
|
||||
#if XVT_OS == XVT_OS_WIN
|
||||
if (_picture)
|
||||
cpb_win_picture_draw_at(win, _picture, 1, 64);
|
||||
cpb_win_picture_draw_at(win, _picture, 1, CHARY<<1);
|
||||
else
|
||||
#endif
|
||||
{
|
||||
@ -103,6 +106,7 @@ class TMenu_application : public TApplication
|
||||
int _level, _max;
|
||||
|
||||
protected:
|
||||
void test_temp() const;
|
||||
void load_menu();
|
||||
int do_level();
|
||||
virtual bool create();
|
||||
@ -210,9 +214,32 @@ int TMenu_application::do_level()
|
||||
}
|
||||
|
||||
|
||||
void TMenu_application::test_temp() const
|
||||
{
|
||||
TFilename name; name.temp();
|
||||
const TString16 ext = name.ext();
|
||||
name.tempdir();
|
||||
name << "/" << "*." << ext;
|
||||
#if XVT_OS == XVT_OS_WIN
|
||||
struct _find_t f;
|
||||
if (_dos_findfirst(name, _A_NORMAL, &f) == 0 &&
|
||||
yesno_box("Si desidera cancellare i file temporanei (*.tmp)"))
|
||||
{
|
||||
TFilename dir; dir.tempdir();
|
||||
do
|
||||
{
|
||||
name = dir;
|
||||
name << "/" << f.name;
|
||||
remove(name);
|
||||
} while (_dos_findnext(&f) == 0);
|
||||
}
|
||||
#endif
|
||||
}
|
||||
|
||||
|
||||
bool TMenu_application::create()
|
||||
{
|
||||
test_temp();
|
||||
load_menu();
|
||||
dispatch_e_menu(BAR_ITEM(1));
|
||||
return TRUE;
|
||||
|
@ -7,7 +7,6 @@
|
||||
#include "ba1100.h"
|
||||
|
||||
|
||||
|
||||
bool TEdit_file::browse(int logicnum, const char* name)
|
||||
{
|
||||
TRelation relation(logicnum);
|
||||
@ -27,9 +26,10 @@ bool TEdit_file::browse(int logicnum, const char* name)
|
||||
trac.add(n);
|
||||
head.add(n);
|
||||
|
||||
int len = curr.length(n);
|
||||
if (curr.type(n) == _datefld) len = 10;
|
||||
if (len > (int)strlen(n)) head << '@' << len;
|
||||
TFieldtypes t = curr.type(n);
|
||||
const int len = (t == _datefld) ? 10 : curr.length(n);
|
||||
head << '@' << max(len, (int)strlen(n));
|
||||
if (t == _realfld) head << 'R';
|
||||
}
|
||||
|
||||
KEY ch;
|
||||
|
39
ba/ba3.cpp
39
ba/ba3.cpp
@ -1,24 +1,33 @@
|
||||
#include <xvt.h>
|
||||
#include <strings.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include <checks.h>
|
||||
|
||||
#include "ba3.h"
|
||||
|
||||
#define usage "Error - usage : %s -{0|1|2|3|4|5}"
|
||||
#define usage "Error - usage : %s -{0|1|2|3|4|5|6}", argv[0]
|
||||
|
||||
int main(int argc, char** argv)
|
||||
{
|
||||
if (argc < 2) fatal_box(usage, argv[0]);
|
||||
|
||||
const TFixed_string s(argv[1]);
|
||||
|
||||
if (s == "-0") ba3100(argc,argv) ; else
|
||||
if (s == "-1") ba3200(argc,argv) ; else
|
||||
if (s == "-2") ba3300(argc,argv) ; else
|
||||
if (s == "-3") ba3400(argc,argv) ; else
|
||||
if (s == "-4") ba3500(argc,argv) ; else
|
||||
if (s == "-5") ba3600(argc,argv) ; else
|
||||
if (s == "-6") ba3700(argc,argv);
|
||||
else fatal_box(usage, argv[0]) ;
|
||||
|
||||
const int s = argc > 1 ? atoi(argv[1]+1) : -1;
|
||||
switch (s)
|
||||
{
|
||||
case 0:
|
||||
ba3100(argc,argv) ; break;
|
||||
case 1:
|
||||
ba3200(argc,argv) ; break;
|
||||
case 2:
|
||||
ba3300(argc,argv) ; break;
|
||||
case 3:
|
||||
ba3400(argc,argv) ; break;
|
||||
case 4:
|
||||
ba3500(argc,argv) ; break;
|
||||
case 5:
|
||||
ba3600(argc,argv) ; break;
|
||||
case 6:
|
||||
ba3700(argc,argv); break;
|
||||
default:
|
||||
error_box(usage); break;
|
||||
}
|
||||
return 0;
|
||||
}
|
||||
|
@ -742,7 +742,7 @@ BOOLEAN F_TITCF
|
||||
BEGIN
|
||||
PROMPT 2 14 "Titolare conto fiscale"
|
||||
FIELD LF_ANAG->TITCF
|
||||
HELP "Dire se e' titolare di conto fiscale"
|
||||
HELP "Indica se la persona e' titolare di conto fiscale"
|
||||
END
|
||||
|
||||
LIST F_TIPOSTDEL 12
|
||||
|
@ -1,39 +1,39 @@
|
||||
#include "batb%ais.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Codici attivita' ISTAT" -1 -1 78 7
|
||||
STRING FLD_TABAIS_CODTAB 5
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
HELP "Inserire il codice attivit…"
|
||||
USE %AIS
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB FLD_TABAIS_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@40" S0
|
||||
OUTPUT FLD_TABAIS_CODTAB CODTAB
|
||||
OUTPUT FLD_TABAIS_S0 S0
|
||||
KEY 1
|
||||
FLAGS "URZ"
|
||||
END
|
||||
|
||||
STRING FLD_TABAIS_S0 40
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD LF_TABCOM->S0
|
||||
HELP "Inserire la descrizione dell'attivita'"
|
||||
USE %AIS KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 FLD_TABAIS_S0
|
||||
DISPLAY "Descrizione@40" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT FLD_TABAIS_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
#include "batb%ais.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Codici attivita' ISTAT" -1 -1 78 7
|
||||
STRING FLD_TABAIS_CODTAB 5
|
||||
BEGIN
|
||||
PROMPT 2 1 "Codice "
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
HELP "Codice dell'attivita'"
|
||||
USE %AIS
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB FLD_TABAIS_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT FLD_TABAIS_CODTAB CODTAB
|
||||
OUTPUT FLD_TABAIS_S0 S0
|
||||
KEY 1
|
||||
FLAGS "URZ"
|
||||
END
|
||||
|
||||
STRING FLD_TABAIS_S0 40
|
||||
BEGIN
|
||||
PROMPT 2 3 "Descrizione "
|
||||
FIELD LF_TABCOM->S0
|
||||
HELP "Descrizione dell'attivita'"
|
||||
USE %AIS KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 FLD_TABAIS_S0
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT FLD_TABAIS_CODTAB
|
||||
KEY 2
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
ENDMASK
|
||||
|
@ -1,33 +1,18 @@
|
||||
|
||||
|
||||
// campi maschera batb%ban.msk
|
||||
|
||||
#define F_CODICEABI 101
|
||||
#define F_CODICECAB 102
|
||||
#define F_DENOM 103
|
||||
#define F_ISTIT 104
|
||||
#define F_INDIRIZZO 105
|
||||
#define F_CAP 106
|
||||
#define F_STATO 107
|
||||
#define F_COMUNE 108
|
||||
#define F_STAMPRICBAN 109
|
||||
#define F_CIV 110
|
||||
#define F_DENCOM 111
|
||||
#define F_PROV 112
|
||||
#define F_CODICEDIP 113
|
||||
#define H_CODICEABI 114
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
// campi maschera batb%ban.msk
|
||||
|
||||
#define F_CODICEABI 101
|
||||
#define F_CODICECAB 102
|
||||
#define F_DENOM 103
|
||||
#define F_ISTIT 104
|
||||
#define F_INDIRIZZO 105
|
||||
#define F_CAP 106
|
||||
#define F_STATO 107
|
||||
#define F_COMUNE 108
|
||||
#define F_STAMPRICBAN 109
|
||||
#define F_CIV 110
|
||||
#define F_DENCOM 111
|
||||
#define F_PROV 112
|
||||
#define F_CODICEDIP 113
|
||||
#define H_CODICEABI 114
|
||||
#define H_DENOMABI 115
|
||||
|
||||
|
@ -13,14 +13,14 @@ NUMBER F_CODICEABI 5
|
||||
BEGIN
|
||||
PROMPT 6 1 "Codice ABI "
|
||||
FIELD %BAN->CODTAB[1,5]
|
||||
FLAGS "RZ"
|
||||
FLAGS "Z"
|
||||
KEY 1
|
||||
USE %BAN KEY 1 SELECT CODTAB ?= "?????"
|
||||
INPUT CODTAB F_CODICEABI
|
||||
DISPLAY "Codice ABI" CODTAB[1,5]
|
||||
DISPLAY "Codice CAB" CODTAB[6,10]
|
||||
DISPLAY "Denominazione@50" S0
|
||||
DISPLAY "Istituto@50" S0
|
||||
OUTPUT F_CODICEABI CODTAB[1,5]
|
||||
OUTPUT H_DENOMABI S0
|
||||
MESSAGE COPY,H_CODICEABI
|
||||
END
|
||||
|
||||
@ -28,17 +28,20 @@ NUMBER F_CODICECAB 5
|
||||
BEGIN
|
||||
PROMPT 28 1 "Codice CAB "
|
||||
FIELD %BAN->CODTAB[6,10]
|
||||
FLAGS "RZ"
|
||||
FLAGS "Z"
|
||||
KEY 1
|
||||
USE %BAN
|
||||
USE %BAN SELECT CODTAB ?= "??????????"
|
||||
INPUT CODTAB[1,5] F_CODICEABI
|
||||
INPUT CODTAB[6,10] F_CODICECAB
|
||||
COPY DISPLAY F_CODICEABI
|
||||
DISPLAY "Codice ABI" CODTAB[1,5]
|
||||
DISPLAY "Codice CAB" CODTAB[6,10]
|
||||
DISPLAY "Denominazione@50" S0
|
||||
DISPLAY "Dipendenza" I0
|
||||
OUTPUT F_CODICEABI CODTAB[1,5]
|
||||
OUTPUT F_CODICECAB CODTAB[6,10]
|
||||
OUTPUT F_DENOM S0
|
||||
OUTPUT F_CODICEABI CODTAB[1,5]
|
||||
MESSAGE SHOW,F_ISTIT
|
||||
MESSAGE EMPTY HIDE,F_ISTIT
|
||||
MESSAGE SHOW,F_ISTIT|SHOW,F_CODICEDIP|HIDE,H_DENOMABI|SHOW,F_DENOM
|
||||
MESSAGE EMPTY HIDE,F_ISTIT|HIDE,F_CODICEDIP|SHOW,H_DENOMABI|HIDE,F_DENOM
|
||||
VALIDATE AUTOEXIT_FUNC 2 F_CODICEABI F_CODICECAB
|
||||
GROUP GR_SEARCH
|
||||
END
|
||||
@ -47,12 +50,12 @@ NUMBER F_CODICEDIP 4
|
||||
BEGIN
|
||||
PROMPT 50 1 "Codice Dipendenza "
|
||||
FIELD %BAN->I0
|
||||
FLAGS "RZ"
|
||||
FLAGS "Z"
|
||||
END
|
||||
|
||||
NUMBER H_CODICEABI 5
|
||||
BEGIN
|
||||
FLAGS "HRZ"
|
||||
FLAGS "HZ"
|
||||
COPY USE F_CODICEABI
|
||||
INPUT CODTAB F_CODICEABI
|
||||
COPY DISPLAY F_CODICEABI
|
||||
@ -71,17 +74,30 @@ BEGIN
|
||||
PROMPT 6 5 "Denominazione "
|
||||
FIELD %BAN->S0
|
||||
KEY 2
|
||||
USE %BAN KEY 2
|
||||
USE %BAN KEY 2 SELECT CODTAB?="??????????"
|
||||
INPUT S0 F_DENOM
|
||||
DISPLAY "Denominazione@50" S0
|
||||
INPUT CODTAB[1,5] F_CODICEABI
|
||||
INPUT CODTAB[6,10] F_CODICECAB
|
||||
DISPLAY "Codice ABI" CODTAB[1,5]
|
||||
DISPLAY "Codice CAB" CODTAB[6,10]
|
||||
DISPLAY "Dipendenza" I0
|
||||
COPY OUTPUT F_CODICECAB
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING H_DENOMABI 50
|
||||
BEGIN
|
||||
PROMPT 6 3 "Istituto "
|
||||
FIELD %BAN->S0
|
||||
KEY 2
|
||||
USE %BAN KEY 2 SELECT CODTAB ?= "?????"
|
||||
INPUT S0 H_DENOMABI
|
||||
DISPLAY "Istituto@50" S0
|
||||
DISPLAY "Codice ABI" CODTAB[1,5]
|
||||
COPY OUTPUT F_CODICECAB
|
||||
OUTPUT H_DENOMABI S0
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
GROUPBOX DLG_NULL 72 7
|
||||
BEGIN
|
||||
PROMPT 4 8 "Sede"
|
||||
@ -101,7 +117,7 @@ END
|
||||
|
||||
STRING F_COMUNE 4
|
||||
BEGIN
|
||||
PROMPT 6 11 "Comune "
|
||||
PROMPT 6 11 "Codice comune "
|
||||
FLAGS "U"
|
||||
FIELD %BAN->S5
|
||||
USE LF_COMUNI
|
||||
@ -119,7 +135,7 @@ END
|
||||
|
||||
STRING F_DENCOM 50
|
||||
BEGIN
|
||||
PROMPT 6 12 "Denominazione "
|
||||
PROMPT 6 12 "Comune "
|
||||
USE LF_COMUNI KEY 2
|
||||
INPUT DENCOM F_DENCOM
|
||||
#include <comdden.h>
|
||||
|
@ -1,6 +1,6 @@
|
||||
#include "batb%cpg.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
TOOLBAR "" 0 20 0 2
|
||||
#include <toolbar.h>
|
||||
ENDPAGE
|
||||
|
||||
@ -9,28 +9,28 @@ PAGE "Tabella pagamenti" -1 -1 78 15
|
||||
STRING F_CODICE 4
|
||||
BEGIN
|
||||
PROMPT 4 1 "Codice "
|
||||
HELP "Inserire il codice di pagamento"
|
||||
HELP "Codice di pagamento"
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
FLAGS "U"
|
||||
USE %CPG
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT CODTAB F_CODICE
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Tipo di pagamento@50" S0
|
||||
OUTPUT F_CODICE CODTAB
|
||||
OUTPUT F_DESC S0
|
||||
CHECKTYPE REQUIRED
|
||||
KEY 1
|
||||
END
|
||||
|
||||
STRING F_DESC 50
|
||||
BEGIN
|
||||
PROMPT 4 3 "Descrizione "
|
||||
HELP "Inserire la descrizione"
|
||||
HELP "Descrizione del tipo di pagamento"
|
||||
FIELD LF_TABCOM->S0
|
||||
USE %CPG KEY 2
|
||||
CHECKTYPE REQUIRED
|
||||
CHECKTYPE REQUIRED
|
||||
INPUT S0 F_DESC
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Tipo di pagamento@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
OUTPUT F_CODICE CODTAB
|
||||
OUTPUT F_DESC S0
|
||||
|
@ -6,7 +6,7 @@ TOOLBAR "" 0 20 0 2
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella descrizioni aggiuntive" -1 -1 78 8
|
||||
PAGE "Descrizioni aggiuntive" -1 -1 78 8
|
||||
|
||||
STRING F_CODICE 5
|
||||
BEGIN
|
||||
@ -17,7 +17,7 @@ BEGIN
|
||||
USE %DPN
|
||||
INPUT CODTAB F_CODICE
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Descrizione @50" S0
|
||||
DISPLAY "Descrizione aggiuntiva@50" S0
|
||||
OUTPUT F_CODICE CODTAB
|
||||
OUTPUT F_DESCR S0
|
||||
CHECKTYPE REQUIRED
|
||||
@ -31,7 +31,7 @@ BEGIN
|
||||
USE %DPN KEY 2
|
||||
INPUT CODTAB F_CODICE
|
||||
INPUT S0 F_DESCR
|
||||
DISPLAY "Descrizione @50" S0
|
||||
DISPLAY "Descrizione aggiuntiva@50" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
OUTPUT F_CODICE CODTAB
|
||||
OUTPUT F_DESCR S0
|
||||
|
@ -20,6 +20,7 @@ BEGIN
|
||||
DISPLAY "Tipo" S1
|
||||
DISPLAY "%@5" R0
|
||||
DISPLAY "Vent." S6
|
||||
DISPLAY "Sospeso" B2
|
||||
OUTPUT FLD_TABIVA_CODTAB CODTAB
|
||||
OUTPUT FLD_TABIVA_S0 S0
|
||||
HELP "Inserire il codice IVA"
|
||||
@ -38,6 +39,7 @@ BEGIN
|
||||
DISPLAY "Tipo" S1
|
||||
DISPLAY "%@5" R0
|
||||
DISPLAY "Vent." S6
|
||||
DISPLAY "Sospeso" B2
|
||||
COPY OUTPUT FLD_TABIVA_CODTAB
|
||||
HELP "Inserire la descrizione del codice IVA"
|
||||
CHECKTYPE REQUIRED
|
||||
@ -83,7 +85,7 @@ END
|
||||
|
||||
NUMBER FLD_TABIVA_R0 6 2
|
||||
BEGIN
|
||||
PROMPT 3 4 "Percentuale "
|
||||
PROMPT 3 4 "Aliquota "
|
||||
FIELD R0
|
||||
HELP "Inserire la percentuale di imposta"
|
||||
END
|
||||
|
@ -7,7 +7,7 @@ TOOLBAR "" 0 20 0 2
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Tabella codici IV direttiva CEE" -1 -1 78 15
|
||||
PAGE "Voci di bilancio IV direttiva CEE" -1 -1 78 15
|
||||
|
||||
LIST F_SEZ 1 18
|
||||
BEGIN
|
||||
@ -35,6 +35,7 @@ BEGIN
|
||||
OUTPUT F_SEZ CODTAB[1,1]
|
||||
OUTPUT F_LETT CODTAB[2,2]
|
||||
OUTPUT F_DESCR_LETT S0
|
||||
CHECKTYPE NORMAL
|
||||
HELP "Lettera secondo la IV dir. CEE"
|
||||
GROUP GR_SEARCH
|
||||
END
|
||||
@ -56,12 +57,13 @@ BEGIN
|
||||
INPUT CODTAB[3,6] F_CLASSE
|
||||
DISPLAY "Sezione" CODTAB[1,1]
|
||||
DISPLAY "Lettera" CODTAB[2,2]
|
||||
DISPLAY "Classe " CODTAB[3,6]
|
||||
DISPLAY "Classe @M" CODTAB[3,6]
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_SEZ CODTAB[1,1]
|
||||
OUTPUT F_LETT CODTAB[2,2]
|
||||
OUTPUT F_CLASSE CODTAB[3,6]
|
||||
OUTPUT F_DESCR_CLAS S0
|
||||
CHECKTYPE NORMAL
|
||||
HELP "Classe secondo la IV dir. CEE (numero romano)"
|
||||
END
|
||||
|
||||
@ -82,13 +84,13 @@ BEGIN
|
||||
INPUT CODTAB[7,8] F_NUM
|
||||
DISPLAY "Sezione" CODTAB[1,1]
|
||||
DISPLAY "Lettera" CODTAB[2,2]
|
||||
DISPLAY "Classe " CODTAB[3,6]
|
||||
DISPLAY "Classe @M" CODTAB[3,6]
|
||||
DISPLAY "Numero" CODTAB[7,8]
|
||||
DISPLAY "Descrizione@50" S0
|
||||
OUTPUT F_NUM CODTAB[7,8]
|
||||
OUTPUT F_SEZ CODTAB[1,1]
|
||||
OUTPUT F_LETT CODTAB[2,2]
|
||||
OUTPUT F_CLASSE CODTAB[3,6]
|
||||
OUTPUT F_NUM CODTAB[7,8]
|
||||
OUTPUT F_DESCR S0
|
||||
HELP "Numero (arabo) secondo la IV dir. CEE"
|
||||
VALIDATE AUTOEXIT_FUNC 2 F_LETT F_NUM
|
||||
@ -104,7 +106,7 @@ BEGIN
|
||||
DISPLAY "Descrizione@50" S0
|
||||
DISPLAY "Sezione" CODTAB[1,1]
|
||||
DISPLAY "Lettera" CODTAB[2,2]
|
||||
DISPLAY "Classe " CODTAB[3,6]
|
||||
DISPLAY "Classe @M" CODTAB[3,6]
|
||||
DISPLAY "Numero" CODTAB[7,8]
|
||||
COPY OUTPUT F_NUM
|
||||
CHECKTYPE REQUIRED
|
||||
|
124
ba/batb%val.uml
124
ba/batb%val.uml
@ -1,66 +1,58 @@
|
||||
#include "batb%val.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
|
||||
#include <toolbar.h>
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Valute" -1 -1 78 12
|
||||
|
||||
STRING FLD_TABVAL_CODTAB 3
|
||||
BEGIN
|
||||
PROMPT 3 1 "Codice "
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
FLAGS "U"
|
||||
KEY 1
|
||||
USE %VAL
|
||||
INPUT CODTAB FLD_TABVAL_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Valuta@25" S0
|
||||
OUTPUT FLD_TABVAL_CODTAB CODTAB
|
||||
OUTPUT FLD_TABVAL_S0 S0
|
||||
HELP "Codice della valuta"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING FLD_TABVAL_S0 25
|
||||
BEGIN
|
||||
PROMPT 3 3 "Descrizione "
|
||||
FIELD LF_TABCOM->S0
|
||||
KEY 2
|
||||
USE %VAL KEY 2
|
||||
INPUT S0 FLD_TABVAL_S0
|
||||
DISPLAY "Valuta@25" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT FLD_TABVAL_CODTAB
|
||||
HELP "Descrizione della valuta"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING FLD_TABVAL_S7 5
|
||||
BEGIN
|
||||
PROMPT 3 5 "Simbolo "
|
||||
FIELD LF_TABCOM->S7
|
||||
HELP "Simbolo della valuta"
|
||||
END
|
||||
|
||||
NUMBER FLD_TABVAL_R0 15 5
|
||||
BEGIN
|
||||
PROMPT 3 7 "Cambio "
|
||||
FIELD LF_TABCOM->R10
|
||||
PICTURE ".5"
|
||||
FLAGS "R"
|
||||
HELP "Cambio attuale"
|
||||
END
|
||||
|
||||
DATE FLD_TABVAL_D0
|
||||
BEGIN
|
||||
PROMPT 3 9 "Data "
|
||||
FIELD LF_TABCOM->D0
|
||||
HELP "Data di ultimo aggiornamento"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
#include "batb%val.h"
|
||||
|
||||
TOOLBAR "" 0 20 0 2
|
||||
|
||||
#include <toolbar.h>
|
||||
|
||||
ENDPAGE
|
||||
|
||||
PAGE "Valute" -1 -1 78 12
|
||||
|
||||
STRING FLD_TABVAL_CODTAB 3
|
||||
BEGIN
|
||||
PROMPT 3 1 "Codice "
|
||||
FIELD LF_TABCOM->CODTAB
|
||||
FLAGS "U"
|
||||
KEY 1
|
||||
USE %VAL
|
||||
INPUT CODTAB FLD_TABVAL_CODTAB
|
||||
DISPLAY "Codice" CODTAB
|
||||
DISPLAY "Valuta@25" S0
|
||||
OUTPUT FLD_TABVAL_CODTAB CODTAB
|
||||
OUTPUT FLD_TABVAL_S0 S0
|
||||
HELP "Codice della valuta"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
STRING FLD_TABVAL_S0 25
|
||||
BEGIN
|
||||
PROMPT 3 3 "Descrizione "
|
||||
FIELD LF_TABCOM->S0
|
||||
KEY 2
|
||||
USE %VAL KEY 2
|
||||
INPUT S0 FLD_TABVAL_S0
|
||||
DISPLAY "Valuta@25" S0
|
||||
DISPLAY "Codice" CODTAB
|
||||
COPY OUTPUT FLD_TABVAL_CODTAB
|
||||
HELP "Descrizione della valuta"
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
NUMBER FLD_TABVAL_R0 15 5
|
||||
BEGIN
|
||||
PROMPT 3 5 "Cambio "
|
||||
FIELD LF_TABCOM->R10
|
||||
PICTURE ".5"
|
||||
FLAGS "R"
|
||||
END
|
||||
|
||||
DATE FLD_TABVAL_D0
|
||||
BEGIN
|
||||
PROMPT 3 7 "Data "
|
||||
FIELD LF_TABCOM->D0
|
||||
HELP "Data di ultimo aggiornamento"
|
||||
END
|
||||
|
||||
ENDPAGE
|
||||
|
||||
ENDMASK
|
||||
|
@ -3,8 +3,8 @@
|
||||
Tabella dei registri
|
||||
|
||||
[Rows]
|
||||
1|CODTAB[1,3]|@2gCodice: @3s
|
||||
1|CODTAB[4,7]|@13gAnno: @4s
|
||||
1|CODTAB[5,7]|@2gCodice: @3s
|
||||
1|CODTAB[1,4]|@13gAnno: @4s
|
||||
1|S0|@24gDescrizione: @25s
|
||||
1|I0|@64gTipo: @25t
|
||||
1|S7|@94gCod. libro: @3s
|
||||
|
@ -21,7 +21,8 @@
|
||||
2|Tabelle|1
|
||||
2|Codici IVA|ba3 -0 %iva
|
||||
2|Codici Attivita'|ba3 -0 %ais
|
||||
2|Cond. di pagamento|ba3 -0 %cpg
|
||||
2|Condizioni di pagamento|ba3 -0 %cpg
|
||||
2|Classificazione pagamenti|ba3 -0 %clr
|
||||
2|Libri sociali|ba3 -0 %itl
|
||||
2|Banche|ba3 -0 %ban
|
||||
2|Codici statistici|ba3 -0 %stt
|
||||
@ -33,7 +34,8 @@
|
||||
3|Stampa tabelle|3
|
||||
3|Codici IVA|ba3 -1 %iva
|
||||
3|Codici Attivita'|ba3 -1 %ais
|
||||
3|Cond. di pagamento|ba3 -1 %cpg
|
||||
3|Condizioni di pagamento|ba3 -1 %cpg
|
||||
3|Classificazione pagamenti|ba3 -1 %clr
|
||||
3|Libri sociali|ba3 -1 %itl
|
||||
3|Banche|ba3 -1 %ban
|
||||
3|Codici statistici|ba3 -1 %stt
|
||||
@ -54,7 +56,8 @@
|
||||
4|Gestione Libro Unico|14
|
||||
5|Tabelle studio|1
|
||||
5|Tipi documento|ba3 -0 %tpd
|
||||
5|Cond. di pagamento|ba3 -0 %cpg
|
||||
5|Condizioni di pagamento|ba3 -0 %cpg
|
||||
5|Classificazione pagamenti|ba3 -0 %clr
|
||||
5|Descrizioni aggiuntive|ba3 -0 %dpn
|
||||
5|Codici IVA|ba3 -0 %iva
|
||||
5|Codici Attivita'|ba3 -0 %ais
|
||||
@ -65,7 +68,8 @@
|
||||
5|Valute|ba3 -0 %val
|
||||
5|Lingue|ba3 -0 %lng
|
||||
6|Stampa tabelle studio|3
|
||||
6|Cond. di pagamento|ba3 -1 %cpg
|
||||
6|Condizioni di pagamento|ba3 -1 %cpg
|
||||
6|Classificazione pagamenti|ba3 -1 %clr
|
||||
6|Descrizioni aggiuntive|ba3 -1 %dpn
|
||||
6|Codici IVA|ba3 -1 %iva
|
||||
6|Codici Attivita'|ba3 -1 %ais
|
||||
@ -91,6 +95,7 @@
|
||||
8|Banche|ba3 -1 %ban
|
||||
9|Prima nota|2
|
||||
9|Prima nota|cg2 -0
|
||||
9|Elimina movimenti provvisori|cg2 -1
|
||||
9|Ricalcolo saldi|cg4 -0
|
||||
9|IVA|10
|
||||
9|Lista movimenti|cg3 -0
|
||||
|
Loading…
x
Reference in New Issue
Block a user