diff --git a/cg/cg5200.cpp b/cg/cg5200.cpp index 25ffe5970..531b3bfd7 100755 --- a/cg/cg5200.cpp +++ b/cg/cg5200.cpp @@ -282,7 +282,7 @@ bool TSaldibrowse_application::sottoc_handler(TMask_field& f, KEY key) pconti.put(PCN_SOTTOCONTO, sottoconto); ok = stop = pconti.read() == NOERR; } - else ok = FALSE; + //else ok = FALSE; } else { @@ -355,6 +355,7 @@ bool TSaldibrowse_application::user_destroy() int TSaldibrowse_application::read(TMask& m) { + int err = NOERR; m.autoload(*_rel); m.set(F_ANNO,_anno); m.set(F_SCARICATO,_scarongly ? "X" : " "); @@ -364,9 +365,15 @@ int TSaldibrowse_application::read(TMask& m) //else if (tipo == "F") // m.set(F_SOTTOC_FORN,_s); fai_filtro(); - compilasheet(); - - return NOERR; + if (_cur->items() > 0) + compilasheet(); + else + { + err = _iskeynotfound; + error_box("Saldi non presenti per il conto specificato."); + } + + return err; } void TSaldibrowse_application::add_r(int numrig,int a,real& slf,char sff,real& sc,char f,real& si, diff --git a/cg/cg5200a.uml b/cg/cg5200a.uml index 348094636..35faf8760 100755 --- a/cg/cg5200a.uml +++ b/cg/cg5200a.uml @@ -56,9 +56,10 @@ BEGIN DISPLAY "Gruppo" GRUPPO DISPLAY "Descrizione@50" DESCR OUTPUT F_GRUPPO GRUPPO - OUTPUT F_DESCR_CONTO DESCR +// OUTPUT F_DESCR_CONTO DESCR CHECKTYPE REQUIRED VALIDATE CHECK_FIELD F_GRUPPO + MESSAGE CHECK,F_SOTTOCONTO WARNING "Gruppo inesistente" END @@ -80,9 +81,10 @@ BEGIN OUTPUT F_TIPOCF TMCF OUTPUT F_GRUPPO GRUPPO OUTPUT F_CONTO CONTO - OUTPUT F_DESCR_CONTO DESCR +// OUTPUT F_DESCR_CONTO DESCR CHECKTYPE NORMAL VALIDATE CHECK_FIELD F_CONTO + MESSAGE CHECK,F_SOTTOCONTO WARNING "Conto inesistente" END @@ -106,7 +108,7 @@ BEGIN OUTPUT F_CONTO CONTO OUTPUT F_SOTTOCONTO SOTTOCONTO OUTPUT F_DESCR_CONTO DESCR - CHECKTYPE NORMAL +// CHECKTYPE NORMAL VALIDATE CHECK_FIELD F_SOTTOCONTO WARNING "Sottoconto inesistente" GROUP 1 @@ -159,6 +161,7 @@ BEGIN PROMPT 4 4 "Descrizione conto " HELP "Descrizione del conto da visualizzare" FIELD DESCR + KEY 2 USE LF_PCON KEY 2 INPUT DESCR F_DESCR_CONTO DISPLAY "Descrizione@50" DESCR @@ -170,7 +173,6 @@ BEGIN OUTPUT F_CONTO CONTO OUTPUT F_DESCR_CONTO DESCR CHECKTYPE REQUIRED - KEY 2 GROUP 1 END