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:
guy 1995-01-10 17:53:11 +00:00
parent 287d1c812f
commit 38c58e1b07
5 changed files with 15 additions and 7 deletions

View File

@ -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
}
}

View File

@ -200,6 +200,7 @@ BEGIN
ITEM "Co./c@3"
ITEM "Sottoc./c@6"
ITEM "Descrizione contropartita@50"
ITEM "Giornale"
ITEM " @1"
END

View File

@ -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

View File

@ -366,7 +366,8 @@ default:
}
break;
}
row << '|' << tipo;
row << "| |" << tipo;
disable_cgs_cells(n, tipo);
cg.force_update(n);

View File

@ -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"