Sample UEB05A

Sample

Input: Variablen mit Textzuweisung:                                 
txt="Guten Morgen, den 01/02/08"
Process: PARSE Instruktion verwenden, um den Text in
in den folgenden Variablen, mit dem angegebenen Inhalt,
zu verteilen:
teil1 = "Guten"
teil2 = "Morgen,"
teil3 = "den"
teil4 = "01/02/08"
Output: teil1 bis teil4
- in der Form teil1 * teil2 * teil3 * teil4

/* REXX UEB05A Copyright YCOS Yves Colliard Software 1990-2009 */
/* TRACE ?R  */
  /* einschalten des interaktiven Trace Modus */
  /* */
txt="Guten Morgen, den 01/02/08"
  /* */
PARSE VAR txt teil1 teil2 teil3 teil4
SAY teil1 "*" teil2 "*" teil3 "*" teil4
  /* */