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

Corretta maschera causali (campo descrizione piu' largo della corrispondente

Browse Source 
colonna sullo sheet).


git-svn-id: svn://10.65.10.50/trunk@1305 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1995-04-26 08:05:32 +00:00
parent 313fbade7d
commit 7ee06bbdbb
2 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
cg/cg0500b.uml
View File

@ -2,7 +2,7 @@
PAGE "" -1 -1 68 11 PAGE "" -1 -1 68 11
STRING 101 22 STRING 101 21
BEGIN BEGIN
PROMPT 1 1 "Tipo " PROMPT 1 1 "Tipo "
FLAGS "D" FLAGS "D"

18
cg/cg2104.cpp
View File

@ -632,16 +632,16 @@ int TPrimanota_application::nuovo_pagamento(TPartita& partita, int rata, int rmo
caus = 2; break; caus = 2; break;
} }
TBill bill; causale().bill(caus, bill); // Legge conto contropartita
if (bill.empty()) causale().bill(caus = 1, bill);
bill.put(part, TRUE);
// PART_TIPOC viene preso dalla partita base // PART_TIPOC viene preso dalla partita base
// PART_GRUPPO viene preso dalla partita base // PART_GRUPPO viene preso dalla partita base
// PART_CONTO viene preso dalla partita base // PART_CONTO viene preso dalla partita base
// PART_SOTTOCONTO viene preso dalla partita base // PART_SOTTOCONTO viene preso dalla partita base
TBill bill; causale().bill(caus, bill); bill.get(part); // Legge conto principale
if (bill.empty()) causale().bill(caus = 1, bill);
bill.put(part, TRUE);
bill.get(partita.riga(1));
if (bill.tipo() > ' ') // Se cliente o fornitore cerca sua banca if (bill.tipo() > ' ') // Se cliente o fornitore cerca sua banca
{ {
TRelation cliforel(LF_CLIFO); TRelation cliforel(LF_CLIFO);
@ -823,7 +823,7 @@ bool TPrimanota_application::edit_pagamento(TPartita& p, TRectype& part)
m.set(S_IMPORTOVAL, scaden.get(SCAD_IMPORTOVAL)); // " in valuta m.set(S_IMPORTOVAL, scaden.get(SCAD_IMPORTOVAL)); // " in valuta
m.set(S_RATA, scaden.get(SCAD_NRATA)); m.set(S_RATA, scaden.get(SCAD_NRATA));
const char sez = part.get_char(PART_SEZ); // Sezione importo e rituenute const char sez = parbas.get_char(PART_SEZ); // Sezione importo e rituenute
const char controsez = sez == 'D' ? 'A' : 'D'; // Sezione opposta const char controsez = sez == 'D' ? 'A' : 'D'; // Sezione opposta
// Memorizza importi prima di eventuali variazioni // Memorizza importi prima di eventuali variazioni
@ -852,10 +852,10 @@ bool TPrimanota_application::edit_pagamento(TPartita& p, TRectype& part)
const TImporto new_importo(controsez, part.get_real(PART_IMPORTO)); const TImporto new_importo(controsez, part.get_real(PART_IMPORTO));
if (!new_importo.is_zero()) if (!new_importo.is_zero())
{ {
TBill conto; conto.get(part); TBill new_conto; conto.get(part, TRUE);
const int riga = bill2pos(conto, 'I'); const int riga = bill2pos(new_conto, 'I');
if (riga < 0) if (riga < 0)
set_cgs_row(riga, new_importo, conto, part.get(PART_DESCR), 'I'); set_cgs_row(riga, new_importo, new_conto, part.get(PART_DESCR), 'I');
else else
add_cgs_imp(riga, new_importo); add_cgs_imp(riga, new_importo);
} }