campo-sirio/ve/ve6200.cpp
guy b9bf46a327 Continua lo strenuo sviluppo delle mistiche vendite.
git-svn-id: svn://10.65.10.50/trunk@3377 c028cbd2-c16b-5b4b-a496-9718f37d4682
1996-08-13 13:59:21 +00:00

68 lines
1.7 KiB
C++
Executable File

#include <applicat.h>
#include <mask.h>
#include <urldefid.h>
#include "velib01.h"
#include "ve6000.h"
class TFatturazione_bolle_app : public TApplication
{
protected: // TApplication
virtual bool create();
virtual bool menu(MENU_TAG mt);
public:
TFatturazione_bolle_app() { }
virtual ~TFatturazione_bolle_app() { }
};
bool TFatturazione_bolle_app::create()
{
dispatch_e_menu(MENU_ITEM(1));
return TRUE;
}
bool TFatturazione_bolle_app::menu(MENU_TAG)
{
TMask m("ve6000");
while (m.run() == K_ENTER)
{
const TDate data_elab = m.get(F_DATA_ELAB);
const int anno = data_elab.year();
const long dc = m.get_long(F_CODICE_CLIFO_DA);
const long ac = m.get_long(F_CODICE_CLIFO_A);
const long da = m.get_long(F_CODICE_AGENTE_DA);
const long aa = m.get_long(F_CODICE_AGENTE_A);
const long dz = m.get_long(F_CODICE_ZONA_DA);
const long az = m.get_long(F_CODICE_ZONA_A);
const TDate dd = m.get(F_DATA_DOCUMENTO_DA);
const TDate ad = m.get(F_DATA_DOCUMENTO_A);
const TString& codnum = m.get(F_CODICE_NUMERAZIONE);
const long dn = m.get_long(F_NUMERO_DOCUMENTO_DA);
const long an = m.get_long(F_NUMERO_DOCUMENTO_A);
TFatturazione_bolle eld(m.get(F_CODICE_ELAB));
TLista_clienti clienti;
const int tot_cli = clienti.leggi(dc, ac, da, aa, dz, az);
for (int c = 0; c < tot_cli; c++)
{
TLista_documenti din, dout;
din.read('C', clienti[c], anno, dd, ad, codnum, dn, an);
const bool ok = eld.elabora(din, dout);
if (!ok) break;
}
}
return FALSE;
}
int ve6200 (int argc, char **argv)
{
TFatturazione_bolle_app a;
a.run (argc, argv, "Fatturazione Bolle");
return TRUE;
}