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


S U M M A R Y


DIARY: August 5, 2000 11:57 AM Saturday; Rod Welch

Fix File List routine for y2k.

1...Summary/Objective
2...0608 Fix File Listing for Y2K
3...000008 Enter -entryo 150 Open File in List with Long Path and Name
4...000002 Macro 521 Open File Modify to Use Long Strings
5...00002 Macro 58 F1 F3 Add Directory Maintenance Update 0 File
6...04901 Dir Maintenance Update 0 File
7...04703 DMS Open File Listed in 0 and Switch Between 00 and 0A


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

CONTACTS 
0201 - Intel Corporation                    408 765 8080
020101 - Mr. Morris E. Jones; Business Unit Manager =408 545 9521
020102 - morris.jones@intel.com
020103 - Cable Network Operation

SUBJECTS
File Access menu, 0608, 06081
File List F1 F3 Macro 0608 Year Selection Op

0604 -    ..
0605 - Summary/Objective
0606 -
060601 - Follow up ref SDS 18 0001
060602 -
060603 - From today and the next few days, changed DMS 0 file maintenance to
060604 - run from File Access in Medit, macro 58, ref SDS 0 9594, rather than
060605 - simply from Subject Index, because this takes less memory.  Required
060606 - changes to 04901. ref SDS 0 5623
060607 -
060608 - Changed method of switching between 0, 00 and 0A, so it all works with
060609 - F1 F2.  Previously opening 0 was done with F1 F4, and this was hard to
060610 - remember.  Now, we just scroll between the stuff. ref SDS 0 4641
060611 -
060612 - Fixed problems with opening files using Enter from 0, including using
060613 - F1 Enter to open the development version in 01 04. ref SDS 0 4732
060614 -
060615 -
060616 -
060617 -
060618 -
0607 -
0608 -
0609 - Progress
0610 -
061001 -  ..
061002 - 0608  Fix File Listing for Y2K
061003 -
061004 - Line, ref OF 3 0072, -label sortu, this is where list of files is
061005 - generated.
061006 -
061007 - Morris' sf.ext command is listing the year 2000 as 100, instead of
061008 - 00.
061009 -
061010 -     Called him.  He can fix it.  Zipped the directory for the code
061011 -     in...
061012 -
061013 -              c: 00 11
061014 -
061015 -       [On 000812 called Morris. ref SDS 20 0001
061016 -
061017 -       [On 000826 sent follow up letter. ref SDS 22 0001
061018 -
061019 -       [On 001001 Morris lost code, transferred to his computer again
061020 -       during a visit. ref SDS 23 WW7L
061021 -
061022 - Line 320, ref OF 3 6532, -label sWeb, about 40 lines below, added aw,
061023 - to put the cursor on the first position of the filename.
061024 -
061025 -
061026 -  ..
061027 - 000008  Enter -entryo 150 Open File in List with Long Path and Name
061028 -
061029 - Line 3360, ref OF 5 5703, -label Startxx this is where code executes
061030 - when Enter or double click occurs, to open a file in the list.
061031 -
061032 - Macro 1182 is used starting at counter 180 in order to save any
061033 - strings from F1 F3 initiation process.
061034 -
061035 - This only handles 40 char
061036 -
061037 - Today, we encountered a situation where the filename is longer, so
061038 - added code to use the long string char read macro.
061039 -
061040 - Line 3390, ref OF 5 1885, -label goITn if the path and filename are
061041 - longer than 40 char, jump to another location.
061042 -
061043 - Line 3410, ref OF 5 3318, -label c&Pjb this code calls macro 1188
061044 - which sets 86 1 so char read begins from 1.
061045 -
061046 - Add flag setgbl 114 1141 used in macro 521 so it will use macro 1189
061047 - instead of 1181 to enter the filename string.
061048 -
061049 -
061050 - 000002  Macro 521 Open File Modify to Use Long Strings
061051 -
061052 - Line 580, ref OF 4 6798, -entry 521 added conditional 114 1141 set in
061053 - 000008, per above, and jump to code that uses long string char enter.
061054 -
061055 - Line 610, ref OF 4 4332, -label cPYf added call to macro 1189 to
061056 - enter a long string path and filename.
061057 -
061058 -
061059 -
061060 -
061061 -
0611 -

SUBJECTS
Update "0" file, SI F1 F7 - 910414

0804 -
080401 -  ..
080402 - 00002  Macro 58 F1 F3 Add Directory Maintenance Update 0 File
080403 -
080404 - Line 1350, ref OF 4 0673
080405 -
080406 - Line 1460, ref OF 4 6561, -label maintDR flag setcnt 107 444 for
080407 - directory maintenance from File Access menu.
080408 -
080409 - Line 1530, ref OF 4 1890, -label nmainD, about 60 lines below,
080410 - conditional jumps code that gets list of files.
080411 -
080412 - Line 1560, ref OF 4 1050, -label drMain about 10 lines below, after
080413 -
080414 -
080415 -  ..
080416 - 04901  Dir Maintenance Update 0 File
080417 -
080418 - Line 220, ref OF 2 1909, -label cB_hDr post filename from top of file
080419 - to save 0 file that has been processed.
080420 -
080421 - Line 400, ref OF 2 7462, -label funX, add code to avoid opening
080422 - subject index, sndx, and instead return to "fun".
080423 -
080424 - Line 440, ref OF 2 3852, -label meditS new label for running 04901
080425 - dir maintenance op from Medit File Access.
080426 -
080427 - Line 460, ref OF 2 3588, -label meditS, about 20 lines below, jump
080428 - code in 04901 that reads the dir string, because this has already
080429 - been done in macro 58 for file access.
080430 -
080431 - Line 480, ref OF 2 1632, -label meditS, about 50 lines below, for op
080432 - that starts in file access, macro 58, switch char read macro to start
080433 - from 180 instead of 1, because this has alread been read by File
080434 - Access in macro 58. ref OF 4 5141
080435 -
080436 - Line 590, ref OF 2 1259, -label cB_oVer about 80 lines below, we seem
080437 - to have a much different structure for the DOS dir command.
080438 -
080439 -     For some reason dir from within Medit lists files similar to prior
080440 -     format, rather than new w2k format that lists the year first, then
080441 -     the filename.  However, when dir is used from DOS the listing is
080442 -     nearly the opposite.
080443 -
080444 -     Had to had to change from removing dashes to removing slashes to
080445 -     segment day, month and year.
080446 -
080447 - Line 940, ref OF 2 5372, -label nocoln, add code to avoid opening
080448 - subject index, sndx, and instead return to "fun".
080449 -
080450 -
080451 -
080452 -
080453 -
0805 -

SUBJECTS
Profile 0 File Data Entry Functions and Procedures, 04703
Delete file from "0" file, 032S08
Switch between 0 0A and 00, 032F02, F1 F2
Enter Open File Listed in 0 File, 04703
F1 Enter Open File Listed in 0 File from 01 04 Dir

1308 -
130801 -  ..
130802 - 04703  DMS Open File Listed in 0 and Switch Between 00 and 0A
130803 -
130804 - Line 210, ref OF 1 3968, -label bTpf031 add code to position cursor
130805 - on the first description column of the first file.  This is only done
130806 - when the file is initially opened...
130807 -
130808 -                  loc_cur 8 38
130809 -
130810 - This only occurs once, based on reading "d" in File Access menu when
130811 - 0 file update op begins.
130812 -
130813 -
130814 - Changed code today, so we have just a single main flag 107 for
130815 - following stuff...
130816 -
130817 -         Enter opens file in curent directory........... 107 = 1
130818 -         F1 Shift F8 delete file on current line........ 107 = 2
130819 -         F1 F2 Scroll between 0, 00, 0A................. 107 = 3
130820 -         F1 Enter opens file in c: 01 04................ 107 = 4
130821 -
130822 - Line 240, ref OF 1 1215, -label bTpf031 this is where Enter is called
130823 - in profile level one to open a file listed in 0 files.
130824 -
130825 - Line 670, ref OF 1 5874, -label bT018 flag setcnt 112 0 to open a
130826 - file in the current directory, rather than delete the file.
130827 -
130828 -     Setcnt 107 1, which is the main function.
130829 - ..
130830 - Line 480, ref OF 1 5610, -label bTpf032, about 50 lines below,
130831 - this is where F1 Enter is called to open the file listed in 0 files,
130832 - but using the development directory, c: 01 04.
130833 -
130834 - Line 670, ref OF 1 3430, -label bT0xx code for F1 Enter to open a
130835 - macro file in the development directory c: 01 04.
130836 -
130837 -     Setcnt 107 4, which is the main function.
130838 -
130839 - ..
130840 - Line 260, ref OF 1 0972, -label bT018, about 30 lines below
130841 - calls F1 F2 to switch between alternate file list formats.
130842 -
130843 - Line 330, ref OF 1 5139, -label K146c code called by F1 F2 to switch
130844 - between alternate directory listing formats.
130845 -
130846 -     Setcnt 107 3, which is the main function.
130847 -
130848 - Line 400, ref OF 1 3780, -label K146c about 80 lines below, changed
130849 - the code to use 04703 instead of macro 531 or whatever we were using
130850 - before.
130851 -
130852 - Line 650, ref OF 1 1760, -label no0104 modify today so we can scroll
130853 - between 0, 0A and 00 using F1 F2.
130854 -
130855 - Line 270, ref OF 1 1170, -label bTpf032 about 40 lines below, call F1
130856 - Shift F8 to delete current file.
130857 -
130858 - Line 470, ref OF 1 2560, -label bT018d execute code called by F1 Shift
130859 - F8 to delete file and entry in 0 file.
130860 -
130861 -     Setcnt 107 2
130862 -
130863 -
130864 -
130865 -
130866 -
130867 -
130868 -
1309 -
Distribution. . . . See "CONTACTS"