#include #include #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; }