Sample UEB02C

Sample

Alternative zu Uebung 2B - jedoch mit STEM Variablen                                 

/* REXX UEB02C Copyright YCOS Yves Colliard Software 1990-2009 */
/* TRACE ?R  */
  /* einschalten des interaktiven Trace Modus */
  /* */
monat="07"
  /* */
mon.01="Januar"
mon.02="Februar"
mon.03="Maerz"
mon.04="April"
mon.05="Mai"
mon.06="Juni"
mon.07="Juli"
mon.08="August"
mon.09="September"
mon.10="Oktober"
mon.11="November"
mon.12="Dezember"
  /* */
say mon.monat
  /* */