
PROCEDURE Main()
LOCAL cChar

#ifdef Clipper
       MEMVAR xWow
#endif

if Type('xWow') $ 'U'
   PUBLIC xWow
endif

xWow  := 'Wow'
cChar := (xWow + ' finished')

? cChar
RETURN