1. 程式人生 > >學習筆記(十九)

學習筆記(十九)

DATA: i1 TYPE i VALUE 2,
      i2 TYPE i VALUE 3.

PERFORM add USING i1 i2.
PERFORM add USING i1 i2.

FORM add USING value(a) TYPE i value(b) TYPE i.
  STATICS sum TYPE i VALUE 0.
  sum = sum + a + b.
  WRITE / sum.
ENDFORM.