campo-sirio/ha/ha0.cpp

#include <xvt.h>

#include "ha0.h"


int main(int argc,char** argv)

{
  int rt = -1 ;
  const int r = (argc > 1) ? atoi(&argv[1][1]) : -1;

  switch (r)
  {
  case  1: rt = ha0200(argc, argv); break; // configurazione modulo
  case  2: rt = ha0300(argc, argv); break; // gestione contratti premio
  case  3: rt = ha0400(argc, argv); break; // elaborazione contratti premio pareggiati
  case  4: rt = ha0500(argc, argv); break; // elaborazione documenti (NAC - contratti premio)
  case  5: rt = ha0600(argc, argv); break; // gestione codici corrispondenti
  default: rt = ha0100(argc, argv); break; // gestore tabelle modulo HA
  }
  return rt;
}