SIMSCRIPT II.5 Programming Language

SIMSCRIPT II.5 Programming Language
routine PROGVAR given RVAR yielding VALUE
define RVAR as a subprogram variable
define VALUE as an integer variable
if RVAR ne 'DATA.PLOT'
and RVAR ne 'DATA.PRINT'
call RVAR giving DATA(*) yielding VALUE
else
call RVAR giving DATA(*)
let VALUE = 0
always
return
end
_______________________________________________________________________________
2.31 The Store Statement
Previous implementations of SIMSCRIPT II.5 offered a store statement which provided for assignment
of variables without any attempt at variable mode conversion. This proved to be a common
source of error. The store statement is still provided, but it is restricted to use only with
variables of compatible mode. Its effect is identical with that of the let statement, which is recommended
as preferred usage. The store statement is not intended for use with values in the text
mode. All other nonconversion assignments may be achieved by variable equivalencing, described
in Chapter 6.
98