Corretto errore aga006
git-svn-id: svn://10.65.10.50/trunk@4317 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex
parent
e9be165a5e
commit
7a9e083c22
@ -136,22 +136,22 @@ void TVariazione_effetti::common_f(const TMask& m)
|
||||
if (imp_eff == 0.0) continue; // salta le righe con importo nullo
|
||||
row.restart();
|
||||
TRectype& rec = _effetto->row_r(ii, TRUE);
|
||||
rec.zero();
|
||||
rec.zero();
|
||||
rec.put(REFF_NPROGTR, nprogtr);
|
||||
rec.put(REFF_NRIGATR, ii);
|
||||
rec.put(REFF_IMPFATT, row.get());
|
||||
rec.put(REFF_IMPORTO, row.get());
|
||||
rec.put(REFF_IMPFATTVAL, row.get());
|
||||
rec.put(REFF_IMPORTOVAL, row.get());
|
||||
rec.put(REFF_CODNUM, row.get());
|
||||
rec.put(REFF_PROVV, row.get()[0]);
|
||||
rec.put(REFF_ANNODOC, row.get_int());
|
||||
rec.put(REFF_NFATT, row.get());
|
||||
rec.put(REFF_DATAFATT, row.get());
|
||||
rec.put(REFF_IMPFATT, row.get());
|
||||
rec.put(REFF_IMPFATTVAL, row.get());
|
||||
rec.put(REFF_ANNO, row.get_int());
|
||||
rec.put(REFF_NUMPART, row.get());
|
||||
rec.put(REFF_NRIGA, row.get_int());
|
||||
rec.put(REFF_NRATA, row.get_int());
|
||||
rec.put(REFF_PROVV, row.get()[0]);
|
||||
rec.put(REFF_CODNUM, row.get());
|
||||
rec.put(REFF_ANNODOC, row.get_int());
|
||||
rec.put(REFF_NFATT, row.get());
|
||||
rec.put(REFF_DATAFATT, row.get());
|
||||
ii++;
|
||||
}
|
||||
_effetto->renum(_effetto->numero());
|
||||
@ -200,23 +200,23 @@ int TVariazione_effetti::read(TMask& m)
|
||||
{
|
||||
const TRectype& rec = _effetto->row_r(i);
|
||||
riga.cut(0);
|
||||
riga.add(rec.get(REFF_IMPFATT));
|
||||
riga.add(rec.get(REFF_IMPORTO));
|
||||
riga.add(rec.get(REFF_IMPFATTVAL));
|
||||
riga.add(rec.get(REFF_IMPORTOVAL));
|
||||
riga.add(rec.get(REFF_ANNO));
|
||||
riga.add(rec.get(REFF_NUMPART));
|
||||
riga.add(rec.get(REFF_NRIGA));
|
||||
riga.add(rec.get(REFF_NRATA));
|
||||
riga.add(rec.get(REFF_CODNUM));
|
||||
char tipo_num = rec.get(REFF_PROVV)[0];
|
||||
if (tipo_num == 'D')
|
||||
riga.add("Definitiva");
|
||||
else
|
||||
riga.add("Provvisoria");
|
||||
riga.add(rec.get(REFF_CODNUM));
|
||||
riga.add(rec.get(REFF_ANNODOC));
|
||||
riga.add(rec.get(REFF_NFATT));
|
||||
riga.add(rec.get(REFF_DATAFATT));
|
||||
riga.add(rec.get(REFF_IMPFATT));
|
||||
riga.add(rec.get(REFF_IMPFATTVAL));
|
||||
riga.add(rec.get(REFF_ANNO));
|
||||
riga.add(rec.get(REFF_NUMPART));
|
||||
riga.add(rec.get(REFF_NRIGA));
|
||||
riga.add(rec.get(REFF_NRATA));
|
||||
shrighe.row(i-1) = riga;
|
||||
}
|
||||
}
|
||||
@ -372,11 +372,11 @@ bool TVariazione_effetti::impeff_notify(TSheet_field& s, int r, KEY key)
|
||||
if (key == K_ENTER)
|
||||
{
|
||||
TToken_string& row = s.row(s.selected());
|
||||
char tipo_num = row.get(8)[0];
|
||||
char tipo_num = row.get(3)[0];
|
||||
if (tipo_num == 'D')
|
||||
row.add("Definitiva",8);
|
||||
row.add("Definitiva", 3);
|
||||
else
|
||||
row.add("Provvisoria",8);
|
||||
row.add("Provvisoria", 3);
|
||||
}
|
||||
//se rimane una sola riga nello sheet non la si può cancellare
|
||||
if (key == K_DEL && s.items() == 1)
|
||||
|
||||
26
ef/ef0100.h
26
ef/ef0100.h
@ -43,18 +43,18 @@
|
||||
#define F_DENCOM 105
|
||||
|
||||
// Identificatori campi per lo spreadsheet delle Righe Effetto
|
||||
#define F_IMPFATT 101
|
||||
#define F_IMPEFF 102
|
||||
#define F_IMPFATTVAL 103
|
||||
#define F_IMPEFFVAL 104
|
||||
#define F_ANNO 105
|
||||
#define F_NUMPART 106
|
||||
#define F_NUMRIGA 107
|
||||
#define F_NUMRATA 108
|
||||
#define F_PROVV 109
|
||||
#define F_CODNUM 110
|
||||
#define F_ANNODOC 111
|
||||
#define F_NUMFATT 112
|
||||
#define F_DATAFATT 113
|
||||
#define F_IMPEFF 101
|
||||
#define F_IMPEFFVAL 102
|
||||
#define F_CODNUM 103
|
||||
#define F_PROVV 104
|
||||
#define F_ANNODOC 105
|
||||
#define F_NUMFATT 106
|
||||
#define F_DATAFATT 107
|
||||
#define F_IMPFATT 108
|
||||
#define F_IMPFATTVAL 109
|
||||
#define F_ANNO 110
|
||||
#define F_NUMPART 111
|
||||
#define F_NUMRIGA 112
|
||||
#define F_NUMRATA 113
|
||||
|
||||
#endif // __EF0100_H
|
||||
|
||||
@ -162,20 +162,20 @@ END
|
||||
|
||||
SPREADSHEET F_SHEET_RIGHE 0 7
|
||||
BEGIN
|
||||
PROMPT 1 9 "RIGHE EFFETTO"
|
||||
PROMPT 1 9 "Righe effetto"
|
||||
ITEM "Importo effetto@14"
|
||||
ITEM "Imp.effetto val.@14"
|
||||
ITEM "Cod.numerazione"
|
||||
ITEM "Numerazione"
|
||||
ITEM "Anno fattura"
|
||||
ITEM "Nr. fattura"
|
||||
ITEM "Data fattura"
|
||||
ITEM "Importo fatt.@20"
|
||||
ITEM "Importo effet.@14"
|
||||
ITEM "Imp.fatt.val.@20"
|
||||
ITEM "Imp.effet.val.@14"
|
||||
ITEM "Anno partita"
|
||||
ITEM "Nr. partita"
|
||||
ITEM "Nr. riga"
|
||||
ITEM "Nr. rata"
|
||||
ITEM "Numerazione"
|
||||
ITEM "Codice numeraz."
|
||||
ITEM "Anno fattura"
|
||||
ITEM "Nr. fattura"
|
||||
ITEM "Data fattura"
|
||||
END
|
||||
|
||||
NUMBER F_TOTIMP 18 2
|
||||
|
||||
@ -3,84 +3,84 @@
|
||||
|
||||
PAGE "Righe Effetto" -1 -1 76 16
|
||||
|
||||
NUMBER F_IMPFATT 20 2
|
||||
BEGIN
|
||||
PROMPT 2 1 "Importo fattura "
|
||||
PICTURE "###.###.###.###,@@"
|
||||
END
|
||||
|
||||
NUMBER F_IMPEFF 14 2
|
||||
BEGIN
|
||||
PROMPT 2 2 "Importo effett. "
|
||||
PROMPT 2 1 "Importo effetto "
|
||||
PICTURE "###.###.###,@@"
|
||||
NUM_EXPR #F_IMPFATT>=#F_IMPEFF
|
||||
WARNING "L'importo dell'effetto non puo' superare l'importo della fattura"
|
||||
END
|
||||
|
||||
NUMBER F_IMPFATTVAL 20 3
|
||||
BEGIN
|
||||
PROMPT 2 3 "Imp. fatt. val "
|
||||
PICTURE "###.###.###.###,@@@"
|
||||
// NUM_EXPR #F_IMPFATT>=#F_IMPEFF
|
||||
// WARNING "L'importo dell'effetto non puo' superare l'importo della fattura"
|
||||
END
|
||||
|
||||
NUMBER F_IMPEFFVAL 15 3
|
||||
BEGIN
|
||||
PROMPT 2 4 "Imp. effet. val "
|
||||
PROMPT 2 2 "Imp.effetto val. "
|
||||
PICTURE "###.###.###,@@@"
|
||||
NUM_EXPR #F_IMPFATTVAL>=#F_IMPEFFVAL
|
||||
WARNING "L'importo dell'effetto in valuta non puo' superare l'importo della fattura in valuta"
|
||||
// NUM_EXPR #F_IMPFATTVAL>=#F_IMPEFFVAL
|
||||
// WARNING "L'importo dell'effetto in valuta non puo' superare l'importo della fattura in valuta"
|
||||
END
|
||||
|
||||
NUMBER F_ANNO 4
|
||||
BEGIN
|
||||
PROMPT 2 5 "Anno partita "
|
||||
END
|
||||
|
||||
STRING F_NUMPART 7
|
||||
BEGIN
|
||||
PROMPT 2 6 "Nr. partita "
|
||||
FLAG "R"
|
||||
END
|
||||
|
||||
NUMBER F_NUMRIGA 4
|
||||
BEGIN
|
||||
PROMPT 2 7 "Nr. riga "
|
||||
END
|
||||
|
||||
NUMBER F_NUMRATA 3
|
||||
BEGIN
|
||||
PROMPT 2 8 "Nr. rata "
|
||||
STRING F_CODNUM 4
|
||||
BEGIN
|
||||
PROMPT 2 3 "Codice numeraz. "
|
||||
FIELD LF_REFFETTI->CODNUM
|
||||
END
|
||||
|
||||
LIST F_PROVV 13
|
||||
BEGIN
|
||||
PROMPT 2 9 "Tipo numerazione "
|
||||
PROMPT 2 4 "Tipo numerazione "
|
||||
FIELD LF_REFFETTI->PROVV
|
||||
ITEM "D|Definitiva"
|
||||
ITEM "P|Provvisoria"
|
||||
END
|
||||
|
||||
STRING F_CODNUM 4
|
||||
BEGIN
|
||||
PROMPT 2 10 "Codice numeraz. "
|
||||
FIELD LF_REFFETTI->CODNUM
|
||||
END
|
||||
|
||||
NUMBER F_ANNODOC 4
|
||||
BEGIN
|
||||
PROMPT 2 11 "Anno documento "
|
||||
PROMPT 2 5 "Anno documento "
|
||||
FIELD LF_REFFETTI->ANNODOC
|
||||
END
|
||||
|
||||
STRING F_NUMFATT 7
|
||||
BEGIN
|
||||
PROMPT 2 12 "Nr. fattura "
|
||||
PROMPT 2 6 "Nr. fattura "
|
||||
FLAG "R"
|
||||
END
|
||||
|
||||
DATA F_DATAFATT
|
||||
BEGIN
|
||||
PROMPT 2 13 "Data fattura "
|
||||
PROMPT 2 7 "Data fattura "
|
||||
END
|
||||
|
||||
NUMBER F_IMPFATT 20 2
|
||||
BEGIN
|
||||
PROMPT 2 8 "Importo fattura "
|
||||
PICTURE "###.###.###.###,@@"
|
||||
END
|
||||
|
||||
NUMBER F_IMPFATTVAL 20 3
|
||||
BEGIN
|
||||
PROMPT 2 9 "Imp. fatt. val "
|
||||
PICTURE "###.###.###.###,@@@"
|
||||
END
|
||||
|
||||
NUMBER F_ANNO 4
|
||||
BEGIN
|
||||
PROMPT 2 10 "Anno partita "
|
||||
END
|
||||
|
||||
STRING F_NUMPART 7
|
||||
BEGIN
|
||||
PROMPT 2 11 "Nr. partita "
|
||||
FLAG "R"
|
||||
END
|
||||
|
||||
NUMBER F_NUMRIGA 4
|
||||
BEGIN
|
||||
PROMPT 2 12 "Nr. riga "
|
||||
END
|
||||
|
||||
NUMBER F_NUMRATA 3
|
||||
BEGIN
|
||||
PROMPT 2 13 "Nr. rata "
|
||||
END
|
||||
|
||||
BUTTON DLG_OK 9 2
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user