Patch level : 10.0 patch ???
Files correlati : lv1 lv3 Ricompilazione Demo : [ ] Commento : Correzioni sugli inventari git-svn-id: svn://10.65.10.50/trunk@20552 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
262befbc79
commit
81de3685ad
@ -111,11 +111,13 @@ protected:
|
||||
void elabora(const TMask& mask, const char action);
|
||||
};
|
||||
|
||||
//SISTEMA_MAGAZZINO_PACCHImetodo che sistema l'elenco dei pacchi,
|
||||
//SISTEMA_MAGAZZINO_PACCHI: metodo che sistema l'elenco dei pacchi,
|
||||
//eliminando quelli che effettivamente non ci sono
|
||||
void TStampa_inv_app::sistema_magazzino_pacchi(TAssoc_array& documenti)
|
||||
{
|
||||
TLocalisamfile pacchi(LF_PACCHI);
|
||||
TSystemisamfile pacchi(LF_PACCHI);
|
||||
pacchi.open();
|
||||
pacchi.lock();
|
||||
TAssoc_array arpacchi;
|
||||
|
||||
//Scorro tutti i documenti che sto stampando; per ognuno recupero l'elenco dei pacchi
|
||||
@ -141,12 +143,14 @@ void TStampa_inv_app::sistema_magazzino_pacchi(TAssoc_array& documenti)
|
||||
}
|
||||
}
|
||||
|
||||
//scorro l'elenco dei pacchi che mi sono appena costruito, separando i vari codioci dei pacchi
|
||||
//scorro l'elenco dei pacchi che mi sono appena costruito, separando i vari codici dei pacchi
|
||||
bool trovato = false;
|
||||
FOR_EACH_ASSOC_OBJECT(arpacchi, obj1, key1, itm1)
|
||||
{
|
||||
TAssoc_array pa;
|
||||
TString16 codart(key1);
|
||||
TToken_string& codpacchi = *(TToken_string*)arpacchi.objptr(codart);
|
||||
codpacchi.replace('-', '|');
|
||||
|
||||
//separo i vari codici dei pacchi
|
||||
for(int i = 0; i < codpacchi.items(); i++)
|
||||
@ -168,10 +172,17 @@ void TStampa_inv_app::sistema_magazzino_pacchi(TAssoc_array& documenti)
|
||||
{
|
||||
TRiga_pacco rp(paxcodart.cursor()->curr());
|
||||
if(!pa.is_key(rp.codpacco()))
|
||||
{
|
||||
rp.remove(pacchi);
|
||||
trovato = true;
|
||||
}
|
||||
}
|
||||
}
|
||||
pacchi.rewrite();
|
||||
if(trovato)
|
||||
pacchi.rewrite();
|
||||
|
||||
pacchi.unlock();
|
||||
pacchi.close();
|
||||
}
|
||||
|
||||
void TStampa_inv_app::elabora(const TMask& mask, const char action)
|
||||
|
@ -241,7 +241,7 @@ void TInventario_ter_msk::registra()
|
||||
TDoc_inventario inv(kinv);
|
||||
if(_nuovo)
|
||||
{
|
||||
TString8 codcau = cache().get("%TIP", ini_get_string(CONFIG_DITTA, "lv", "NUM_INV", NULL), "S9");
|
||||
TString8 codcau = cache().get("%TIP", ini_get_string(CONFIG_DITTA, "lv", "TIPODOC_INV", NULL), "S9");
|
||||
inv.put(DOC_TIPODOC, get(F_TPDOC));
|
||||
inv.put(DOC_DATADOC, get_date(F_DATAINV));
|
||||
inv.put(DOC_CAUSMAG, codcau);
|
||||
|
Loading…
x
Reference in New Issue
Block a user