EXITM return code
MACRO PAWEX08C PAW > exe pawex08c
MESSAGE At first, '[@]' = [@] At first, [@] = 0
EXEC EXIT2 Macro EXIT2: NUM ? 25
IF [@] = 0 THEN Number too large
MESSAGE Macro EXIT2 successful Error in EXIT2 : 5
ELSE PAW > exe pawex08c
MESSAGE Error in EXIT2 : [@] At first, [@] = 0
ENDIF Macro EXIT2: NUM ? 16
RETURN Macro EXIT2 successful
MACRO EXIT2
READ NUM
IF [NUM] > 20 THEN
MESSAGE Number too large
EXITM [NUM]-20
ELSE
VEC/CRE VV([NUM])
ENDIF
RETURN
|