THEO TODMAN’S WEBSITE CODE PAGES



This Page provides a jumping-off point for the VBA Code that generates my Website.

Table of Query Documentation: Query-Type = Update (66 items)

Aeon_Papers_PaperID_UpdtAuthor_Letters_AllAuthor_Letters_RevertAuthor_Letters_Save
AuthorAndTitle_UpdateAuthors_Counts_UpdtAuthors_Summary_Temp_Surname_1Authors_Summary_Temp_Surname_2
Authors_Summary_Temp_Surname_3Authors_Summary_Temp_Surname_CountUpdtAuthors_Summary_Temp_Updt_Count_BooksAuthors_Summary_Temp_Updt_Count_Citations
Authors_Summary_Temp_Updt_Count_PapersBackup_Directory_ChangeDriveBackup_Directory_Structure_UpdtBackup_Site_Map_Updt
Backup_SiteMap_ChangeDriveBooks - EstimatesCode_Location_UpdateDirectory_Structure_Updt
Estimate - UpdateEstimate - Update OutstandingEstimate - Update Outstanding - BooksEstimate - Update Zeros From Actuals
Full_Backup_Site_Map_Temp_Delete_FlagLanguage_Location_Primer_Date_Time_UpdtLanguage_Location_Primer_Time_ZapLing_Numbers_Dialogue_Ctrl_Complete
Ling_Numbers_Vocab_Ctrl_CompleteLocations_Stats_UpdateLocations_Stats_ZapNotes_LastChanged_Update
Notes_To_Print_UpdateOboe_Practice_Hours_Latest_Lesson_UpdateOboe_Practice_Hours_UpdateOboe_Practice_Hours_Zeroise
Paper_Book_IDs_Move_UpdatePaper_Book_IDs_UpdatePapers - Location UpdatePhilosophers_Index_Conversion
PI_Title_Fix_UpdtPID_Missing_Online_Papers_RL_OK_SetPID_Note_Reading_Lists_Year_UpdtQuery42
Query43Raw_Broken_Links_Error_Reference_CopyRaw_Broken_Links_FlagRefsRaw_Links_Error_References_Clear
Raw_Links_Error_References_UpdtRaw_Links_UpdtReset_Temp_Note_TimestampSite_Map_Updt
Temp_Note_Timestamp_UpdateTime_This_Month_List_Book_UPDTime_This_Month_List_Paper_UPDTime_This_Month_List_ReadWrite_UPD
Time_This_Month_List_Temp_Nulls_ResetTime_This_Month_List_Temp_Read_UPDTime_This_Month_List_Temp_Write_UPDTime_This_Month_List_Update
Update Actual Totals - BooksUpdate Actual Totals - PapersUpdate_AbstractsWebPage_DateChange
WebRef_Kernels_UpdtZap Latest ETC+Actuals..

To access information, click on one of the links in the table above.

Go to top of page

Query_Name: Aeon_Papers_PaperID_Updt
Query_Type: Update
Query_DateCreated: 07/04/2021 19:56:38
Query_DateChanged: 07/04/2021 20:06:44
Query_SQL: UPDATE (Aeon_Papers_Add_Prelist INNER JOIN Papers ON (Aeon_Papers_Add_Prelist.Aeon_Title = Papers.Title) AND (Aeon_Papers_Add_Prelist.Authors = Papers.Author)) INNER JOIN Aeon_Files ON Aeon_Papers_Add_Prelist.WebRef_ID = Aeon_Files.WebRef_ID SET Aeon_Files.Paper_ID = [Papers]![ID];
Link To Column Definitions: Aeon_Papers_PaperID_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Author_Letters_All
Query_Type: Update
Query_DateCreated: 10/04/2020 23:25:25
Query_DateChanged: 10/04/2020 23:25:25
Query_SQL: UPDATE Author_Letters SET Author_Letters.[Select?] = True;
Link To Column Definitions: Author_Letters_All

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Author_Letters_Revert
Query_Type: Update
Query_DateCreated: 10/04/2020 23:19:52
Query_DateChanged: 10/04/2020 23:20:26
Query_SQL: UPDATE Author_Letters INNER JOIN Author_Letters_Saved ON Author_Letters.Author_Letter = Author_Letters_Saved.Author_Letter SET Author_Letters.[Select?] = [Author_Letters_Saved]![Select?];
Link To Column Definitions: Author_Letters_Revert

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Author_Letters_Save
Query_Type: Update
Query_DateCreated: 10/04/2020 23:18:05
Query_DateChanged: 10/04/2020 23:18:05
Query_SQL: UPDATE Author_Letters INNER JOIN Author_Letters_Saved ON Author_Letters.Author_Letter = Author_Letters_Saved.Author_Letter SET Author_Letters_Saved.[Select?] = [Author_Letters]![Select?];
Link To Column Definitions: Author_Letters_Save

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: AuthorAndTitle_Update
Query_Type: Update
Query_DateCreated: 01/11/2007 10:46:28
Query_DateChanged: 13/02/2022 14:14:14
Query_SQL: UPDATE Books SET Books.[Author & Title] = [Author] & " - " & [Title];
Link To Column Definitions: AuthorAndTitle_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Authors_Counts_Updt
Query_Type: Update
Query_DateCreated: 10/04/2020 00:10:47
Query_DateChanged: 10/04/2020 00:15:35
Query_SQL: UPDATE Authors INNER JOIN Authors_Summary_Temp ON Authors.Author_ID = Authors_Summary_Temp.Author_ID SET Authors.Author_Surname = [Authors_Summary_Temp]![Author_Surname], Authors.Author_Book_Count = [Authors_Summary_Temp]![Book Count], Authors.Author_Paper_Count = [Authors_Summary_Temp]![Paper Count], Authors.Author_Citation_Count = [Authors_Summary_Temp]![Citation Count], Authors.Author_Synonym_Count = [Authors_Summary_Temp]![Synonym Count];
Link To Column Definitions: Authors_Counts_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Authors_Summary_Temp_Surname_1
Query_Type: Update
Query_DateCreated: 09/04/2020 23:39:00
Query_DateChanged: 09/04/2020 23:39:43
Query_SQL: UPDATE Authors_Summary_Temp SET Authors_Summary_Temp.Author_Surname = [Author] WHERE (((InStr([Author]," "))=0));
Link To Column Definitions: Authors_Summary_Temp_Surname_1

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Authors_Summary_Temp_Surname_2
Query_Type: Update
Query_DateCreated: 09/04/2020 23:41:18
Query_DateChanged: 09/04/2020 23:46:52
Query_SQL: UPDATE Authors_Summary_Temp SET Authors_Summary_Temp.Author_Surname = Left([Author],InStr([Author]," (")-1) WHERE (((Authors_Summary_Temp.Author_Surname) Is Null) AND ((InStr([Author]," ("))>0));
Link To Column Definitions: Authors_Summary_Temp_Surname_2

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Authors_Summary_Temp_Surname_3
Query_Type: Update
Query_DateCreated: 09/04/2020 23:50:22
Query_DateChanged: 09/04/2020 23:51:17
Query_SQL: UPDATE Authors_Summary_Temp SET Authors_Summary_Temp.Author_Surname = [Author] WHERE (((Authors_Summary_Temp.Author_Surname) Is Null));
Link To Column Definitions: Authors_Summary_Temp_Surname_3

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Authors_Summary_Temp_Surname_CountUpdt
Query_Type: Update
Query_DateCreated: 10/04/2020 00:05:16
Query_DateChanged: 10/04/2020 00:05:16
Query_SQL: UPDATE Author_Surnames INNER JOIN Authors_Summary_Temp ON Author_Surnames.Author_Surname = Authors_Summary_Temp.Author_Surname SET Authors_Summary_Temp.[Synonym Count] = [Synonym_Count];
Link To Column Definitions: Authors_Summary_Temp_Surname_CountUpdt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Authors_Summary_Temp_Updt_Count_Books
Query_Type: Update
Query_DateCreated: 10/04/2020 21:30:56
Query_DateChanged: 10/04/2020 21:31:05
Query_SQL: UPDATE Authors_Summary_Temp INNER JOIN Authors_Summary_Temp_Count ON Authors_Summary_Temp.Author = Authors_Summary_Temp_Count.Author SET Authors_Summary_Temp.[Book Count] = [Count];
Link To Column Definitions: Authors_Summary_Temp_Updt_Count_Books

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Authors_Summary_Temp_Updt_Count_Citations
Query_Type: Update
Query_DateCreated: 10/04/2020 21:29:57
Query_DateChanged: 10/04/2020 21:29:57
Query_SQL: UPDATE Authors_Summary_Temp INNER JOIN Authors_Summary_Temp_Count ON Authors_Summary_Temp.Author = Authors_Summary_Temp_Count.Author SET Authors_Summary_Temp.[Citation Count] = [Count];
Link To Column Definitions: Authors_Summary_Temp_Updt_Count_Citations

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Authors_Summary_Temp_Updt_Count_Papers
Query_Type: Update
Query_DateCreated: 10/04/2020 21:31:27
Query_DateChanged: 10/04/2020 23:38:53
Query_SQL: UPDATE Authors_Summary_Temp INNER JOIN Authors_Summary_Temp_Count ON Authors_Summary_Temp.Author = Authors_Summary_Temp_Count.Author SET Authors_Summary_Temp.[Paper Count] = [Count];
Link To Column Definitions: Authors_Summary_Temp_Updt_Count_Papers

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Backup_Directory_ChangeDrive
Query_Type: Update
Query_DateCreated: 24/05/2014 14:57:53
Query_DateChanged: 07/06/2014 10:19:29
Query_SQL: UPDATE Backup_Directory_Structure_Temp SET Backup_Directory_Structure_Temp.Directory = "C:\" & Mid([Directory],4,Len([Directory]));
Link To Column Definitions: Backup_Directory_ChangeDrive

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Backup_Directory_Structure_Updt
Query_Type: Update
Query_DateCreated: 16/05/2014 19:42:20
Query_DateChanged: 09/03/2018 00:29:39
Query_SQL: UPDATE Backup_Directory_Structure_Temp INNER JOIN Backup_Directory_Structure ON Backup_Directory_Structure_Temp.Directory = Backup_Directory_Structure.Directory SET Backup_Directory_Structure.Directory_Short = [Backup_Directory_Structure_Temp]![Directory_Short], Backup_Directory_Structure.Directory_Level = [Backup_Directory_Structure_Temp]![Directory_Level], Backup_Directory_Structure.Timestamp_Indexed = [Backup_Directory_Structure_Temp]![Timestamp_Indexed], Backup_Directory_Structure.Timestamp_Backed_Up = IIf([Backup_Directory_Structure_Temp]![Timestamp_Backed_Up] & ""<>"",[Backup_Directory_Structure_Temp]![Timestamp_Backed_Up],[Backup_Directory_Structure]![Timestamp_Backed_Up]), Backup_Directory_Structure.Directory_Timestamp = [Backup_Directory_Structure_Temp]![Directory_Timestamp];
Link To Column Definitions: Backup_Directory_Structure_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Backup_Site_Map_Updt
Query_Type: Update
Query_DateCreated: 16/05/2014 19:48:56
Query_DateChanged: 16/05/2014 19:58:54
Query_SQL: UPDATE Backup_Site_Map_Temp INNER JOIN Backup_Site_Map ON (Backup_Site_Map_Temp.Directory = Backup_Site_Map.Directory) AND (Backup_Site_Map_Temp.FIle_Name = Backup_Site_Map.FIle_Name) SET Backup_Site_Map.Timestamp_Logged = [Backup_Site_Map_Temp]![Timestamp_Logged], Backup_Site_Map.[Size] = [Backup_Site_Map_Temp]![Size], Backup_Site_Map.Time_To_Backup = [Backup_Site_Map_Temp]![Time_To_Backup], Backup_Site_Map.Full_File_Name = [Backup_Site_Map_Temp]![Full_File_Name], Backup_Site_Map_Temp.File_Timestamp = [Backup_Site_Map_Temp]![File_Timestamp];
Link To Column Definitions: Backup_Site_Map_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Backup_SiteMap_ChangeDrive
Query_Type: Update
Query_DateCreated: 24/05/2014 15:02:01
Query_DateChanged: 24/05/2014 15:02:41
Query_SQL: UPDATE Backup_Site_Map_Temp SET Backup_Site_Map_Temp.Directory = "C:\" & Mid([Directory],4,Len([Directory]));
Link To Column Definitions: Backup_SiteMap_ChangeDrive

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Books - Estimates
Query_Type: Update
Query_DateCreated: 24/02/2007 11:49:11
Query_DateChanged: 24/02/2007 12:31:33
Query_SQL: UPDATE Books SET Books.Estimate = [Pages]/10*[Difficulty]*IIf([Double_Column?]=Yes,1.5,1), Books.[Hours Left] = [Pages]/10*[Difficulty]*IIf([Double_Column?]=Yes,1.5,1);
Link To Column Definitions: Books - Estimates

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Code_Location_Update
Query_Type: Update
Query_DateCreated: 02/06/2013 10:31:10
Query_DateChanged: 02/06/2013 10:31:10
Query_SQL: UPDATE Code_Location INNER JOIN Code_Table ON Code_Location.Procedure_Name = Code_Table.Procedure_Name SET Code_Table.Code_Location = [Code_Location]![Code_Location];
Link To Column Definitions: Code_Location_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Directory_Structure_Updt
Query_Type: Update
Query_DateCreated: 28/06/2013 08:18:44
Query_DateChanged: 30/06/2013 23:55:36
Query_SQL: UPDATE Directory_Structure_Temp INNER JOIN Directory_Structure ON Directory_Structure_Temp.Directory = Directory_Structure.Directory SET Directory_Structure.Timestamp_Logged = [Directory_Structure_Temp]![Timestamp_Logged];
Link To Column Definitions: Directory_Structure_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Estimate - Update
Query_Type: Update
Query_DateCreated: 03/03/2007 10:53:25
Query_DateChanged: 03/03/2007 11:06:41
Query_SQL: UPDATE Papers INNER JOIN (Books INNER JOIN qryBooks ON Books.ID1 = qryBooks.ID1) ON Papers.Book = qryBooks.IDs SET Papers.Estimate = IIf([Double_Column?]=No,Round([Papers]![Pages]/7.5*2+0.49)/2*[Papers]![Difficulty]/2,Round([Papers]![Pages]/10*4+0.49)/2*[Papers]![Difficulty]/2) WHERE (((Papers.Pages) Is Not Null));
Link To Column Definitions: Estimate - Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Estimate - Update Outstanding
Query_Type: Update
Query_DateCreated: 29/09/2005 12:26:44
Query_DateChanged: 07/11/2012 14:24:01
Query_SQL: UPDATE Papers SET Papers.[Hours Left] = IIf((Nz([Estimate])-Nz([Actual - Total]))<1,1,(Nz([Estimate])-Nz([Actual - Total]))), Papers.Status = IIf(Nz([Actual - Total])>0,IIf(Nz([Estimate])>0 And (Nz([Estimate])-Nz([Actual - Total]))<=0,"Complete","Started"),"");
Link To Column Definitions: Estimate - Update Outstanding

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Estimate - Update Outstanding - Books
Query_Type: Update
Query_DateCreated: 03/12/2011 16:35:10
Query_DateChanged: 07/11/2012 14:28:22
Query_SQL: UPDATE Books SET Books.[Hours Left] = IIf((Nz([Estimate])-Nz([Actual - Total]))<1,1,(Nz([Estimate])-Nz([Actual - Total])));
Link To Column Definitions: Estimate - Update Outstanding - Books

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Estimate - Update Zeros From Actuals
Query_Type: Update
Query_DateCreated: 17/12/2006 18:34:08
Query_DateChanged: 07/07/2013 11:06:24
Query_SQL: UPDATE Papers SET Papers.Estimate = Nz([Hours Left])+Nz([Actual - Total]) WHERE (((Papers.Estimate)=0 Or (Papers.Estimate) Is Null));
Link To Column Definitions: Estimate - Update Zeros From Actuals

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Full_Backup_Site_Map_Temp_Delete_Flag
Query_Type: Update
Query_DateCreated: 07/12/2022 12:36:58
Query_DateChanged: 07/12/2022 12:36:58
Query_SQL: UPDATE Full_Backup_Site_Map_Dups_Temp INNER JOIN Full_Backup_Site_Map_Temp ON (Full_Backup_Site_Map_Dups_Temp.File_Timestamp = Full_Backup_Site_Map_Temp.File_Timestamp) AND (Full_Backup_Site_Map_Dups_Temp.Size = Full_Backup_Site_Map_Temp.Size) AND (Full_Backup_Site_Map_Dups_Temp.File_Name = Full_Backup_Site_Map_Temp.File_Name) SET Full_Backup_Site_Map_Temp.[Delete] = Yes WHERE (((Full_Backup_Site_Map_Temp.Directory_ID)<>[Min_Directory_ID] And (Full_Backup_Site_Map_Temp.Directory_ID)<>[Max_Directory_ID]));
Link To Column Definitions: Full_Backup_Site_Map_Temp_Delete_Flag

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Language_Location_Primer_Date_Time_Updt
Query_Type: Update
Query_DateCreated: 12/11/2020 14:46:49
Query_DateChanged: 02/03/2022 20:24:53
Query_SQL: UPDATE Temp_Lang_Date_Last_Study INNER JOIN Language_Location_Primer ON Temp_Lang_Date_Last_Study.Subject = Language_Location_Primer.Timesheet_Subject SET Language_Location_Primer.Date_Last_Study = IIf([MaxOfDate]=0,[Date_Last_Study],[MaxOfDate]), Language_Location_Primer.Time_This_Year = [Hours_Current_Year], Language_Location_Primer.Date_Last_Study_Non_Ling = IIf([MaxOfDate_Non_Ling]=0,[Date_Last_Study_Non_Ling],[MaxOfDate_Non_Ling]);
Link To Column Definitions: Language_Location_Primer_Date_Time_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Language_Location_Primer_Time_Zap
Query_Type: Update
Query_DateCreated: 22/10/2022 21:25:37
Query_DateChanged: 22/10/2022 21:25:37
Query_SQL: UPDATE Language_Location_Primer SET Language_Location_Primer.Time_This_Year = 0;
Link To Column Definitions: Language_Location_Primer_Time_Zap

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Ling_Numbers_Dialogue_Ctrl_Complete
Query_Type: Update
Query_DateCreated: 26/05/2023 18:09:54
Query_DateChanged: 26/05/2023 18:10:11
Query_SQL: UPDATE Ling_Numbers_Dialogue_Ctrl SET Ling_Numbers_Dialogue_Ctrl.[Row_Complete?] = Yes;
Link To Column Definitions: Ling_Numbers_Dialogue_Ctrl_Complete

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Ling_Numbers_Vocab_Ctrl_Complete
Query_Type: Update
Query_DateCreated: 26/05/2023 18:11:05
Query_DateChanged: 26/05/2023 18:14:32
Query_SQL: UPDATE Ling_Numbers_Vocab_Ctrl SET Ling_Numbers_Vocab_Ctrl.[Row_Complete?] = Yes;
Link To Column Definitions: Ling_Numbers_Vocab_Ctrl_Complete

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Locations_Stats_Update
Query_Type: Update
Query_DateCreated: 27/04/2013 11:57:23
Query_DateChanged: 27/04/2013 11:57:23
Query_SQL: UPDATE Book_Location_Stats_Temp INNER JOIN Locations ON Book_Location_Stats_Temp.Location = Locations.Location SET Locations.Book_Count = [Number], Locations.Book_Value = [Cost];
Link To Column Definitions: Locations_Stats_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Locations_Stats_Zap
Query_Type: Update
Query_DateCreated: 27/04/2013 11:58:45
Query_DateChanged: 27/04/2013 11:58:45
Query_SQL: UPDATE Locations SET Locations.Book_Count = 0, Locations.Book_Value = 0;
Link To Column Definitions: Locations_Stats_Zap

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Notes_LastChanged_Update
Query_Type: Update
Query_DateCreated: 22/06/2007 19:56:38
Query_DateChanged: 22/06/2007 19:56:38
Query_SQL: UPDATE Notes INNER JOIN Notes_Archive_Temp ON Notes.ID = Notes_Archive_Temp.ID SET Notes.Last_Changed = [Timestamp];
Link To Column Definitions: Notes_LastChanged_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Notes_To_Print_Update
Query_Type: Update
Query_DateCreated: 07/03/2008 21:41:25
Query_DateChanged: 08/03/2008 18:37:06
Query_SQL: UPDATE (Notes_to_Print INNER JOIN Notes ON Notes_to_Print.Note_ID = Notes.ID) INNER JOIN Note_Groups ON Notes.Note_Group = Note_Groups.ID SET Notes_to_Print.Title = [Item_Title], Notes_to_Print.[Group] = [Note_Groups]![Note_Group];
Link To Column Definitions: Notes_To_Print_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Oboe_Practice_Hours_Latest_Lesson_Update
Query_Type: Update
Query_DateCreated: 06/10/2019 20:38:17
Query_DateChanged: 06/10/2019 20:39:35
Query_SQL: UPDATE Oboe_Practice_Hours_Temp INNER JOIN Oboe_Practice_Hours ON (Oboe_Practice_Hours_Temp.Topic = Oboe_Practice_Hours.Topic) AND (Oboe_Practice_Hours_Temp.Subject = Oboe_Practice_Hours.Subject) SET Oboe_Practice_Hours.Since_Last_Lesson = [Oboe_Practice_Hours_Temp]![Hours];
Link To Column Definitions: Oboe_Practice_Hours_Latest_Lesson_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Oboe_Practice_Hours_Update
Query_Type: Update
Query_DateCreated: 04/10/2019 18:40:53
Query_DateChanged: 02/10/2025 00:43:08
Query_SQL: UPDATE Oboe_Practice_Hours_Temp INNER JOIN Oboe_Practice_Hours ON (Oboe_Practice_Hours_Temp.Topic = Oboe_Practice_Hours.Topic) AND (Oboe_Practice_Hours_Temp.Subject = Oboe_Practice_Hours.Subject) SET Oboe_Practice_Hours.[25/26] = [Oboe_Practice_Hours_Temp]![Hours];
Link To Column Definitions: Oboe_Practice_Hours_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Oboe_Practice_Hours_Zeroise
Query_Type: Update
Query_DateCreated: 04/10/2019 18:32:31
Query_DateChanged: 02/10/2025 00:42:44
Query_SQL: UPDATE Oboe_Practice_Hours SET Oboe_Practice_Hours.Since_Last_Lesson = 0, Oboe_Practice_Hours.[25/26] = 0;
Link To Column Definitions: Oboe_Practice_Hours_Zeroise

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Paper_Book_IDs_Move_Update
Query_Type: Update
Query_DateCreated: 30/06/2013 20:16:18
Query_DateChanged: 30/06/2013 20:22:50
Query_SQL: UPDATE Papers INNER JOIN qryBooks ON Papers.Book_ID = qryBooks.ID1 SET Papers.Book = [IDs] WHERE (((Papers.Book)<>[IDs]));
Link To Column Definitions: Paper_Book_IDs_Move_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Paper_Book_IDs_Update
Query_Type: Update
Query_DateCreated: 19/05/2013 15:00:51
Query_DateChanged: 19/05/2013 15:00:51
Query_SQL: UPDATE Papers INNER JOIN [qryBook_N+Ts] ON Papers.Book_ID = [qryBook_N+Ts].ID1 SET Papers.Book = [IDs] WHERE (((Papers.Book) Is Null));
Link To Column Definitions: Paper_Book_IDs_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Papers - Location Update
Query_Type: Update
Query_DateCreated: 27/04/2007 19:37:51
Query_DateChanged: 27/04/2007 19:37:51
Query_SQL: UPDATE Papers INNER JOIN qryBooks ON Papers.Book = qryBooks.[Book IDs] SET Papers.Location = [qryBooks]![Location];
Link To Column Definitions: Papers - Location Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Philosophers_Index_Conversion
Query_Type: Update
Query_DateCreated: 19/06/2006 19:38:23
Query_DateChanged: 19/06/2006 23:35:28
Query_SQL: UPDATE Philosophers_Index SET Philosophers_Index.TI = Change_Case([TI]), Philosophers_Index.AU = Change_Case_Name([AU]), Philosophers_Index.PB = Change_Case_Name([PB]), Philosophers_Index.AB = Change_Case([AB]), Philosophers_Index.DE = Change_Case_Name([DE]), Philosophers_Index.PS = Change_Case_Name([PS]), Philosophers_Index.LA = Change_Case_Name([LA]), Philosophers_Index.DT = Change_Case_Name([DT]), Philosophers_Index.PY = Change_Case_Name([PY]), Philosophers_Index.SO = Change_Case_Name([SO]), Philosophers_Index.JN = Change_Case_Name([JN]);
Link To Column Definitions: Philosophers_Index_Conversion

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: PI_Title_Fix_Updt
Query_Type: Update
Query_DateCreated: 16/07/2006 21:22:12
Query_DateChanged: 16/07/2006 21:24:46
Query_SQL: UPDATE Philosophers_Index SET Philosophers_Index.TI = Mid([TI],2,InStr([TI],""" in")-2), Philosophers_Index.SO = Replace(Mid([TI],InStr([TI],""" in")+5,400),"""","") WHERE (((Philosophers_Index.TI) Like """*") AND ((InStr([TI],""" in"))>0) AND ((Philosophers_Index.SO)="" Or (Philosophers_Index.SO) Is Null));
Link To Column Definitions: PI_Title_Fix_Updt

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: PID_Missing_Online_Papers_RL_OK_Set
Query_Type: Update
Query_DateCreated: 25/06/2021 20:44:57
Query_DateChanged: 31/08/2021 18:04:48
Query_SQL: UPDATE PID_Missing_Online_Papers SET PID_Missing_Online_Papers.PID_RL_OK = True WHERE (((PID_Missing_Online_Papers.PID_RL_OK)=False) AND ((PID_Missing_Online_Papers.Accept)=True));
Link To Column Definitions: PID_Missing_Online_Papers_RL_OK_Set

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: PID_Note_Reading_Lists_Year_Updt
Query_Type: Update
Query_DateCreated: 08/04/2021 23:07:53
Query_DateChanged: 09/04/2021 19:05:05
Query_SQL: UPDATE PID_Note_Reading_Lists INNER JOIN Papers ON PID_Note_Reading_Lists.Called_ID = Papers.ID SET PID_Note_Reading_Lists.Item_Year = Right([Source],4) WHERE (((PID_Note_Reading_Lists.[Book/Paper])="Paper") AND ((Papers.Source) Like "Aeon, *") AND (([Item_Year] & "")=""));
Link To Column Definitions: PID_Note_Reading_Lists_Year_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Query42
Query_Type: Update
Query_DateCreated: 19/03/2025 17:08:32
Query_DateChanged: 19/03/2025 17:08:32
Query_SQL: UPDATE LRB_Files SET LRB_Files.Author = Left(Replace([FIle_Name],"LRB - ",""),InStr(Replace([FIle_Name],"LRB - ","")," -")-1) WHERE ((([Author] & "")=""));
Link To Column Definitions: Query42

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Query43
Query_Type: Update
Query_DateCreated: 19/03/2025 17:20:29
Query_DateChanged: 19/03/2025 17:25:22
Query_SQL: UPDATE LRB_Files SET LRB_Files.Author = "+A" & Mid([Author],InStr([Author]," ")+1) & " (" & Left([Author],InStr([Author]," ")-1) & ")A+" WHERE (((Left([Author],1))<>"+"));
Link To Column Definitions: Query43

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Raw_Broken_Links_Error_Reference_Copy
Query_Type: Update
Query_DateCreated: 28/08/2018 19:24:31
Query_DateChanged: 28/08/2018 20:48:36
Query_SQL: UPDATE Raw_Broken_Links_Old INNER JOIN Raw_Broken_Links ON (Raw_Broken_Links_Old.Raw_Link = Raw_Broken_Links.Raw_Link) AND (Raw_Broken_Links_Old.File_Name = Raw_Broken_Links.File_Name) AND (Raw_Broken_Links_Old.Directory = Raw_Broken_Links.Directory) SET Raw_Broken_Links.Error_Reference = [Raw_Broken_Links_Old]![Error_Reference] WHERE (((Raw_Broken_Links.Error_Reference) Is Null));
Link To Column Definitions: Raw_Broken_Links_Error_Reference_Copy

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Raw_Broken_Links_FlagRefs
Query_Type: Update
Query_DateCreated: 16/08/2018 13:59:38
Query_DateChanged: 16/08/2018 14:01:19
Query_SQL: UPDATE Raw_Broken_Links INNER JOIN Raw_Links ON (Raw_Broken_Links.Raw_Link = Raw_Links.Raw_Link) AND (Raw_Broken_Links.File_Name = Raw_Links.File_Name) AND (Raw_Broken_Links.Directory = Raw_Links.Directory) SET Raw_Broken_Links.Error_Reference = [Raw_Links]![Error_Reference];
Link To Column Definitions: Raw_Broken_Links_FlagRefs

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Raw_Links_Error_References_Clear
Query_Type: Update
Query_DateCreated: 16/08/2018 18:27:21
Query_DateChanged: 16/08/2018 18:28:46
Query_SQL: UPDATE Raw_Links SET Raw_Links.Error_Reference = Null WHERE (((Raw_Links.Error_Reference) Is Not Null));
Link To Column Definitions: Raw_Links_Error_References_Clear

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Raw_Links_Error_References_Updt
Query_Type: Update
Query_DateCreated: 16/08/2018 18:29:57
Query_DateChanged: 16/08/2018 18:32:53
Query_SQL: UPDATE Raw_Links INNER JOIN Raw_Broken_Links ON (Raw_Links.Raw_Link = Raw_Broken_Links.Raw_Link) AND (Raw_Links.File_Name = Raw_Broken_Links.File_Name) AND (Raw_Links.Directory = Raw_Broken_Links.Directory) SET Raw_Links.Error_Reference = [Raw_Broken_Links]![Error_Reference];
Link To Column Definitions: Raw_Links_Error_References_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Raw_Links_Updt
Query_Type: Update
Query_DateCreated: 28/06/2013 11:56:40
Query_DateChanged: 28/06/2013 12:23:32
Query_SQL: UPDATE Raw_Links_Temp INNER JOIN Raw_Links ON (Raw_Links_Temp.Raw_Link = Raw_Links.Raw_Link) AND (Raw_Links_Temp.File_Name = Raw_Links.File_Name) AND (Raw_Links_Temp.Directory = Raw_Links.Directory) SET Raw_Links.Full_Link = [Raw_Links_Temp]![Full_Link], Raw_Links.Timestamp_Logged = [Raw_Links_Temp]![Timestamp_Logged], Raw_Links.Link_Type = [Raw_Links_Temp]![Link_Type], Raw_Links.Link_Count = [Raw_Links_Temp]![Link_Count];
Link To Column Definitions: Raw_Links_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Reset_Temp_Note_Timestamp
Query_Type: Update
Query_DateCreated: 17/10/2024 19:03:56
Query_DateChanged: 19/10/2024 17:29:38
Query_SQL: UPDATE Notes SET Notes.Temp_Note_Timestamp = 0 WHERE (((Notes.Status)<>"Temp"));
Link To Column Definitions: Reset_Temp_Note_Timestamp

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Site_Map_Updt
Query_Type: Update
Query_DateCreated: 28/06/2013 11:48:12
Query_DateChanged: 28/06/2013 22:03:02
Query_SQL: UPDATE Site_Map_Temp INNER JOIN Site_Map ON (Site_Map_Temp.FIle_Name = Site_Map.FIle_Name) AND (Site_Map_Temp.Directory = Site_Map.Directory) SET Site_Map.Timestamp_Logged = [Site_Map_Temp]![Timestamp_Logged], Site_Map.[Size] = [Site_Map_Temp]![Size], Site_Map.Time_To_Update = [Site_Map_Temp]![Time_To_Update], Site_Map.Full_File_Name = [Site_Map_Temp]![Full_File_Name], Site_Map_Temp.File_Timestamp = [Site_Map_Temp]![File_Timestamp];
Link To Column Definitions: Site_Map_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Temp_Note_Timestamp_Update
Query_Type: Update
Query_DateCreated: 16/10/2024 20:24:12
Query_DateChanged: 15/01/2026 13:13:08
Query_SQL: UPDATE Notes INNER JOIN Notes_To_Regen ON Notes.ID = Notes_To_Regen.Note_ID SET Notes.Temp_Note_Timestamp = [Timestamp];
Link To Column Definitions: Temp_Note_Timestamp_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Time_This_Month_List_Book_UPD
Query_Type: Update
Query_DateCreated: 22/12/2010 13:38:19
Query_DateChanged: 22/12/2010 13:45:39
Query_SQL: UPDATE (Time_This_Month_List INNER JOIN Papers ON Time_This_Month_List.Paper_ID = Papers.ID) INNER JOIN qryBooks ON Papers.Book = qryBooks.IDs SET Time_This_Month_List.Book_ID = [qryBooks]![ID1], Time_This_Month_List.Book_Reference = "+B" & [qryBooks]![ID1] & "B+" WHERE (((Time_This_Month_List.Reference) Is Not Null));
Link To Column Definitions: Time_This_Month_List_Book_UPD

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Time_This_Month_List_Paper_UPD
Query_Type: Update
Query_DateCreated: 22/12/2010 13:02:00
Query_DateChanged: 22/12/2010 13:15:01
Query_SQL: UPDATE Time_This_Month_List SET Time_This_Month_List.Paper_ID = Mid([Reference],3,100)-"30000", Time_This_Month_List.Paper_Reference = "+P" & (Mid([Reference],3,100)-30000) & "P+" WHERE (((Time_This_Month_List.Reference) Is Not Null));
Link To Column Definitions: Time_This_Month_List_Paper_UPD

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Time_This_Month_List_ReadWrite_UPD
Query_Type: Update
Query_DateCreated: 01/01/2011 19:14:44
Query_DateChanged: 01/01/2011 19:14:44
Query_SQL: UPDATE Time_This_Month_List SET Time_This_Month_List.Subject = [Subject] & IIf([Read?]=Yes And [Write?]=Yes," - Read / Write",IIf([Read?]=Yes," - Read"," - Write")) WHERE (((Time_This_Month_List.[Read?])=Yes)) OR (((Time_This_Month_List.[Write?])=Yes));
Link To Column Definitions: Time_This_Month_List_ReadWrite_UPD

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Time_This_Month_List_Temp_Nulls_Reset
Query_Type: Update
Query_DateCreated: 16/01/2010 12:52:28
Query_DateChanged: 08/02/2017 20:48:09
Query_SQL: UPDATE Time_This_Month_List_Temp SET Time_This_Month_List_Temp.Subject = ".", Time_This_Month_List_Temp.Topic = "." WHERE (((Trim([Subject]) & "")=""));
Link To Column Definitions: Time_This_Month_List_Temp_Nulls_Reset

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Time_This_Month_List_Temp_Read_UPD
Query_Type: Update
Query_DateCreated: 01/01/2011 18:52:18
Query_DateChanged: 01/01/2011 18:52:18
Query_SQL: UPDATE Time_This_Month_List_Temp SET Time_This_Month_List_Temp.Subject = Left([Subject],InStr([Subject]," - Read")-1), Time_This_Month_List_Temp.[Read?] = Yes WHERE (((InStr([Subject]," - Read"))>0));
Link To Column Definitions: Time_This_Month_List_Temp_Read_UPD

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Time_This_Month_List_Temp_Write_UPD
Query_Type: Update
Query_DateCreated: 01/01/2011 18:53:02
Query_DateChanged: 01/01/2011 18:54:52
Query_SQL: UPDATE Time_This_Month_List_Temp SET Time_This_Month_List_Temp.Subject = Left([Subject],InStr([Subject]," - Write")-1), Time_This_Month_List_Temp.[Write?] = Yes WHERE (((InStr([Subject]," - Write"))>0));
Link To Column Definitions: Time_This_Month_List_Temp_Write_UPD

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Time_This_Month_List_Update
Query_Type: Update
Query_DateCreated: 29/03/2013 11:56:28
Query_DateChanged: 29/03/2013 12:06:26
Query_SQL: UPDATE Time_This_Month_List INNER JOIN Book_Paper_Solitons ON Time_This_Month_List.Book_ID = Book_Paper_Solitons.Book_ID SET Time_This_Month_List.Paper_Count_For_Book = [Book_Paper_Solitons]![CountOfPaper_ID];
Link To Column Definitions: Time_This_Month_List_Update

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Update Actual Totals - Books
Query_Type: Update
Query_DateCreated: 07/11/2012 12:45:24
Query_DateChanged: 07/11/2012 12:46:01
Query_SQL: UPDATE Books SET Books.[Actual - Total] = Nz([Actual (BA Year 3-4)])+Nz([Actual (Year 0)])+Nz([Actual (Year 1)])+Nz([Actual (Year 2)])+Nz([Actual - MPhil Year 1])+Nz([Actual - Intermission Year 1])+Nz([Actual - Intermission Year 2])+Nz([Actual - Heythrop Year 1])+Nz([Actual - Heythrop Year 2])+Nz([Actual - Intermission Year 3]);
Link To Column Definitions: Update Actual Totals - Books

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Update Actual Totals - Papers
Query_Type: Update
Query_DateCreated: 07/11/2012 14:09:35
Query_DateChanged: 07/11/2012 14:12:04
Query_SQL: UPDATE Papers SET Papers.[Actual - Total] = Nz([Actual (BA Year 3-4)])+Nz([Actual (Year 0)])+Nz([Actual (Year 1)])+Nz([Actual (Year 2)])+Nz([Actual - MPhil Year 1])+Nz([Actual - Intermission Year 1])+Nz([Actual - Intermission Year 2])+Nz([Actual - Heythrop Year 1])+Nz([Actual - Heythrop Year 2])+Nz([Actual - Intermission Year 3]);
Link To Column Definitions: Update Actual Totals - Papers

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Update_Abstracts
Query_Type: Update
Query_DateCreated: 27/11/2005 11:21:15
Query_DateChanged: 27/11/2005 11:34:27
Query_SQL: UPDATE Abstracts INNER JOIN Papers ON Abstracts.Ref = Papers.ID SET Papers.Abstract = [Abstracts]![Abstract], Papers.Source = [Abstracts]![Publication];
Link To Column Definitions: Update_Abstracts

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: WebPage_DateChange
Query_Type: Update
Query_DateCreated: 23/12/2007 15:09:15
Query_DateChanged: 01/06/2010 09:37:34
Query_SQL: UPDATE Website_Control, Next_Reporting_Month SET Website_Control.Line_Value = Replace([Line_Value],[Previous_Month_Footnote],[Next_Month_Footnote]) WHERE (((Website_Control.Line_Value) Like "*" & [Previous_Month_Footnote] & "*"));
Link To Column Definitions: WebPage_DateChange

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: WebRef_Kernels_Updt
Query_Type: Update
Query_DateCreated: 02/01/2018 21:37:08
Query_DateChanged: 02/01/2018 21:44:11
Query_SQL: UPDATE Webrefs_Table SET Webrefs_Table.WebRef_Kernel = Replace(Replace(Replace(Replace([Webref],"http://",""),"https://",""),"www.",""),"/","");
Link To Column Definitions: WebRef_Kernels_Updt

Tables / Queries Used By This QueryCode Using this Query Go To Top of This Page
Link to VBA Code Control Page


Query_Name: Zap Latest ETC+Actuals
Query_Type: Update
Query_DateCreated: 02/10/2006 20:22:43
Query_DateChanged: 01/10/2012 13:12:25
Query_SQL: UPDATE Papers SET Papers.[Hours Left] = 0, Papers.[Actual - Intermission Year 3] = 0;
Link To Column Definitions: Zap Latest ETC+Actuals

Tables / Queries Used By This Query Go To Top of This Page
Link to VBA Code Control Page





© Theo Todman, June 2007 - April 2026. Please address any comments on this page to theo@theotodman.com. File output:
Website Maintenance Dashboard
Return to Top of this Page Return to Theo Todman's Philosophy Page Return to Theo Todman's Home Page