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

Patch level : 10.0 706

Browse Source 
Files correlati     : mg3.exe
Ricompilazione Demo : [ ]
Commento            :

0001572: Pharmatex - valorizzazione magazzino
Descrizione Verificare quanto in oggetto su area dati spedita da Ilaria.

La segnalazione riguardava differenze sul saldo iniziale delle schede di articoli per magazzino e per lotto.
e la Pharmatex ha form personalizzati vanno modificati di conseguenza.

rifatta la correzione in modo da non dover cambiare i report personalizzati


git-svn-id: svn://10.65.10.50/trunk@20343 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 2010-04-15 14:44:54 +00:00
parent f2041b36e4
commit af646cfa73
3 changed files with 52 additions and 49 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
mg/mg3300.cpp
View File

@ -277,10 +277,16 @@ bool TForm_schedemag::validate(TForm_item &cf, TToken_string &s)
const bool stampa_perart = relation()->lfile().num() == LF_ANAMAG;
if (stampa_perart) // Stampa per articoli
{
const TRectype& rmovmag = cursor()->curr(LF_RMOVMAG); // Record collegato a LF_ANAMAG
cursor()->relation()->save_status();
TLocalisamfile & rmovmag = cursor()->relation()->lfile(LF_RMOVMAG);
rmovmag.prev();
codmag = rmovmag.get(RMOVMAG_CODMAG);
codart = rmovmag.get(RMOVMAG_CODART);
livello = rmovmag.get(RMOVMAG_LIVGIAC);
cursor()->relation()->restore_status();
}
else
{

48
mg/mg3300a.frm
View File

@ -213,7 +213,7 @@ SECTION BODY ODD 0
BEGIN
KEY "dep"
PROMPT 5 1 "Deposito "
FIELD ALIAS_DEP@->S0
FIELD ALIAS_DEP@-MAG
END
END // HEADER deposito
END // HEADER magazzino
@ -303,30 +303,6 @@ SECTION BODY ODD 0
FLAGS "H"
MESSAGE _NUMEXPR,LF_RMOVMAG->QUANT*349@->FC|_USER,*SEGNOCAUS,Q
END
SECTION STAMPASALDOPREC 1 1 1 NUMEXPR (#FF_STAMPASALDOPREC==0)&&(#FF_CANPRINTSALDOPREC!=0)
NUMERO 100 18
BEGIN
PROMPT 8 1 "Saldo precedente :"
END
NUMERO FF_SALDOPREC 15
BEGIN
PROMPT 46 1 ""
PICTURE "##.###.##@,@##"
MESSAGE _USER,SALDOPREC|ADD,FF_SALDO_GRMOV
END
NUMERO 101 12
BEGIN
FLAGS "H"
MESSAGE RESET,FF_SALDOPREC |INC,FF_STAMPASALDOPREC
END
STRINGA 102 12
BEGIN
PROMPT 42 1 ""
FIELD LF_UMART->UM
END
END // stampa saldo precedente
SECTION MOVIMENTO_CAUSALE 1 0 0 FILE LF_RMOVMAG GROUP CAUS
NUMERO FF_QUANTRIGA 12
@ -389,6 +365,28 @@ SECTION BODY ODD 0
END // sezione movimenti di competenza
END // SEZIONE righe movimento di competenza ragg. per causale
SECTION STAMPASALDOPREC 1 1 1 NUMEXPR (#FF_STAMPASALDOPREC==0)&&(#FF_CANPRINTSALDOPREC!=0)
NUMERO 100 18
BEGIN
PROMPT 8 1 "Saldo precedente :"
END
NUMERO FF_SALDOPREC 15
BEGIN
PROMPT 46 1 ""
PICTURE "##.###.##@,@##"
MESSAGE _USER,SALDOPREC|ADD,FF_SALDO_GRMOV
END
NUMERO 101 12
BEGIN
FLAGS "H"
MESSAGE RESET,FF_SALDOPREC |INC,FF_STAMPASALDOPREC
END
STRINGA 102 12
BEGIN
PROMPT 42 1 ""
FIELD LF_UMART->UM
END
END // stampa saldo precedente
SECTION TOTALI_MOV 1 1 1 NUMEXPR #FF_SALDO_MOV!=0
SECTION HEADER_MOV 1 1 1 NUMEXPR (#FF_NUMRIGHE==0)

45
mg/mg3300as.frm
View File

@ -293,29 +293,6 @@ SECTION BODY ODD 0
FLAGS "H"
MESSAGE _NUMEXPR,LF_RMOVMAG->QUANT*349@->FC|_USER,*SEGNOCAUS,Q
END
SECTION STAMPASALDOPREC 1 1 1 NUMEXPR (#FF_STAMPASALDOPREC==0)&&(#FF_CANPRINTSALDOPREC!=0)
NUMERO 100 18
BEGIN
PROMPT 20 1 "Saldo precedente :"
END
NUMERO FF_SALDOPREC 15
BEGIN
PROMPT 66 1 ""
PICTURE "##.###.##@,@##"
MESSAGE _USER,SALDOPREC|ADD,FF_SALDO_GRMOV
END
NUMERO 101 12
BEGIN
FLAGS "H"
MESSAGE RESET,FF_SALDOPREC |INC,FF_STAMPASALDOPREC
END
STRINGA 102 12
BEGIN
PROMPT 62 1 ""
FIELD LF_UMART->UM
END
END // stampa saldo precedente
SECTION MOVIMENTO_CAUSALE 1 0 0 FILE LF_RMOVMAG GROUP CAUS
NUMERO FF_QUANTRIGA 12
@ -378,6 +355,28 @@ SECTION BODY ODD 0
END // sezione movimenti di competenza
END // SEZIONE righe movimento di competenza ragg. per causale
SECTION STAMPASALDOPREC 1 1 1 NUMEXPR (#FF_STAMPASALDOPREC==0)&&(#FF_CANPRINTSALDOPREC!=0)
NUMERO 100 18
BEGIN
PROMPT 20 1 "Saldo precedente :"
END
NUMERO FF_SALDOPREC 15
BEGIN
PROMPT 66 1 ""
PICTURE "##.###.##@,@##"
MESSAGE _USER,SALDOPREC|ADD,FF_SALDO_GRMOV
END
NUMERO 101 12
BEGIN
FLAGS "H"
MESSAGE RESET,FF_SALDOPREC |INC,FF_STAMPASALDOPREC
END
STRINGA 102 12
BEGIN
PROMPT 62 1 ""
FIELD LF_UMART->UM
END
END // stampa saldo precedente
SECTION TOTALI_MOV 1 1 1 NUMEXPR #FF_SALDO_MOV!=0
STRINGA FF_CAUSALE_RIGA 5