$title 'Generates HTM emplib library files' (EMPHTM,SEQ=17); $ontext Generates HTM emplib library files GAMS Development Corporation, emplib Tool Box. Generates all .htm related files for the set of models found in empmod.inc. Uses unpublished and unsupported PUT_Utilities features. The file empmod.inc is the master file for all other derived files. Files generated: seqindx.htm alfindx.htm *.htm for all model and include files $offtext $setglobal emplib '%gams.u1%' files htm HTML file handle / htm.htm / seqindx HTML sequence index / '%emplib%seqindx.htm' / alfindx HTML alpha index / '%emplib%alfindx.htm' / scalar first; $offlisting $include %emplib%empmod.inc $onlisting * * model htm files * put htm; htm.pw=1024; htm.lcase=1; loop(sm(s,m), put_utilities 'ren'/ '%emplib%' m.tl:0 '.htm'; put '
Used by:'; loop{(incmap(inc,s),sm(s,m)), put ' ' m.tl:0 '.gms'; if {(htm.cc > 70), put /; }; }; put / '
' / '' / '' / '' / '' ); * * seqindx * seqindx.lcase=1; put seqindx '
' /'There is also an ' /'an alphabetical index.' /'
' / '
No | ' / 'Model | ' / 'Description | ' / 'Type | ' / '
---|---|---|---|
',s.tl:0,' | ' / '',m.tl:0,' | ' / '',m.te(m):0,' | ' / ''; seqindx.lcase=2; loop(tss(t,s), put t.tl:0 ); seqindx.lcase=0; put ' | ' / '
Shortcuts: '; alfindx.lcase=2; loop (letters, put alfindx ' ' letters.tl:0 '' / ); alfindx.lcase=1; put alfindx /'
' /' | Model | ' /'Description | ' /'Type | ' / '|
---|---|---|---|---|
' /' | ',m.tl:0,' | ' /'|||
/ ' | ' / ' | ',m.tl:0,' | ' / '',m.te(m):0,' | ' / ''; alfindx.lcase=2; loop(sm(s,m), loop(tss(t,s), put t.tl:0 ); alfindx.lcase=0; put ' | ' / '