Patch level : 10.0 148

Files correlati     :  mg0.exe
Ricompilazione Demo : [ ]
Commento            :

Aggiunti i flag di lavanderia alle causali di magazzino


git-svn-id: svn://10.65.10.50/trunk@17494 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2008-10-28 20:02:49 +00:00
parent 696eabe624
commit 2955c4120a
7 changed files with 80 additions and 41 deletions

View File

@ -41,8 +41,12 @@
#define F_STOP_PROD 148
#define F_MOV_SOSP 149
#define F_SCAR_ALT 150
#define F_CAMPOQTA 151
#define F_GIACCF 152
#define F_SGNDOTIN 153
#define F_SGNDOTOD 154
#define F_SGNDOTTM 155
#define F_SGNCONYR 156
#define F_SGNCONMN 157
#define G_SGNVAL 20
#define G_SGNQTA 21

View File

@ -1,4 +1,5 @@
#include "batbcau.h"
#include <modaut.h>
TOOLBAR "Toolbar" 0 0 0 2
@ -86,8 +87,6 @@ BEGIN
ITEM "V|varie"
ITEM "C|carico"
ITEM "S|scarico"
// STR_EXPR (#F_TIPOMOV=="V")||(#F_RAGGF!="")
// WARNING "Necessario indicare il raggruppamento fiscale"
END
LISTBOX F_TIPOPR 16
@ -99,30 +98,20 @@ BEGIN
ITEM "L|Libero"
END
LISTBOX F_CAMPOQTA 6 21
BEGIN
PROMPT 2 9 "Q.tà sui documenti "
FIELD S5
ITEM "|Default"
ITEM "QTAGG1|Quantità aggiuntiva 1"
ITEM "QTAGG2|Quantità aggiuntiva 2"
ITEM "QTAGG3|Quantità aggiuntiva 3"
ITEM "QTAGG4|Quantità aggiuntiva 4"
ITEM "QTAGG5|Quantità aggiuntiva 5"
END
BOOL F_MOVQTA
BEGIN
FIELD B0
PROMPT 2 10 "Movimenta solo quantita'"
MESSAGE TRUE RESET,F_MOVVAL
MESSAGE FALSE ENABLE,F_MOVVAL
MESSAGE TRUE CLEAR,F_MOVVAL
END
BOOL F_MOVVAL
BEGIN
FIELD B1
PROMPT 42 10 "Movimenta solo valori"
MESSAGE TRUE RESET,F_MOVQTA
MESSAGE FALSE ENABLE,F_MOVQTA
MESSAGE TRUE CLEAR,F_MOVQTA
END
BOOL F_UPDTULC
@ -135,6 +124,8 @@ BOOLEAN F_GIACCF
BEGIN
FIELD B7
PROMPT 42 11 "Aggiorna giacenze per cliente/fornitore "
MESSAGE FALSE CLEAR,LVAUT@
MESSAGE TRUE ENABLE,LVAUT@
END
@ -461,6 +452,55 @@ BEGIN
GROUP G_SGNVAL
END
LISTBOX F_SGNDOTIN 1
BEGIN
PROMPT 42 4 "Movimentazione dotazione iniziale "
FIELD S2[29,30]
ITEM "0| "
ITEM "+1|+"
ITEM "-1|-"
GROUP LVAUT
END
LISTBOX F_SGNDOTOD 1
BEGIN
PROMPT 42 5 " '' '' dotazione ordierna "
FIELD S2[31,32]
ITEM "0| "
ITEM "+1|+"
ITEM "-1|-"
GROUP LVAUT
END
LISTBOX F_SGNDOTTM 1
BEGIN
PROMPT 42 6 " '' '' dotazione temporanea "
FIELD S2[33,34]
ITEM "0| "
ITEM "+1|+"
ITEM "-1|-"
GROUP LVAUT
END
LISTBOX F_SGNCONYR 1
BEGIN
PROMPT 42 7 " '' '' consegnato anno "
FIELD S2[35,36]
ITEM "0| "
ITEM "+1|+"
ITEM "-1|-"
GROUP LVAUT
END
LISTBOX F_SGNCONMN 1
BEGIN
PROMPT 42 8 " '' '' consegnato mese "
FIELD S2[37,38]
ITEM "0| "
ITEM "+1|+"
ITEM "-1|-"
GROUP LVAUT
END
NUMBER F_SUMSIGN 4 0
BEGIN

View File

@ -50,6 +50,6 @@ USERVAL5|4|18|3|valore
USER6|4|15|5|campo definito dall'utente
USERVAL6|4|18|3|valore
3
ANNOES+TIPOCF+CODCF+INDSPED+CODART+LIVELLO+NRIGA|
ANNOES+TIPOCF+CODCF+INDSPED+CODART+NRIGA|
ANNOES+TIPOCF+CODCF+INDSPED+CODART+LIVELLO|X
ANNOES+CODART+LIVELLO+TIPOCF+CODCF+INDSPED|X

View File

@ -83,6 +83,8 @@ TMask_tabmag::TMask_tabmag(const char * _maskname, const TString &tabname)
if (!main_app().has_module(DBAUT))
hide(F_DIBAEXPLOSION);
set_handler(F_SGNGIAC, sumsign_handler);
if (!main_app().has_module(LVAUT))
hide(-LVAUT);
} else
if (tabname == "FCA") // FORMATO CODICE ARTICOLI
{

View File

@ -265,9 +265,9 @@ public:
class TArticolo_giacenza_data : public TArticolo_giacenza
{
protected:
virtual int write(TBaseisamfile&) const;
virtual int rewrite(TBaseisamfile&) const;
virtual int remove(TBaseisamfile&) const;
virtual int write(TBaseisamfile&) const { return _iseof; }
virtual int rewrite(TBaseisamfile&) const { return _iseof; }
virtual int remove(TBaseisamfile&) const { return _iseof; }
public:
void al(const TDate& data, const char* codmag = NULL, const char* livello = NULL,
@ -485,7 +485,12 @@ typedef enum
s_user3,
s_user4,
s_user5,
s_user6
s_user6,
s_dotin,
s_dotod,
s_dottm,
s_consanno,
s_consmese
} TTipo_saldomag;
class TCausale_magazzino : public TRectype

View File

@ -1514,18 +1514,6 @@ TArticolo_giacenza::TArticolo_giacenza(const TRectype& rec)
// Giacenze alla data
int TArticolo_giacenza_data::write(TBaseisamfile&) const
{
NFCHECK("Non e' possibile scrivere un Articolo con giacenza alla data");
return NOERR;
}
int TArticolo_giacenza_data::rewrite(TBaseisamfile& f) const
{ return write(f); }
int TArticolo_giacenza_data::remove(TBaseisamfile& f) const
{ return write(f); }
void TArticolo_giacenza_data::al(const TDate& data, const char* codmag, const char* livello,
TTipo_valorizz tipo, const char* catven, const char* codlis)
{
@ -1695,12 +1683,11 @@ int TCausale_magazzino::sgn(TTipo_saldomag tiposaldo) const
case s_rim : index = 22; break;
case s_scart: index = 24; break;
case s_label: index = 26; break;
case s_user1: index = 28; break;
case s_user2: index = 30; break;
case s_user3: index = 32; break;
case s_user4: index = 34; break;
case s_user5: index = 36; break;
case s_user6: index = 38; break;
case s_dotin: index = 28; break;
case s_dotod: index = 30; break;
case s_dottm: index = 32; break;
case s_consanno: index = 34; break;
case s_consmese: index = 36; break;
default : index = -1; break;
}
int segno = 0;

View File

@ -666,6 +666,7 @@ bool TMov_mag::update_balances(bool lock)
if (clifomag.read() != NOERR)
{
// non trovato: aggiungo
clifomag.setkey(1);
giac_putkey_clifo(clifomag, saldo);
clifomag.put(CLIFOGIAC_NRIGA, 999);
if (clifomag.read(_isgteq) == NOERR)
@ -674,13 +675,13 @@ bool TMov_mag::update_balances(bool lock)
if (clifomag.get_int(CLIFOGIAC_ANNOES) == saldo.codes() &&
clifomag.get_char(CLIFOGIAC_TIPOCF) == saldo.tipocf() &&
clifomag.get(CLIFOGIAC_CODCF) == saldo.codcf() &&
clifomag.get(CLIFOGIAC_INDSPED) == saldo.codindsp() &&
clifomag.get(CLIFOGIAC_CODART) == saldo.codart() &&
clifomag.get(CLIFOGIAC_LIVELLO ) == saldo.livello())
nriga = clifomag.get_int(CLIFOGIAC_NRIGA) + 1;
giac_putkey_clifo(clifomag, saldo);
clifomag.put(CLIFOGIAC_NRIGA, nriga);
clifomag.write();
clifomag.setkey(2);
}
update_balances_clifo(clifomag.curr(), saldo);
clifomag.rewrite();