$title Runs MDB2GMS interactively (MDB2GMS,SEQ=040)

$onText
This model offers the user first a menu of options using the ASK tool, which
includes to open the MDB2GMS documentation and to run "mdb2gms" interactively.

Keywords: MDB2GMS, data exchange, GAMS language features, ASK
$offText

$if %system.filesys% == UNIX $abort.noError 'This model cannot run on a non-Windows platform';

Scalar task / 0 /;

$onEcho > ask.opt
T=radiobuttons
M=MDB2GMS Access->GAMS database import facility
D=Show Documentation (offline)|Run MDB2GMS interactively
E=1|2
R=task = %s;
O=task.inc
$offEcho

$call =ask @ask.opt
$ifE errorLevel<>0 $abort Error running ASK!
$include task.inc

if(task=1,
   executeTool 'win32.shellExecute "%gams.sysdir%\docs\T_MDB2GMS.html"';
elseIf task=2,
   executeTool 'win32.msappavail Access';
   abort.noError$errorLevel 'Microsoft Access is not available!';
   execute 'mdb2gms';
);