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

Patch level :

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :


git-svn-id: svn://10.65.10.50/branches/R_10_00@21633 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2011-02-11 15:44:54 +00:00
parent 27baed65ae
commit 8a34d033b7
3 changed files with 19 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ha/ha0200a.uml
View File

@ -388,7 +388,7 @@ BEGIN
ITEM "1|EA13 "
ITEM "3|3/9 "
ITEM "C|Codabar"
FIELD "TipoBarcode"
FIELD TipoBarcode
END
GROUPBOX DLG_NULL 76 15

6
ha/ha1200.cpp
View File

@ -534,8 +534,10 @@ void TFile2Txt::genera_barcode_txt()
barcode.new_rec("");
barcode.set(CODCORR_CODARTALT, archivio_codcorr.get(CODCORR_CODARTALT));
barcode.set(CODCORR_CODART, archivio_codcorr.get(CODCORR_CODART));
const TString& codice_a_barre = archivio_codcorr.get(CODCORR_CODARTALT).as_string();
barcode.set(CODCORR_CODARTALT, codice_a_barre);
const TString& codice_art = archivio_codcorr.get(CODCORR_CODART).as_string();
barcode.set(CODCORR_CODART, codice_art);
}
TFilename output_path = genera_path("barcode");

18
ha/ha1300.cpp
View File

@ -707,7 +707,13 @@ void TUpload2Campo::elabora_SI(THardy_upload_recordset& recset, TLog_report& log
const TString16 str_part = recset.get("Partita").as_string();
const int annopart = atoi(str_part.left(4)); //anno = primi 4 caratteri del campo partita
TString8 numpart = str_part.mid(5, 7); //numero partita = 7 caratteri a partire dal sesto
numpart.trim();
if (annopart <= 0 || numpart.blank())
{
TString msg;
msg << "Partita: " << numpart << " Anno: " << anno << " non valida!";
_can_write = false;
log.log(2, msg);
}
TConfig config(CONFIG_DITTA, "ha");
const TString& codcaus = config.get("InpCausale");
@ -1039,8 +1045,10 @@ void TUpload2Campo::elabora_TF(THardy_upload_recordset& recset, TLog_report& log
//sconto in fattura, sconto totale, che cazzo sono?
//TString8 scontone = recset.get();
//codice pagamento
doc.put(DOC_CODPAG, recset.get(DOC_CODPAG).as_string());
//codice pagamento (su terminalino è lungo 2, da noi 3 e lo vogliamo zero-filled; mah?!)
TString4 str_codpag = recset.get(DOC_CODPAG).as_string();
str_codpag.right_just(3, '0');
doc.put(DOC_CODPAG, str_codpag);
//incasso (importo pagato)
const real incasso = recset.get("Incasso").as_real() / CENTO;
doc.put(DOC_IMPPAGATO, incasso);
@ -1084,7 +1092,9 @@ void TUpload2Campo::elabora_TF(THardy_upload_recordset& recset, TLog_report& log
//serie delle put sulla riga documento; ricordiamo che la chiave della riga viene riempita dalla new_row
//3a) articolo
TString8 codart = recset.get(RDOC_CODART).as_string();
const TString& descr = check_articolo(codart, log);
TString80 descr = check_articolo(codart, log);
if (tipocess == 'O')
descr << " (OMAGGIO)";
rigadoc.put(RDOC_CODART, codart);
rigadoc.put(RDOC_CODARTMAG, codart);