Patch level : 2003 580

Files correlati     : ve2.exe ve2400.msk
Ricompilazione Demo : [ ]
Commento            :

GF20085
STESSO ERRORE già risolto rif. GF20027
Nello spreadsheet delle giacenze disabilitare la voce depositi
se il magazzino specificato sulla riga non ne prevede la gestione.


git-svn-id: svn://10.65.10.50/trunk@11435 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2003-09-24 10:27:20 +00:00
parent e000c87841
commit 9392161197
3 changed files with 20 additions and 8 deletions

View File

@ -564,9 +564,12 @@ bool TMask_anamag::handle_anno(TMask_field &fld, KEY k)
mask.set(F_ANNORIF, mask.esercizi_contabili().last()) ;
mask.set(F_ANNO, mask.get(F_ANNORIF));
}
if (mask.last_annogiac>0 && mask.last_annogiac!=fld.mask().get_int(F_ANNO)) {
if (fld_giac.dirty() && handle_sheetgiac(fld_giac,K_ENTER)) {
if (fld.yesno_box("Salvare le righe di giacenza per l'anno %d",mask.last_annogiac )) {
if (mask.last_annogiac>0 && mask.last_annogiac!=fld.mask().get_int(F_ANNO))
{
if (fld_giac.dirty() && handle_sheetgiac(fld_giac,K_ENTER))
{
if (fld.yesno_box("Salvare le righe di giacenza per l'anno %d",mask.last_annogiac ))
{
fld_giac.autosave(*mask._rel);
fld_giac.record()->rewrite();
}
@ -1504,7 +1507,7 @@ void TAnagrafica_magazzino::load_um(TMask& m)
// *****************************
// LETTURA SHEET UNITA' DI MISURA
TSheet_field &fld_um= m.sfield(F_SHEETUM); // prende lo sheet delle unità di misura
get_relation()->lfile().put(ANAMAG_CODART,m.get(F_CODART));
get_relation()->curr().put(ANAMAG_CODART,m.get(F_CODART));
fld_um.record()->read(*fld_um.putkey(*get_relation()));
fld_um.autoload(*get_relation());
// else

View File

@ -40,6 +40,7 @@
#define F_DESMAG 150
#define F_DESDEP 151
#define H_DESMAG 152
#define H_CODDEP 153
#define F_UBICAZD 154
#define F_DESL1 155

View File

@ -27,14 +27,23 @@ BEGIN
FIELD CODMAG[1,3]
USE MAG SELECT CODTAB[4,5]==""
INPUT CODTAB F_CODMAG
DISPLAY "Codice " CODTAB[1,3]
DISPLAY "Denominazione mag.@50" S0
DISPLAY "Codice" CODTAB[1,3]
DISPLAY "Denominazione magazzino@50" S0
OUTPUT F_CODMAG CODTAB[1,3]
OUTPUT F_DESMAG S0
OUTPUT H_DESMAG S0
OUTPUT H_CODDEP B0
CHECKTYPE REQUIRED
END
BOOLEAN H_CODDEP
BEGIN
PROMPT 2 1 "Gestione depositi "
MESSAGE FALSE DISABLE,F_CODDEP
MESSAGE TRUE ENABLE,F_CODDEP
FLAGS "HG"
END
STRING F_CODDEP 2
BEGIN
PROMPT 2 1 "Deposito "
@ -49,7 +58,6 @@ BEGIN
OUTPUT F_CODDEP CODTAB[4,5]
OUTPUT F_DESDEP S0
CHECKTYPE REQUIRED
// WARNING "Indicare il deposito"
END
STRING H_DESMAG 50
@ -63,7 +71,7 @@ BEGIN
PROMPT 22 0 ""
USE MAG KEY 2 SELECT CODTAB[4,5]==""
INPUT S0 F_DESMAG
DISPLAY "Denominazione mag.@50" S0
DISPLAY "Denominazione magazzino@50" S0
DISPLAY "Cod. magazzino" CODTAB[1,3]
DISPLAY "Cod. deposito" CODTAB[4,5]
OUTPUT F_CODMAG CODTAB[1,3]