Description
This program illustrates the use of fileopenbox. The trnsport.gms is divided into three files: TrnsportSetDec.inc, TrnsportSetData.gdx, Trnsport.inc. In the first popup TrnsportSetDec.inc, in the second TrnsportSetData.gdx and in the third one Trnsport.inc should be selected.
Category : GAMS Data Utilities library
Main file : Fileopenbox.gms includes : Fileopenbox.gms TrnsportSetDec.inc TrnsportSetData.gdx Trnsport.inc
$onText
This program illustrates the use of fileopenbox. The trnsport.gms
is divided into three files: TrnsportSetDec.inc, TrnsportSetData.gdx,
Trnsport.inc. In the first popup TrnsportSetDec.inc, in the second
TrnsportSetData.gdx and in the third one Trnsport.inc should be
selected.
$offText
$if %system.filesys% == UNIX $abort.noError 'This model cannot run on a non-Windows platform';
* The file FLN1.INC will contain an include statement with the file the user has selected.
* By default the project directory will open, in order to open files from other directories
* option "i" must be used to set directory path as in the following example:
* $call =ask T=fileopenbox I="%system.fp%" F="Trns*.inc" o=fln1.inc R="$include '%s'" C="Select include file"
$call =ask T=fileopenbox F="Trns*.inc" o=fln1.inc R="$include '%s'" C="Select include file"
$include fln1.inc
* "$setGlobal" is used to set the macro in the SETGDXNAME.INC to contain the user-specified file name
$call =ask T=fileopenbox F="Trns*.gdx" o=setgdxname.inc R="$setGlobal gdxfile '%s'" C="Select GDX file"
$include setgdxname.inc
$gdxIn %gdxfile%
$load i
$load j
* "$setGlobal" is used to set the macro in the FLN2.INC to contain the user-specified file name
$call =ask T=fileopenbox F="Trns*.inc" o=fln2.inc R="$setGlobal incfile '%s'" C="Select include file"
$include fln2.inc
$include %incfile%