Gerald
Code: Select all
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
subroutine eval(series a, series f)
series fa = f
equation eqtemp.ls f c fa
fa = a
freeze eqtemp.fit(e) a
delete fa eqtemp
endsub
'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
smpl fsmplstart fsmplend ‘ ~~ the ex post forecast period
series y ‘~~ contains the actuals series
series yf ‘~~ contains the forecast series
call eval(y, yf)