| wordObj | wordObj := OLE createObject: 'Word.Basic'. wordObj fileNew; editClear.