/************************** I2ICE TUTORIAL SCREEN #17 **************************/
menu=1
define literally P   = 'include scr.16 nolist'                  
define literally R   = 'include scr.17 nolist'
define literally RTN = 'include scr.17 nolist'
define literally N   = 'include scr.18 nolist'
define literally M   = 'include scr.2 nolist'                  
cls
/*******************************************************************************/
'                                                      ------------------------'
'Why does the program respond "No change"? Turn to the| SCR17: VARIABLE VALUES |'
'PL/M program listing in the I2ICE System User''s Guide| M = Go to main menu    |'
'"No change" is specified on line 48; but line 48 is  | N = Next screen        |'
'executed only if the Boolean expression in line 47   | P = Previous screen    |'
'equals 0.  The Boolean expression won''t equal 0 un-  | Q = Quit tutorial      |'
'less the variables DOLLARS, QUARTERS, DIMES, NICKELS,| R = Rewrite SCR17      |'
'and PENNIES are all 0.  However, we expect 42 cents  | SCR# = Screen desired  |'
'in change; that is, we expect QUARTERS = 1, DIMES=1,  ------------------------'
'NICKELS = 1, and PENNIES = 2.  Where is the error?  Let''s check these vari-'
'ables'' values.  To display the value of a variable, use a fully qualified'
'reference to the variable.  Such a reference has the following form:'
'    :MODULE_NAME.PROCEDURE_NAME.VARIABLE_NAME'
'Since the change variables are global, you can display them without entering'
'a procedure name.  Precede them only with the name of the program module'
'(:CMAKER).  Enter'
'    :CMAKER.QUARTERS <Enter>'
'    :CMAKER.DIMES    <Enter>'
'    :CMAKER.NICKELS  <Enter>'
'    :CMAKER.PENNIES  <Enter>'
'All the values are 0 rather than the expected change values.'
'----------------------------------------------------------------------------- -'