GAMS Data Exchange API

Reading data using integers (Raw)
Page 4
then
begin
WriteLn('**** Could not find symbol X');
halt;
end;
gdxSymbolInfo(PGX,SyNr,SyName,SyDim,SyTyp);
if (SyDim 1) or (SyTyp Ord(dt_par))
then
begin
WriteLn('**** X is not a one dimensional parameter');
halt;
end;
if not gdxDataReadStrStart(PGX,SyNr,NrRecs)
then
ReportGDXError(PGX);
WriteLn('Parameter X has ',NrRecs,' records');
while gdxDataReadStr(PGX,IndxS,Values,N)
do WriteLn('Record = ',IndxS[1],' ',Values[1]);
if not gdxDataReadDone(PGX)
then
ReportGDXError(PGX);
In this example we find the symbol by its name, and before reading the data we verify that the symbol represents a one
dimensional parameter.
1.2.2 Reading data using integers (Raw)
Reading data using integers in Raw mode does not require the registration of unique elements. The read routine returns an
integer for which we can find the string representation.
if not gdxFindSymbol(PGX,'x',SyNr)
then
begin
WriteLn('**** Could not find symbol X');
halt;
end;
gdxSymbolInfo(PGX,SyNr,SyName,SyDim,SyTyp);
if (SyDim 1) or (SyTyp Ord(dt_par))
then
begin
WriteLn('**** X is not a one dimensional parameter');
halt;
end;
if not gdxDataReadRawStart(PGX,SyNr,NrRecs)
then
ReportGDXError(PGX);
WriteLn('Parameter X has ',NrRecs,' records');
while gdxDataReadRaw(PGX,IndxI,Values,N)
do begin
Write('Record = ',IndxI[1],' = ',Values[1]);
gdxUMUelGet(PGX,IndxI[1],S,UsrMap);
WriteLn(' with string = ',S);
end;
if not gdxDataReadDone(PGX)
then
ReportGDXError(PGX);
GDX GAMS Data Exchange Reading data
from a GDX file
GAMS Data Exchange API
1.2
In this example we find the symbol by its name, and before reading the data we verify that the symbol represents a one
dimensional parameter. When reading the data, we get a unique element as an integer. The integer value is used to get the
Page 4 2.4
12/3/2012