OPEN SQL(5113)

*&---------------------------------------------------------------------*
*& Report ZSTATICS 靜態變數的用法。 *
*&---------------------------------------------------------------------*
REPORT ZSTATICS.
DO 3 TIMES.
PERFORM CALL_SUB1.
ENDDO.

*&---------------------------------------------------------------------*
*& Report ZMULTIPLY
*&---------------------------------------------------------------------*
REPORT ZMULTIPLY.