Loading ...
Sorry, an error occurred while loading the content.

re convert outline to text file

Expand Messages
  • kitPATh
    ... Here are two clips that I use to convert a file, or just to toggle the display of an outline file to a flat file. patH(Riv) H= Convert otl to txt (strip
    Message 1 of 1 , Aug 3, 2004
    • 0 Attachment
      >> 1. Convert Outline to text file
      >> From: "Dick Gascoigne" <dick.gascoigne@...>


      Here are two clips that I use to convert a file, or just to toggle the display of an outline file to a flat file. patH(Riv)



      H="Convert otl to txt (strip code)"
      ;Larry Thomas <larryt@...>
      ;03/16/2000, 12:18:49 PM
      ^!Toolbar Save Document
      ^!SaveValue DOCIDX=^$Getdocindex$
      ^!IfTrue ^$IsOutlineDoc$ NEXT ELSE NOTOTL
      ^!KEYBOARD ALT+E Y Y
      ^!TOOLBAR PASTE NEW
      ^!Replace "Subj:" >> "Subject:" SWA
      ^!JUMP DOC_START
      ;protect text version: read-only
      ;^!KEYBOARD ALT+D O F4
      ^!GOTO EXIT
      :NOTOTL
      ^!INFO This is not an OTL document/view.


      H="Toggle display otl <> txt"
      ;Larry Thomas <larryt@...>
      ;03/16/2000 Basic commands
      ;update file
      ^!Toolbar Save Document
      ^!SaveValue DOCIDX=^$Getdocindex$
      ^!IfTrue ^$IsOutlineDoc$ NEXT ELSE NOTOTL

      ;next: is outline
      ;close and insert (otl>text)
      ^!SET FNAME ^**
      ^!CLOSE
      ^!TOOLBAR NEW DOCUMENT
      ^!InsertFile ^%FNAME%
      ^!JUMP DOC_START
      ^!SAVE AS ^%FNAME%
      ^!GOTO EXIT

      :NOTOTL
      ;else: not outline
      ;close and reopen (txt>otl)
      ^!SET FNAME ^**
      ^!CLOSE
      ^!Open ^%FNAME%
    Your message has been successfully submitted and would be delivered to recipients shortly.