THE WELCH COMPANY
440 Davis Court #1602
San Francisco, CA 94111-2496
415 781 5700
rodwelch@pacbell.net
S U M M A R Y
DIARY: June 30, 2005 12:54 PM Thursday;
Rod Welch
SDS enter account from Subject Index to closest Control Field.
1...Summary/Objective
2...Acronyms Integrate Posting Subjects with Creating New Accounts
3...Experiment Add Support Enter Subject Account Outside of Control Field
4...Enter Subject Account without being in Control Field
..............
Click here to comment!
CONTACTS
SUBJECTS
Enter Account Code from Subject Index to Control Field without Havin
1203 -
1203 - ..
1204 - Summary/Objective
1205 -
120501 - Follow up ref SDS 1 P15M
120502 -
120503 - Added feature to enter a subject account to a Control Field when the
120504 - cursor is not pre-positioned in the Control Field. Gary has ideas for
120505 - applying this with the acronymn managemnt system.
120506 -
120507 -
120508 -
120509 -
120511 - ..
1206 -
1207 -
1208 - Discussion
1209 -
120901 - Acronyms Integrate Posting Subjects with Creating New Accounts
120902 - Experiment Add Support Enter Subject Account Outside of Control Field
120903 -
120904 - Gary called this afternoon and proposed changing procedures for
120905 - entering an account code from the Subject Index into a Control Field
120906 - of an SDS record segment. He expects this change will provide a
120907 - faster, easier operation using F1 F1 F6 to manage acronyms by enabling
120908 - people to assign subjects to a Control Field from within the Subject
120909 - Index, and when the cursor is not pre-positioned on a Control Field.
120910 - Gary has other applications in mind, and so wants this change to
120911 - experiment.
120913 - ..
120914 - Use Cases...
120915 -
120916 - 1. User opens Subject Index from Control Field.
120917 -
120918 - This is existing capability so there is no change.
120920 - ..
120921 - 2. Open Subject Index from a text area of a record segment.
120922 -
120923 - Previously, if a subject was assigned from within the
120924 - Subject Index, the program returned an error message. Now
120925 - the program will find the Control Field above the cursor,
120926 - add a new line at the bottom of the Control Field, the
120927 - subject selected by the User will be entered, and the
120928 - original file and cursor position will be restored, making
120929 - the operation transparent to the user.
120931 - ..
120932 - This may support Gary's use of acronyms by integrating the
120933 - F1 F1 F6 process of creating new acronyms in the Subject
120934 - Index, and then assigning the account to a Control Field.
120936 - ..
120937 - 3. Open Subject Index above the 1st Control Field in the
120938 - record.
120939 -
120940 - a. If the cursor is on a document log entry, then a
120941 - subject account will be assigned to for the following
120942 - conditions...
120944 - ..
120945 - 1) Documents Received Today (DRT)
120947 - ..
120948 - 2) Documents Issued Today (DIT)
120950 - ..
120951 - 3) Publications (OF)
120953 - ..
120954 - b. If the cursor is on any other type of line above the
120955 - first Control Field, then a subject will be entered at
120956 - the bottom of the first Control Field, as explained
120957 - above. ref SDS 0 RW8H
120959 - ..
120960 - 4. User opens Function Index will retain original capability;
120961 - if cursor is not on a Control Field, and the User executes
120962 - a function in the Subject Index to enter a Function
120963 - account code, then an error message will be returned.
120965 - ..
120966 - This applies the principle that a function is exercised
120967 - against a subject, and so requires specific assignment.
120968 -
120969 -
120970 -
120971 -
120972 -
120973 -
120974 -
120975 -
1210 -
SUBJECTS
Enter Account Code from Subject Index to Control Field without Havin
1403 -
140401 - ..
140402 - Enter Subject Account without being in Control Field
140403 -
140404 - Follow up ref SDS 1 N14O
140406 - ..
140407 - Line 1400, ref OF 1 S35M, -label anfisR in 035012
140408 -
140409 - This is where the code has returned from the Subject Index, and
140410 - begins to implement what was requested.
140411 -
140412 - Debug test here.
140413 -
140415 - ..
140416 - Line 2520, ref OF 1 IM5N, -label bMsPEc in 035012
140417 -
140418 - This is the code that enters a subject account to a Control Field.
140419 -
140420 -
140422 - ..
140423 - Line 2030, ref OF 1 LK7I, -label funop1 in 035012 about 60 lines
140424 - below
140425 -
140426 - of 0
140427 - loc_cur 0 1
140428 - chrcnt 1 0
140429 - rel_cur 0 1
140430 - chrcnt 2 0
140431 - rel_cur 0 1
140432 - chrcnt 3 0
140433 - rel_cur 0 1
140434 - chrcnt 4 0
140435 -
140436 - Added additional counters 3 and 4 to test when cursor is in a
140437 - text area, or above the first Control Field.
140438 -
140440 - ..
140441 - Line 2060, ref OF 1 887G, -label funop1 in 035012 about 90 lines
140442 - below
140443 -
140444 - -if @1 = 48 -if @2 = 51 -if @3 = 48 -if @4 > 49 setcnt 122 1
140445 - -if @1 = 48 -if @2 = 51 -if @3 = 48 -if @4 = 49 setcnt 122 3
140446 - -if @1 = 48 -if @2 < 51 setcnt 122 3
140447 - -if @122 != 1 -if @122 != 3 -if @3 = 32 setcnt 122 2
140448 - -if @122 != 1 -if @122 != 3 -if @3 > 32 setcnt 122 4
140449 -
140450 - Changed control and added counter 122 3 and 4 to identify when
140451 - the cursor is below a Control Field, or above the 1st Control
140452 - Field.
140453 -
140454 -
140455 -
140456 - -if @127 = 836 -goto nescf
140457 - -if @122 = 1 -goto dllop
140458 - -if @122 = 3 -goto ftocfes
140459 - -goto 1or2nsw
140460 - -label ftocfes
140461 - z 1 3
140462 - l /04 /
140463 - -goto sicfea
140464 -
140465 -
140466 -
140467 -
140468 - -label 1or2nsw
140469 - immed /
140470 - -if @122 = 2 -goto sicfea
140471 - z 4 4
140472 - l-/-/
140473 - -label sicfea
140474 - setcnt 122 2
140475 - loc_cur 3 0
140476 - z 3 3
140477 - nb
140478 - linecnt 15 0
140479 - z 6 6
140480 - l-/-/
140481 - linecnt 16 0
140482 - -goto curcf
140484 - ..
140485 - This means user opened Subject Index not from Contro Field, but
140486 - used for example F1 F1 F6 to open the acronym list, or opened
140487 - the Subject Index with the m system. In the Subject Index, the
140488 - user pressed Ente or double clicked to load a subject into an
140489 - SDS reco so this code enters the account to the bottom of the
140490 - Control Field above the cursor location, per Gary's request on
140491 - 050630.
140492 -
140493 -
140494 -
140495 -
140496 -
140497 -
140498 -
140499 -
140500 -
140501 -
140502 -
140503 -
140504 -
140505 -
140506 -
140507 -
140508 -
140509 -
1406 -