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: October 9, 1992 10:13 PM Friday; Rod Welch

Develop Executive Services integration with SDS initialization scheme.

1...Summary/Objective
2...Mouse
.....Had to create a special loop to fully restore the cursor to its
3...Delete Entries in Group Manager - Alt F8


..............
Click here to comment!

CONTACTS 

SUBJECTS
SDS, New User setup ideas
User interface, front end, 047024
Executive Services, 910121
Corporate

0806 -
0806 -    ..
0807 - Summary/Objective
0808 -
080801 - Follow up ref SDS 14 0000.
080802 -
080803 - Developed further scope for and distinctions between Corporate SDS and
080804 - Executive Services.  Continued coding to implement.
080806 -  ..
080807 - Changed name of 047027 file from Group Interface, to Group Manager.
080808 - this supports the theme of integrated management.
080810 -  ..
080811 - Added feature to delete an entry in the Group Manager screen in
080812 - password mode.
080813 -
080814 -
080816 -  ..
0809 -
0810 -
0811 - Analysis
0812 -
081201 - Will make access to Group Manager screen, a feature available in
081202 - Executive Services which will permit editing a broader range of
081203 - records created by others. The Group Manager screen will also be
081204 - available in Corporate SDS, but only in password mode.  In Executive
081205 - SDS, passwords, are bypassed so the Executive or someone can manage
081206 - them.
081208 -  ..
081209 - Work today applies progress yesterday on 921008 developing multi-user
081210 - support. ref SDS 12 0001
081212 -  ..
081213 - Developed code in 04702 for loading Group member's schedules using
081214 - the mouse without password protection.
081216 -  ..
081217 - This will enable an executive or manager to "manage" access to SDS
081218 - records.
081220 -  ..
081221 - Mouse support will only be available in Executive services.
081223 -  ..
081224 - Or, I may make it available on a limited basis in the GI, but not to
081225 - launch other people's Schedules.
081227 -  ..
081228 - Made setcnt 73 3 the launch switch for Executive services, and modifed
081229 - code so only this setting permits use of the mouse.  Will let 73 0,
081230 - which opens the Group Interface, provide limited editing tools, if F4
081231 - is called.
081232 -
081233 -    Actually, decided not to do this.
081235 -     ..
081236 -    For now the only thing this thing can do is delete entries, with
081237 -    Alt F8, which is the basic delete key in other screens.  It will
081238 -    not provide access to passwords, but will delete passwords, which
081239 -    will in turn provide a method to change the password.
081240 -
081242 -  ..
0813 -
0814 -
0815 - 047020
0816 -
081601 - Line 480 - -label sfprfct this is the code that gets the information
081602 - from the Group Manager screen, and loads the specified User's
081603 - schedule.  It is called by the code at line 350.
081604 -
081606 -  ..
081607 - Should be able to call this code by the mouse in executive services.
081608 -
081610 -  ..
081611 - Mouse
081612 -
081613 - Line 170 - this is the flag for macro 230 to control the mouse in the
081614 - Group Manager during Executive Services session.  The mouse is not
081615 - active in conventional Group Manager mode.  Macro 230 permits the User
081616 - to launch a Schedule with the mouse.  This provides added value to
081617 - support price differentials.  It is part of providing strong tools to
081618 - manage access to the data base by configuring the Group Manager.
081620 -  ..
081621 - Line 300 - this is where mouse functionality is coded to fit the
081622 - needs of the Group Manager screen.
081624 -      ..
081625 -     Had to create a special loop to fully restore the cursor to its
081626 -     original position, when the mouse is used in non-mouse mode.  Took
081627 -     a long time this evening to discover how mouse effects getkey, and
081628 -     develop code to deal with it.
081629 -
081630 -     See also next record segment.
081632 -  ..
081633 - Line 175 - added code to return a message under normal Group Manager
081634 - mode in which mouse is not available.
081635 -
081636 -
081638 -  ..
081639 - Delete Entries in Group Manager - Alt F8
081640 -
081641 - Line 245 - developed code to delete an entry in the Group Interface
081642 - list while staying in getkey mode.  This is Alt F8.
081643 -
081644 -     This is a way for people to change a password.  It is tricky,
081645 -     because if everyone knows how to change the password, then there
081646 -     is no real security.  So we cannot generally support the this
081647 -     function.
081649 -      ..
081650 -     Executive Services permits direct access to the Group Manager for
081651 -     editing.
081652 -
081654 -  ..
0817 -
0818 -
0819 - 047026
0820 -
082001 - Line 140 - added code to execute a new button to launch Group
082002 - Interface screen by temporarily setting the switch in 04702 setcnt 73
082003 - 3.
082004 -
082005 -
082006 -
0821 -

SUBJECTS
SDS, Medit Commands
Getkey, 921006
Mouse Support

1005 -
100601 -  ..
100602 - Mouse returns 2 getkey numbers that execute consecutively:
100603 -
100604 -          1.  38912
100605 -          2.  38400
100606 -
100607 -   Code has to manage the first pass with 38912, and then immediately
100608 -   do the 2nd, 38400.
100609 -
100611 -  ..
100612 - An example is 04702 line 87 - 100.  Notice the code for the 2nd value
100613 - is immediately after the getkey command, because after the first one
100614 - is finished, the 2nd just needs to restore the cursor to the initial
100615 - position, and exit.  It has to occur before the savescr 15, so the
100616 - original position will be restored, and not the new position to which
100617 - the cursor has been moved by the mouse.
100619 -  ..
100620 - I discovered what was occurring with fred:
100621 -
100622 -      -label lp1
100623 -      debug 100
100624 -      getkey 1 0
100625 -      -if @1 = 38400 -goto out
100626 -      savescr 15
100627 -      loc_cur 23 40
100628 -      ins_cur @1 0
100629 -      rel_cur 0 1
100630 -      inscnt 1 0
100631 -      -goto lp1
100632 -      -label out
100633 -      getscr 15
100634 -      -exit
100635 -
100636 -
100637 -
100638 -
100639 -
100640 -
1007 -