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@21141 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2010-11-16 15:12:49 +00:00
parent 289d0aac6c
commit ac1c8f5ad0
4 changed files with 110 additions and 66 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

70
ha/ha1100.cpp
View File

@ -60,10 +60,10 @@ protected:
const int logicnum, const TToken_string& key) const;
//metodi di alto livello
void genera_cliente_txt(TConfig& ini);
void genera_riga_listino_txt(TConfig& ini);
void genera_prodotto_txt(TConfig& ini);
void genera_sospeso_txt(TConfig& ini, TString_array& ini_paragraphs);
void genera_cliente_var_txt(TConfig& ini);
void genera_riga_listino_var_txt(TConfig& ini);
void genera_prodotto_var_txt(TConfig& ini);
void genera_sospeso_var_txt(TConfig& ini, TString_array& ini_paragraphs);
virtual void main_loop();
@ -125,7 +125,7 @@ TString4 TIni2Txt::ricava_segno(TConfig& ini)
///////////////////////////////////////////////
// metodi di alto livello
///////////////////////////////////////////////
void TIni2Txt::genera_cliente_txt(TConfig& ini)
void TIni2Txt::genera_cliente_var_txt(TConfig& ini)
{
//recordset per i clienti
TEsporta_clientiVAR_recordset clienti;
@ -150,6 +150,8 @@ void TIni2Txt::genera_cliente_txt(TConfig& ini)
TString80 indcf = ini.get(CLI_INDCF);
indcf << " " << ini.get(CLI_CIVCF);
clienti.set(CLI_INDCF, indcf);
const TString80 localitacf = ini.get(CLI_LOCCF);
clienti.set("Localita", localitacf);
//panegirico per comune e provincia
const TString& statocf = ini.get(CLI_STATOCF);
if (statocf.blank())
@ -159,9 +161,12 @@ void TIni2Txt::genera_cliente_txt(TConfig& ini)
key.add(statocf);
key.add(comcf);
const TRectype& rec_comuni = cache().get(LF_COMUNI, key);
TString80 dencom = rec_comuni.get(COM_DENCOM);
//dencom.cut(20); //il campo sul .txt è lungo 20!
clienti.set("Localita", dencom);
//se la località è vuota ci mettiamo la descrizione del comune
if (localitacf.blank())
{
TString80 dencom = rec_comuni.get(COM_DENCOM);
clienti.set("Localita", dencom);
}
const TString& provcf = rec_comuni.get(COM_PROVCOM);
clienti.set("Provincia", provcf);
}
@ -172,8 +177,7 @@ void TIni2Txt::genera_cliente_txt(TConfig& ini)
//attenzione alla lunghezza del codpag
TString4 codpag = ini.get(CLI_CODPAG);
//codpag.cut(2); //il campo sul .txt è lungo 2!
clienti.set(CLI_CODPAG, codpag);
clienti.set(CLI_CODPAG, codpag.right(2)); //il campo sul .txt è lungo 2 e vuole i caratteri a destra!
TString query;
@ -189,12 +193,16 @@ void TIni2Txt::genera_cliente_txt(TConfig& ini)
clienti.set("CodiceListino", cod_contr);
}
//casotto sulla decodifica articoli
//"FlDecodArt"
//"DecodeCodCli"
TString16 ntel = ini.get(CLI_PTEL);
ntel << ini.get(CLI_TEL);
//ntel.cut(10);
clienti.set(CLI_TEL, ntel);
clienti.set(CLI_CODCFFATT, ini.get(CLI_CODCFFATT));
clienti.set("TipoDoc", "F");
//panegirico del fido!
//poichè il formato di output prevede comunque 2 decimali -> provvediamo a riempire eventuali buchi
@ -203,9 +211,9 @@ void TIni2Txt::genera_cliente_txt(TConfig& ini)
fido.round();
clienti.set(CLI_FIDO, fido);
//no consegna = sospeso (forse)
const TString& sospeso = ini.get_bool(CLI_SOSPESO) ? "S" : "";
clienti.set("NoConsegna", sospeso);
//no consegna = sospeso (forse, anzi NO! non ci va)
//const TString& sospeso = ini.get_bool(CLI_SOSPESO) ? "S" : "";
//clienti.set("NoConsegna", sospeso);
clienti.set(CLI_COFI, ini.get(CLI_COFI));
@ -232,7 +240,7 @@ void TIni2Txt::genera_cliente_txt(TConfig& ini)
}
void TIni2Txt::genera_riga_listino_txt(TConfig& ini)
void TIni2Txt::genera_riga_listino_var_txt(TConfig& ini)
{
TEsporta_listiniVAR_recordset riga_listino;
@ -254,12 +262,11 @@ void TIni2Txt::genera_riga_listino_txt(TConfig& ini)
riga_listino.new_rec("");
riga_listino.set("CodiceTerminale", 0L); //nel caso del listino non si sa come comportarsi
riga_listino.set("CodiceTerminale", 0L); //nel caso del listino non ci va l'agente/terminale
riga_listino.set("Segno", segno);
riga_listino.set(RCONDV_COD, ini.get(RCONDV_COD));
TString80 codart = ini.get(RCONDV_CODRIGA);
//codart.cut(5); //il codart è lungo 5 sul txt!
riga_listino.set(RCONDV_CODRIGA, codart);
//prezzo
@ -292,7 +299,7 @@ void TIni2Txt::genera_riga_listino_txt(TConfig& ini)
}
void TIni2Txt::genera_prodotto_txt(TConfig& ini)
void TIni2Txt::genera_prodotto_var_txt(TConfig& ini)
{
TEsporta_prodottiVAR_recordset prodotto;
prodotto.new_rec("");
@ -306,16 +313,15 @@ void TIni2Txt::genera_prodotto_txt(TConfig& ini)
prodotto.set("Segno", segno);
TString80 codart = ini.get(ANAMAG_CODART);
//codart.cut(5); //solito problema della lunghezza ridotta
prodotto.set(ANAMAG_CODART, codart);
TString80 descr = ini.get(ANAMAG_DESCR);
//descr.cut(30);
prodotto.set(ANAMAG_DESCR, descr);
TString4 codiva = ini.get(ANAMAG_CODIVA);
//codiva.cut(2); //solito problema della lungh ridotta
prodotto.set(ANAMAG_CODIVA, codiva);
const TString& codiva = ini.get(ANAMAG_CODIVA);
//esportiamo un'aliquota, non un codice iva!
const real aliq_iva = cache().get("%IVA", codiva, "R0");
prodotto.set(ANAMAG_CODIVA, aliq_iva.integer());
//sconto
const TString& str_sconto = ini.get(ANAMAG_SCONTO);
@ -376,7 +382,7 @@ bool TIni2Txt::find_part_key(TConfig& ini, const TString_array& ini_paragraphs,
return false;
}
void TIni2Txt::genera_sospeso_txt(TConfig& ini, TString_array& ini_paragraphs)
void TIni2Txt::genera_sospeso_var_txt(TConfig& ini, TString_array& ini_paragraphs)
{
TEsporta_sospesiVAR_recordset sospeso;
sospeso.new_rec("");
@ -407,10 +413,10 @@ void TIni2Txt::genera_sospeso_txt(TConfig& ini, TString_array& ini_paragraphs)
{
const int tipomov = ini.get_int(PART_TIPOMOV, *part_row);
const char tipocf = ini.get_char(PART_TIPOCF);
const TString8 codcf = ini.get(PART_SOTTOCONTO);
const TString8 str_codcf = ini.get(PART_SOTTOCONTO);
const bool part_chiusa = ini.get_bool(PART_CHIUSA);
//cerca le partite, derivanti da fatture, dei soli clienti che ha nella lista clienti
if (!part_chiusa && tipomov == 1 && tipocf == 'C' && clienti.is_key(codcf))
if (!part_chiusa && tipomov == 1 && tipocf == 'C' && clienti.is_key(str_codcf))
{
TToken_string key;
get_part_key(ini, key);
@ -436,7 +442,9 @@ void TIni2Txt::genera_sospeso_txt(TConfig& ini, TString_array& ini_paragraphs)
real residuo = imp_rata - imp_pag;
//riempie il record da esportare
sospeso.set("CodiceTerminale", 0L);
const long codcf = ini.get_long(PART_SOTTOCONTO);
const TString& codage = find_codag(codcf);
sospeso.set("CodiceTerminale", codage);
sospeso.set("Segno", segno);
sospeso.set("CodiceCliente", codcf);
sospeso.set("NumeroFattura", numfatt);
@ -484,19 +492,19 @@ void TIni2Txt::main_loop()
//clienti
if (ini_paragraphs.find("20") >= 0)
genera_cliente_txt(input_ini_file);
genera_cliente_var_txt(input_ini_file);
//sospesi
if (ini_paragraphs.find("28,1,1") >= 0)
genera_sospeso_txt(input_ini_file, ini_paragraphs);
genera_sospeso_var_txt(input_ini_file, ini_paragraphs);
//listino
if (ini_paragraphs.find("52") >= 0)
genera_riga_listino_txt(input_ini_file);
genera_riga_listino_var_txt(input_ini_file);
//prodotti
if (ini_paragraphs.find("47") >= 0)
genera_prodotto_txt(input_ini_file);
genera_prodotto_var_txt(input_ini_file);
}
}

38
ha/ha1200.cpp
View File

@ -99,9 +99,9 @@ void TFile2Txt::genera_agenti_txt()
//riga dell'AS400 recset da riempire
agenti.new_rec("");
agenti.set("CodiceTerminale", 0L);
TString8 codage = archivio_agenti.get(AGE_CODAGE).as_string();
codage = codage.right(3);
agenti.set("CodiceTerminale", codage);
agenti.set(AGE_CODAGE, codage);
agenti.set(AGE_RAGSOC, archivio_agenti.get(AGE_RAGSOC));
}
@ -135,7 +135,7 @@ void TFile2Txt::genera_clienti_txt()
clienti.new_rec("");
//il codice terminale è il codagente legato al cliente
TString8 codage = archivio_clienti.get(CFV_CODAG).as_string();
TString8 codage = archivio_clienti.get("CFVEN.CODAG").as_string();
codage = codage.right(3);
clienti.set("CodiceTerminale", codage);
@ -145,6 +145,8 @@ void TFile2Txt::genera_clienti_txt()
TString80 indcf = archivio_clienti.get(CLI_INDCF).as_string();
indcf << " " << archivio_clienti.get(CLI_CIVCF).as_string();
clienti.set(CLI_INDCF, indcf);
const TString80 localitacf = archivio_clienti.get(CLI_LOCCF).as_string();
clienti.set("Localita", localitacf);
const TString& statocf = archivio_clienti.get(CLI_STATOCF).as_string();
if (statocf.blank())
@ -154,8 +156,11 @@ void TFile2Txt::genera_clienti_txt()
key.add(statocf);
key.add(comcf);
const TRectype& rec_comuni = cache().get(LF_COMUNI, key);
TString80 dencom = rec_comuni.get(COM_DENCOM);
clienti.set("Localita", dencom);
if (localitacf.blank())
{
TString80 dencom = rec_comuni.get(COM_DENCOM);
clienti.set("Localita", dencom);
}
const TString& provcf = rec_comuni.get(COM_PROVCOM);
clienti.set("Provincia", provcf);
}
@ -165,7 +170,7 @@ void TFile2Txt::genera_clienti_txt()
clienti.set(CLI_PAIV, archivio_clienti.get(CLI_PAIV));
TString4 codpag = archivio_clienti.get(CLI_CODPAG).as_string();
clienti.set(CLI_CODPAG, codpag);
clienti.set(CLI_CODPAG, codpag.right(2));
TString query;
query << "USE CONDV";
@ -180,22 +185,27 @@ void TFile2Txt::genera_clienti_txt()
clienti.set("CodiceListino", cod_contr);
}
//casotto sulla decodifica articoli
//"FlDecodArt"
//"DecodeCodCli"
TString16 ntel = archivio_clienti.get(CLI_PTEL).as_string();
ntel << archivio_clienti.get(CLI_TEL).as_string();
clienti.set(CLI_TEL, ntel);
clienti.set(CLI_CODCFFATT, archivio_clienti.get(CLI_CODCFFATT));
clienti.set("TipoDoc", "F");
real fido = archivio_clienti.get(CLI_FIDO).as_real();
fido *= CENTO;
fido.round();
clienti.set(CLI_FIDO, fido);
const bool sospeso = archivio_clienti.get(CLI_SOSPESO).as_bool();
/*const bool sospeso = archivio_clienti.get(CLI_SOSPESO).as_bool();
TString4 s;
if (sospeso)
s='S';
clienti.set("NoConsegna", TVariant(s));
clienti.set("NoConsegna", TVariant(s));*/
clienti.set(CLI_COFI, archivio_clienti.get(CLI_COFI));
@ -230,8 +240,6 @@ void TFile2Txt::genera_sospesi_txt()
sospesi.new_rec("");
sospesi.set("CodiceTerminale", 0L);
//per riempire i campi è necessario un po' di casino sulla partita in esame
const TRectype& rec_part = archivio_part.cursor()->curr();
TPartita partita(rec_part);
@ -246,7 +254,9 @@ void TFile2Txt::genera_sospesi_txt()
const TDate datascad = scad.get_date(SCAD_DATASCAD);
//e vai che riempiamo i campi
const TString& codcf = rec_part.get(PART_SOTTOCONTO);
const long codcf = rec_part.get_long(PART_SOTTOCONTO); //riprendiamo il codcf come long
const TString& codage = find_codag(codcf);
sospesi.set("CodiceTerminale", codage);
sospesi.set("CodiceCliente", codcf);
const TString& ndoc = rec_part.get(PART_NUMDOC);
sospesi.set("NumeroFattura", ndoc);
@ -385,6 +395,7 @@ void TFile2Txt::genera_prodotti_txt()
TString query;
query << "USE ANAMAG";
query << "\nSELECT USER1=\"X\"";
query << "\nJOIN UMART INTO CODART=CODART NRIGA=1";
TISAM_recordset archivio_anamag(query);
@ -403,7 +414,12 @@ void TFile2Txt::genera_prodotti_txt()
prezzo *= 1000;
prezzo.round();
prodotti.set(UMART_PREZZO, prezzo.integer());
prodotti.set(ANAMAG_CODIVA, archivio_anamag.get(ANAMAG_CODIVA));
const TString& codiva = archivio_anamag.get(ANAMAG_CODIVA).as_string();
//esportiamo un'aliquota, non un codice iva!
const real aliq_iva = cache().get("%IVA", codiva, "R0");
prodotti.set(ANAMAG_CODIVA, aliq_iva.integer());
prodotti.set(UMART_UM, archivio_anamag.get("UMART.UM"));
const TString& str_sconto = archivio_anamag.get(ANAMAG_SCONTO).as_string();
prodotti.set(ANAMAG_SCONTO, find_sconto(str_sconto));

41
ha/halib.cpp
View File

@ -45,6 +45,12 @@ TContratto_premi::TContratto_premi(const TRectype& rec_doc)
/////////////////////////////////////////////////////////////
// Recordset specifici per i dati da trasferire OUTPUT
/////////////////////////////////////////////////////////////
//questo serve solo per l'ultima riga con il return (\r\n)
void THardy_recordset::add_eol_field()
{
create_field("ACapo", -1, 2, _alfafld, false, TVariant("\r\n"));
}
//questo è il metodo magico che vale per tutti
void THardy_recordset::add_field(const char* name, const char* tipo, int pos, int len)
{
@ -103,7 +109,7 @@ TEsporta_clienti_recordset::TEsporta_clienti_recordset(int rec_length)
: THardy_recordset(rec_length)
{
add_field("CodiceTerminale", T_N, 1, 3); //x
add_field(CLI_CODCF, T_X, 4, 6); //x
add_field(CLI_CODCF, T_N, 4, 6); //x
add_field(CLI_RAGSOC, T_X, 10, 34); //x
add_field(CLI_INDCF, T_X, 44, 34); //x
add_field("Localita", T_X, 78, 20); //x
@ -125,7 +131,7 @@ TEsporta_clienti_recordset::TEsporta_clienti_recordset(int rec_length)
add_field("DecodeCodCli", T_X, 148, 6);
add_field(CLI_TEL, T_X, 154, 10); //x
add_field(CFV_ASSFIS, T_X, 164, 2); //x
add_field(CLI_CODCFFATT, T_X, 166, 6); //x
add_field(CLI_CODCFFATT, T_N, 166, 6); //x
add_field("TipoDoc", T_X, 172, 1);
add_field("NoConsegna", T_X, 173, 1); //x
add_field("ScontoA", T_2N, 174, 2);
@ -153,10 +159,11 @@ TEsporta_clienti_recordset::TEsporta_clienti_recordset(int rec_length)
add_field(CLI_COFI, T_X, 228, 16); //x
add_field("Giro4", T_N, 244, 6);
add_field("FlPrezzoLibero", T_N, 250, 1);
add_eol_field();
}
//..e variazioni clienti
TEsporta_clientiVAR_recordset::TEsporta_clientiVAR_recordset()
: TEsporta_clienti_recordset(251)
: TEsporta_clienti_recordset(253)
{
insert_field("Segno", T_X, 4, 1); //x
}
@ -168,7 +175,7 @@ TEsporta_sospesi_recordset::TEsporta_sospesi_recordset(int rec_length)
: THardy_recordset(rec_length)
{
add_field("CodiceTerminale", T_N, 1, 3); //x
add_field("CodiceCliente", T_X, 4, 6); //x
add_field("CodiceCliente", T_N, 4, 6); //x
add_field("NumeroFattura", T_X, 10, 12); //x
add_field("DataFattura", T_X, 22, 6); //x
add_field("ImportoResiduo", T_Nv2N, 28, 9); //x
@ -176,10 +183,11 @@ TEsporta_sospesi_recordset::TEsporta_sospesi_recordset(int rec_length)
add_field("DataScadenza", T_X, 46, 6); //x
add_field("Partita", T_X, 52, 15); //x
add_field("TipoDocumento", T_X, 67, 1); //x
add_eol_field();
}
//..e variazioni sospesi
TEsporta_sospesiVAR_recordset::TEsporta_sospesiVAR_recordset()
: TEsporta_sospesi_recordset(68)
: TEsporta_sospesi_recordset(70)
{
insert_field("Segno", T_X, 4, 1); //x
}
@ -198,10 +206,11 @@ TEsporta_listini_recordset::TEsporta_listini_recordset(int rec_length)
add_field("Sconto2", T_2Nv2N,23, 4);
add_field("Sconto3", T_2Nv2N,27, 4);
add_field("CasaMandante", T_NS, 31, 6);
add_eol_field();
}
//..e variazioni listini
TEsporta_listiniVAR_recordset::TEsporta_listiniVAR_recordset()
: TEsporta_listini_recordset(37)
: TEsporta_listini_recordset(39)
{
insert_field("Segno", T_X, 4, 1); //x
}
@ -212,7 +221,7 @@ TEsporta_contratti_recordset::TEsporta_contratti_recordset(int rec_length)
: THardy_recordset(rec_length)
{
add_field("CodiceTerminale", T_N, 1, 3); //x
add_field(CONDV_CODCF, T_X, 4, 6); //x
add_field(CONDV_CODCF, T_N, 4, 6); //x
add_field(RCONDV_CODRIGA, T_X, 10, 5); //x
add_field(RCONDV_PREZZO, T_Nv3N, 15, 7); //x
add_field(RCONDV_SCONTO, T_2Nv2N,22, 4); //x
@ -220,6 +229,7 @@ TEsporta_contratti_recordset::TEsporta_contratti_recordset(int rec_length)
add_field("Sconto3", T_2Nv2N,30, 4);
add_field(CONDV_VALIN, T_X, 34, 8); //x
add_field(CONDV_VALFIN, T_X, 42, 8); //x
add_eol_field();
}
//Offerte
@ -231,6 +241,7 @@ TEsporta_offerte_recordset::TEsporta_offerte_recordset(int rec_length)
add_field(CONDV_COD, T_X, 4, 3);
add_field(CONDV_VALIN, T_X, 7, 8);
add_field(CONDV_VALFIN, T_X, 15, 8);
add_eol_field();
}
//Prodotti
@ -248,10 +259,11 @@ TEsporta_prodotti_recordset::TEsporta_prodotti_recordset(int rec_length)
add_field("ScontoArt2", T_2Nv2N,52, 4);
add_field("Fascia", T_X, 56, 1);
add_field("PrezzoMinimo", T_Nv3N, 57, 7);
add_eol_field();
}
//..e variazioni prodottii
//..e variazioni prodotti
TEsporta_prodottiVAR_recordset::TEsporta_prodottiVAR_recordset()
: TEsporta_prodotti_recordset(64)
: TEsporta_prodotti_recordset(66)
{
insert_field("Segno", T_X, 1, 1); //x
}
@ -272,6 +284,7 @@ TEsporta_agenti_recordset::TEsporta_agenti_recordset(int rec_length)
add_field(AGE_RAGSOC, T_X, 36, 30); //x
add_field("nORD", T_N, 66, 5);
add_field("nSAGIT", T_N, 71, 5);
add_eol_field();
}
@ -282,6 +295,7 @@ TEsporta_linee_recordset::TEsporta_linee_recordset(int rec_length)
{
add_field("Fascia", T_X, 1, 1);
add_field("Descrizione", T_X, 2, 50);
add_eol_field();
}
//Rdoc (Carico) è una riga di un documento
@ -293,6 +307,7 @@ TEsporta_carico_recordset::TEsporta_carico_recordset(int rec_length)
add_field(RDOC_CODART, T_X, 4, 5); //x
add_field(RDOC_QTA, T_Nv2N,9, 7); //x
add_field(RDOC_LIVELLO, T_X, 16, 10);
add_eol_field();
}
@ -302,8 +317,9 @@ TEsporta_decodart_recordset::TEsporta_decodart_recordset(int rec_length)
: THardy_recordset(rec_length)
{
add_field(CODCORR_CODART, T_X, 1, 5); //x
add_field(CODCORR_CODCF, T_NS, 6, 6); //x
add_field(CODCORR_CODCF, T_N, 6, 6); //x
add_field(CODCORR_CODARTALT, T_X, 12, 6); //x
add_eol_field();
}
@ -314,6 +330,7 @@ TEsporta_barcode_recordset::TEsporta_barcode_recordset(int rec_length)
{
add_field(CODCORR_CODARTALT, T_X, 1, 20); //x
add_field(CODCORR_CODART, T_X, 21, 5); //x
add_eol_field();
}
@ -323,12 +340,13 @@ TEsporta_attrezzature_recordset::TEsporta_attrezzature_recordset(int rec_length)
: THardy_recordset(rec_length)
{
add_field("CodiceTerminale", T_N, 1, 3);
add_field("CodiceCliente", T_X, 4, 6);
add_field("CodiceCliente", T_N, 4, 6);
add_field("CodiceArticolo", T_X, 10, 5);
add_field("MatricolaAttrezz", T_X, 15, 12);
add_field("DescrAttrezz", T_X, 27, 30);
add_field("DataConsegna", T_X, 57, 6);
add_field("Quantita", T_N, 63, 7);
add_eol_field();
}
@ -340,6 +358,7 @@ TEsporta_pagamenti_recordset::TEsporta_pagamenti_recordset(int rec_length)
add_field("CodicePagamento", T_X, 1, 2); //x
add_field("DescrPagamento", T_X, 3, 20); //x
add_field("GiorniScadenza", T_N, 23, 3); //x
add_eol_field();
}

27
ha/halib.h
View File

@ -68,6 +68,7 @@ protected:
//esportazione
void add_field(const char* name, const char* tipo, int pos, int len);
void insert_field(const char* name, const char* tipo, int pos, int len);
void add_eol_field();
//importazione
void add_trc_field(const char* tr, const char* name, const char* tipo, int pos, int len);
@ -81,7 +82,7 @@ public:
class TEsporta_agenti_recordset : public THardy_recordset
{
public:
TEsporta_agenti_recordset(int rec_length = 75);
TEsporta_agenti_recordset(int rec_length = 77);
};
@ -90,7 +91,7 @@ public:
class TEsporta_clienti_recordset : public THardy_recordset
{
public:
TEsporta_clienti_recordset(int rec_length = 250);
TEsporta_clienti_recordset(int rec_length = 252);
};
//..e variazioni clienti!
class TEsporta_clientiVAR_recordset : public TEsporta_clienti_recordset
@ -105,7 +106,7 @@ public:
class TEsporta_sospesi_recordset : public THardy_recordset
{
public:
TEsporta_sospesi_recordset(int rec_length = 67);
TEsporta_sospesi_recordset(int rec_length = 69);
};
//..e variazioni sospesi!
class TEsporta_sospesiVAR_recordset : public TEsporta_sospesi_recordset
@ -119,7 +120,7 @@ public:
class TEsporta_listini_recordset : public THardy_recordset
{
public:
TEsporta_listini_recordset(int rec_length = 36);
TEsporta_listini_recordset(int rec_length = 38);
};
//..e variazioni listini
class TEsporta_listiniVAR_recordset : public TEsporta_listini_recordset
@ -133,7 +134,7 @@ public:
class TEsporta_contratti_recordset : public THardy_recordset
{
public:
TEsporta_contratti_recordset(int rec_length = 49);
TEsporta_contratti_recordset(int rec_length = 51);
};
//Offerte (Promo) (condv + rcondv)
@ -141,7 +142,7 @@ public:
class TEsporta_offerte_recordset : public THardy_recordset
{
public:
TEsporta_offerte_recordset(int rec_length = 22);
TEsporta_offerte_recordset(int rec_length = 24);
};
//Prodotti (anamag + umart)
@ -149,7 +150,7 @@ public:
class TEsporta_prodotti_recordset : public THardy_recordset
{
public:
TEsporta_prodotti_recordset(int rec_length = 63);
TEsporta_prodotti_recordset(int rec_length = 65);
};
//..e variazioni prodotti
class TEsporta_prodottiVAR_recordset : public TEsporta_prodotti_recordset
@ -164,7 +165,7 @@ public:
class TEsporta_linee_recordset : public THardy_recordset
{
public:
TEsporta_linee_recordset(int rec_length = 51);
TEsporta_linee_recordset(int rec_length = 53);
};
@ -173,7 +174,7 @@ public:
class TEsporta_carico_recordset : public THardy_recordset
{
public:
TEsporta_carico_recordset(int rec_length = 25);
TEsporta_carico_recordset(int rec_length = 27);
};
@ -182,7 +183,7 @@ public:
class TEsporta_decodart_recordset : public THardy_recordset
{
public:
TEsporta_decodart_recordset(int rec_length = 17);
TEsporta_decodart_recordset(int rec_length = 19);
};
//Barcode ()
@ -190,7 +191,7 @@ public:
class TEsporta_barcode_recordset : public THardy_recordset
{
public:
TEsporta_barcode_recordset(int rec_length = 25);
TEsporta_barcode_recordset(int rec_length = 27);
};
//Attrezzature ()
@ -198,7 +199,7 @@ public:
class TEsporta_attrezzature_recordset : public THardy_recordset
{
public:
TEsporta_attrezzature_recordset(int rec_length = 69);
TEsporta_attrezzature_recordset(int rec_length = 71);
};
//Pagamenti ()
@ -206,7 +207,7 @@ public:
class TEsporta_pagamenti_recordset : public THardy_recordset
{
public:
TEsporta_pagamenti_recordset(int rec_length = 25);
TEsporta_pagamenti_recordset(int rec_length = 27);
};