VBex1.gms : Test expert level VB.Net API to read and write GDX

Description

Contributor: Lutz Westermann, October 2012


Small Model of Type : .Net


Category : GAMS API library


Main file : VBex1.gms

$TITLE 'Test expert level VB.Net API to read and write GDX' (VBEX1,SEQ=12)

$ontext
Contributor: Lutz Westermann, October 2012
$offtext


$set srcRoot %gams.sysdir%apifiles%system.dirsep%VBNet%system.dirsep%

$if %system.filesys% == UNIX $abort Do not test VB.net on Unix

$if %system.buildcode% == VS8
$if not set flags $set flags /platform:x86
$if %system.buildcode% == WEI
$if not set flags $set flags /platform:x64

$call rm -rf demanddata.gdx

$call vbc.exe %flags% "%srcRoot%xp_example1.vb" "%srcRoot%api%system.dirsep%gdxvbnet.vb" "%srcRoot%api%system.dirsep%gamsglobals.vb" -out:xp_example1.exe
$if errorlevel 1 $abort 'Problem compiling xp_example1.vb'
$call xp_example1.exe "%gams.sysdir%."
$if errorlevel 1 $abort 'Problem executing xp_example1 writing GDX file'
$call gdxdiff demanddata.gdx demandwant.gdx
$if errorlevel 1 $abort 'Demanddata not as expected'
$call xp_example1.exe "%gams.sysdir%." trnsport.gdx
$if errorlevel 1 $abort 'Problem executing xp_example1 reading GDX file'