campo-sirio/mg/mg1200.cpp

#include <applicat.h>
#include <utility.h>
#include <tabutil.h>
#include <msksheet.h>
#include <recarray.h>
#include <assoc.h>
#include <checks.h>
#include <defmask.h>
#include "mg1200.h"
#include "mglib.h"
#include "..\cg\cglib01.h"


class TMask_buildmov: public TMask {
  TEsercizi_contabili esercizi;
  static bool handle_annoes(TMask_field &, KEY); // handler del numero di registrazione
public:
  TMask_buildmov();
  virtual ~TMask_buildmov()
  {};
};

TMask_buildmov::TMask_buildmov() 
  : TMask("mg1200")
{
  set_handler(F_ANNOES, handle_annoes);
}

bool TMask_buildmov::handle_annoes(TMask_field &fld, KEY k)
{
  TMask_buildmov &mask=(TMask_buildmov &)fld.mask();
  if (fld.get().empty())
  {
    // DEFAULT
    const long esc=mask.esercizi.date2esc(mask.get_date(F_DATA));
    if (esc!=0)
      fld.set(esc);
  } 
  if (k == K_TAB && fld.focusdirty()) 
  {
    if (mask.esercizi.exist(mask.get_int(F_ANNOES)))
    {
      const TEsercizio & e=mask.esercizi.esercizio(mask.get_int(F_ANNOES));
      if (mask.esercizi.esercizio(mask.get_int(F_ANNOES)).chiusura_mag()!=TDate(NULLDATE))
      {
        fld.error_box("Il magazzino dell'esercizio indicato risulta chiuso \nImpossibile effettuare la ricostruzione saldi")  ;
        return FALSE; 
      }
    } 
  }
  return TRUE;
}



class TApp_rebuildbalances: public TSkeleton_application {
  TArray * used_files;
  TRelation * _rel;   // relazione 
  TCursor * _cur;   // cursore
  TString16 _annoes;
  bool _reset_giac  ;

protected:
  virtual bool create();
  virtual bool destroy();
  virtual void main_loop();

public:
  TApp_rebuildbalances() {};
  virtual ~TApp_rebuildbalances() {};
};


//inline TApp_rebuildbalances& app() { return (TApp_rebuildbalances&) main_app(); }



bool TApp_rebuildbalances::create()
{
  open_files(LF_ANAMAG,LF_UMART,LF_MAG,LF_MOVMAG,LF_RMOVMAG,LF_TABCOM,LF_STOMAG,0);
  TSkeleton_application::create();
  return TRUE;
}

bool TApp_rebuildbalances::destroy()
{
  delete used_files;  
  TSkeleton_application::destroy();
  return TRUE;
}

void TApp_rebuildbalances::main_loop()
{
  /*if (argc()>2)
    _annoes=argv(2);
  else
    fatal_box("Manca l'indicazione dell'esercizio da ricostruire");   
  if (argc()>3)
    _reset_giac=(TString(argv(3)).upper()=="RESET");*/

  TMask_buildmov m;
  while (m.run()==K_ENTER)
  {
    if (!rebuild_balances(m.get(F_ANNOES)))
      warning_box("A causa degli errori riscontrati i saldi di magazzino \npotrebbero non essere stati del tutto aggiornati. \nProcedere ad una nuova operazione di ''Ricostruzione saldi''");
  }
}

int mg1200(int argc, char* argv[])
{
  TApp_rebuildbalances a;
  
  a.run(argc, argv, "Ricostruzione saldi");
  return 0;
}