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

Patch level : 2.1 66

Browse Source 
Files correlati     : cg2.exe
Ricompilazione Demo : [ ]
Commento            :

0000069
Messaggio di avviso non bloccante nel caso in cui si cerca di registrare
un pagamento su una rata di un documento con data superiore.


git-svn-id: svn://10.65.10.50/trunk@12175 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2004-06-10 14:48:58 +00:00
parent 78dc2648c5
commit 3ed16ccb4e
1 changed files with 5 additions and 2 deletions

7
cg/cg2105.cpp

@ -98,7 +98,7 @@ public:
class TPay_mask : public TMask
{
TDate _datadoc;
TDate _datadoc, _datarat;
real _da_pagare, _pagabile;
const TGame_mask* _parent;
@ -360,6 +360,7 @@ void TPay_mask::set_pag(const TRectype& oldpag, const TRiga_scadenze& scad,
// Gestione data-pagamento: non puo' precedere la data del documento
_datadoc = sum.get_date(PART_DATADOC);
_datarat = _assigned ? scad.get(SCAD_DATASCAD) : EMPTY_STRING;
set_handler(S_DATAPAG, datapag_handler);
const bool mostra_ritenute = !sum.is_nota_credito();
@ -515,13 +516,15 @@ bool TPay_mask::saldo_handler(TMask_field& f, KEY k)
bool TPay_mask::datapag_handler(TMask_field& f, KEY k)
{
if (f.to_check(k))
if (f.to_check(k) || k == K_ENTER)
{
const TDate datapag(f.get());
TPay_mask& m = (TPay_mask&)f.mask();
if (datapag < m._datadoc)
return f.error_box(FR("La data del pagamento e' inferiore alla data del documento %s"),
m._datadoc.string());
if (datapag < m._datarat)
warning_box(TR("Attenzione: la data del pagamento precede quella della rata"));
}
return TRUE;
}