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

Patch level :2.2 64

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :accoppato ca1600x.cpp


git-svn-id: svn://10.65.10.50/trunk@12885 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2005-04-01 09:43:59 +00:00
parent ee08ee769f
commit 618902bf24
1 changed files with 0 additions and 55 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
ca/ca1600x.cpp
View File

@ -1,55 +0,0 @@
#include <applicat.h>
#include <reprint.h>
#include "ca1.h"
#include "ca1500a.h"
#include "calib02.h"
class TPrint_cdc : public TSkeleton_application
{
public:
virtual void main_loop();
};
void TPrint_cdc::main_loop()
{
TFilename path;
TMask m("ca1500a");;
while (m.run() == K_ENTER)
{
TReport_book book;
TAnal_report rep;
path = m.get(F_REPORT);
if (path.empty())
path = "ca1500";
path.ext("rep");
path.custom_path();
if (rep.load(path))
{
TRecordset * r = rep.recordset();
if (r != NULL)
{
TVariant var;
var = m.get(F_DACDC);
r->set_var("#DACDC", var);
var = m.get(F_ACDC);
r->set_var("#ACDC", var);
}
}
book.add(rep);
book.print_or_preview();
}
}
int ca1500(int argc, char* argv[])
{
TPrint_cdc a;
a.run(argc, argv, TR("Stampa centri di costo"));
return 0;
}