Gestione riga giornale nelle righe contabili
git-svn-id: svn://10.65.10.50/trunk@847 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
287d1c812f
commit
38c58e1b07
@ -565,7 +565,7 @@ int TPrimanota_application::read(TMask& m)
|
||||
conto.set(r.get_int("GRUPPOC"), r.get_int("CONTOC"),
|
||||
r.get_long("SOTTOCONTC"), r.get_char("TIPOCC"));
|
||||
riga.add(conto.string(0x3)); // Contropartita 110-114
|
||||
|
||||
riga.add(r.get("NUMGIO"));
|
||||
const char tipo = r.get_char("ROWTYPE");
|
||||
riga.add(tipo); // Tipo di riga 115
|
||||
|
||||
@ -623,7 +623,6 @@ int TPrimanota_application::read(TMask& m)
|
||||
// Trasferisce i dati da maschera a movimento di prima nota
|
||||
void TPrimanota_application::mask2rel(const TMask& m)
|
||||
{
|
||||
_rel->lfile().zero();
|
||||
m.autosave(_rel);
|
||||
|
||||
const long numreg = m.get_long(F_NUMREG);
|
||||
@ -672,7 +671,7 @@ void TPrimanota_application::mask2rel(const TMask& m)
|
||||
r.put("CONTOC", row.get());
|
||||
r.put("SOTTOCONTC", row.get());
|
||||
row.get(); // Descrizione contropartita
|
||||
|
||||
r.put("NUMGIO", row.get()); // Numero riga giornale
|
||||
r.put("ROWTYPE", row.get()); // Tipo riga
|
||||
}
|
||||
}
|
||||
|
@ -200,6 +200,7 @@ BEGIN
|
||||
ITEM "Co./c@3"
|
||||
ITEM "Sottoc./c@6"
|
||||
ITEM "Descrizione contropartita@50"
|
||||
ITEM "Giornale"
|
||||
ITEM " @1"
|
||||
END
|
||||
|
||||
|
@ -656,7 +656,8 @@ BEGIN
|
||||
ITEM "Co./c@3"
|
||||
ITEM "Sottoc./c@6"
|
||||
ITEM "Descrizione contropartita@50"
|
||||
ITEM " "
|
||||
ITEM "Giornale"
|
||||
ITEM " @1"
|
||||
END
|
||||
|
||||
NUMBER F_DARE 15
|
||||
|
@ -366,7 +366,8 @@ default:
|
||||
}
|
||||
break;
|
||||
}
|
||||
row << '|' << tipo;
|
||||
|
||||
row << "| |" << tipo;
|
||||
|
||||
disable_cgs_cells(n, tipo);
|
||||
cg.force_update(n);
|
||||
|
@ -333,11 +333,17 @@ BEGIN
|
||||
ADD RUN cg0 -1
|
||||
CHECKTYPE NORMAL
|
||||
WARNING "Fornitore inesistente sulla riga contabile"
|
||||
END
|
||||
|
||||
NUMBER 115 7
|
||||
BEGIN
|
||||
PROMPT 2 13 "Riga giornale "
|
||||
FLAGS "D"
|
||||
END
|
||||
|
||||
LIST 115 20
|
||||
LIST 116 20
|
||||
BEGIN
|
||||
PROMPT 2 13 "Tipo riga "
|
||||
PROMPT 30 13 "Tipo riga "
|
||||
ITEM " |Sola contabilita'"
|
||||
ITEM "C|Gestione saldaconto"
|
||||
ITEM "D|IVA detraibile"
|
||||
|
Loading…
x
Reference in New Issue
Block a user