GeMIS_WEB/GUI/v8/putstreamf_new.i

    cZeile = bDrucker.Drufettb
           + FILL(" ", iRand) + cZeile
           + bDrucker.Drufette
           + FILL(CHR(10), {1}).
    PUT STREAM Out_Stream CONTROL cZeile.
    iLine  = iLine + {1}.
    cZeile = "".