campo-sirio/ba/ba8.cpp

#include <xvt.h>
#include "ba8.h"

int main(int argc, char** argv)
{
  const int n = argc > 1 ? (argv[1][1]-'0') : 0;
  switch (n)
  {
	case  1: ba8200(argc, argv); break; // Query Generator
	case  2: ba8300(argc, argv); break; // Report Generator
	case  3: ba8400(argc, argv); break; // Form Converter
	case  4: ba8500(argc, argv); break; // Report Printer
  default: ba8100(argc, argv); break; // Record Selector
  }
  return 0;
}