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

Patch level : 12.0 1100

Browse Source 
Files correlati     : f151.dir f151.trr ca1.exe ca2.exe ca3.exe ca3100.uml
                      ca3100a.rep ca3100b.rep ca3200.uml ca3200a.rep
                      ca3200b.rep ca3300.uml ca3300a.rep ca3300b.rep
                      ca3300c.rep ca3300d.rep ca3600.uml ca3600a.rep
                      ca3700.uml ca3700a.rep ca3700b.rep ca3800.uml
                      ca3800a.rep ca3800as.rep ca3800b.rep ca3800bs.rep
                      ca3800c.rep ca3800cs.rep ca3883.cpp ca3900.uml
                      ca3900a.rep
Commento :

Aggiunta contabilità separata alle stampe di analitica.
Aggiunto meccanismo per lanciare le stampe in batch.
Sintassi: ca3 -7 -b <nome del file che contiene i valori dell maschera> <tipo di output <P>rint|<E>xport|E<X>cel|PD<F>|<T>esto|<D>Base|<V>isualizza> <nome del file di output

Esempio: ca3 -7 -b select.sav X c:\out\rend

esporta il rendiconto di commessa usando i parametri salvati in select.sav nel file c:\out\rend.xls
This commit is contained in:
Alessandro Bonazzi 2021-12-13 23:12:56 +01:00
parent fadf0f5faa
commit 3e90ff3499
2 changed files with 0 additions and 69 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

67
src/include/repapp.cpp
View File

@ -22,73 +22,6 @@ bool TReport_application::destroy()
return TSkeleton_application::destroy();
}
void TReport_application::ini2mask(TConfig& ini, TMask& m, bool query)
{
const TString16 defpar = ini.get_paragraph();
TString tmp;
for (int f = m.fields()-1; f >= 0; f--)
{
TMask_field& campo = m.fld(f);
const TFieldref* fref = campo.field();
if (fref)
{
if (!query || campo.in_key(0))
{
const TString& str = fref->read(ini, defpar);
if (str.not_empty())
{
campo.set(str);
if (query)
{
tmp.format("%d=%s", campo.dlg(), (const char *) str);
}
}
}
}
}
ini.set_paragraph(defpar);
}
void TReport_application::mask2ini(const TMask& m, TConfig& ini)
{
ini.set("Firm", get_firm(), "Transaction");
ini.set("User", user());
ini.set("HostName", get_hostname());
int year, release, tag, patch;
if (get_version_info(year, release, tag, patch))
{
TString80 ver;
ver.format("%d %d.%d-%d", year, release, tag, patch);
ini.set("Version", ver);
}
for (int f = 0; f < m.fields(); f++)
{
TMask_field& campo = m.fld(f);
if (campo.shown())
{
const TFieldref* fr = campo.field();
if (fr)
{
if (campo.empty())
fr->write(ini, "Main", " ");
else
{
if (campo.class_id() == CLASS_DATE_FIELD && campo.right_justified())
{
const TDate d(campo.get());
fr->write(ini, "Main", d.string(ANSI));
}
else
fr->write(ini, "Main", campo.get());
}
}
}
}
ini.set_paragraph("Main"); // Reimposta paragrafo standard
}
// @cmember Esegue la stampa
void TReport_application::execute_print(TReport_book & book, TAutomask & mask, TReport & rep, export_type type)
{

2
src/include/repapp.h
View File

@ -49,8 +49,6 @@ protected: // TApplication
// @cmember Ritorna il report
virtual TReport & get_report(const TAutomask & m) pure;
void ini2mask(TConfig& ini, TMask& m, bool query);
void mask2ini(const TMask& m, TConfig& ini);
virtual void execute_print(TReport_book & book, TAutomask & mask, TReport & rep, export_type type = _export_printer);
public: