$title Runs SQL2GMS interactively (SQL2GMS,SEQ=053)

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

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

$callTool win32.msappavail Access
$if errorlevel 1 $abort.noError "No Access available"

Scalar task / 0 /;

$onEcho > ask.opt
T=radiobuttons
M=SQL2GMS SQL database->GAMS import facility
D=Show Documentation (offline)|Run SQL2GMS 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_SQL2GMS.html"';
elseIf task=2,
   execute 'sql2gms';
);