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

Patch level : 10.0 332

Browse Source 
Files correlati     : mg1.exe
Ricompilazione Demo : [ ]
Commento            :
0001327: inserimento movimenti di magazzino
Dopo aver registrato un documento, non legato ad altro movimento, la riga viene disabilitata e non è più possibile modificare nulla.


git-svn-id: svn://10.65.10.50/trunk@19006 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2009-06-11 08:32:00 +00:00
parent 259d007550
commit 1a9f9fe3b8
3 changed files with 29 additions and 34 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
mg/mg1.cpp
View File

@ -1,5 +1,5 @@
#include <xvt.h> #include <xvt.h>
//
// Modulo di gestione movimenti // Modulo di gestione movimenti
#include "mg1.h" #include "mg1.h"
@ -9,16 +9,10 @@ int main(int argc, char** argv)
switch (r) switch (r)
{ {
case 1: case 1: mg1200(argc,argv); break; // ricostruzione saldi
mg1200(argc,argv) ; break; // ricostruzione saldi case 3: mg1400(argc,argv); break; // gestione aperture/chiusure
case 2: default: mg1100(argc,argv); break; // gestione interattiva movimenti
// mg1300(argc,argv) ; break; // gestione movimenti DA DOCUMENTI
case 3:
mg1400(argc,argv) ; break; // gestione aperture/chiusure
default:
mg1100(argc,argv) ; break; // gestione interattiva movimenti
} }
exit(0);
return 0; return 0;
} }

43
mg/mg4200.cpp
View File

@ -129,36 +129,42 @@ void TForm_inventario::add_colval(int tipo)
bool TForm_inventario::valorizzazione(TForm_item &cf, TTipo_valorizz t) bool TForm_inventario::valorizzazione(TForm_item &cf, TTipo_valorizz t)
{ {
TRectype & magrec=relation()->lfile(LF_MAG).curr(); const TRectype& magrec = relation()->curr(LF_MAG);
TString annoes(magrec.get(MAG_ANNOES)); const TString4 annoes = magrec.get(MAG_ANNOES);
TPrice prezzo(ZERO,"_FIRM");
const real giac_corretta = curr_art().giacenza_corretta(magrec, false,_valcomp); const real giac_corretta = curr_art().giacenza_corretta(magrec, false,_valcomp);
real p; real p;
switch (t) switch (t)
{ {
case valorizz_ultcos: case valorizz_ultcos:
prezzo.set_num(curr_art().ultimo_costo(annoes)); {
p = prezzo.get_num(); const TPrice prezzo(curr_art().ultimo_costo(annoes));
p = prezzo.get_num();
}
break; break;
case valorizz_mediacos: case valorizz_mediacos:
prezzo.set_num(curr_art().media_costi(annoes)); {
p = prezzo.get_num(); const TPrice prezzo(curr_art().media_costi(annoes));
p = prezzo.get_num();
}
break; break;
case valorizz_przlist: case valorizz_przlist:
prezzo.set_num(CENTO / (CENTO + curr_art().get_real(ANAMAG_PERCRIC)) * curr_art().prezzo_listino(annoes,_catven,_codlist)); {
p = prezzo.get_num(); const TPrice prezzo(CENTO / (CENTO + curr_art().get_real(ANAMAG_PERCRIC)) * curr_art().prezzo_listino(annoes,_catven,_codlist));
p = prezzo.get_num();
}
break; break;
case valorizz_coststd: case valorizz_coststd:
prezzo.set_num(curr_art().costo_standard(annoes)); {
p = prezzo.get_num(); const TPrice prezzo(curr_art().costo_standard(annoes));
p = prezzo.get_num();
}
break; break;
case valorizz_costmediopond: case valorizz_costmediopond:
{ {
const TString4 codmag = magrec.get(MAG_CODMAG).left(3); const TString4 codmag = magrec.get(MAG_CODMAG).left(3);
const TString80 livello(magrec.get(MAG_LIVELLO)); const TString80 livello(magrec.get(MAG_LIVELLO));
const TPrice prezzo(curr_art().costo_mediopond(annoes,codmag,livello));
prezzo.set_num(curr_art().costo_mediopond(annoes,codmag,livello));
p = prezzo.get_num(); p = prezzo.get_num();
} }
break; break;
@ -166,8 +172,7 @@ bool TForm_inventario::valorizzazione(TForm_item &cf, TTipo_valorizz t)
{ {
const TString4 codmag = magrec.get(MAG_CODMAG).left(3); const TString4 codmag = magrec.get(MAG_CODMAG).left(3);
const TString80 livello(magrec.get(MAG_LIVELLO)); const TString80 livello(magrec.get(MAG_LIVELLO));
const TPrice prezzo(curr_art().costo_medio(annoes,codmag,livello));
prezzo.set_num(curr_art().costo_medio(annoes,codmag,livello));
p = prezzo.get_num(); p = prezzo.get_num();
} }
break; break;
@ -182,7 +187,6 @@ bool TForm_inventario::valorizzazione(TForm_item &cf, TTipo_valorizz t)
{ {
const TString4 codmag = magrec.get(MAG_CODMAG).left(3); const TString4 codmag = magrec.get(MAG_CODMAG).left(3);
const TString80 livello(magrec.get(MAG_LIVELLO)); const TString80 livello(magrec.get(MAG_LIVELLO));
p = curr_art().FIFO(annoes,codmag,livello, false,_valcomp); p = curr_art().FIFO(annoes,codmag,livello, false,_valcomp);
} }
break; break;
@ -190,16 +194,14 @@ bool TForm_inventario::valorizzazione(TForm_item &cf, TTipo_valorizz t)
{ {
const TString4 codmag = magrec.get(MAG_CODMAG).left(3); const TString4 codmag = magrec.get(MAG_CODMAG).left(3);
const TString80 livello(magrec.get(MAG_LIVELLO)); const TString80 livello(magrec.get(MAG_LIVELLO));
p = curr_art().LIFO_annuale(annoes,codmag,livello, false, _valcomp);
p = curr_art().LIFO_annuale(annoes,codmag,livello, false,_valcomp);
} }
break; break;
case valorizz_FIFOa: case valorizz_FIFOa:
{ {
const TString4 codmag = magrec.get(MAG_CODMAG).left(3); const TString4 codmag = magrec.get(MAG_CODMAG).left(3);
const TString80 livello(magrec.get(MAG_LIVELLO)); const TString80 livello(magrec.get(MAG_LIVELLO));
p = curr_art().FIFO_annuale(annoes,codmag,livello, false, _valcomp);
p = curr_art().FIFO_annuale(annoes,codmag,livello, false,_valcomp);
} }
break; break;
default: default:
@ -207,7 +209,6 @@ bool TForm_inventario::valorizzazione(TForm_item &cf, TTipo_valorizz t)
} }
const TCurrency valore(real(p * giac_corretta)); const TCurrency valore(real(p * giac_corretta));
cf.set(valore.get_num().string()); cf.set(valore.get_num().string());
return true; return true;
} }

6
mg/mglib03.cpp
View File

@ -1,4 +1,3 @@
#include <dongle.h>
#include <diction.h> #include <diction.h>
#include <modaut.h> #include <modaut.h>
@ -11,8 +10,9 @@ void TForm_stampemg::add_giaclev(TString &levname, int from, int to)
{ {
to=(to==0 ? (_tolivgiac ? _tolivgiac:livelli_giacenza().last_level()) : to); to=(to==0 ? (_tolivgiac ? _tolivgiac:livelli_giacenza().last_level()) : to);
int lv=(from==0 ? 1: from ); int lv=(from==0 ? 1: from );
for (; lv <to ; lv++) { for (; lv <to ; lv++)
const TString & piece = livelli_giacenza().unpack_grpcode(relation()->lfile(LF_MAG).get("LIVELLO"),lv); {
const TString& piece = livelli_giacenza().unpack_grpcode(relation()->curr(LF_MAG).get("LIVELLO"),lv);
if (piece.not_empty()) if (piece.not_empty())
levname << '/' << piece ; levname << '/' << piece ;
} }