静态变量 static

DO 10 TIMES.
  PERFORM add_one.
ENDDO.

FORM add_one.
  DATA    local  TYPE i VALUE 10.
  STATICS static TYPE i VALUE 10.
  local  = local  + 1.
  static = static + 1.
  WRITE: / local, static.
ENDFORM.