THE WELCH COMPANY
440 Davis Court #1602
San Francisco, CA 94111-2496
415 781 5700


S U M M A R Y


DIARY: January 21, 2003 11:12 AM Tuesday; Rod Welch

SDS changed save function to put anchors on all paragraphs in the record.

1...Summary/Objective
2...Routinize Good Management Practices Applying Cognitive Science
3...Save Time and Money by Making Intelligence Faster and Easier
4...Anchors Added with Justify for SDS Records and Editor Documents
5...000002 Macro 49 Modify to Add Anchors to Paragraphs
6...0702051 Addressability Add Anchors to Every Para in SDS Record
7...Anchor Added and Count Them to Restore SDS Record at End of Process
8...Anchor Added and Count Them to Restore SDS Record at End of Process
9...000008 Save Read # of Anchors Added and Adjust to Restore Record

ACTION ITEMS.................. Click here to comment!

1...Some thought may be needed to change the scheme. and move the linking

CONTACTS 

SUBJECTS
Anchors and Format Added Automatically with Justify Op Alt
Anchors Add to All Para in SDS record During Save, F2 macro 142, 0702
Justify Anchors Addressability Links Incorporate into Macro 49 for Al
Time Saved Addressability Reducing Time to Create Anchors for Linking
Routine Good Management Needs Support at Intel, Dave Vannier
Good Management Consistently Plan Perform Report Action Items Drawn f
Addressability Links to History Context Authority Reveal Correlations
Routinize Good Management Discovers a lot of Mistakes that Managers D
Routine Use Good Management Difficult Maintain Need Technology SDS St
Consistent Good Management Difficult Supported by SDS Plan Perform Re

1812 -
1812 -    ..
1813 - Summary/Objective
1814 -
181401 - Follow up ref SDS 28 0000. ref SDS 27 0000.
181402 -
181403 - Changed scheme for addressability in SDS records by adding a process
181404 - in the save function to automatically check each paragraph in a
181405 - record.  If an anchor is not conveniently located, the code adds an
181406 - anchor to the paragraph, ref SDS 0 6E4H, along with performing other
181407 - routine maintenance of the record.  The cursor is restored to the
181408 - original relative position to maintain the User's orientation when a
181409 - lot of anchors are added to the record. ref SDS 0 TG7N  This
181410 - improvement solves usability issues raised by Gary on 030120.
181411 - ref SDS 0 YI5K
181412 -
181413 -
181414 -
181415 -
181416 -
181418 -  ..
1815 -
1816 -
1817 - Evaluation
1818 -
181801 - Routinize Good Management Practices Applying Cognitive Science
181802 -
181803 - The improvement today is transparent to the user.  As reported on
181804 - 020320 SDS does not need anchors added to every paragraph, because SDS
181805 - generates anchors as needed to anything. ref SDS 15 E25H  Therefore
181806 - providing support for others to use SDS records should occur without
181807 - interruption to the work process, and this is accomplished by the code
181808 - today.  On 991025 Peter Drucker identified a goal of technology to
181809 - "routinize" good management practices, ref SDS 6 0785, and said that
181810 - cognitive science is the key target, which reflects the fact that
181811 - management is essentially a thinking process to guide daily work.
181812 - ref SDS 6 8925  Automating the process of enabling a broader range of
181813 - people to quickly and easily create a connected record, as
181814 - demonstrated by Stuart Harrow at DCMA on 020905, ref SDS 22 DAPW, and
181815 - again a week or so later on 020912, ref SDS 23 HH92, is a big step
181816 - toward routinizing core dimensions of cognitive science that impact
181817 - performance.
181818 -
181819 -
181820 -
181822 -  ..
1819 -
1820 -
1821 - Planning
1822 -
182201 - Save Time and Money by Making Intelligence Faster and Easier
182202 -
182203 - Follow up ref SDS 28 FH5K, ref SDS 27 6C4L.
182204 -
182205 - Background on the problem to solve is in the record on 021230.
182206 - ref SDS 27 M16L
182208 -  ..
182209 - On 021230 the code was revised to add links using macro 49 with Alt F9
182210 - that justifies text in a paragraph.  This was improved on 030101.
182211 - ref SDS 28 0001
182213 -  ..
182214 - On 030120 Gary Johnson presented ideas for improving addressability by
182215 - automatically processing every paragraph. ref SDS 31 021H
182217 -  ..
182218 - Work on 030101 was aimed at improving addressability by adding anchors
182219 - when Alt F9 is used to justify a paragraph, under planning on 021228.
182220 - ref SDS 27 6C4L  Gary notes that often every paragraph in a record
182221 - does not require using Alt F9 to justify the text, and so the current
182222 - scheme in effect requires an extra step, where a paragraph is not
182223 - edited, he cited examples of SDS records showing every para does not
182224 - have an anchor. ref SDS 31 GJ5H
182226 -  ..
182227 - Addressability is improved by making following changes...
182228 -
182229 -    1.  Anchors are now added to all paragraphs with the F2 save
182230 -        function, by calling macro 49. ref SDS 0 LQ60
182232 -         ..
182233 -    2.  Macro 49 applies "intelligence" to avoid redundant links and to
182234 -        provide context based on the design developed on 030101,
182235 -        ref SDS 28 556H, and discussed further below. ref SDS 0 T74N
182236 -        Added "intelligence" created today, ref SDS 0 6E4H, enables
182237 -        following usability....
182239 -             ..
182240 -        a.  Anchors are added automatically by pressing F2 to save the
182241 -            record.  Anchors are positioned to preserve context, as
182242 -            explained on 030101. ref SDS 28 556H  Using F1 F2 is an
182243 -            alternate "save" function that bypasses 070251, which is
182244 -            useful sometimes.
182246 -             ..
182247 -        b.  Redundant anchors are omitted....
182248 -
182249 -            1.  a "j" line is within a 5 lines of an underlined
182250 -                heading. ref SDS 0 6E4H
182252 -                 ..
182253 -            2.  a paragraph is within 5 lines of either a j line or
182254 -                an underlined heading. ref SDS 0 CH69
182256 -             ..
182257 -        c.  If the user wants an anchor that F2 does not support, use
182258 -            Alt F9 on the paragraph to add an anchor based on
182259 -            "intelligence" reported on 030101. ref SDS 28 556H
182261 -             ..
182262 -        d.  If the user wants an anchor that Alt F9 (macro 49) does not
182263 -            support, then use F1 F1 F3 to create an anchor any place
182264 -            desired.  Anchors added that are not directly supported by
182265 -            macro 49 and/or F2 are not removed.
182267 -             ..
182268 -        e.  This design balances saving time by creating anchors
182269 -            automatically that avoids manually entering F1 F1 F3, and
182270 -            further saves time for removing redundant anchors.
182272 -  ..
182273 - Consideration was given to putting this in the wordwrap feature, but
182274 - that would not add anchors to one line paragraphs where wordwrap does
182275 - not apply, and so a more thorough method is to do it as a macro
182276 - process with "save."
182278 -  ..
182279 - This new design requires running macro 207 to update outline structure
182280 - prior to adding anchors because the process that adds anchors applies
182281 - outline structure, per planning on 021107, ref SDS 24 65UP, and code
182282 - development. ref SDS 24 X35O
182283 -
182284 -
182285 -
182286 -
182287 -
182288 -
182289 -
1823 -

SUBJECTS
Justify Add Anchors on Paragraphs if Missing avoid in Editor Anchors,
Addressability Copy Location on Internet for Linking
Save, Primary, F2, macro 142, macro 1421, macro 0, macro 207, 0702051

2005 -
200601 -  ..
200602 - Anchors Added with Justify for SDS Records and Editor Documents
200603 - 000002  Macro 49 Modify to Add Anchors to Paragraphs
200604 -
200605 - Follow up ref SDS 28 T74N, ref SDS 27 T74N.
200606 -
200607 - On 030101 developed code in 000002 for macro 49 to add anchors when a
200608 - body of text is justified with Alt F9. ref SDS 28 FH5K  Today, we are
200609 - complementing this design scheme, for providing addressability, by
200610 - adding to the "save" op for SDS records, called by F2, a new process
200611 - of finding every para in the record and adding an anchor if an anchor
200612 - has not already been added.  This is accomplished by calling macro 49,
200613 - per below, ref SDS 0 LQ60, because it has designed into it some
200614 - exceptions ("intelligence") that enable visibility of context, as
200615 - explained on 030101. ref SDS 28 556H
200617 -  ..
200618 - Anchors are added to paragraphs in editor files when the user creates
200619 - links with SDS standard features. Macro 0122 adds anchors to
200620 - paragraphs that have not been linked, when a file is converted to HTML
200621 - for transfer to the Internet, to provide a full range of linking
200622 - options for people who do not use SDS under the 3-layer architecture
200623 - feature.
200625 -  ..
200626 - Some thought may be needed to change the scheme. and move the linking
200627 - process from 0122 to F2 for saving an editor file.  At this time, the
200628 - editor uses F2 only to maintain outlining, and to "save" the file,
200629 - which is accomplished by assigning F2 to macro 207, reported on
200630 - 021107. ref SDS 24 SU4L
200632 -  ..
200633 - Line 540, ref OF 4 TC5L, -label 0471r in 000002
200634 -
200635 -    immed r
200636 -    up
200637 -    macro 987
200638 -    linecnt 153 0
200640 -        ..
200641 -       Modify work on 030101 to use macro 49 for adding anchors to a
200642 -       para.  Today, added linecnt 153 0 to show a line was added to
200643 -       the record for adding an anchor above text.  This is used by
200644 -       macro file 0702051 to save an SDS record, which is called in
200645 -       turn by macro 142. ref SDS 0 6E4H  Macro file 0702051 counts the
200646 -       number of lines added above the cursor line, ref SDS 0 H58G,
200647 -       when F2 is pressed to save a record, and passes the number
200648 -       through the dose op, ref SDS 0 S85K, to macro 142 for
200649 -       incrementing counter 65 to restore the original relative file
200650 -       position to the User after adding anchors. ref SDS 0 II6O
200651 -
200652 -
200654 -  ..
200655 - 0702051  Addressability Add Anchors to Every Para in SDS Record
200656 -
200657 - Follow up ref SDS 30 NY4O
200658 -
200659 - Line 70, ref OF 1 JU8G, -label strt1 in 0702051 about 20 lines below
200660 -
200661 -    loc_cur 4 32
200662 -    strcnt 70 5
200663 -    ins_text !      !
200665 -        ..
200666 -       Read value for line number where cursor was located when F2 was
200667 -       pressed to save the record calling macro 142 in 000008, per
200668 -       below, ref SDS 0 II6O, which calls this macro 0702051 to add
200669 -       anchors and perform other tasks. Counter 70 is compared later in
200670 -       the code for figuring out when to increment, ref SDS 0 H58G
200671 -
200673 -  ..
200674 - Line 600, ref OF 1 P45J, -label hdgLp1 in 0702051
200675 -
200676 -    This code processes headlines, which is not part of the work
200677 -    today, but is related.
200679 -     ..
200680 -    macro 6
200681 -    macro 7
200682 -    -label hdgLp1
200683 -    errorcnt 0 0
200684 -    z 10 50
200685 -    l /------/
200686 -    -if @0 > 0 -goto blbfu
200687 -    -gosub anchor
200688 -
200689 -       Mark location at beginning of narrative and
200690 -
200691 -
200693 -  ..
200694 - Line 890, ref OF 1 SD5G, -label ancHg
200695 -
200696 -    macro 7
200697 -    setcnt 47 2
200699 -         ..
200700 -        Save the original location and identify this is an SDS record
200701 -        for macro 541 that finds the left margin.  Since this is a
200702 -        dose op, the code does not know this is an SDS record, so set
200703 -        47 2 to make 541 process an SDS record.
200704 -
200705 -
200707 -  ..
200708 - Line 870, ref OF 1 MO6K, -label lnLp1 in 0702051
200709 -
200710 -    -label lnLp1
200711 -    loc_cur 3 9
200712 -    setcnt 0 0
200713 -
200714 -       This is the primary loop that scrolls through the file testing
200715 -       every line for a new para.
200717 -     ..
200718 -    -label lnLp2
200719 -    up
200720 -    -if @0 > 0 -goto ancRe
200721 -
200722 -       If there is an error it is the end of the file, so go stop it.
200724 -     ..
200725 -    setlen 1 0
200726 -    -if @1 < 10 -goto lnLp2
200728 -        ..
200729 -       If the line length is blank, do another up to look for the next
200730 -       para of text. ref SDS 0 RN4N
200731 -
200733 -     ..
200734 -    z 11 20
200735 -    fr /Time Milg/
200736 -    -if @0 > 0 -goto flM
200737 -    z 8 8
200738 -    l /-/
200739 -    down
200740 -    -goto lnLp1
200742 -        ..
200743 -       Check each new line for a Cntrol Field, and when encountered
200744 -       jump past this to narrative.  If not a Control Field then go
200745 -       see if there is an anchor on the line.
200746 -
200748 -  ..
200749 - Line 910, ref OF 1 T56F, -label flM in 0702051
200750 -
200751 -    -label flM
200752 -    setcnt 0 0
200753 -    setcnt 28 937
200754 -    macro 541
200755 -    setcnt 28 @4
200756 -    -if @4 > 45 -goto ajmp
200758 -        ..
200759 -       Reset error flag.  Set flag for macro 541 to jump out after
200760 -       moving cursor to left margin.  Put the left margin in counter 28
200761 -       If the left margin is more than 45, assume this is not text and
200762 -       avoid entering an anchor. ref SDS 0 N77K
200764 -     ..
200765 -    chrcnt 1 0
200766 -    -if @1 != 60 -goto naotl
200767 -
200768 -       See if this is an anchor symbol, and if so, then jump to code
200769 -       that looks for next para.  If it is not anchor, then go add an
200770 -       anchor.
200772 -     ..
200773 -    -label supil
200774 -    up
200775 -    loc_cur 0 6
200776 -    chrcnt 1 0
200777 -    -if @1 = 45 -goto supil
200778 -    -goto ajmp
200780 -        ..
200781 -       Assume this is an anchor, do a loop to jump past indented line
200782 -       numbers, and then go to code that finds bottom of para to
200783 -       process the next para. ref SDS 0 N77K
200784 -
200786 -  ..
200787 - Line 970, ref OF 1 9G5N, -label naotl in 0702051
200788 -
200789 -    -label naotl
200790 -    -if @1 = 47 -goto lnLp1
200791 -
200792 -       There is no anchor.  If the char is / then assume it is code to
200793 -       suppress publication to the Internet, and so skip adding anchor,
200794 -       return to beginning of loop and look for next para. ref SDS 0
200795 -       XK9N
200797 -     ..
200798 -    -if @1 > 47 -if @1 < 123 -goto ancA
200799 -
200800 -       If the char is between 0 and z, then do code to enter an
200801 -       anchor.
200802 -
200803 -    -goto ajmp
200805 -        ..
200806 -       This means the char is not between 0 and z, so maybe a line draw
200807 -       or something were an automatic anchor doesn't work, so go look
200808 -       for next para. ref SDS 0 N77K
200809 -
200811 -  ..
200812 - Anchor Added and Count Them to Restore SDS Record at End of Process
200813 -
200814 - Line 1010, ref OF 1 XX3J, -label ancA in 0702051
200815 -
200816 -    The cursor is now on the left margin at the top of a para where an
200817 -    anchor is neede.  Look for a j or underline headline within a few
200818 -    lines of the narrative.  If found, skip adding an anchor because
200819 -    the 0702051 code adds anchors to j and underlined headlines which
200820 -    can position the narrative in context.  This avoids automatically
200821 -    adding redundant links; however, the user can still use Alt F9 to
200822 -    justify a para and/or F1 F1 F3 which can both expressly add an
200823 -    anchor if needed.
200824 -
200825 -    -label ancA
200826 -    macro 18
200827 -    linecnt 1 0
200828 -    z 7 7
200829 -    l-/j/
200830 -    linecnt 2 0
200831 -    macro 19
200832 -    subcnt 1 @2
200833 -    -if @1 < 6 -goto ajmp
200835 -        ..
200836 -       Since the cursor has been placed at the top of a narrative text
200837 -       line, macro 18 saves this position to return for adding an
200838 -       anchor if needed.  Get the line number to compare with the j
200839 -       line, if one is found.  Zone the column for j headlines, and do
200840 -       a reverse search to find one.  Get the line number at this
200841 -       location and call macro 19 to retore the initial position for
200842 -       entering an anchor on the paragraph.  We do not need to test
200843 -       whether a j line was actually found in the file, because if it
200844 -       is not then the search will go to the top of the file, and in
200845 -       that case the test for not adding an anchor will fail.  If a j
200846 -       line is found, then, subtract the line number from the number of
200847 -       the target line, and if it is less than 6, i.e., if there is a j
200848 -       line within 5 lines of the target line, then skip adding an
200849 -       anchor to the target line. ref SDS 0 N77K
200850 -
200852 -  ..
200853 - Line 1020, ref OF 1 OE3H, -label ancA in 0702051 about 30 lines below
200854 -
200855 -    If we get here , then the first test failed, i.e., there is not a j
200856 -    line within 5 lines of the target location for entering an anchor,
200857 -    so do a similar investigation for underlined headlines.
200859 -     ..
200860 -    linecnt 1 0
200861 -    z 10 40
200862 -    l-/------/
200863 -    linecnt 2 0
200864 -    macro 19
200865 -    subcnt 1 @2
200866 -    -if @1 < 6 -goto ajmp
200868 -        ..
200869 -       Use same scheme except look for underlined headlines, and if
200870 -       there is an underlined headline within 5 lines of the target
200871 -       line, then jump the code that enters an anchor. ref SDS 0 N77K
200873 -  ..
200874 - Line 1040, ref OF 1 OL5N, -label cnlfin in 0702051
200875 -
200876 -    loc_cur 0 6
200877 -    chrcnt 1 0
200878 -    -if @1 != 45 -goto nilnf
200879 -
200880 -        See if this is an indented line, and if not go process the para
200881 -        with macro 49 to add an anchor. ref SDS 0 LQ60
200883 -     ..
200884 -    -label cnlfin
200885 -    down
200886 -    chrcnt 1 0
200887 -    -if @1 = 45 -goto cnlfin
200888 -
200889 -        It is an indented line number field, so find the top of the
200890 -        indented field.
200892 -     ..
200893 -    loc_cur 0 10
200894 -    setlen 1 0
200895 -    -if @1 < 10 macro 987
200896 -
200897 -        At top of indented line number field, put the cursor on column
200898 -        10, and if the line is blank, enter an anchor.
200900 -         ..
200901 -        Note that this process messes up the anchor counting op a
200902 -        little just because it is not part of macro 49 where the
200903 -        anchors are counted to restore the relative position of the
200904 -        cursor after the save op.  This means that when an anchor is
200905 -        added for an indented line number field above the cursor
200906 -        location, then the cursor will not restored to the same
200907 -        relative postition.  This is a pretty rare event, so will not
200908 -        invest time to integrate this feature with the next group of
200909 -        code that tracks the other anchors added with macro 49.
200910 -
200912 -  ..
200913 - Anchor Added and Count Them to Restore SDS Record at End of Process
200914 -
200915 - Line 1080, ref OF 1 RT9I, -label nilnf in 0702051
200916 -
200917 -    This code callc macro 49 to add a line and and an anchor, per
200918 -    planning above. ref SDS 0 KO4P
200920 -     ..
200921 -    -label nilnf
200922 -    setcnt 153 0
200924 -        ..
200925 -       Reset the flag for determining if a line is added to the file
200926 -       for adding an anchor.
200928 -     ..
200929 -    setcnt 74 4183
200930 -    macro 49
200931 -    setcnt 74 0
200933 -        ..
200934 -       Set a flag and call macro 49 to create an anchor and then exit
200935 -       without justifying the para.  Macro 49 calls macro 987 to create
200936 -       anchors, and adds a new line to the file for placing anchors
200937 -       above the text, rather than placing the anchor on an existing
200938 -       line, except for outline text in the editor, because HTML needs
200939 -       these anchors inline for the ordered list command to work
200940 -       consistently.  When macro 49 adds a line to the file for adding
200941 -       an anchor it also does linecnt 153 0 to save the line number.
200942 -       Since counter 153 0 is set before calling macro 49, if 153 > 0,
200943 -       then it means an anchor was added on a new line added to the
200944 -       file, per planning above. ref SDS 0 TG7N
200946 -        ..
200947 -       Per above, anchors are added separately for indented line number
200948 -       fields, and so are not included in this process. ref SDS 0 Y357
200950 -     ..
200951 -    -if @153 > @70 -goto ajmp
200952 -    -if @153 > 0 addcnt 71 1
200954 -        ..
200955 -       If the anchor line is below (i.e., greater) than the line number
200956 -       where the cursor was located when F2 was pressed to save the
200957 -       records, than any lines added do not impact the relative
200958 -       position of the file, and so the code jumps ahead.  However, if
200959 -       an anchor is added above the line where the cursor was located
200960 -       when F2 was pressed, and if a line was added for the anchor,
200961 -       rather than placing the anchor on an existing line, then macro
200962 -       49 runs linecnt 153 0, per above, ref SDS 0 TG7N, and so in that
200963 -       case there will be a condition 153 > 0, so increment counter 71
200964 -       to save total number of lines added above the cursor line.  The
200965 -       value in counter 71 is passed from the dose op, ref SDS 0 S85K,
200966 -       to the original setting for processing by macro 142 to read the
200967 -       number of lines added, and then adds that amount to counter 65
200968 -       to restore the original relative position to the User when macro
200969 -       23 is called.
200971 -  ..
200972 - Line 980, ref OF 1 0W8H, -label ajmp in 0702051
200973 -
200974 -    -label ajmp
200975 -    -gosub nspace
200976 -    -goto lnLp1
200977 -
200978 -       Code calls subroutine that jumps to end of para, ref SDS 0 P58N,
200979 -       and then goes and looks for another para to process. ref SDS 0
200980 -       XK9N
200981 -
200982 -
200983 -
200985 -  ..
200986 - Line 600, ref OF 1 PF5N, -label nspace in 0702051
200987 -
200988 -    -label nspace
200989 -    setlen 171 0
200990 -    -if @171 > 8 -goto upLin
200991 -    down
200992 -    -return
200993 -    -label upLin
200994 -    up
200995 -    -goto nspace
200997 -        ..
200998 -       Standard subroutine to scroll up to bottom of current para and
200999 -       then return to the process that called it.
201000 -
201001 -
201003 -  ..
201004 - Line 1040, ref OF 1 LL5K, -label lpaTAn in 0702051
201005 -
201006 -    -label lpaTAn
201007 -    z 1 40
201008 -    l /</
201009 -    -if @0 > 0 -goto ppntrs
201010 -    addcnt 128 1
201012 -        ..
201013 -       During this op to verify anchors are unique, count the number
201014 -       of total anchors after adding anchors for headlines, jj lines
201015 -       and on every para in counter 128.
201016 -
201018 -  ..
201019 - Line 1110, ref OF 1 QPYS, -label ppntrs in 0702051
201020 -
201021 -    top
201022 -    macro 85
201023 -    loc_cur 0 32
201024 -    inscnt 71 0
201026 -        ..
201027 -       When anchors are added by macro 49 an additional line is created
201028 -       to place anchors on a blank line above the text.  Macro 49
201029 -       captured the line number with linecnt 153 0, when a line is
201030 -       added for adding an anchor, per above, ref SDS 0 TG7N, and if
201031 -       this line is above the cursor line then the code in this macro
201032 -       0702051 increments counter 71, per above. ref SDS 0 H58G  This
201033 -       code now enters the value in counter 153 to a field on line 1
201034 -       column 33 in front of the Diary/Schedule field, in order to pass
201035 -       the number of lines added to the file through to the original
201036 -       processing op in macro 142 that controls the "save" process.
201037 -       This field is read when the record is loaded back into memory by
201038 -       macro 142 after processing by 0702051 ends, and value is added
201039 -       to counter 65 that establishes the line for restoring the
201040 -       original relative file postion by calling macro 23, per below.
201041 -       ref SDS 0 X33L
201042 -
201044 -  ..
201045 - 000008  Save Read # of Anchors Added and Adjust to Restore Record
201046 -
201047 - Line 2470, ref OF 6 138M, -entry 142 in 000008 about 50 lines below
201048 -
201049 -    macro 0
201050 -
201051 -       Macro 0 updates the line numbers and calls macro 22 to save the
201052 -       cursor location.  Macro 22 saves the line number on screen line
201053 -       3 for restoring the cursor to its initial position using the
201054 -       getscrn command.  So macro 0 saves the cursor position and
201055 -       counter 65 has the line number to be incremented after adding
201056 -       anchors.
201058 -     ..
201059 -    linecnt 1 0
201060 -    top
201061 -    loc_cur 4 32
201062 -    inscnt 1 0
201063 -
201064 -       Linecnt 1 0 saves the actual line number of the cursor and is
201065 -       entered on file line 2, which is always blank in an SDS record.
201066 -       This process passes the cursor line number through the dose op
201067 -       so the cursor line number can be read by macro file 0702051 to
201068 -       add up the number of lines added to the record above the cursor
201069 -       line for entering anchors that are placed on new lines added to
201070 -       the file by macro 49, per above. ref SDS 0 6E4H
201072 -        ..
201073 -       counter 1, then counter 65 must be incremented in order to
201074 -       maintain the same relative file postition after macro 0702051
201075 -       completes processing the record. The value for the line number
201076 -       is read by 0702051 immediatley after it is called, per above.
201077 -       ref SDS 0 BU5I
201078 -
201080 -  ..
201081 - Line 2520, ref OF 6 3A6O, -entry 142 in 000008 about 90 lines below
201082 -
201083 -    top
201084 -    loc_cur 3 32
201085 -    strcnt 1 3
201086 -    addcnt 65 @1
201087 -    ins_text/    /
201089 -        ..
201090 -       Get number of anchors added to file by save op, and add that to
201091 -       counter 65 which is the line number used in macro 23 to restore
201092 -       the original condition of the file.
201093 -
201094 -
201095 -
201096 -
201097 -
201098 -
201099 -
201100 -
201101 -
201102 -