Patch level :10.0

Files correlati     :
Ricompilazione Demo : [ ]
Commento            :
gestione budget avanzata per Adolfo!


git-svn-id: svn://10.65.10.50/trunk@20393 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2010-04-29 10:01:46 +00:00
parent 5d886904cb
commit ab0054d772
4 changed files with 79 additions and 21 deletions

View File

@ -134,7 +134,7 @@ Importazione CLIFO e ANAMAG per Acquacontrol
PS1001 CRPA/DINAMICA PS1001 CRPA/DINAMICA
-0 generazione movimento analitico da file .csv contenente le righe (usato in genere per budget) -0 generazione movimento analitico da file .csv contenente le righe (usato in genere per budget)
-1 importazione di N movimenti di budget analitici in formato .csv -1 importazione di N movimenti di budget analitici in formato .csv
-2 variatore dei movimenti di budget già esistenti -2 gestore dei movimenti di budget per commessa
PS1100 PS1100
Importazione listini dei gommari (prassiroma, ex ve7500) Importazione listini dei gommari (prassiroma, ex ve7500)

View File

@ -520,7 +520,7 @@ int TVariazione_budget_mask::modifica_movana(const long numreg, TSheet_field& sf
const bool r_autofcomp = *sf_righe.cell(i, _pos_autofcomp) > ' '; const bool r_autofcomp = *sf_righe.cell(i, _pos_autofcomp) > ' ';
const TDate r_datacomp = sf_righe.cell(i, _pos_datacomp); const TDate r_datacomp = sf_righe.cell(i, _pos_datacomp);
TDate r_datafcomp = sf_righe.cell(i, _pos_datafcomp); TDate r_datafcomp = sf_righe.cell(i, _pos_datafcomp);
if (r_datafcomp < r_datacomp) if (!r_datafcomp.ok() && !r_autofcomp)
r_datafcomp = r_datacomp; r_datafcomp = r_datacomp;
//importo riga: se nullo la riga verrà eliminata in quanto inutile all'umanità //importo riga: se nullo la riga verrà eliminata in quanto inutile all'umanità
@ -586,7 +586,7 @@ int TVariazione_budget_mask::crea_movana(TSheet_field& sf_righe, const int n)
const bool r_autofcomp = *sf_righe.cell(n, _pos_autofcomp) > ' '; const bool r_autofcomp = *sf_righe.cell(n, _pos_autofcomp) > ' ';
const TDate r_datacomp = sf_righe.cell(n, _pos_datacomp); const TDate r_datacomp = sf_righe.cell(n, _pos_datacomp);
TDate r_datafcomp = sf_righe.cell(n, _pos_datafcomp); TDate r_datafcomp = sf_righe.cell(n, _pos_datafcomp);
if (r_datafcomp < r_datacomp) if (!r_datafcomp.ok() && !r_autofcomp)
r_datafcomp = r_datacomp; r_datafcomp = r_datacomp;
//riempie la testata del movana //riempie la testata del movana
@ -793,20 +793,17 @@ int TVariazione_budget_mask::load()
const TDate datacomp = rmovana.get("MOVANA."MOVANA_DATACOMP).as_date(); const TDate datacomp = rmovana.get("MOVANA."MOVANA_DATACOMP).as_date();
TDate datafcomp = rmovana.get("MOVANA."MOVANA_DATAFCOMP).as_date(); TDate datafcomp = rmovana.get("MOVANA."MOVANA_DATAFCOMP).as_date();
const bool autofcomp = rmovana.get("MOVANA."MOVANA_AUTOFCOMP).as_bool(); const bool autofcomp = rmovana.get("MOVANA."MOVANA_AUTOFCOMP).as_bool();
//caso cazzuto della scadenza con la fine della commessa (come nella stampa bilancio commessa) if (!datafcomp.ok() && !autofcomp)
if (autofcomp)
{
const TRectype& rec_commesse = cache().get(LF_COMMESSE, cms);
//data del cazzo che serve per non rovinare datacomp, che è la data sulla riga, non quella iniziale di cms
TDate datainicms;
ca_durata_commessa(rec_commesse, datainicms, datafcomp);
}
if (!datafcomp.ok())
datafcomp = datacomp; datafcomp = datacomp;
row.add(datacomp, _pos_datacomp); row.add(datacomp, _pos_datacomp);
row.add(autofcomp ? "X" : "", _pos_autofcomp); row.add(autofcomp ? "X" : "", _pos_autofcomp);
//se c'è l'auto fine competenza la cella con la data fine competenza va svuotata..
//..e disabilitata senno' ci va messa e basta
if (!autofcomp)
row.add(datafcomp, _pos_datafcomp); row.add(datafcomp, _pos_datafcomp);
else
sf_righe.disable_cell(sf_righe.items() - 1, _pos_datafcomp);
//costo o ricavo? all'indbil l'ardua sentenza! //costo o ricavo? all'indbil l'ardua sentenza!
TAnal_bill bill(conto, cdc, cms, fase); TAnal_bill bill(conto, cdc, cms, fase);
@ -902,6 +899,6 @@ void TVariazione_budget::main_loop()
int ps1001300 (int argc, char* argv[]) int ps1001300 (int argc, char* argv[])
{ {
TVariazione_budget main_app; TVariazione_budget main_app;
main_app.run(argc, argv, TR("Variazione budget")); main_app.run(argc, argv, TR("Gestione budget per commessa"));
return true; return true;
} }

View File

@ -16,6 +16,7 @@
#define DLG_TODATAINI 251 #define DLG_TODATAINI 251
#define DLG_TODATAFIN 252 #define DLG_TODATAFIN 252
#define DLG_TOMATURATO 253 #define DLG_TOMATURATO 253
#define DLG_RESET 254
//campi dello sheet //campi dello sheet
#define S_CHECK 101 #define S_CHECK 101

View File

@ -54,7 +54,7 @@ END
ENDPAGE ENDPAGE
PAGE "Variazione Budget" 0 2 0 0 PAGE "Gestione Budget" 0 2 0 0
GROUPBOX DLG_NULL 78 4 GROUPBOX DLG_NULL 78 4
BEGIN BEGIN
@ -173,6 +173,62 @@ BEGIN
END END
ENDPAGE ENDPAGE
PAGE "Istruzioni " 0 2 0 0
TEXT -1
BEGIN
PROMPT 1 1 "_ Le date della commessa possono essere modificate."
END
TEXT -1
BEGIN
PROMPT 1 2 "_ I pulsanti All.Ini, All.Fin, All.Mat hanno effetto solo sulle righe il cui primo campo è spuntato"
END
TEXT -1
BEGIN
PROMPT 1 3 "_ All.Ini (Allinea all'Inizio) allinea le date di competenza alla data inizio commessa"
END
TEXT -1
BEGIN
PROMPT 1 4 "_ All.Fin (Allinea alla Fine) allinea le date di fine competenza alla data fine commessa"
END
TEXT -1
BEGIN
PROMPT 1 5 "_ All.Mat (Allinea al Maturato) modifica gli importi in modo da portare il Preventivo al valore del Maturato"
END
TEXT -1
BEGIN
PROMPT 1 6 "_ E' possibile modificare manualmente gli importi sulle righe, il Preventivo viene ricalcolato di conseguenza"
END
TEXT -1
BEGIN
PROMPT 1 7 "_ In fase di registrazione vengono eliminate le righe ad importo nullo (azzerare quindi l'importo se si"
END
TEXT -1
BEGIN
PROMPT 1 8 " desidera rimuovere una riga)."
END
TEXT -1
BEGIN
PROMPT 1 9 "_ In fase di registrazione le nuove righe vengono assegnate a nuovi movimenti analitici preventivi"
END
TEXT -1
BEGIN
PROMPT 1 10 "_ Il pulsante Tutti spunta le righe, una per ogni chiave Sede/Fase/Conto"
END
ENDPAGE
ENDMASK ENDMASK
@ -300,6 +356,8 @@ END
BOOLEAN S_AUTOFCOMP BOOLEAN S_AUTOFCOMP
BEGIN BEGIN
PROMPT 34 6 "Automatica" PROMPT 34 6 "Automatica"
MESSAGE FALSE ENABLE,S_DATAFCOMP
MESSAGE TRUE CLEAR,S_DATAFCOMP
END END
DATE S_DATAFCOMP DATE S_DATAFCOMP
@ -371,19 +429,21 @@ ENDPAGE
TOOLBAR "bottombar" 0 0 0 2 TOOLBAR "bottombar" 0 0 0 2
BUTTON DLG_OK 10 2 BUTTON DLG_OK 2 2
BEGIN BEGIN
PROMPT -13 -1 "" PROMPT 1 1 ""
END END
BUTTON DLG_DELREC 10 2 BUTTON DLG_RESET 2 2
BEGIN BEGIN
PROMPT -23 -1 "" PROMPT 2 1 "~Azzera"
PICTURE TOOL_RESET
MESSAGE RESET,S_IMPORTO
END END
BUTTON DLG_CANCEL 10 2 BUTTON DLG_CANCEL 2 2
BEGIN BEGIN
PROMPT -33 -1 "" PROMPT 3 1 ""
END END
ENDPAGE ENDPAGE