FORMAT - Numerisches Format setzen

REXX Built-In Funktionen
Manipulation der Zeichenkette

Syntax:                                 
FORMAT(nummer<,<vorkom><,<nachkom>>>)

/* REXX FORMAT Copyright YCOS Yves Colliard Software 1990-2009 */
/* TRACE ?R  */
  /* einschalten des interaktiven Trace Modus */
  /* */
n1 = 123.126
n2 = 123.124
  /* */
SAY FORMAT(12345.12344)         /* Ausgabe: "12345.1234" 9 Digits  */
SAY FORMAT(12345.12345)         /* Ausgabe: "12345.1235" 9 Digits  */
SAY FORMAT(n1,5)                /* Ausgabe: "  123.126"            */
SAY FORMAT(n1,4,2)              /* Ausgabe: " 123.13"              */
SAY FORMAT(n2,4,2)              /* Ausgabe: " 123.12"              */
SAY FORMAT(n1,4,4)              /* Ausgabe: " 123.1260"            */
  /* */
x1 = 12345.126
  /* Exp Formatierung */
  /* FORMAT(nummer<,<vorkom><,<nachkom><,<expp><,<expt>>>>>) */
SAY FORMAT(x1,,,2,0)            /* Ausgabe: "1.2345126E+04"        */
SAY FORMAT(x1,,,4,0)            /* Ausgabe: "1.2345126E+0004"      */
SAY FORMAT(x1,,3,,0)            /* Ausgabe: "1.235E+4"             */
SAY FORMAT(x1,,,,5)             /* Ausgabe: "12345.126"            */
SAY FORMAT(x1,,,,4)             /* Ausgabe: "1.2345126E+4"         */