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

Patch level :10.0

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


git-svn-id: svn://10.65.10.50/branches/R_10_00@20744 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2010-08-03 13:31:10 +00:00
parent a4fe427422
commit 9237436c3b
4 changed files with 5 additions and 63 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

58
ca/ca3883.cpp
View File

@ -1043,64 +1043,6 @@ void TPrint_saldana_recordset::parse_rmovana(TAssoc_array* cms, const TDate& dat
}
int TPrint_saldana_recordset::numerazioni_documenti(TString_array& num_doc, TString_array& tip_doc, const int tipo) const
{
//cominciamo con i tipi
TISAM_recordset tipi_recset("USE %TIP\nSELECT STR(I1=#TIPO)");
tipi_recset.set_var("#TIPO", TVariant(long(tipo)));
for (bool ok = tipi_recset.move_first(); ok; ok = tipi_recset.move_next()) //giro sui vari tipi ordine
{
const TString4 tipo = tipi_recset.get("CODTAB").as_string();
tip_doc.add(tipo);
}
//e adesso cerca le numerazioni che contengono tipi ordine
TISAM_recordset num_recset("USE %NUM");
for (bool ok = num_recset.move_first(); ok; ok = num_recset.move_next()) //giro sui vari tipi numerazione
{
const TString4 codtab = num_recset.get("CODTAB").as_string();
const TCodice_numerazione numerazione(codtab);
for (int t = numerazione.ntipi_doc() - 1; t >= 0; t--)
{
const TString& tipo_doc = numerazione.tipo_doc(t);
if (tip_doc.find(tipo_doc) >= 0)
{
if (num_doc.find(codtab) < 0) // Evito aggiunta di doppioni
num_doc.add(codtab);
break;
}
} //for (int t = codnum..
} //for (bool ok = num_recset...
return num_doc.items();
}
int TPrint_saldana_recordset::numerazioni_ordini(TString_array& num_ordini, TString_array& tip_ordini) const
{
//i documenti che vanno presi in cosiderazione sono quelli che generano un IMPEGNATO secondo le auree regole del..
//..nostro invincibile Adolf!
num_ordini.destroy();
tip_ordini.destroy();
numerazioni_documenti(num_ordini, tip_ordini, 3);
return num_ordini.items();
}
int TPrint_saldana_recordset::numerazioni_fatture(TString_array& num_fatture, TString_array& tip_fatture) const
{
//i documenti che vanno presi in cosiderazione sono quelli non ancora contabilizzati di tipo 0=Altro 2=Fattura
num_fatture.destroy();
tip_fatture.destroy();
numerazioni_documenti(num_fatture, tip_fatture, 0);
numerazioni_documenti(num_fatture, tip_fatture, 2);
return num_fatture.items();
}
//aggiorna l'arrayone cms con le righedoc non ancora contabilizzate
void TPrint_saldana_recordset::parse_rdoc_ordini(TAssoc_array* cms, const TDate& datainiesc, const TDate& datafinesc)
{

3
ca/ca3883.h
View File

@ -117,9 +117,6 @@ protected:
const TDate calcola_min_datacomp(const TDate& datainiesc, const TDate& datafinesc) const;
int ricava_sezione_di_stampa(const TRectype& rec_commesse, const TDate& datainiesc, const TDate& datafinesc) const;
void ricava_chiave_cdc_fase(const TString& codcms, const TString& fase, const TString& cdc, TString& chiave) const;
int numerazioni_documenti(TString_array& num_doc, TString_array& tip_doc, const int tipo) const;
int numerazioni_ordini(TString_array& num_ordini, TString_array& tip_ordini) const;
int numerazioni_fatture(TString_array& num_fatture, TString_array& tip_fatture) const;
void create_lines_to_print();

4
ca/calib01.cpp
View File

@ -2574,4 +2574,6 @@ long ca_durata_commessa(const TRectype& rec_commesse, TDate& dataini, TDate& dat
} //if (!dataini.ok() || !datafine.ok())
return datafine - dataini + 1;
}
}

3
ca/calib01.h
View File

@ -233,9 +233,10 @@ void ca_copia_campo(const TRectype& src, const char* campo_src, TRectype& dst, c
//metodi per ricavare informazioni sulla configurazione (usati per ora nel rendiconto)
//metodo per ricavare la stringa dei codici dai campi dello sheet
//metodo per ricavare la stringa dei codici dai campi dello sheet (decisivissima !!!)
bool ca_extract_sheet_field(const TSheet_field& sheet, const int row, const int logicnum, TString& codice);
//metodo per ricavare la durata di una commessa
long ca_durata_commessa(const TRectype& rec_commesse, TDate& dataini, TDate& datafine);
#endif