Description
This test creates and executes a GAMS program that print all system suffixes with it's current value to a put file. Contributor: Michael Bussieck, June 2017
Small Model of Type : GAMS
Category : GAMS Test library
Main file : ssuffix.gms
$title 'List of all System Suffixes' (SSUFFIX,SEQ=734)
$onText
This test creates and executes a GAMS program that print all system suffixes
with it's current value to a put file.
Contributor: Michael Bussieck, June 2017
$offText
set ssuffix system suffixes / system.SystemSuffixes /
file ef / exec.gms /; put ef 'file fx / systemSuffixes.txt /; put fx "System Suffixes:";';
loop(ssuffix$(not sameas("error",ssuffix)),
put / 'put / "' ssuffix.tl:23 '[' ssuffix.te(ssuffix):65 ']: >" system.' ssuffix.tl:23 ' "<";';
);
putclose;
execute 'gams exec.gms lo=%gams.lo%'; abort$errorlevel 'problems executing exec.gms. Check exec.lst';