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

Patch level :4.0 800

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :errore con { e && su tutte le maschere!!!!
Corretto problema sulla conversione!


git-svn-id: svn://10.65.10.50/trunk@15676 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2007-10-05 09:47:35 +00:00
parent b29b8aed6a
commit c118e1386a
11 changed files with 27 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
ba/ba1100.cpp
View File

@ -373,7 +373,6 @@ bool TManutenzione_app::create() // initvar e arrmask
if (_superprassi)
{
_browse->add_button(DLG_CONVERT, BR("~Converti", 9), K_F7);
// _browse->add_button(DLG_INSFILE, BR("~Inserisci", 9), K_F6);
if (is_power_station())
_browse->add_button(DLG_ADDFILE, BR("~Aggiungi", 9), K_F8);
TButton_field& butt = ((TMask*)_browse)->add_button(DLG_OTHERFILE, 0, BR("A~ltri", 9), 0, -1, 9, 2, "", 0, 0);
@ -1279,7 +1278,6 @@ void TManutenzione_app::load_des(const int maxfdir)
if (standard) // carica eventuali nuove descrizioni ed il nuovo livello archivi
{
// Cerca in RECDESC i files f[nnn].dir
ifstream infile;
TString ws;
TFilename fn;
TDir td,new_dir;
@ -1291,11 +1289,10 @@ void TManutenzione_app::load_des(const int maxfdir)
if (fexist(fn))
{
ifstream infile(fn);
long fl;
infile.open(fn);
infile >> fl;
if (fl > flags) flags = fl;
infile.close();
}
// scandisce *.dir in RECDESC
@ -1310,8 +1307,13 @@ void TManutenzione_app::load_des(const int maxfdir)
for (int n = 0; n < totfiles; n++)
{
fn = list.row(n);
infile.open(fn);
if (fn == "recdesc/f159.dir")
int cazzo = n;
if (fn.exist())
{
ifstream infile(fn);
infile >> td;
}
ln = td.num();
const bool is_new = ln > last_newln; // memorizza l'ultimo record scritto come nuovo
if (is_new) // aggiunge i files che mancano
@ -1328,8 +1330,6 @@ void TManutenzione_app::load_des(const int maxfdir)
td.put(ln,_nordir,_sysdirop);
if (is_new)
tr.put(ln);
infile.close();
//unlink(fn);
}
d.eod() = (long)last_newln;

4
ba/ba1100a.uml
View File

@ -40,7 +40,7 @@ BEGIN
PROMPT 2 5 "Record usati "
HELP "Numero di record utilizzati"
WARNING "Numero di record errato"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=#FLD_EOX)}
NUM_EXPR (#THIS_FIELD>=0)&&(#THIS_FIELD<=#FLD_EOX)
FLAGS "DR"
GROUP 1
END
@ -60,7 +60,7 @@ BEGIN
PROMPT 30 6 "Dimensione "
HELP "Dimensione da assegnare al file"
WARNING "Dimensione non corretta"
NUM_EXPR {#THIS_FIELD>=#FLD_EOD}
NUM_EXPR (#THIS_FIELD>=#FLD_EOD)
FLAGS "DR"
END

2
ba/ba1100d.uml
View File

@ -122,7 +122,7 @@ BEGIN
PROMPT 2 5 "Decimali "
FLAGS "UR"
HELP "Decimali del campo"
NUM_EXPR {(#FLD_TIPO!=4)||(#THIS_FIELD+2<=#FLD_LEN)}
NUM_EXPR ((#FLD_TIPO!=4)||(#THIS_FIELD+2<=#FLD_LEN))
WARNING "Numero di decimali errato"
END

2
ba/ba2100f.uml
View File

@ -60,7 +60,7 @@ END
NUMBER F_X 3
BEGIN
PROMPT 24 3 "Colonna "
NUM_EXPR {#F_X <= #F_NUMCOL}
NUM_EXPR (#F_X<=#F_NUMCOL)
WARNING "Il numero di colonna deve essere minore del numero di colonne totali"
HELP "Colonna in cui stampare"
END

4
ba/ba3300a.uml
View File

@ -284,7 +284,7 @@ BEGIN
PROMPT 2 14 "Numero pagina iniziale "
HELP "Numero della prima pagina da numerare"
FLAGS "R"
NUM_EXPR {#THIS_FIELD >= 0}
NUM_EXPR (#THIS_FIELD>=0)
WARNING "Numero pagina iniziale errato: non puo' essere negativo"
END
@ -293,7 +293,7 @@ BEGIN
PROMPT 42 14 "Numero pagina finale "
HELP "Numero dell'ultima pagina da numerare"
FLAGS "R"
NUM_EXPR {#THIS_FIELD>=(#F_NPAGINI+2)}
NUM_EXPR (#THIS_FIELD>=(#F_NPAGINI+2))
WARNING "Numero pagina finale errato: deve essere maggiore o uguale a quello iniziale + 2"
END

6
ba/ba3600a.uml
View File

@ -103,7 +103,7 @@ NUMBER F_MESEDA 2
BEGIN
PROMPT 8 14 "dal : mese "
HELP "Primo mese di cui stampare i movimenti"
NUM_EXPR {(#THIS_FIELD >= 1) && (#THIS_FIELD <= 12)}
NUM_EXPR ((#THIS_FIELD >= 1)&&(#THIS_FIELD <= 12))
END
NUMBER F_ANNODA 4
@ -116,7 +116,7 @@ NUMBER F_MESEA 2
BEGIN
PROMPT 8 15 "al : mese "
HELP "Ultimo mese di cui stampare i movimenti"
NUM_EXPR {(#THIS_FIELD >= 1) && (#THIS_FIELD <= 12)}
NUM_EXPR ((#THIS_FIELD >= 1)&&(#THIS_FIELD <= 12))
END
NUMBER F_ANNOA 4
@ -174,7 +174,7 @@ NUMBER F_STAMPA_MESE 2
BEGIN
PROMPT 4 11 "Stampa mese "
HELP "Mese di cui effettuare la stampa"
NUM_EXPR {(#THIS_FIELD >= #F_STAMPA_MESEG) && (#THIS_FIELD <= 12)}
NUM_EXPR ((#THIS_FIELD >= #F_STAMPA_MESEG)&&(#THIS_FIELD <= 12))
WARNING "Il mese da stampare deve essere maggiore o uguale all'ultimo mese di stampa indicato sulla tabella del libro unico selezionato"
CHECKTYPE REQUIRED
END

4
ba/ba3601a.uml
View File

@ -35,7 +35,7 @@ NUMBER F_MESEDA 2
BEGIN
PROMPT 3 4 "Dal mese "
HELP "Primo mese di cui stampare i movimenti"
NUM_EXPR {(#THIS_FIELD >= 1) && (#THIS_FIELD <= 12)}
NUM_EXPR ((#THIS_FIELD >= 1)&&(#THIS_FIELD <= 12))
CHECKTYPE REQUIRED
WARNING "Il valore deve essere compreso tra 1 e 12"
END
@ -44,7 +44,7 @@ NUMBER F_MESEA 2
BEGIN
PROMPT 28 4 "Al mese "
HELP "Ultimo mese di cui stampare i movimenti"
NUM_EXPR {(((#THIS_FIELD >= 1) && (#THIS_FIELD <= 12)) && (#THIS_FIELD >= #F_MESEDA))}
NUM_EXPR ((((#THIS_FIELD >= 1)&&(#THIS_FIELD <= 12))&&(#THIS_FIELD >= #F_MESEDA)))
CHECKTYPE REQUIRED
WARNING "Il valore deve essere compreso tra 1 e 12 ed essere maggiore o uguale al mese di partenza"
END

2
ba/ba4300a.uml
View File

@ -452,7 +452,7 @@ NUMBER FLD_GD2_MESIREDD 3
BEGIN
PROMPT 45 6 "Mesi produzione reddito "
FIELD LF_NDITTE->MESIREDD
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=12))
FLAGS "R"
HELP "Numero di mesi di produzione reddito"
WARNING "Numero di mesi non corretto"

10
ba/ba4600a.uml
View File

@ -184,7 +184,7 @@ BEGIN
FLAGS "R"
HELP "Percentuale delle azioni possedute dal socio"
WARNING "Percentuale quote non corretta"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=100))
END
NUMBER FLD_SC1_PERCAZREDD 7 3
@ -194,7 +194,7 @@ BEGIN
FLAGS "R"
HELP "Reddito derivante da quote aziendali"
WARNING "Percentuale quote non corretta"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=100))
END
NUMBER FLD_SC1_PERCAZPERD 7 3
@ -204,7 +204,7 @@ BEGIN
FLAGS "R"
HELP "Perdita derivante da quote aziendali"
WARNING "Percentuale quote non corretta"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=100)}
NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=100))
END
LIST LST_SC1_RICQUAL 28
@ -375,7 +375,7 @@ BEGIN
FLAGS "R"
HELP "Numero di mesi lavorati ex art.120 comma 1"
WARNING "N.ro di mesi non corretto"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=12))
END
NUMBER FLD_SC2_MLAV120C2 2
@ -385,7 +385,7 @@ BEGIN
FLAGS "R"
HELP "Numero di mesi lavorati ex art.120 comma 2"
WARNING "N.ro di mesi non corretto"
NUM_EXPR {(#THIS_FIELD>=0) && (#THIS_FIELD<=12)}
NUM_EXPR ((#THIS_FIELD>=0)&&(#THIS_FIELD<=12))
END
TEXT DLG_NULL

2
ba/batbinl.uml
View File

@ -88,7 +88,7 @@ BEGIN
PROMPT 1 4 "Numero pagina finale registro unico "
FIELD PAGFIN
FLAGS "UR"
NUM_EXPR {#THIS_FIELD>=#F_PINI_LU}
NUM_EXPR (#THIS_FIELD>=#F_PINI_LU)
CHECKTYPE REQUIRED
WARNING "Inserire un numero di pagina superiore a quella iniziale"
END

2
ba/batbvid.uml
View File

@ -79,7 +79,7 @@ BEGIN
FLAGS "R"
CHECKTYPE REQUIRED
WARNING "Specificare un numero di pagina superiore a quella iniziale"
NUM_EXPR {(#THIS_FIELD>=#F_PAGDA)}
NUM_EXPR ((#THIS_FIELD>=#F_PAGDA))
END
ENDPAGE