git-svn-id: svn://10.65.10.50/branches/R_10_00@22929 c028cbd2-c16b-5b4b-a496-9718f37d4682
60 lines
1.3 KiB
C++
60 lines
1.3 KiB
C++
#include <applicat.h>
|
|
#include <doc.h>
|
|
|
|
#include "pe1500.h"
|
|
|
|
///////////////////////////////////////////////////////////
|
|
// TFabbisognazione_app
|
|
///////////////////////////////////////////////////////////
|
|
|
|
class TFabbisognazione_app : public TSkeleton_application
|
|
{
|
|
protected:
|
|
virtual void main_loop();
|
|
};
|
|
|
|
void TFabbisognazione_app::main_loop()
|
|
{
|
|
TFilename ininame;
|
|
if (argc() >= 2)
|
|
{
|
|
const TFixed_string arg = argv(2);
|
|
ininame = arg.starts_with("-i", true) ? arg.mid(2) : arg;
|
|
}
|
|
|
|
TConfig ini(ininame, "Transaction");
|
|
const TString8 codelab = ini.get("Action");
|
|
|
|
ini.set_paragraph("33");
|
|
TRectype doc(LF_DOC);
|
|
doc.put(DOC_PROVV, ini.get(DOC_PROVV));
|
|
doc.put(DOC_ANNO, ini.get(DOC_ANNO));
|
|
doc.put(DOC_CODNUM, ini.get(DOC_CODNUM));
|
|
doc.put(DOC_NDOC, ini.get(DOC_NDOC));
|
|
|
|
if (pe_genera_documento(doc, codelab, 'F'))
|
|
{
|
|
ini.set_paragraph("Transaction");
|
|
ini.set("Result", "OK");
|
|
ini.set("Error", "0");
|
|
|
|
ini.set_paragraph("33");
|
|
for (int i = 0; i < doc.items(); i++)
|
|
{
|
|
const char* fld = doc.fieldname(i);
|
|
const TString& val = doc.get(fld);
|
|
if (val.full())
|
|
ini.set(fld, val);
|
|
}
|
|
}
|
|
}
|
|
|
|
int pe1600(int argc, char* argv[])
|
|
{
|
|
TFabbisognazione_app a;
|
|
a.run(argc, argv, TR("Generazione fabbisogni"));
|
|
return 0;
|
|
}
|
|
|
|
|