Modifiche dalla versione Linux sulla 2.1
Verificare ve6600.cpp git-svn-id: svn://10.65.10.50/trunk@12030 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
b9f2694180
commit
05a5f59345
@ -1,4 +1,6 @@
|
||||
#ifdef WIN32 //qui verificare
|
||||
#include <direct.h>
|
||||
#endif
|
||||
|
||||
#include <applicat.h>
|
||||
#include <archives.h>
|
||||
|
@ -68,7 +68,7 @@ long TCopydoc_mask::get_first_ndoc() const
|
||||
TLocalisamfile doc(LF_DOC);
|
||||
TRectype& curr = doc.curr();
|
||||
|
||||
const TDate dd = get(F_TO_DATA);
|
||||
const TDate dd = get_date(F_TO_DATA);
|
||||
const int anno = dd.year();
|
||||
const char provv = get(F_TO_PROVV)[0];
|
||||
const TString& codnum = get(F_TO_NUM);
|
||||
@ -238,7 +238,7 @@ void TCopydoc_app::main_loop()
|
||||
tot, (tot == 1L) ? 'o' : 'i'))
|
||||
{
|
||||
const TString& provv = m.get(F_TO_PROVV);
|
||||
const TDate data = m.get(F_TO_DATA);
|
||||
const TDate data = m.get_date(F_TO_DATA);
|
||||
TString16 anno; anno << data.year();
|
||||
const TString& codnum = m.get(F_TO_NUM);
|
||||
long ndoc = m.get_first_ndoc();
|
||||
@ -300,4 +300,4 @@ int ve5300(int argc, char* argv[])
|
||||
TCopydoc_app a;
|
||||
a.run(argc, argv, "Copia documenti");
|
||||
return 0;
|
||||
}
|
||||
}
|
||||
|
@ -282,7 +282,6 @@ void TContabilizzazione_app::contabilize()
|
||||
const long items = _num_sheet->items();
|
||||
int year_from = _data_ini.year();
|
||||
int year_to = _data_fine.year();
|
||||
bool ok = TRUE;
|
||||
TString16 codnum;
|
||||
TString msg,filt_expr;
|
||||
TToken_string nums;
|
||||
|
@ -79,7 +79,7 @@ void TFatturazione_bolle_app::process_by_cli(const TMask& m)
|
||||
{
|
||||
TIndwin iw(0, "Inizializzazione ...\n ", TRUE, FALSE, 60);
|
||||
|
||||
const TDate data_elab = m.get(F_DATA_ELAB);
|
||||
const TDate data_elab = m.get_date(F_DATA_ELAB);
|
||||
const int anno = data_elab.year();
|
||||
|
||||
const long dc = m.get_long(F_CODICE_CLIFO_DA);
|
||||
@ -89,9 +89,9 @@ void TFatturazione_bolle_app::process_by_cli(const TMask& m)
|
||||
const TString16 dz(m.get(F_CODICE_ZONA_DA));
|
||||
const TString16 az(m.get(F_CODICE_ZONA_A));
|
||||
|
||||
const TDate dd = m.get(F_DATA_DOCUMENTO_DA);
|
||||
TString st_da = m.get(F_DATA_DOCUMENTO_A);
|
||||
const TDate ad = st_da.not_empty() ? (const char*)st_da : data_elab;
|
||||
const TDate dd = m.get_date(F_DATA_DOCUMENTO_DA);
|
||||
TString st_da = m.get(F_DATA_DOCUMENTO_A); // qui verificare
|
||||
const TDate ad = st_da.not_empty() ? (TDate)(const char*)st_da : data_elab;
|
||||
const TString& codnum = m.get(F_CODICE_NUMERAZIONE);
|
||||
const long dn = m.get_long(F_NUMERO_DOCUMENTO_DA);
|
||||
const long an = m.get_long(F_NUMERO_DOCUMENTO_A);
|
||||
@ -130,7 +130,7 @@ void TFatturazione_bolle_app::process_by_doc(const TMask& m)
|
||||
{
|
||||
TIndwin iw(0, "Inizializzazione ...\n ", TRUE, FALSE, 60);
|
||||
|
||||
const TDate data_elab = m.get(F_DATA_ELAB);
|
||||
const TDate data_elab = m.get_date(F_DATA_ELAB);
|
||||
const int anno = data_elab.year();
|
||||
long dc = m.get_long(F_CODICE_CLIFO_DA);
|
||||
long ac = m.get_long(F_CODICE_CLIFO_A);
|
||||
@ -140,8 +140,8 @@ void TFatturazione_bolle_app::process_by_doc(const TMask& m)
|
||||
const TString8 dz(m.get(F_CODICE_ZONA_DA));
|
||||
const TString8 az(m.get(F_CODICE_ZONA_A));
|
||||
|
||||
const TDate dd = m.get(F_DATA_DOCUMENTO_DA);
|
||||
TDate ad = m.get(F_DATA_DOCUMENTO_A);
|
||||
const TDate dd = m.get_date(F_DATA_DOCUMENTO_DA);
|
||||
TDate ad = m.get_date(F_DATA_DOCUMENTO_A);
|
||||
if (!ad.ok()) ad = data_elab;
|
||||
|
||||
const TString& codnum = m.get(F_CODICE_NUMERAZIONE);
|
||||
|
@ -488,10 +488,10 @@ void TGenerazioneEffetti_app::generate()
|
||||
if (sort_by_date)
|
||||
{
|
||||
cursor_key = 3;
|
||||
const TDate dataini = _msk->get(F_DATA_INI);
|
||||
const TDate dataini = _msk->get_date(F_DATA_INI);
|
||||
da.put(DOC_ANNO,dataini.year());
|
||||
da.put(DOC_DATADOC,dataini);
|
||||
const TDate datafin = _msk->get(F_DATA_FIN);
|
||||
const TDate datafin = _msk->get_date(F_DATA_FIN);
|
||||
a.put(DOC_ANNO,datafin.year());
|
||||
a.put(DOC_DATADOC,datafin);
|
||||
filt_expr << DOC_CODNUM << "=\"" << codnum << "\"";
|
||||
@ -594,4 +594,4 @@ int ve6300 (int argc, char **argv)
|
||||
TGenerazioneEffetti_app a;
|
||||
a.run(argc,argv,"Generazione effetti");
|
||||
return TRUE;
|
||||
}
|
||||
}
|
||||
|
@ -3,7 +3,7 @@
|
||||
#include <config.h>
|
||||
#include <defmask.h>
|
||||
#include <execp.h>
|
||||
#include <fstream.h>
|
||||
#include <incstr.h>
|
||||
#include <golem.h>
|
||||
#include <prefix.h>
|
||||
|
||||
@ -296,7 +296,7 @@ bool TScontrino_mask::send_scr_data()
|
||||
|
||||
const int pos_code = sheet.cid2index(F_CODART);
|
||||
const int pos_prezzo = sheet.cid2index(F_PREZZO);
|
||||
const int pos_rep = sheet.cid2index(F_REPARTO);
|
||||
// const int pos_rep = sheet.cid2index(F_REPARTO);
|
||||
const int pos_qta = sheet.cid2index(F_QTA);
|
||||
|
||||
TString codart, grmerc, descr;
|
||||
|
@ -212,7 +212,7 @@ void TPenna_app::main_loop() //definizione della me
|
||||
//istanzio dalla classe real
|
||||
para.format("%d", LF_DOC);
|
||||
|
||||
TDate datadoc = ini.get(DOC_DATADOC, para); //dal paragrafo testata documento prende il valore della data del
|
||||
TDate datadoc(ini.get(DOC_DATADOC, para)); //dal paragrafo testata documento prende il valore della data del
|
||||
//documento
|
||||
TEsercizi_contabili esc; //crea un oggetto esc di tipo TEsercizi_contabili
|
||||
TString16 annoes;
|
||||
|
@ -80,7 +80,7 @@ void TIndustriosa_app::get_field(const TDocumento& doc, const TRectype& mov, con
|
||||
if (field[0] == '_')
|
||||
{
|
||||
val.cut(0);
|
||||
if (stricmp(field, "_CANTIERE") == 0)
|
||||
if (xvt_str_compare_ignoring_case(field, "_CANTIERE") == 0)
|
||||
{
|
||||
TString cms, fas;
|
||||
cms = rec.get(RDOC_CODCMS);
|
||||
@ -95,17 +95,17 @@ void TIndustriosa_app::get_field(const TDocumento& doc, const TRectype& mov, con
|
||||
trim_and_cut(fas, _len_fase);
|
||||
val << cms << fas;
|
||||
} else
|
||||
if (stricmp(field, "_CONINDU") == 0)
|
||||
if (xvt_str_compare_ignoring_case(field, "_CONINDU") == 0)
|
||||
{
|
||||
conto_industriale((TRiga_documento&)rec, val);
|
||||
} else
|
||||
if (stricmp(field, "_IMPORTO") == 0)
|
||||
if (xvt_str_compare_ignoring_case(field, "_IMPORTO") == 0)
|
||||
{
|
||||
TCurrency_documento imp(((TRiga_documento&)rec).importo(TRUE, FALSE), doc);
|
||||
imp.change_to_firm_val();
|
||||
val = imp.get_num().stringa();
|
||||
} else
|
||||
if (stricmp(field, "_IMPORTOVAL") == 0)
|
||||
if (xvt_str_compare_ignoring_case(field, "_IMPORTOVAL") == 0)
|
||||
{
|
||||
if (doc.in_valuta())
|
||||
{
|
||||
@ -113,7 +113,7 @@ void TIndustriosa_app::get_field(const TDocumento& doc, const TRectype& mov, con
|
||||
val = imp.get_num().stringa();
|
||||
}
|
||||
} else
|
||||
if (stricmp(field, "_IMPOSTADOC") == 0)
|
||||
if (xvt_str_compare_ignoring_case(field, "_IMPOSTADOC") == 0)
|
||||
{
|
||||
TString16 conto;
|
||||
real impval;
|
||||
@ -128,13 +128,13 @@ void TIndustriosa_app::get_field(const TDocumento& doc, const TRectype& mov, con
|
||||
imposta.change_to_firm_val();
|
||||
val = imposta.get_num().stringa();
|
||||
} else
|
||||
if (stricmp(field, "_SEZIONE") == 0)
|
||||
if (xvt_str_compare_ignoring_case(field, "_SEZIONE") == 0)
|
||||
{
|
||||
TCausale causale(mov.get(MOV_CODCAUS));
|
||||
const char str[2] = { causale.sezione_clifo(), '\0' };
|
||||
val = str;
|
||||
} else
|
||||
if (stricmp(field, "_TOTDOC") == 0)
|
||||
if (xvt_str_compare_ignoring_case(field, "_TOTDOC") == 0)
|
||||
{
|
||||
TString16 conto;
|
||||
real totval;
|
||||
@ -197,14 +197,16 @@ bool TIndustriosa_app::filerr(const char* name) const
|
||||
|
||||
bool TIndustriosa_app::get_mci_path(TFilename& shell) const
|
||||
{
|
||||
bool ok = FALSE;
|
||||
|
||||
#ifdef WIN32
|
||||
char winpath[_MAX_PATH];
|
||||
|
||||
::GetWindowsDirectory(winpath, sizeof(winpath));
|
||||
|
||||
shell = winpath;
|
||||
shell.add("mci4.ini");
|
||||
|
||||
bool ok = FALSE;
|
||||
|
||||
if (shell.exist())
|
||||
{
|
||||
TConfig mci4(shell, "Paths");
|
||||
@ -236,6 +238,7 @@ bool TIndustriosa_app::get_mci_path(TFilename& shell) const
|
||||
else
|
||||
filerr(shell);
|
||||
|
||||
#endif
|
||||
return ok;
|
||||
}
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user