Patch level : 10.0

Files correlati     : lv0, lv3
Ricompilazione Demo : [ ]
Commento            :
0001077: Gestione causale di default
Descrizione 	La logica in cui dovrebbe essere gestita la causale di default è la seguente:
Aggiungere un dato societario che indica la causale lavanderia di default di gestione documenti (obbligatoria) ... questo dato sta ad indicare la causale di movimentazione bolle lavanderia usata + di frequente.
La causale lavanderia sui contratti non è obbligatoria. Verrà inserita solo se diversa da quella di default dati configurazione.
Il medesimo ragionamento vale per i documenti, prendono le causali dal contratto se presenti..viceversa acquisiscono quelli dei dati di configurazione.


git-svn-id: svn://10.65.10.50/trunk@17908 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2008-12-16 11:12:14 +00:00
parent 46fab69e1c
commit 3dbe549389
2 changed files with 11 additions and 3 deletions

View File

@ -303,7 +303,7 @@ BEGIN
OUTPUT F_CAUSLAV CODTAB
OUTPUT F_CAUSLAVDESC S0
FIELD CAUSLAV
CHECKTYPE NORMAL
CHECKTYPE REQUIRED
END
STRING F_CAUSLAVDESC 50 47
@ -314,7 +314,7 @@ BEGIN
DISPLAY "Descrizione@50" S0
DISPLAY "Codice" CODTAB
COPY OUTPUT F_CAUSLAV
CHECKTYPE NORMAL
CHECKTYPE REQUIRED
END
BOOLEAN F_UNICONT

View File

@ -209,12 +209,20 @@ bool TGestione_bolle_msk::lv_bolla_handler(TMask_field& f, KEY k)
//instanzio una cache sulla tabella del magazzino
const TRectype& anamag = cache().get(LF_ANAMAG,codart);
TString4 causale = rcont.get(LVRCONDV_CAUSLAV).as_string();
if (causale = "")
{
TConfig* configlv = new TConfig(CONFIG_DITTA,"lv");
causale = configlv->get("CAUSLAV");
}
rdoc.put(RDOC_CODART,codart);
rdoc.put(RDOC_CODARTMAG,codart);
rdoc.put(RDOC_CHECKED,'X');
rdoc.put(RDOC_DESCR,anamag.get(ANAMAG_DESCR));
rdoc.put(RDOC_UMQTA,rcont.get(LVRCONDV_UM).as_string());
rdoc.put(RDOC_CODAGG1,rcont.get(LVRCONDV_CAUSLAV).as_string());
rdoc.put(RDOC_CODAGG1,causale);
//elaborazione per il prezzo: o lo prendo dalle righe contratto, o dall'anagrafica magazzino
if (prinbo)