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


S U M M A R Y


DIARY: July 22, 1999 05:00 PM Thursday; Rod Welch

Test SDS for Y2K solution.

1...Summary/Objective
2...000005 Macro 96 Failed on Y2K Issue
3...06112 Call Macro 120 Evaluate Report Period
4...061122 Configure Selection Specification for Y2K
5...000007 Macro 120 Subject Date Compare Failing
6...000008 Macro 145, 1451 - Sort and Adjust for Y2K
7...Doc Log Needs Separate Macro 1453 to Sort Doc Lists by Major Account
8...06021 Invoice system Adjust for Y2K
9...06113 Modify Doc Log Report for Y2K
10...061122 Selecting Records Between 1999 and 2000 as 99 - 00


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

CONTACTS 

SUBJECTS
Reports, Sorting
Y2000 Chronology Correction Macro
SDS Record Reference Lists

0605 -    ..
0606 - Summary/Objective
0607 -
060701 - Follow up ref SDS 13 0000, ref SDS 10 0000.
060702 -
060703 - Did more work fixing y2k problems.  Tests for Diary summary indicate
060704 - it is working.  Preliminary tests on the subject, contact and file
060705 - reports show they now seem to work.  We can do more testing the last
060706 - week or so before 2000.  Did not test Doc Log, because it takes more
060707 - time to set up the tests.
060708 -
060709 - Had to pull out more compiled code and make a new macro file to save
060710 - compiler space. ref SDS 0 8977
060711 -
060712 -     [On 000101 needed few more adjustments. ref SDS 14 0001]
060713 -
060714 -
060715 -
060716 -
0608 -
0609 -
0610 - Progress
0611 -
061101 - Used CPU 09, the notebook computer because we can recongigure it
061102 - easily, if something goes wrong.
061103 -
061104 - Fixed problem with automatic diary.  The code to compare begin and
061105 - ending year, was failing.  We probably don't really need this code,
061106 - but I fixed it. ref SDS 0 0977
061107 -
061108 - Subject report called by 06112 failed.
061109 -
061110 -     Macro 120 in 000007 failed on comparing beginning and ending year.
061111 -     Fixed this same way. ref SDS 0 7966
061112 -
061113 -     There are no records found
061114 -
061115 -       Year param was incorrect. ref SDS 0 1936
061116 -
061117 - 06113 has separate code from macro 120
061118 -
061119 -     Code to load spec begins at ref OF 5 2080
061120 -
061121 -     Code to adjust for Y2K at line 1750. ref OF 5 7140
061122 -
061123 - Line 2290, ref OF 5 5082, -label lp1451 added code to call new macro
061124 - 1453 to sort the doc log for y2k.
061125 -
061126 -
061127 -
061128 -
061129 -
0612 -

SUBJECTS
Opening Archived Schedule Summary, 920506
Diary Summary, F3

0805 -
080501 -  ..
080502 - 000005  Macro 96 Failed on Y2K Issue
080503 -
080504 - Follow up ref SDS 12 1584, ref SDS 11 0001.
080505 -
080506 - Got error message...
080507 -
080508 -     End date must be greater than or equal to beginning date.
080509 -
080510 -
080511 - Line 50, ref OF 7 1111, -entry 96 diary summary begins here.
080512 -
080513 - Line 1360, ref OF 7 5593, -label dC_c_mon, this has entered
080514 - following two dates for our test case...
080515 -
080516 -
080517 -                     991128 000126
080518 -
080519 -
080520 -    ...so far, this seems correct.
080521 -
080522 - We need the code to evaluate "00" as greater than 60.
080523 -
080524 -     101 = 1000
080525 -
080526 -  ..
080527 -
080528 - Line 680, ref OF 7 1155, -label dCend_Dt this is where the code
080529 - evaluates if end date is greater than beginning date.
080530 -
080531 - Added code to enable things to move along based on the year 2050 and
080532 - 1951
080533 -
080534 - This allows someone who might want to create records back to 1951 do
080535 - so, and the code will be good for the next 50 years, until 2050.
080536 -
080537 - Line 780, ref OF 7 3174, -label lp_wEek, about 50 lines below, when
080538 - the year rolls ahead from 99 to 100, change it to 0 for automatic
080539 - diary summary.
080540 -
080541 - Line 3070, ref OF 7 1410, -label dCl_gt changed code for entering the
080542 - year from inscnt 3 2 to enter a 0 if the year is less than 10, and and
080543 - then use inscnt 3 0, so we get 00 for the year 2000, and 04 for 2004,
080544 - etc.
080545 -
080546 -
080547 -
080548 -
080549 -
080550 -
0806 -

SUBJECTS
Subject, 06112
Macro 120 Process Report Spec
061122 Selection Command File, Configure
Supersort
Y2K Changes for Macro 120

1508 -
150801 -  ..
150802 - 06112   Call Macro 120 Evaluate Report Period
150803 - 061122  Configure Selection Specification for Y2K
150804 - 000007  Macro 120 Subject Date Compare Failing
150805 -
150806 - Follow up ref SDS 9 3079.
150807 -
150808 - Line 240, ref OF 3 6612, -label gbLs in 06112, calls macro 120 in
150809 - 000007 to execute report.
150810 -
150811 - Line 1290, ref OF 8 4538, -entry 120 in 000007, about 170 lines
150812 - below, specification is evaluated.
150813 -
150814 -  ..
150815 -
150816 - Line 1320, ref OF 8 0832, -entry 120 in 000007, about 220 lines below
150817 - has same y2k problem as macro 96 in 000005, above. ref SDS 0 0792
150818 - Used similar solution based on year 2050.
150819 -
150820 -     [On 010211 another problem with this code. ref SDS 15 PU5J
150821 -
150822 - Setcnt 112 30000 is used as flag that date op spans a year.  Added
150823 - following...
150824 -
150825 -           -if @103 < 50 -if @101 > 51 setcnt 112 30001
150826 -
150827 -  ..
150828 - Line 1860, ref OF 8 8112, -label cOlp_date in 000007 about 40 lines
150829 - below, change code for entering the year directory level so if it is
150830 - less than 10 the first position is 0 rather than blank.
150831 -
150832 -
150833 -     [On 010211 there was another adjustment needed at code when a
150834 -     report spans a year. ref SDS 15 PU5J
150835 -
150836 -  ..
150837 -
150838 - Line 2750, ref OF 8 3672, -entry 1206 in 000007 about 30 lines below,
150839 - adjust for y2K determining when a search periond exceeds 4 months.
150840 -
150841 -     [On 000101 modified y2k using macro 1451. ref SDS 14 4770]
150842 -
150843 -  ..
150844 -
150845 - Line 1380, ref OF 8 5833, -entry 120 in 000007 about 270 lines below,
150846 - y2k flag 112 30001 is applied to control call to -goto cOOKay
150847 -
150848 -
150849 -  ..
150850 -
150851 - Line 1400, ref OF 8 6290, -label cOOKay created call today to new
150852 - macro file...
150853 -
150854 -                         061122
150855 -
150856 -   ...using code from 000007 to save memory per below. ref SDS 0 8977
150857 -
150858 -
150859 - Line 1680, ref OF 8 3843, -entry 1205 in 000007 macro 120, this is
150860 - where compiled code continues.
150861 -
150862 -    ..
150863 - Modify specification for selection command file
150864 -
150865 - Line 220, ref OF 4 2679, -label SvE2, in new macro file 061122, added
150866 - code to modify record selection command file to handle y2k condition.
150867 -
150868 -  ..
150869 -
150870 - Line 1760, ref OF 8 2698, -label cOlp_date, about 70 lines below, in
150871 - 000007 112 = 30001 is applied to adjust the week number when a search
150872 - spec spans a year.
150873 -
150874 -
150875 - Line 1900, ref OF 8 6660, -label nOrst, 112 = 30000 is used again to
150876 - adjust week number.
150877 -
150878 -  ..
150879 -
150880 - Line 2180, ref OF 8 2652, -label cO21y3 in 000007 changed from macro
150881 - 301 that adds a blank line at the top, to macro 3, since macro 1451
150882 - called about 30 lines below -label nIntrnt, ref OF 8 3036, adds a
150883 - blank line at the top, per work on 990524. ref SDS 9 1920
150884 -
150885 - Line 2660, ref OF 8 3672, -entry 1206 in 000007, added same code to
150886 - evaluate when to use global counters for a report that is more than 4
150887 - months.
150888 -
150889 - Line 2330, ref OF 8 7526, -label nIntrnt in 000007 this is for full
150890 - reports to sort the output list.
150891 -
150892 - Gets global 147, so it can be used as a flag in 1451 to leave a blank
150893 - line at the top.
150894 -
150895 -
150896 -  ..
150897 -
150898 - Line 490, ref OF 3 6160, -label cO_s_W in 06112, added conditional to
150899 - fill the 10 pos, if year is less than 10, for y2k.
150900 -
150901 -
150902 - Line 880, ref OF 3 6384, -label cOlpO1 in 06112 for full report,
150903 - after the list of target records is created in 1y, macro 1451 sorts
150904 - the list.  Need to have a blank line at the top.
150905 -
150906 -
150907 - Line 970, ref OF 3 2352, -label cOlpO1a about 90 lines below, for
150908 - evaluating if a record is a current date, added adjustment to modify
150909 - the year param by subtracting 1900 prior to 2000, and subtracting 2000
150910 - after 1999.
150911 -
150912 -  ..
150913 - 000008  Macro 145, 1451 - Sort and Adjust for Y2K
150914 -
150915 - Follow up ref SDS 9 6823.
150916 -
150917 - Line 2380, ref OF 9 2592, -entry 1451 in 000008 needs to omit blank
150918 - lines for pointer files created by 04702 and 0702051, and it needs to
150919 - keep a blank line at the top for report operations in 06112, 06111,
150920 - etc.
150921 -
150922 - Line 2520, ref OF 9 2958, -label rrr8 evaluates each line moving
150923 - down the file.
150924 -
150925 - Was able to revise macro 1451 which is a sub-part of macro 145, to
150926 - include y2k sort operation.
150927 -
150928 - Line 2540, ref OF 9 8099, -label lp2q1 is a reverse evaluation that
150929 - sorts the year position below 5, as high.
150930 -
150931 -
150932 -  ..
150933 - Doc Log Needs Separate Macro 1453 to Sort Doc Lists by Major Account
150934 -
150935 - Line 2400, ref OF 9 1734, -entry 1453 is a sub-element of 1451 that
150936 - sorts groups of documents for y2k so 00 is below anything after 50.
150937 - This is called in 06113, per below. ref SDS 0 9482
150938 -
150939 -
150940 -
150941 -  ..
150942 - 06021  Invoice system Adjust for Y2K
150943 -
150944 - Line 450, ref OF 1 3000, -label cElp_date, about 60 lines below,
150945 - adjust code for 112 = 30000, per above. ref SDS 0 2236
150946 -
150947 -
150948 -
150949 -  ..
150950 - 06113  Modify Doc Log Report for Y2K
150951 -
150952 - Line 1410, ref OF 5 2080, -label contA begins record selection.
150953 -
150954 - Line 1470, ref OF 5 3082, -label contA, about 70 lines below,
150955 - conformed this code for y2K to macro 120 in 000007. ref SDS 0 2236
150956 -
150957 - Line 1610, ref OF 5 4644, -label contA, about 200 lines below, added
150958 - same conditional using new flag 112 30001, created for macro 120 in
150959 - 000007. ref SDS 0 3861
150960 -
150961 - Line 1670, ref OF 5 1404, -label cROKay this is the comparable code
150962 - for doc log report that is placed in new macro file 061122 today, per
150963 - above. ref SDS 0 2205
150964 -
150965 -  ..
150966 - Modify specification for selection command file
150967 -
150968 - Line 1670, ref OF 5 1404, -label cROKay this is where the selection
150969 - command file 1z1 is created.  The file is rendered null using macro
150970 - 301 instead of macro 3 used by the other selection operations in 06111
150971 - and 06112, because the 06113 operation enters the entire specification
150972 - all at once using cut and paste, and other operations use 2 steps.
150973 -
150974 - Line 1760, ref OF 5 7140, -label nPubl, this seems to be where
150975 - selection spec is saved to command file.
150976 -
150977 - Code is added comparable to work on 061122 for 06112 and 06113, per
150978 - above. ref SDS 0 2450
150979 -
150980 - The adjustment needs to start on screen line 3 instead of line 4,
150981 - because of explanation above. ref SDS 0 0793
150982 -
150983 -  ..
150984 -
150985 - Line 2310, ref OF 5 5082, -label lp1451 created loop to process each
150986 - block of document lists calling new macro 1453, so that 0 sorts below
150987 - anything above 5, which places 00 below 50.  This gives us 50 years.
150988 -
150989 - Macro 1453 is in 000008, per above. ref SDS 0 3072
150990 -
150991 - Publications have to be handled differently, because they are a
150992 - continuous list without breaks.
150993 -
150994 - Line 2480, ref OF 5 5704, -label dEl_en, do a down, set zone for
150995 - macro 1453 op to sort list and place 00 below 99.
150996 -
150997 -
150998 -
150999 -
151000 -
151001 -
151002 -
1511 -

SUBJECTS
Sorting
Selecting
Supersort, 910306
061122 Selection Command File, Configure
Y2K Chronology Correction Macro

2008 -
200801 -  ..
200802 - 061122  Selecting Records Between 1999 and 2000 as 99 - 00
200803 -
200804 - Had to create another common macro file to reduce compiled code, per
200805 - above. ref SDS 0 2205
200806 -
200807 - Line 30, ref OF 4 1302, this has the code from 000007, beginning about
200808 - line 1400, ref OF 8 6290, -label cOOKay, down to about line 1650,
200809 - which is above -entry 1205. ref OF 8 3843
200810 -
200811 -
200812 -
200813 -
200814 -
200815 -
200816 -
200817 -