CONTACTS 

SUBJECTS
Format Structure Provide Flexible Consistency Line Numbers   cord Seg
Format Line Numbers SDS Records Flexible Structure Knowledge Space Ha
Follow Up Format Fails for Summary/Objective When There is an Anchor
Format Reference Fields Verify Correct Structure During F2 Save Op wi
Control Field Header Line Numbers above Control Fields for Processing

0707 -
0707 -    ..
0708 - Summary/Objective
0709 -
070901 - Follow up ref SDS 1 L65G,
070902 -
070903 - Wound up working on user interface to support a variety of use cases
070904 - that corrupt the SDS record format. ref SDS 0 OQ8I  In many cases, the
070905 - program will run under these conditions, but certain features don't
070906 - work correctly, with the result that users eventually encounter a
070907 - failure, but there is no feedback to enable recovery.  New code today
070908 - investigates the foramt and fixes small mistakes.
070909 -
070910 -
070912 -  ..
0710 -
0711 -
0712 - Progress
0713 -
071301 - 0702051 SDS Format Flexible Structure for Control Fields
071302 -
071303 - Follow up ref SDS 2 BN3O.
071304 -
071305 - Work on the action item system elevates requirements to format SDS
071306 - records in order to prepare reports consistently.   Flexible structure
071307 - provides variability for creativity, explained on 890523, which can
071308 - occur within limits for reporting that also aids creativity.  Certain
071309 - minor formatting that is incidental to user's freedom of analysis can
071310 - be automatically checked and corrected with F2 for save.
071312 -  ..
071313 - Background on 031107 lists current support in 0702051 that help users
071314 - maintain SDS record format. ref SDS 3 6H6K  On 031017 updated support
071315 - for confidential information in SDS records. ref SDS 2 BN3O
071317 -  ..
071318 - Decided today to use 0702051 called to save a record with F2 to
071319 - construct the format...
071320 -
071321 -    1.  Control field header and the lines above. ref SDS 0 UR8J
071322 -
071323 -    2.  Control field subject description format and the headlines and
071324 -        narrative in the record segment. ref SDS 0 MK8O
071326 -         ..
071327 -    3.  SummaryObjective and the Follow up line. ref SDS 0 4X96
071328 -
071329 -        This improves prior work.
071331 -         ..
071332 -    4.  Bottom of the record make a space and 4 place number.
071333 -        ref SDS 0 4X76
071334 -
071336 -  ..
071337 - Line 100, ref OF 1 3504, in 0702051
071338 -
071339 -    top
071340 -    errorcnt 0 0
071341 -    z 1 4
071342 -    l/0301/
071343 -
071344 -        Find bottom of 1st record segment by locating the top of the
071345 -        Reference fiels, line 0301.  Jump to top of References where
071346 -        the top of the first control field occurs.
071347 -
071349 -  ..
071350 - Line 150, ref OF 1 UW6H, -label lprfcf in 0702051
071351 -
071352 -    -label lprfcf
071353 -    z 4 4
071354 -    l/-/
071355 -    -if @0 > 0 -goto sObJ........................ ref SDS 0 4X76
071356 -
071357 -        New routine to process each control field.  z 4 4 and l /-/
071358 -        finds the first 3 place line number which is where control
071359 -        fields begin.  -if @0 > 0 -goto sObJ shows when all control
071360 -        fields have been processed to fix the bottom of the line number
071361 -        field. ref SDS 0 4X76
071363 -     ..
071364 -    down
071365 -    immed r
071366 -    up
071367 -    ins_text !0306 -    Time Milg Emply T  Bill Function  Special Subject/File
071368 -    down
071369 -    macro 641
071370 -    ins_text !0306 -   !
071371 -
071372 -        Scroll down to the line above the control field, and repeat the
071373 -        line then scroll up to line just repeated and enter the
071374 -        standard control field header in case it gets deleted some how
071375 -        or another.  Move down to the new line just created with repeat
071376 -        command.  Macro 641 clears the content so the standard 4 place
071377 -        line number can be created, regardless of what is already
071378 -        there, which is save on the repeated line.
071380 -     ..
071381 -    down
071382 -    setlen 1 0
071383 -    -if @1 < 7 immed d
071384 -    -if @1 < 10 -goto lnOK
071385 -
071386 -        There are now two 4 place numbers above every control field
071387 -        for a consistent format.
071389 -     ..
071390 -    loc_cur 0 10
071391 -    immed r
071392 -    up
071393 -    macro 641
071394 -
071395 -        Ensure a blank line on the 6 place number above the 4 place
071396 -        number.
071397 -
071398 -    -label lnOK
071399 -    l /-/
071400 -    z 3 3
071401 -    nb
071402 -    loc_cur 3 1
071403 -
071404 -        Jump back to the top of the current control field again, then
071405 -        the z 3 3 command enables a nb jump to the bottom of the
071406 -        control field. loc_cur 3 1 positions cursor to continue after
071407 -        the next command finds the next control field to repeat
071408 -        process.
071409 -
071410 -
071411 -
071412 -
071413 -
0715 -

SUBJECTS
Headline on 1st Line below Control Field Underline for Subject Descript

0803 -
080401 -  ..
080402 - Headlines Record Segment and Subject Descriptions Conform Format
080403 - Descriptions Conform Format to Begin Narrative for Record Segment
080404 - Record Segment Conform Format Subject Descriptions and Begin Narrative
080405 -
080406 - Line 180, ref OF 1 MK6L, -label lnOK in 0702051
080407 -
080408 -    addcnt 10 1
080409 -    -if @10 = 1 -goto lprfcf......................... ref SDS 0 4W5K
080410 -    loc_cur 3 1
080411 -    z 5 5
080412 -    nb
080413 -    setcnt 9 0
080414 -
080415 -        Switch jumps to summary objective for 1st control field, and on
080416 -        subsequent passes, z 5 5 jumps from top of control field to the
080417 -        beginning of the narrative below the control field, in order to
080418 -        verify and conform formatting.  setcnt 9 0 sets up control for
080419 -        the process.
080420 -
080422 -  ..
080423 - Line 220, ref OF 1 4V3I, -label latlp in 0702051
080424 -
080425 -    -label latlp
080426 -    setlen 1 0
080427 -    -if @1 > 8 -goto d5L
080428 -    -if @9 > 5 -goto d5L
080429 -    addcnt 9 1
080430 -    immed d
080431 -    -goto latlp
080432 -
080433 -        Add new routine that moves headlines and narrative to the top
080434 -        of the narrative field below subject descriptions for the
080435 -        control field.
080436 -
080438 -  ..
080439 - Line 230, ref OF 1 N24N, -label d5L in 0702051
080440 -
080441 -    -label d5L
080442 -    down
080443 -    loc_cur 3 8
080444 -    setcnt 9 0
080445 -    ...
080446 -    ...
080447 -    ...
080448 -    -goto lprfcf................................ ref SDS 0 4W5K
080449 -
080450 -        This is a lot of new code that conforms the spacing and the
080451 -        underline below the subject control field.  There is a single 4
080452 -        place blank line below the control field subject description
080453 -        underline. The code that enters subjects places and underline
080454 -        below the subject descriptions, but people can delete this
080455 -        accidentlyally or when they don't understand this is needed.
080457 -         ..
080458 -        If the user accidentally makes too many lines, or deletes line
080459 -        or deletes the underline, these conditions are corrected.
080460 -
080461 -
080462 -
080463 -
080464 -
0805 -

SUBJECTS
Line Numbers at End of the Record Provide Blank Line and 4 Place Number

0903 -
090401 -     ..
090402 -    Line Numbers Bottom of Record Conform Standard SDS Format
090403 -
090404 -
090405 - Line 190, ref OF 1 0B4N, -label sObJ in 0702051
090406 -
090407 -    -label sObJ
090408 -    setlen 1 0
090409 -    -if @1 = 0 down
090410 -    -if @1 > 1 immed a
090411 -    ins_text !2200 -       !
090412 -
090413 -        After processing all Control Fields, processing is at the
090414 -        bottom of the record, so verify and conform the format to
090415 -        leave a blank line and a 4 place number.
090416 -
090417 -
090418 -
090419 -
0905 -

SUBJECTS
SummaryObjective and 0001 Foll Up Lines Consistent Format

1003 -
100401 -     ..
100402 -    SummaryObje Anchor and Follow Up Establish Standard Format
100403 -
100404 -
100405 - Line 210, ref OF 1 UJ6J, -label sObJ in 0702051 about 30 lines below
100406 -
100407 -    setcnt 0 0
100408 -    line 1
100409 -    z 1 3
100410 -    l /04 /
100411 -    loc_cur 3 10
100412 -    z 5 6
100413 -    l/01/
100414 -    z 10 60
100415 -    fr /[0001 Follow up/
100416 -
100417 -
100418 -
100419 -
100421 -  ..
100422 - Line 940, ref OF 1 P45J, -label hdgLp1 in 0702051
100424 -     ..
100425 -    -label hdgLp1
100426 -    errorcnt 0 0
100427 -    z 10 50
100428 -    l /------/
100429 -    -if @0 > 0 -goto blbfu
100430 -    -gosub anchor.................................. ref SDS 0 9E3H
100431 -
100432 -
100433 -
100434 -
100435 -
100436 -
100437 -
100438 -
100440 -  ..
100441 -
100442 -
100443 -
100444 -
100445 -
100446 -
100447 -
100448 -
100449 -
100450 -
100451 -
100452 -
100453 -
100454 -
100455 -
100456 -
100457 -
100458 -
100459 -
100460 -
100461 -
100462 -
100463 -
100464 -
100465 -
100466 -
100467 -
100468 -
1005 -