Patch level : 10.0
Files correlati : lv3.exe lv3400a.msk Ricompilazione Demo : [ ] Commento : git-svn-id: svn://10.65.10.50/trunk@19698 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
f9dd73da33
commit
052f240b78
@ -290,7 +290,7 @@ void TEvasione_ter_msk::genera_buono()
|
|||||||
consegne.move_first();
|
consegne.move_first();
|
||||||
const TDate dataprco = consegne.get(LVRCONSPLAN_DTCONS).as_date();
|
const TDate dataprco = consegne.get(LVRCONSPLAN_DTCONS).as_date();
|
||||||
const int coditi = consegne.get(LVRCONSPLAN_CODITI).as_int();
|
const int coditi = consegne.get(LVRCONSPLAN_CODITI).as_int();
|
||||||
const int coditi = consegne.get(LVRCONSPLAN_CODAUT).as_int();
|
const int codaut = consegne.get(LVRCONSPLAN_CODAUT).as_int();
|
||||||
|
|
||||||
//recupero il codpag
|
//recupero il codpag
|
||||||
TToken_string key;
|
TToken_string key;
|
||||||
@ -301,8 +301,8 @@ void TEvasione_ter_msk::genera_buono()
|
|||||||
const long codabi = clifo.get_long(CLI_CODABI);
|
const long codabi = clifo.get_long(CLI_CODABI);
|
||||||
const long codcab = clifo.get_long(CLI_CODCAB);
|
const long codcab = clifo.get_long(CLI_CODCAB);
|
||||||
|
|
||||||
//reupero la cuasale di magazzino di testata
|
//reupero la causale di magazzino di testata
|
||||||
const TString16 causmag = cache().get("%TIP", tipodoc, "S9");
|
const TString8 causmag = cache().get("%TIP", tipodoc, "S9");
|
||||||
|
|
||||||
//preparo la testata del documento
|
//preparo la testata del documento
|
||||||
TDocumento doc('D', kdoc.anno(), codnum, ++_ndoc);
|
TDocumento doc('D', kdoc.anno(), codnum, ++_ndoc);
|
||||||
|
@ -1,6 +1,7 @@
|
|||||||
#include "lv3400a.h"
|
#include "lv3400a.h"
|
||||||
|
|
||||||
TOOLBAR "Topbar" 0 0 0 2
|
TOOLBAR "Topbar" 0 0 0 2
|
||||||
|
|
||||||
BUTTON DLG_SELECT 2 2
|
BUTTON DLG_SELECT 2 2
|
||||||
BEGIN
|
BEGIN
|
||||||
//PROMPT 1 1 "Tutti/F3"
|
//PROMPT 1 1 "Tutti/F3"
|
||||||
@ -50,7 +51,7 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
PAGE "Evasione Buoni di prelievo" -1 -1 27 10
|
PAGE "Evasione Buoni di prelievo" 0 2 0 0
|
||||||
|
|
||||||
STRING F_TCODNUM 4
|
STRING F_TCODNUM 4
|
||||||
BEGIN
|
BEGIN
|
||||||
@ -156,7 +157,6 @@ END
|
|||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
|
|
||||||
ENDMASK
|
ENDMASK
|
||||||
|
|
||||||
PAGE "Riga" -1 -1 22 11
|
PAGE "Riga" -1 -1 22 11
|
||||||
@ -201,4 +201,5 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
|
||||||
ENDMASK
|
ENDMASK
|
Loading…
x
Reference in New Issue
Block a user