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

Patch level : lv1064

Browse Source 
Files correlati     : lv2 lv3 verig22.msk
Ricompilazione Demo : [ ]
Commento            :
Riportate modifiche di Bonazzi/Tassan


git-svn-id: svn://10.65.10.50/branches/R_10_00@22413 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2011-09-12 13:02:42 +00:00
parent dcfb4ffa3f
commit 192c4280e3
3 changed files with 13 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lv/lv2500.cpp
View File

@ -581,7 +581,6 @@ void TFatturazione_lavanderie::post_process(TLista_documenti& doc_out, TLista_do
doc.put(DOC_NOTE, descr); doc.put(DOC_NOTE, descr);
doc.destroy_row(1, true); doc.destroy_row(1, true);
} }
if (!contr.get_bool(LVCONDV_FORFNOCONS))
aggiorna_fattura(doc, contr.get_int(LVCONDV_CODCONT)); aggiorna_fattura(doc, contr.get_int(LVCONDV_CODCONT));
if (doc.physical_rows() > 0) if (doc.physical_rows() > 0)
doc.sort_rows(RDOC_CODART "|LVTYPE"); doc.sort_rows(RDOC_CODART "|LVTYPE");

7
lv/lv3800.cpp
View File

@ -139,11 +139,10 @@ void TInvia_dotazioni_skema::aggiungi_riga(const long codcf, const long codcont)
} }
TInvia_dotazioni_skema::TInvia_dotazioni_skema() TInvia_dotazioni_skema::TInvia_dotazioni_skema()
: TAS400_recordset("AS400(122)") : TAS400_recordset("AS400(42)")
{ {
create_field("CODCF", -1, 20, _longzerofld, true); //codice cliente create_field("CODCF", -1, 20, _alfafld, true); //codice cliente
create_field("RAGSOC", -1, 50, _alfafld, true); //ragione sociale create_field("CODART", -1, 20, _alfafld, true); //codice cliente
create_field("CITTA", -1, 50, _alfafld, true); //cittŕ
create_field("ACAPO", -1, 2, _alfafld, true, TVariant("\r\n")); //caratteri di a capo create_field("ACAPO", -1, 2, _alfafld, true, TVariant("\r\n")); //caratteri di a capo
} }

7
lv/verig22.uml
View File

@ -188,6 +188,13 @@ BEGIN
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
CURRENCY FR_PREZZO 15
BEGIN
PROMPT 13 7 "Prezzo "
FLAGS "U"
FIELD PREZZO
END
STRING FR_CAULAV 3 STRING FR_CAULAV 3
BEGIN BEGIN
PROMPT 2 7 "Cau.Lav. " PROMPT 2 7 "Cau.Lav. "