Welch Company
San Francisco, CA


S U M M A R Y


DIARY: June 18, 2011 06:22 AM Saturday; Rod Welch

SDS subject index automate create binary levels enter to Control Fields.

1...Summary/Objective
2...03502 Modify Code Subject Index Control Field Ops SDS Records


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

CONTACTS 

SUBJECTS
Subject Index Automatic Construct Account Codes 2nd Level Binary Org

1903 -
1903 -    ..
1904 - Summary/Objective
1905 -
190501 - Follow up ref SDS 1 0000.
190502 -
190503 -
190504 -
190505 -
190507 -  ..
1906 -
1907 -
1908 - Progress
1909 -
190901 - 03502 Modify Code Subject Index Control Field Ops SDS Records
190902 -
190903 - Have to add code for binary subject account assignements added on
190904 - 110210 0746. ref SDS 1 DP5G to original SDS macro file 03502 to the
190905 - code for SDS java in 03502.
190907 -  ..
190908 - Compare SDS java verify Control Field account assignemnts to Subject
190909 - Index, with original SDS...
190910 -
190912 -  ..
190913 - Line 1900, ref OF 1 S35M, -label anfisR in 01 04 0350120
190914 -
190915 -    -label anfisR
190916 -    dose /c c:\sd\01\03501.bat
190917 -
190918 -
190919 -
190920 -
190921 -
190923 -  ..
190924 - Line 90, ref OF 2 LJ5F, -label bHstar in 01 04 035020
190925 -
190926 -    -label bHstar
190927 -    markcur 15
190928 -    loc_cur 5 3
190929 -    chrcnt 1 0
190930 -
190931 -        Debug here.
190932 -
190933 -
190935 -  ..
190936 - Line 480, ref OF 2 Y45F, -label mm118 in 01 04 035020
190937 -
190938 -    -label 8811mm
190939 -    savescr 5
190940 -    eol
190941 -    rel_cur 0 -2
190942 -    chrcnt 1 0
190943 -    setcnt 262 0
190944 -    -if @1 > 32 -goto n2bl
190945 -
190946 -
190948 -  ..
190949 - Line 1030, ref OF 2 DC4F, -label fpaclar in 01 04 035020
190950 -
190951 -    -label fpaclar
190952 -    setcnt 0 0
190953 -    setcnt 109 0
190954 -    loc_cur 3 1
190955 -    errorcnt 0 0
190956 -    *%09f
190957 -    z 4
190958 -    **
190959 -    l ^
190961 -         ..
190962 -        Search for intermediate account levels to set up for locating
190963 -        command to find full account string.
190964 -
190965 -
190966 -
190968 -  ..
190969 - Line 1100, ref OF 2 IF7F, -label nf1f3op in 01 04 035020
190970 -
190971 -     setcnt 0 0
190972 -     *%10
190973 -     z 4
190974 -     ****
190975 -     l ^
190976 -     -if @0 = 0 -goto acfnD
190977 -
190978 -        Search for full account string, and if found, processing to
190979 -        find the acount ends, and processing the account begins.
190980 -
190981 -
190983 -  ..
190984 - Line 5310, ref OF 2 3S4I, -label os88 in 01 04 035020
190985 -
190986 -    -label os88
190987 -    loc_cur 4 79
190988 -    chrcnt 61 0
190989 -    rel_cur 0 1
190990 -    chrcnt 62 0
190991 -
190992 -
190994 -  ..
190995 - Line 5520, ref OF 2 RI6N, -label 7332b in sd 04 035020 about 60 lines below
190996 -
190997 -
190998 -        debug test here at end of process discovered that up command
190999 -        works differently in SDS java from original SDS.
191000 -
191001 -        Reported this in the system development punch list in the
191002 -        record on 110509 1047. ref SDS 4 668K
191003 -
191004 -            [On 110621 1240 Morris fixed up command; testing shows this
191005 -            solved problem causing subject index ops to fail.
191006 -            ref SDS 7 668K
191007 -
191008 -
191009 -
191010 - **************************************************************
191011 - **************************************************************
191013 -  ..
191014 - Test SI ops...use the record on 110302 1518. ref SDS 2 0001
191015 -
191017 -  ..
191018 - Line 1940, ref OF 4 WI4J, -label anfisR in \02\14\0350120
191019 -
191020 -    @c:\sd\33\03501
191021 -      -exit
191022 -
191023 -        This code is edited to call macro 03502 for automatic
191024 -        processing.  -exit command was provided during initial SDS java
191025 -        development on 110414 0732. ref SDS 3 FL4M
191027 -         ..
191028 -        Today, try removing -exit to see if normal processing will
191029 -        continue as required.
191030 -
191031 -
191033 -  ..
191034 - Line 90, ref OF 5 LJ5F, -label bHstar in \01\14\035020
191035 -
191036 -    -label bHstar
191037 -    markcur 15
191038 -    loc_cur 5 3
191039 -    chrcnt 1 0
191040 -
191041 -        Debug here.
191042 -
191043 -
191045 -  ..
191046 - Line 480, ref OF 5 Y45F, -label mm118 in \01\14\035020
191047 -
191048 -    -label 8811mm
191049 -    savescr 5
191050 -    eol
191051 -    rel_cur 0 -2
191052 -    chrcnt 1 0
191053 -    setcnt 262 0
191054 -    -if @1 > 32 -goto n2bl
191055 -    setcnt 262 1
191056 -    immed r
191057 -    ic 32
191058 -    macro 8
191059 -    ic 32
191060 -    -label n2bl
191061 -    getscr 5
191062 -
191063 -        This code was added today for SDS java to conform with changes
191064 -        to code in original SDS on 110210, per above. ref SDS 0 8O9N
191065 -
191066 -
191067 -
191069 -  ..
191070 - Line 1000, ref OF 5 WB6H, -label fpaclar in \01\14\035020
191071 -
191072 -    -label fpaclar
191073 -    setcnt 0 0
191074 -    setcnt 109 0
191075 -    loc_cur 3 1
191076 -    errorcnt 0 0
191077 -    *%09f
191078 -    z 4
191079 -    **
191080 -    l ^
191082 -         ..
191083 -        Try debug here.
191084 -
191085 -
191087 -  ..
191088 - Line 1060, ref OF 5 SI8V, -label nf1f3op in \01\14\035020
191089 -
191090 -    -label nf1f3op
191091 -    getgbl 117 117
191092 -    -if @119 = 56 -if @117 = 32 -goto acfnD
191093 -    down
191094 -    setcnt 0 0
191095 -    *%10
191096 -    z 4
191097 -    ****
191098 -    l ^
191099 -    -if @0 = 0 -goto acfnD
191100 -    macro 23
191101 -
191102 -        Debug try here after finding target account
191103 -
191104 -
191105 -
191107 -  ..
191108 - Line 3290, ref OF 5 KG7O, -label cmitp8 in \01\14\035020
191109 -
191110 -    -label cmitp8
191111 -    up 10
191112 -    l-/. Master Index /
191113 -    -if @0 = 0 -goto msiop
191114 -    setcnt 0 0
191115 -    up 10
191116 -    l-/$$/
191117 -    -if @0 > 0 -goto npsics
191118 -
191119 -        Had to change l-/...../ commands, because original SDS required
191120 -        a space -- l- /....../ --, but this form causes SDS java to
191121 -        fail with command syntax error.  This is the same problem that
191122 -        occurred with general search macro 06114, reported on 110530
191123 -        1737, ref SDS 5 8W9H, and more recently on 110603 0542.
191124 -        ref SDS 6 BG4M
191125 -
191126 -
191127 -
191129 -  ..
191130 - Line 5080, ref OF 5 MV9M, -label 7333m in \01\14\035020
191131 -
191132 -
191133 -
191135 -  ..
191136 - Line 5270, ref OF 5 4E8K, -label 7333b in \01\14\035020
191137 -
191138 -
191140 -  ..
191141 - Line 5120, ref OF 5 3S4I, -label os88 in \01\14\035020
191142 -
191143 -    -label os88
191144 -    loc_cur 4 79
191145 -    chrcnt 61 0
191146 -    rel_cur 0 1
191147 -    chrcnt 62 0
191148 -
191150 -  ..
191151 - Line 5320, ref OF 5 RI6N, -label 7332b in \01\14\035020 about 60 lines below
191152 -
191153 -    Test debug here compare with original SDS.
191154 -
191155 -
191157 -  ..
191158 - Line 5430, ref OF 5 V15L, -label stufqei in \01\14\035020 about 60 lines below
191159 -
191160 -    -label stufqei
191161 -      e c:\sd\33\03502
191162 -    purge sndx
191163 -      getgbl 1 77
191164 -      -if @1 = 5555 purge c:\sd\10\stufqei
191165 -      -if @1 != 5555 macro 229
191166 -    @c:\sd\33\035012 #4
191167 -    -exit
191168 -
191169 -        Since this code executes in primary memory, can disconnect code
191170 -        required for secondary memory.  Added call to continue
191171 -        processing in 035012, similar to main subject index profile
191172 -        macro 03501, developed on 110414 0732. ref SDS 3 T65F
191173 -
191174 -
191175 -
191176 -
191177 -
191178 -
191179 -
191180 -
191181 -
191182 -
1912 -