YEProc Private Sub YEProc() Set db = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") Dim ServerName Dim DBName Dim sql Dim sFileName Dim rFileName Dim backupPath Dim restorePath Dim ph Dim tempCS Dim myYear Dim lc Dim saUserName Dim saPassword Dim dFile Dim tFile Dim dFileName Dim tFileName Dim dFilePath Dim tFilePath Dim lstFolder Dim dbs(1) Dim mLoop '----begin set variables-------- backupPath = "" restorePath = "" '---these database names have been preset for you dbs(0) = "FUNDamentals" dbs(1) = "Inventory" ServerName = "SQL1" 'if the server has changed, please change this variable accordingly '---comment, or uncomment as needed myYear = "2011" 'this is the ending year for the school year being archived, so 2011 for SY 2010-2011 'new sql server databases will be created for these archives with the year appended to the database names '---if you want to specify a backup location: '---uncomment the next line and assign the desired path 'backupPath = "X:\DatabaseBackups" '---note: if the backup path is not set here, '---the script will use the last known backup location '---if you want to specify a restore location: '---uncomment the next line and assign the desired path 'restorePath = "X:\SQLServer\DataFiles" '---note: this is where the sql server datafiles will be placed '---if this variable is not set here, the scipt will use the '---current datafile location '----only provide info for these variables if you are not using a trusted connection--- '----if you are NOT using Trusted Connection, must have SQL priveledges to: '--- *backup, restore, and create databases '--- *manage SQL logins and object ownership saUserName = "" saPassword = "" '---end set variables---- mLoop = 0 For mLoop = 0 To 1 DBName = dbs(mLoop) If saUserName <> "" Then gblCS = "Provider=sqloledb;Server=" & ServerName & ";Database=" & DBName & ";User ID=" & saUserName & ";Password=" & saPassword Else gblCS = "driver={sql server};server=" & ServerName & ";Database=" & DBName & ";Trusted_Connection=True;" End If db.Open gblCS sql = "Select name From sysusers Where issqluser = 1 and status <> 0 Order By name" rs.Open sql, db, 3, 3 ReDim UserArray(rs.RecordCount) If rs.RecordCount > 0 Then For lc = 1 To rs.RecordCount UserArray(lc) = rs("Name") rs.movenext Next End If rs.Close 'get file names sql = "Select [name], [filename] From sysfiles Order By fileid" rs.Open sql, db, 3, 3 If rs.RecordCount > 0 Then dFile = Trim(rs("name")) dFileName = Trim(rs("filename")) lstFolder = InStrRev(dFileName, "\") - 1 dFilePath = Left(dFileName, lstFolder) If rs.RecordCount > 1 Then rs.movenext tFile = Trim(rs("name")) tFileName = Trim(rs("filename")) lstFolder = InStrRev(tFileName, "\") - 1 tFilePath = Left(tFileName, lstFolder) End If End If rs.Close db.Close If backupPath = "" Then If saUserName <> "" Then tempCS = "Provider=sqloledb;Server=" & ServerName & ";Database=msdb;User ID=" & saUserName & ";Password=" & saPassword Else tempCS = "driver={sql server};server=" & ServerName & ";Database=msdb;Trusted_Connection=True;" End If db.Open tempCS sql = "SELECT backupmediafamily.physical_device_name AS fPath, backupset.database_name" sql = sql & " FROM backupset INNER JOIN backupmediafamily ON backupset.media_set_id = backupmediafamily.media_set_id" sql = sql & " WHERE (backupset.database_name = '" & DBName & "') ORDER BY backupset.backup_finish_date DESC" rs.Open sql, db, 3, 3 If rs.RecordCount > 0 Then backupPath = rs("fPath") ph = InStrRev(backupPath, "\") sFileName = Right(backupPath, Len(backupPath) - ph) backupPath = Left(backupPath, ph) Else backupPath = InputBox("Enter the path for the SQL Database Backup", "Enter Path", "C:\Program Files\Microsoft SQL Server\MSSQL\Backup") If backupPath = "" Then MsgBox "No backup path was provided.", 64, "Message to User" rs.Close Set rs = Nothing db.Close Set db = Nothing Exit Sub End If End If rs.Close db.Close End If If saUserName <> "" Then tempCS = "Provider=sqloledb;Server=" & ServerName & ";Database=master;User ID=" & saUserName & ";Password=" & saPassword Else tempCS = "driver={sql server};server=" & ServerName & ";Database=master;Trusted_Connection=True;" End If db.Open tempCS If restorePath = "" Then sql = "Select [filename] As FN From sysdatabases Where [name] = '" & DBName & "'" rs.Open sql, db, 3, 3 If rs.RecordCount > 0 Then restorePath = rs("FN") ph = InStrRev(restorePath, "\") rFileName = Right(restorePath, Len(restorePath) - ph) restorePath = Left(restorePath, ph) Else MsgBox "No record found for database physical file name.", 64, "Message to User" rs.Close Set rs = Nothing db.Close Set db = Nothing Exit Sub End If rs.Close End If ph = InStrRev(backupPath, "\") If Right(backupPath, 1) <> "\" Then backupPath = backupPath & "\" End If If Right(restorePath, 1) <> "\" Then restorePath = restorePath & "\" End If If Right(dFilePath, 1) <> "\" Then dFilePath = dFilePath & "\" End If If Right(tFilePath, 1) <> "\" Then tFilePath = tFilePath & "\" End If sFileName = backupPath & DBName & ".bak" sql = "BACKUP DATABASE " & DBName & " TO DISK='" & sFileName & "'" 'MsgBox sql db.Execute sql sql = "Restore Database " & DBName & myYear & " From Disk='" & sFileName & "' with move '" & dFile & "' to '" & dFilePath & DBName & myYear & ".mdf', move '" & tFile & "' to '" & tFilePath & DBName & myYear & "_log'" db.Execute sql db.Close tempCS = Replace(gblCS, ";Database=" & DBName, "") db.Open tempCS On Error Resume Next '---grant db access to restored database '---may have to change owner on some objects For lc = 1 To UBound(UserArray) If UserArray(lc) <> "dbo" Then db.Execute "Use " & DBName & myYear & " exec sp_changeobjectowner '" & UserArray(lc) & ".qryDayCts', 'dbo'" db.Execute "Use " & DBName & myYear & " Drop Table " & UserArray(lc) & ".TempB" db.Execute "Use " & DBName & myYear & " exec sp_dropuser '" & UserArray(lc) & "'" db.Execute "Use " & DBName & myYear & " exec sp_grantdbaccess '" & UserArray(lc) & "', '" & UserArray(lc) & "'" db.Execute "Use " & DBName & myYear & " exec sp_changegroup 'db_owner', '" & UserArray(lc) & "'" End If Next db.Close 'On Error GoTo 0 '---need to change the views in the historical inventory database to historical fundamentals database If mLoop = 1 Then fundDB = dbs(0) tempCS = Replace(gblCS, DBName, DBName & myYear) db.Open tempCS db.Execute "Alter View dbo.Accounting_Periods AS SELECT * From " & fundDB & myYear & ".dbo.Accounting_Periods" if err.number <> 0 then err.clear db.Execute "Create View dbo.Accounting_Periods AS SELECT * From " & fundDB & myYear & ".dbo.Accounting_Periods" end if db.Execute "Alter View dbo.Appropriation_Year AS SELECT * From " & fundDB & myYear & ".dbo.Appropriation_Year" if err.number <> 0 then err.clear db.Execute "Create View dbo.Appropriation_Year AS SELECT * From " & fundDB & myYear & ".dbo.Appropriation_Year" end if db.Execute "Alter View dbo.Contributor_Info AS SELECT * From " & fundDB & myYear & ".dbo.Contributor_Info" if err.number <> 0 then err.clear db.Execute "Create View dbo.Contributor_Info AS SELECT * From " & fundDB & myYear & ".dbo.Contributor_Info" end if db.Execute "Alter View dbo.Data_Transactions AS SELECT * From " & fundDB & myYear & ".dbo.Data_Transactions" if err.number <> 0 then err.clear db.Execute "Create View dbo.Data_Transactions AS SELECT * From " & fundDB & myYear & ".dbo.Data_Transactions" end if db.Execute "Alter View dbo.Operational_Data AS SELECT * From " & fundDB & myYear & ".dbo.Operational_Data" if err.number <> 0 then err.clear db.Execute "Create View dbo.Operational_Data AS SELECT * From " & fundDB & myYear & ".dbo.Operational_Data" end if db.Execute "Alter View dbo.Operational_Data_Transactions AS SELECT * From " & fundDB & myYear & ".dbo.Operational_Data_Transactions" if err.number <> 0 then err.clear db.Execute "Create View dbo.Operational_Data_Transactions AS SELECT * From " & fundDB & myYear & ".dbo.Operational_Data_Transactions" end if db.Execute "Alter View dbo.Region_Info AS SELECT * From " & fundDB & myYear & ".dbo.Region_Info" if err.number <> 0 then err.clear db.Execute "Create View dbo.Region_Info AS SELECT * From " & fundDB & myYear & ".dbo.Region_Info" end if db.Execute "Alter View dbo.School_Info AS SELECT * From " & fundDB & myYear & ".dbo.School_Info" if err.number <> 0 then err.clear db.Execute "Create View dbo.School_Info AS SELECT * From " & fundDB & myYear & ".dbo.School_Info" end if db.Execute "Alter View dbo.State_Info AS SELECT * From " & fundDB & myYear & ".dbo.State_Info" if err.number <> 0 then err.clear db.Execute "Create View dbo.State_Info AS SELECT * From " & fundDB & myYear & ".dbo.State_Info" end if db.Execute "Alter View dbo.System_Info AS SELECT * From " & fundDB & myYear & ".dbo.System_Info" if err.number <> 0 then err.clear db.Execute "Create View dbo.System_Info AS SELECT * From " & fundDB & myYear & ".dbo.System_Info" end if db.Execute "Alter View dbo.Transaction_Type AS SELECT * From " & fundDB & myYear & ".dbo.Transaction_Type" if err.number <> 0 then err.clear db.Execute "Create View dbo.Transaction_Type AS SELECT * From " & fundDB & myYear & ".dbo.Transaction_Type" end if db.Execute "Alter View dbo.Warehouse_Info AS SELECT * From " & fundDB & myYear & ".dbo.Warehouse_Info" if err.number <> 0 then err.clear db.Execute "Create View dbo.Warehouse_Info AS SELECT * From " & fundDB & myYear & ".dbo.Warehouse_Info " end if db.Close End If Next ''''Clean up''''' MsgBox "Year End Process Completed for " & fundDB & " and " & DBName & ".", 64, "Message to User" Set db = Nothing Set rs = Nothing End Sub '' SIG '' Begin signature block '' SIG '' MIIcLAYJKoZIhvcNAQcCoIIcHTCCHBkCAQExDjAMBggq '' SIG '' hkiG9w0CBQUAMGYGCisGAQQBgjcCAQSgWDBWMDIGCisG '' SIG '' AQQBgjcCAR4wJAIBAQQQTvApFpkntU2P5azhDxfrqwIB '' SIG '' AAIBAAIBAAIBAAIBADAgMAwGCCqGSIb3DQIFBQAEEJgc '' SIG '' x8NbLUH/Ta1VahuZJ0Ggghd2MIIDJzCCApCgAwIBAgIB '' SIG '' ATANBgkqhkiG9w0BAQQFADCBzjELMAkGA1UEBhMCWkEx '' SIG '' FTATBgNVBAgTDFdlc3Rlcm4gQ2FwZTESMBAGA1UEBxMJ '' SIG '' Q2FwZSBUb3duMR0wGwYDVQQKExRUaGF3dGUgQ29uc3Vs '' SIG '' dGluZyBjYzEoMCYGA1UECxMfQ2VydGlmaWNhdGlvbiBT '' SIG '' ZXJ2aWNlcyBEaXZpc2lvbjEhMB8GA1UEAxMYVGhhd3Rl '' SIG '' IFByZW1pdW0gU2VydmVyIENBMSgwJgYJKoZIhvcNAQkB '' SIG '' FhlwcmVtaXVtLXNlcnZlckB0aGF3dGUuY29tMB4XDTk2 '' SIG '' MDgwMTAwMDAwMFoXDTIwMTIzMTIzNTk1OVowgc4xCzAJ '' SIG '' BgNVBAYTAlpBMRUwEwYDVQQIEwxXZXN0ZXJuIENhcGUx '' SIG '' EjAQBgNVBAcTCUNhcGUgVG93bjEdMBsGA1UEChMUVGhh '' SIG '' d3RlIENvbnN1bHRpbmcgY2MxKDAmBgNVBAsTH0NlcnRp '' SIG '' ZmljYXRpb24gU2VydmljZXMgRGl2aXNpb24xITAfBgNV '' SIG '' BAMTGFRoYXd0ZSBQcmVtaXVtIFNlcnZlciBDQTEoMCYG '' SIG '' CSqGSIb3DQEJARYZcHJlbWl1bS1zZXJ2ZXJAdGhhd3Rl '' SIG '' LmNvbTCBnzANBgkqhkiG9w0BAQEFAAOBjQAwgYkCgYEA '' SIG '' 0jY2aovXwlue2oFBYo847kkEVdbQ7xwblRZH7xhINTpS '' SIG '' 9CtqBo87L+pW46+GjZ4X9560ZXUCTe/LCaIhUdib0GfQ '' SIG '' ug2SBhRz1JPLlyoAnFxODLz6FVL88kRu2hFKbgifLy3j '' SIG '' +ao6hnO2RlNYyIkFvYMRuHM/qgeN9EJN50CdHDcCAwEA '' SIG '' AaMTMBEwDwYDVR0TAQH/BAUwAwEB/zANBgkqhkiG9w0B '' SIG '' AQQFAAOBgQAmSCwWwlj66BZ0DKqqX1Q/8tfJeGBeXm43 '' SIG '' YyJ3Nn6yF8Q0ufUIhfzJATj/Tb7yFkJD57taRvvBxhEf '' SIG '' 8UqwKEbJw8RCfbz6q1lu1bdRiBHjpIUZa4JMpAwSremk '' SIG '' rj/xw0llmozFyD4lt5SZu5IycQfwhl7tUCemDaYj+bvL '' SIG '' pgcUQjCCA3owggJioAMCAQICEDgl1/r4Ya+e9JDnJrXW '' SIG '' WtUwDQYJKoZIhvcNAQEFBQAwUzELMAkGA1UEBhMCVVMx '' SIG '' FzAVBgNVBAoTDlZlcmlTaWduLCBJbmMuMSswKQYDVQQD '' SIG '' EyJWZXJpU2lnbiBUaW1lIFN0YW1waW5nIFNlcnZpY2Vz '' SIG '' IENBMB4XDTA3MDYxNTAwMDAwMFoXDTEyMDYxNDIzNTk1 '' SIG '' OVowXDELMAkGA1UEBhMCVVMxFzAVBgNVBAoTDlZlcmlT '' SIG '' aWduLCBJbmMuMTQwMgYDVQQDEytWZXJpU2lnbiBUaW1l '' SIG '' IFN0YW1waW5nIFNlcnZpY2VzIFNpZ25lciAtIEcyMIGf '' SIG '' MA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQDEtfJSFbyI '' SIG '' hmApFkpbL0uRa4eR8zVUWDXq0TZeYk1SUTRxwntmHYnI '' SIG '' 3SrEagr2N9mYdJH2kq6wtXaW8alKY0VHLmsLkk5LK4zu '' SIG '' WEqL1AfkGiz4gqpY2c1C8y3Add6Nq8eOHZpsTAiVHt7b '' SIG '' 72fhcsJJwp5gPOHivhajY3hpFHutLQIDAQABo4HEMIHB '' SIG '' MDQGCCsGAQUFBwEBBCgwJjAkBggrBgEFBQcwAYYYaHR0 '' SIG '' cDovL29jc3AudmVyaXNpZ24uY29tMAwGA1UdEwEB/wQC '' SIG '' MAAwMwYDVR0fBCwwKjAooCagJIYiaHR0cDovL2NybC52 '' SIG '' ZXJpc2lnbi5jb20vdHNzLWNhLmNybDAWBgNVHSUBAf8E '' SIG '' DDAKBggrBgEFBQcDCDAOBgNVHQ8BAf8EBAMCBsAwHgYD '' SIG '' VR0RBBcwFaQTMBExDzANBgNVBAMTBlRTQTEtMjANBgkq '' SIG '' hkiG9w0BAQUFAAOCAQEAUMVLyCSA3+QNJMLeGrGhAqGm '' SIG '' gi0MgxWBNwqCDiywWhdhtdgF/ojb8ZGRs1YaQKbrkr44 '' SIG '' ObB1NnQ6mE/kN7qZicqVQh2wucegjVfg+tVkBEI1TgHR '' SIG '' M6IXyE2qJ8fy4YZMAjhNg3jG/FPg6+AGh92klp5eDJji '' SIG '' pb6/goXDYOHfrSjYx6VLZNrHG1u9rDkI1TgioTOLL4qa '' SIG '' 67wHIT9EQQkHtWUcJLxI00SA66HPyQK0FM9UxxajgFz5 '' SIG '' eT5dcn2IF54sQ6LKU859PfYqOrhPlAClbQqDXfleU/QY '' SIG '' s1cPcMP79a2VoA4X3sQWgGDJDytuhgTx6/R4J9EFxe40 '' SIG '' W165STLyMzCCA8QwggMtoAMCAQICEEe/GZXfjVJGQ/fb '' SIG '' bUgNMaQwDQYJKoZIhvcNAQEFBQAwgYsxCzAJBgNVBAYT '' SIG '' AlpBMRUwEwYDVQQIEwxXZXN0ZXJuIENhcGUxFDASBgNV '' SIG '' BAcTC0R1cmJhbnZpbGxlMQ8wDQYDVQQKEwZUaGF3dGUx '' SIG '' HTAbBgNVBAsTFFRoYXd0ZSBDZXJ0aWZpY2F0aW9uMR8w '' SIG '' HQYDVQQDExZUaGF3dGUgVGltZXN0YW1waW5nIENBMB4X '' SIG '' DTAzMTIwNDAwMDAwMFoXDTEzMTIwMzIzNTk1OVowUzEL '' SIG '' MAkGA1UEBhMCVVMxFzAVBgNVBAoTDlZlcmlTaWduLCBJ '' SIG '' bmMuMSswKQYDVQQDEyJWZXJpU2lnbiBUaW1lIFN0YW1w '' SIG '' aW5nIFNlcnZpY2VzIENBMIIBIjANBgkqhkiG9w0BAQEF '' SIG '' AAOCAQ8AMIIBCgKCAQEAqcqypMzNIK8KfYmsh3XwtE7x '' SIG '' 38EPv2dhvaNkHNq7+cozq4QwiVh+jNtr3TaeD7/R7Hjy '' SIG '' d6Z+bzy/k68Numj0bJTKvVItq0g99bbVXV8bAp/6L2se '' SIG '' pPejmqYayALhf0xS4w5g7EAcfrkN3j/HtN+HvV96ajEu '' SIG '' A5mBE6hHIM4xcw1XLc14NDOVEpkSud5oL6rm48KKjCrD '' SIG '' iyGHZr2DWFdvdb88qiaHXcoQFTyfhOpUwQpuxP7FSt25 '' SIG '' BxGXInzbPifRHnjsnzHJ8eYiGdvEs0dDmhpfoB6Q5F71 '' SIG '' 7nzxfatiAY/1TQve0CJWqJXNroh2ru66DfPkTdmg+2ig '' SIG '' rhQ7s4fBuwIDAQABo4HbMIHYMDQGCCsGAQUFBwEBBCgw '' SIG '' JjAkBggrBgEFBQcwAYYYaHR0cDovL29jc3AudmVyaXNp '' SIG '' Z24uY29tMBIGA1UdEwEB/wQIMAYBAf8CAQAwQQYDVR0f '' SIG '' BDowODA2oDSgMoYwaHR0cDovL2NybC52ZXJpc2lnbi5j '' SIG '' b20vVGhhd3RlVGltZXN0YW1waW5nQ0EuY3JsMBMGA1Ud '' SIG '' JQQMMAoGCCsGAQUFBwMIMA4GA1UdDwEB/wQEAwIBBjAk '' SIG '' BgNVHREEHTAbpBkwFzEVMBMGA1UEAxMMVFNBMjA0OC0x '' SIG '' LTUzMA0GCSqGSIb3DQEBBQUAA4GBAEpr+epYwkQcMYl5 '' SIG '' mSuWv4KsAdYcTM2wilhu3wgpo17IypMT5wRSDe9HJy8A '' SIG '' OLDkyZNOmtQiYhX3PzchT3AxgPGLOIez6OiXAP7PVZZO '' SIG '' JNKpJ056rrdhQfMqzufJ2V7duyuFPrWdtdnhV/++tMV+ '' SIG '' 9c8MnvCX/ivTO1IbGzgn9z9KMIIEGDCCAwCgAwIBAgIQ '' SIG '' EgfyYhRpc+YCMN2UG6VK3jANBgkqhkiG9w0BAQUFADBK '' SIG '' MQswCQYDVQQGEwJVUzEVMBMGA1UEChMMVGhhd3RlLCBJ '' SIG '' bmMuMSQwIgYDVQQDExtUaGF3dGUgQ29kZSBTaWduaW5n '' SIG '' IENBIC0gRzIwHhcNMTEwMzI1MDAwMDAwWhcNMTIwNDEx '' SIG '' MjM1OTU5WjBuMQswCQYDVQQGEwJVUzEQMA4GA1UECBMH '' SIG '' QWxhYmFtYTEPMA0GA1UEBxMGRG90aGFuMR0wGwYDVQQK '' SIG '' FBRWaXN1YWwgU29sdXRpb25zIExMQzEdMBsGA1UEAxQU '' SIG '' VmlzdWFsIFNvbHV0aW9ucyBMTEMwggEiMA0GCSqGSIb3 '' SIG '' DQEBAQUAA4IBDwAwggEKAoIBAQDG/Bdms5xpjCbFP06N '' SIG '' 2H9PYgb+XisaNnvjeI39uXhd6cLN+kwuZPf7VL3bMv23 '' SIG '' 0O2GmXHHROwMVQUIcX+vMO8nRkxoEn/ZZn94tbgjBUfm '' SIG '' EVQ1JUqMWgPfrZeBPKkYvvP9LdVx3BEJQQCYZkG4kSw5 '' SIG '' qbTqetIDmmusP7qB/dQqP79hq0LMLPbhmR5rWMfRznkR '' SIG '' OoAWM1Mnl9kqvvWw6Xmb/uz2jKZWSaoxjppbHFpio8Rb '' SIG '' xl/c6LOBF35Jvl42TlCzwqGd24NIL7H3yPhm3E0MdlHt '' SIG '' IcGwmCWehpBH+6blfZIMyidQXnASUXO6AcExgIYUuY8V '' SIG '' dw5o7DRI3hx3vHmxAgMBAAGjgdUwgdIwDAYDVR0TAQH/ '' SIG '' BAIwADA7BgNVHR8ENDAyMDCgLqAshipodHRwOi8vY3Mt '' SIG '' ZzItY3JsLnRoYXd0ZS5jb20vVGhhd3RlQ1NHMi5jcmww '' SIG '' HwYDVR0lBBgwFgYIKwYBBQUHAwMGCisGAQQBgjcCARYw '' SIG '' HQYDVR0EBBYwFDAOMAwGCisGAQQBgjcCARYDAgeAMDIG '' SIG '' CCsGAQUFBwEBBCYwJDAiBggrBgEFBQcwAYYWaHR0cDov '' SIG '' L29jc3AudGhhd3RlLmNvbTARBglghkgBhvhCAQEEBAMC '' SIG '' BBAwDQYJKoZIhvcNAQEFBQADggEBALa8Q1jPHDfEZaZj '' SIG '' 4lqBYo2D9Y4jY8h464s6h1ufdFGmkgSELS22weRG6jKh '' SIG '' ImJ9UZxLZTj4kttnW1fjwJkf3Z+y6vckIhrDFWP6u3bg '' SIG '' STqmZ89ickPocpx8jvfBQG4CdFEjTo63uosw+BYbn+ZN '' SIG '' tB1I/CndNLQAbyMBRVDF0PmS6RORAlUJR7oYvDlbvH1N '' SIG '' G8AmDRMheVJsiay4FdDbQZ8aMxOngRABAHhHD+vpdQhd '' SIG '' ND0vKmNWkFN/TJaCIX7hgDlPLGkSwz5fmcj0J3d9sCcZ '' SIG '' P/NAEd6H/7auYuiE1v2nryvqH1EZlnu9ehA9BNporZL3 '' SIG '' P29REen2Jjn3cFCcrKwwggRFMIIDrqADAgECAhAzZVAI '' SIG '' ea1z4jC54B0Nf6yRMA0GCSqGSIb3DQEBBQUAMIHOMQsw '' SIG '' CQYDVQQGEwJaQTEVMBMGA1UECBMMV2VzdGVybiBDYXBl '' SIG '' MRIwEAYDVQQHEwlDYXBlIFRvd24xHTAbBgNVBAoTFFRo '' SIG '' YXd0ZSBDb25zdWx0aW5nIGNjMSgwJgYDVQQLEx9DZXJ0 '' SIG '' aWZpY2F0aW9uIFNlcnZpY2VzIERpdmlzaW9uMSEwHwYD '' SIG '' VQQDExhUaGF3dGUgUHJlbWl1bSBTZXJ2ZXIgQ0ExKDAm '' SIG '' BgkqhkiG9w0BCQEWGXByZW1pdW0tc2VydmVyQHRoYXd0 '' SIG '' ZS5jb20wHhcNMDYxMTE3MDAwMDAwWhcNMjAxMjMwMjM1 '' SIG '' OTU5WjCBqTELMAkGA1UEBhMCVVMxFTATBgNVBAoTDHRo '' SIG '' YXd0ZSwgSW5jLjEoMCYGA1UECxMfQ2VydGlmaWNhdGlv '' SIG '' biBTZXJ2aWNlcyBEaXZpc2lvbjE4MDYGA1UECxMvKGMp '' SIG '' IDIwMDYgdGhhd3RlLCBJbmMuIC0gRm9yIGF1dGhvcml6 '' SIG '' ZWQgdXNlIG9ubHkxHzAdBgNVBAMTFnRoYXd0ZSBQcmlt '' SIG '' YXJ5IFJvb3QgQ0EwggEiMA0GCSqGSIb3DQEBAQUAA4IB '' SIG '' DwAwggEKAoIBAQCsoPD7gFnUnMekz52hWXMJEEUMDSxu '' SIG '' aPFsW0hoSVk3/AszGcJ3f8wQLZU0HObrTQmnHNK4yZc2 '' SIG '' AreJ1CRfBsDMRJSUjQJib+ta3RGNKJpchJAQeg29dGYv '' SIG '' ajig4tVUROsdB58Hum/u6f1OCyn1PoSgAfGcq/gcfomk '' SIG '' 6KHYcWUNo1F77rzSImANuVud37r8UVsLr5iy6S7pBOhi '' SIG '' h94ryNdOwUxkHt3Ph1i6Sk/KaAcdHJ1KxtUvkcx8cXIc '' SIG '' xcBn6zL9yZJclNqFwJu/U30rCfSMnZEfl2pSy94JNqR3 '' SIG '' 2HuHUETVPm4pafs5SSYeCaWAe0At6+gnhcn+Yf1+5nyX '' SIG '' HdWdAgMBAAGjgcIwgb8wDwYDVR0TAQH/BAUwAwEB/zA7 '' SIG '' BgNVHSAENDAyMDAGBFUdIAAwKDAmBggrBgEFBQcCARYa '' SIG '' aHR0cHM6Ly93d3cudGhhd3RlLmNvbS9jcHMwDgYDVR0P '' SIG '' AQH/BAQDAgEGMB0GA1UdDgQWBBR7W0XPr87Lev0xkhpq '' SIG '' tvNG61dIUDBABgNVHR8EOTA3MDWgM6Axhi9odHRwOi8v '' SIG '' Y3JsLnRoYXd0ZS5jb20vVGhhd3RlUHJlbWl1bVNlcnZl '' SIG '' ckNBLmNybDANBgkqhkiG9w0BAQUFAAOBgQCEqEzJPiq8 '' SIG '' muLMjwuyJXfEYYmJY1rUoxVA1PteP7RD6mMXK2uZdJ4J '' SIG '' qN3UVhUuenkxX2OWUxs02RXqT21wyr72gqnt2oV3zHYc '' SIG '' aoEKIdhBmX9eLoLB6Kr3k4EFqpK0H7eawAcX9cvGtEwO '' SIG '' 11bccSB0ONZ0xtaPa6+LjaBsKQth4DCCBJwwggOEoAMC '' SIG '' AQICEEeXTXhzpbyrDS+zcBkvzl4wDQYJKoZIhvcNAQEF '' SIG '' BQAwgakxCzAJBgNVBAYTAlVTMRUwEwYDVQQKEwx0aGF3 '' SIG '' dGUsIEluYy4xKDAmBgNVBAsTH0NlcnRpZmljYXRpb24g '' SIG '' U2VydmljZXMgRGl2aXNpb24xODA2BgNVBAsTLyhjKSAy '' SIG '' MDA2IHRoYXd0ZSwgSW5jLiAtIEZvciBhdXRob3JpemVk '' SIG '' IHVzZSBvbmx5MR8wHQYDVQQDExZ0aGF3dGUgUHJpbWFy '' SIG '' eSBSb290IENBMB4XDTEwMDIwODAwMDAwMFoXDTIwMDIw '' SIG '' NzIzNTk1OVowSjELMAkGA1UEBhMCVVMxFTATBgNVBAoT '' SIG '' DFRoYXd0ZSwgSW5jLjEkMCIGA1UEAxMbVGhhd3RlIENv '' SIG '' ZGUgU2lnbmluZyBDQSAtIEcyMIIBIjANBgkqhkiG9w0B '' SIG '' AQEFAAOCAQ8AMIIBCgKCAQEAt4vPdVufJdp+ObCT2zjT '' SIG '' qSPQgvrpJH5cC46D+OZ6WeajxZinmdJE/wCmpTkEitop '' SIG '' iOrbovMcmRUmwrH0/OEMR6kJEQYKIJK5x6AEjFyUGatb '' SIG '' JSwdYn5wDc5hbN0rgsnOXUhf98K+vEEjHk8pXddPvPTF '' SIG '' Kvxj5nwmTpmneUGeEEp6ecnGhveGldImzjwYKtZ8zq/N '' SIG '' rbv3gixwJjdF5Q9HIsYBKL0ug1xqpEfB59DYa4FGPyEX '' SIG '' 9QfFQ1qmZyy4e2ARtYPu9XQKcnFEPVj+6BqrOMNZ239u '' SIG '' OH12x3JpmDaWV9NmHNJUkQQuVBmw3D21Il6G1Sp+IN9d '' SIG '' 5nqxZf7FAk4xLQIDAQABo4IBHDCCARgwEgYDVR0TAQH/ '' SIG '' BAgwBgEB/wIBADA0BgNVHR8ELTArMCmgJ6AlhiNodHRw '' SIG '' Oi8vY3JsLnRoYXd0ZS5jb20vVGhhd3RlUENBLmNybDAO '' SIG '' BgNVHQ8BAf8EBAMCAQYwMgYIKwYBBQUHAQEEJjAkMCIG '' SIG '' CCsGAQUFBzABhhZodHRwOi8vb2NzcC50aGF3dGUuY29t '' SIG '' MB0GA1UdJQQWMBQGCCsGAQUFBwMCBggrBgEFBQcDAzAp '' SIG '' BgNVHREEIjAgpB4wHDEaMBgGA1UEAxMRVmVyaVNpZ25N '' SIG '' UEtJLTItMTAwHQYDVR0OBBYEFNQNZT96vTTG/kfnTA3A '' SIG '' vfLeFatxMB8GA1UdIwQYMBaAFHtbRc+vzst6/TGSGmq2 '' SIG '' 80brV0hQMA0GCSqGSIb3DQEBBQUAA4IBAQBW/lNc4cee '' SIG '' vKftflNtahRLUYxAXoBfqqToL+84yATJyj7P3zpYTrDU '' SIG '' tmPFKVf6AgWaRU1o2yob1DQ9nwDDWsuVSaVu4bDF/EFN '' SIG '' QUpv03fI1ziN5BneGPMfFWWDbUUMU/kKmi6lXb9vMoEY '' SIG '' khlqVQCtYxxSBn5V2Slorkp8GJp5iGsjI9gnOCoph3bK '' SIG '' +8e2YiMf7XpWTN2cMlv1PQxGGJU7KiNog2RB2QBtDxkk '' SIG '' FWhyvcVxZ26sTNuQ61GlGmIH0L5qAEc8ci/sT2E+c4XO '' SIG '' Wgq3usAcE3XjIjko3W0dCUadT7roQIGRxqTOlHIbAc8q '' SIG '' bhVnlYmufbe3zfkKPXW2azwlMYIEIDCCBBwCAQEwXjBK '' SIG '' MQswCQYDVQQGEwJVUzEVMBMGA1UEChMMVGhhd3RlLCBJ '' SIG '' bmMuMSQwIgYDVQQDExtUaGF3dGUgQ29kZSBTaWduaW5n '' SIG '' IENBIC0gRzICEBIH8mIUaXPmAjDdlBulSt4wDAYIKoZI '' SIG '' hvcNAgUFAKCCAREwGQYJKoZIhvcNAQkDMQwGCisGAQQB '' SIG '' gjcCAQQwHAYKKwYBBAGCNwIBCzEOMAwGCisGAQQBgjcC '' SIG '' ARYwHwYJKoZIhvcNAQkEMRIEEBYurBeRLSBcr9pIXaz9 '' SIG '' 4wMwgbQGCisGAQQBgjcCAQwxgaUwgaKgWoBYAFMARgBT '' SIG '' AEQAIABZAGUAYQByACAARQBuAGQAIABSAG8AbABsAG8A '' SIG '' dgBlAHIAIAAtACAAUwBRAEwAIABEAGEAdABhAGIAYQBz '' SIG '' AGUAIABTAGMAcgBpAHAAdKFEgEJodHRwOi8vd3d3LnRo '' SIG '' ZWZvb2RzZXJ2aWNlZGlyZWN0b3IuY29tL1NvZnR3YXJl '' SIG '' L1NhZmVUb0Rvd25sb2FkLmh0bSAwDQYJKoZIhvcNAQEB '' SIG '' BQAEggEACYBoh7M6JEm+0qVI0Txj1vHxI9UShIvJHwZl '' SIG '' fwc5Hg/KZ4iAzaEOS1ehNz1tgdIcZhlgmMyQ0lEGoqok '' SIG '' A7rqXkZ3WM5AddSTiRPukRUJeIxu7UJmYHN8O0B8k0IX '' SIG '' ISMlJ6feCNEppllL7j1j/SZZKs/s0zs5O5k+I9qcvVoy '' SIG '' GZIgPU1BvkLF8SBKEs8947BNyFi4gS7LHcK17siJgkPu '' SIG '' XZL88cIs0misiUVZBssxAn3U3jafmcZwSBmy4K0HqOhs '' SIG '' SQxJGS6ACBU/+RY1cUNLFp98CRukIjRVRJTtfqvVgvkr '' SIG '' nIByF+U95ESOKRi9vSigtnY4SYu8DKQkTBFcCrnAv6GC '' SIG '' AX8wggF7BgkqhkiG9w0BCQYxggFsMIIBaAIBATBnMFMx '' SIG '' CzAJBgNVBAYTAlVTMRcwFQYDVQQKEw5WZXJpU2lnbiwg '' SIG '' SW5jLjErMCkGA1UEAxMiVmVyaVNpZ24gVGltZSBTdGFt '' SIG '' cGluZyBTZXJ2aWNlcyBDQQIQOCXX+vhhr570kOcmtdZa '' SIG '' 1TAJBgUrDgMCGgUAoF0wGAYJKoZIhvcNAQkDMQsGCSqG '' SIG '' SIb3DQEHATAcBgkqhkiG9w0BCQUxDxcNMTEwNzAxMTQx '' SIG '' MDMzWjAjBgkqhkiG9w0BCQQxFgQU0KXez+YIHDno4z0Z '' SIG '' ZwsT5hx0MYswDQYJKoZIhvcNAQEBBQAEgYCXc87pi6tX '' SIG '' F72rUEPqpdWyelOma8iXXx6joxPPOY4yFgSEc3GfxoRh '' SIG '' Eaubv0IsyWv8IAdRNq5yEIc1VWj0XthACROv0UFWJPhb '' SIG '' HZT6pOU1pG26VIdh+stoofi7n53BLQLdi6jVY5sWZqri '' SIG '' Vi2fHjnpV7m3T3tI7LXm6puXgqzKsw== '' SIG '' End signature block