root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Oggetto TMagazzini

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@5085 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-08-21 07:18:42 +00:00
parent acb2186a60
commit c75e0aaa91
2 changed files with 44 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
mg/mglib.h
View File

@ -273,6 +273,34 @@ public:
};
// *********************
// classe che incapsula tutti i magazzini
class TMagazzini : public TRecord_cache
{
TString16 _stdmag;
TString16 _stddep;
TConfig _mgconfig;
public:
TString & standardmag()
{ return _stdmag;}
TString & standarddep()
{ return _stddep;}
bool gestmag()
{return _mgconfig.get_bool("GESMAG");}
bool gestdep()
{return _mgconfig.get_bool("GESDEPOSITI");}
bool gestubi_man()
{return _mgconfig.get("GESUBICAZ")=="M";}
bool gestubi_tab()
{return _mgconfig.get("GESUBICAZ")=="T";}
bool gestmultimag()
{return _mgconfig.get_bool("GESMULTIMAG");}
TMagazzini();
virtual ~TMagazzini() {}
};
// *********************
// classe che incapsula le causali di magazzino (record della tabella CAU)
typedef enum

16
mg/mglib01.cpp
View File

@ -751,10 +751,12 @@ TCodart_livelli ::TCodart_livelli()
_metachars.add(new TMetachar(format),max(last_level()-1,0));
}
TCodart_livelli ::~TCodart_livelli()
{
}
TCodgiac_livelli ::TCodgiac_livelli()
{
TConfig mgconfig(CONFIG_DITTA, "mg");
@ -762,3 +764,17 @@ TCodgiac_livelli ::TCodgiac_livelli()
}
TMagazzini::TMagazzini() :
TRecord_cache("MAG") , _stdmag(""), _mgconfig(CONFIG_DITTA, "mg")
{
TTable mag("MAG");
mag.first();
while (!mag.eof() && !mag.get_bool("B1"))
mag.next();
if (!mag.eof()) {
_stdmag=mag.get("CODTAB");_stdmag.cut(3);
_stddep=mag.get("CODTAB")+3;
}
}