Patch level :4.0 504
Files correlati :ca4.exe ca4200a.msk Ricompilazione Demo : [ ] Commento :aggiunta opzione di eliminazione dei documenti generati al termine della stampa (eva braun request) git-svn-id: svn://10.65.10.50/trunk@14362 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
cf4685472a
commit
36e835a42c
@ -92,7 +92,7 @@ public:
|
||||
void delete_cespi_docs();
|
||||
TRiga_documento& cerca_riga(TDocumento& doc_cesp, const TString& idcesp, const TString& codcms) const;
|
||||
void elabora_docs();
|
||||
void stampa_docs();
|
||||
bool stampa_docs();
|
||||
};
|
||||
|
||||
//Calcolo % utilizzo del cespite nella commessa
|
||||
@ -368,7 +368,7 @@ void TCalc_cesp_cms::elabora_docs()
|
||||
}
|
||||
|
||||
|
||||
void TCalc_cesp_cms::stampa_docs()
|
||||
bool TCalc_cesp_cms::stampa_docs()
|
||||
{
|
||||
|
||||
//setta la testata del form
|
||||
@ -403,6 +403,8 @@ void TCalc_cesp_cms::stampa_docs()
|
||||
curform.setfilter(filtro);
|
||||
|
||||
_form->print();
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
|
||||
@ -427,7 +429,7 @@ bool TCalc_cesp_cms::destroy()
|
||||
{
|
||||
delete _mask;
|
||||
delete _form;
|
||||
return TRUE;
|
||||
return true;
|
||||
}
|
||||
|
||||
void TCalc_cesp_cms::main_loop()
|
||||
@ -445,7 +447,9 @@ void TCalc_cesp_cms::main_loop()
|
||||
break;
|
||||
|
||||
case K_ESC:
|
||||
stampa_docs();
|
||||
if (stampa_docs() && !_mask->get_bool(F_DEFINITIVA))
|
||||
//eventuale eliminazione dei documenti appena creati (richiesta di Eva Braun)
|
||||
delete_cespi_docs();
|
||||
break;
|
||||
|
||||
default:
|
||||
|
@ -25,3 +25,4 @@
|
||||
#define F_DESCF 224
|
||||
#define F_NUMDOCRIF 225
|
||||
#define F_GENERA_DOC 226
|
||||
#define F_DEFINITIVA 227
|
||||
|
@ -85,6 +85,11 @@ BEGIN
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
BOOLEAN F_DEFINITIVA
|
||||
BEGIN
|
||||
PROMPT 1 5 "Stampa definitiva (i documenti generati non saranno eliminati dopo la stampa)"
|
||||
END
|
||||
|
||||
STRING F_DA_IDCESPITE 10
|
||||
BEGIN
|
||||
PROMPT 1 6 "Dal cespite "
|
||||
|
Loading…
x
Reference in New Issue
Block a user