Patch level : 10.0 patch???

Files correlati     : lv1 lv1200*.rep
Ricompilazione Demo : [ ]
Commento            :
Sistemata la stampa a Kg


git-svn-id: svn://10.65.10.50/trunk@20178 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca83 2010-03-02 14:31:43 +00:00
parent e580a22a67
commit a7add47afd
3 changed files with 16 additions and 28 deletions

View File

@ -86,7 +86,7 @@ bool TStampa_a_kg_rep::get_usr_val(const TString& name, TVariant& var) const
if (umrif == _umkg) if (umrif == _umkg)
{ {
//leggo e controllo il fattore di conversione //leggo e controllo il fattore di conversione
const real fatconv = unita.get_real("R10"); fatconv = unita.get_real("R10");
} }
if (fatconv != ZERO) if (fatconv != ZERO)
{ {
@ -204,12 +204,12 @@ void TStampa_a_kg_app::prepara_recordset(TStampa_a_kg_rep & rep) const
righedoc->set_var("#ACODCF", _msk->get_long(F_ACODCF)); righedoc->set_var("#ACODCF", _msk->get_long(F_ACODCF));
break; break;
case 2: case 2:
righedoc->set_var("#DAITI", _msk->get_long(F_DACODITI)); righedoc->set_var("#DAITI", _msk->get(F_DACODITI));
righedoc->set_var("#AITI", _msk->get_long(F_ACODITI)); righedoc->set_var("#AITI", _msk->get(F_ACODITI));
break; break;
case 3: case 3:
righedoc->set_var("#DAAUT", _msk->get(F_DACODAUT).right(5)); righedoc->set_var("#DAAUT", _msk->get(F_DACODAUT).right(5));
righedoc->set_var("#AAUT", _msk->get(F_ACODAUT).right(5)); righedoc->set_var("#AAUT", _msk->get(F_ACODAUT).right(5));
break; break;
default: default:
break; break;

View File

@ -197,18 +197,12 @@ STRING F_DACODAUT 6
BEGIN BEGIN
PROMPT 2 12 "Da autista " PROMPT 2 12 "Da autista "
FLAGS "UZ" FLAGS "UZ"
USE &ITI USE &AUT
JOIN &AUT TO &ITI ALIAS 1000 INTO CODTAB==S1
JOIN &MEZ TO &ITI ALIAS 2000 INTO CODTAB==S2
INPUT CODTAB F_DACODAUT INPUT CODTAB F_DACODAUT
DISPLAY "Autista" S1 DISPLAY "Autista" CODTAB
DISPLAY "Descrizione Autista@50" 1000@->S0 DISPLAY "Descrizione Autista@50" S0
DISPLAY "Itinerario" CODTAB OUTPUT F_DACODAUT CODTAB
DISPLAY "Descrizione@50" 1000@->S0 OUTPUT F_DADESAUT S0
DISPLAY "Targa@8" S2
DISPLAY "Descrizione Mezzo@50" 2000@->S0
OUTPUT F_DACODAUT S1
OUTPUT F_DADESAUT 1000@->S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
GROUP 3 GROUP 3
END END
@ -230,18 +224,12 @@ STRING F_ACODAUT 6
BEGIN BEGIN
PROMPT 2 13 "A autista " PROMPT 2 13 "A autista "
FLAGS "UZ" FLAGS "UZ"
USE &ITI USE &AUT
JOIN &AUT TO &ITI ALIAS 1000 INTO CODTAB==S1
JOIN &MEZ TO &ITI ALIAS 2000 INTO CODTAB==S2
INPUT CODTAB F_ACODAUT INPUT CODTAB F_ACODAUT
DISPLAY "Autista" S1 DISPLAY "Autista" CODTAB
DISPLAY "Descrizione Autista@50" 1000@->S0 DISPLAY "Descrizione Autista@50" S0
DISPLAY "Itinerario" CODTAB OUTPUT F_ACODAUT CODTAB
DISPLAY "Descrizione@50" S0 OUTPUT F_ADESAUT S0
DISPLAY "Targa@8" S2
DISPLAY "Descrizione Mezzo@50" 2000@->S0
OUTPUT F_ACODAUT S1
OUTPUT F_ADESAUT 1000@->S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
GROUP 3 GROUP 3
END END

View File

@ -28,7 +28,7 @@
</field> </field>
</section> </section>
<section type="Head" level="2" height="6"> <section type="Head" level="2" height="6">
<groupby>DOC.CODAG</groupby> <groupby>NUM(DOC.CODAG)</groupby>
<prescript description="H2 PRESCRIPT">0 #F2.101 ! <prescript description="H2 PRESCRIPT">0 #F2.101 !
0 #F2.102 ! 0 #F2.102 !
0 #F2.103 !</prescript> 0 #F2.103 !</prescript>