zv0r

/* The Grid ---------------------- */
.lt-ie9 .row { width: 940px; max-width: 100%; min-width: 768px; margin: 0 auto; }
.lt-ie9 .row .row { width: auto; max-width: none; min-width: 0; margin: 0 -15px; }
.lt-ie9 .row.large-collapse .column, 
.lt-ie9 .row.large-collapse .columns { padding: 0; }
.lt-ie9 .row .row { width: auto; max-width: none; min-width: 0; margin: 0 -15px; }
.lt-ie9 .row .row.large-collapse { margin: 0; }

.lt-ie9 .column, .lt-ie9 .columns { float: left; min-height: 1px; padding: 0 15px; position: relative; }
.lt-ie9 .column.large-centered, .columns.large-centered { float: none; margin: 0 auto; }

zv0r

// ==UserScript==
// @name        Inquiry
// @namespace   yar-archives.ru/
// @description Позволяет отобразить/показать исполненные запросы на странице Работа с обращениями
// @include     http://www.yar-archives.ru/web-archive/index.php?act=user&sub=treat*
// @require     http://www.tablesorter.ru/jquery.tablesorter.min.js
// @version     1
// ==/UserScript==
// Делает селектор contains нечувствительным к регистру
jQuery.expr[':'].contains = function(a, i, m) {

zv0r

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim rsFundData As ADODB.Recordset
Dim rsFundStats As ADODB.Recordset
Dim rsInventoryData As ADODB.Recordset
Dim rsInventoryStats As ADODB.Recordset
Dim rsInventoriesWithPdf As ADODB.Recordset
Dim rsInventoriesWithPdfCount As ADODB.Recordset
Dim rsFilledIsnInventory As ADODB.Recordset
Dim totalInventories As Integer

zv0r

SET IDENTITY_INSERT [AISArchive].[dbo].[tblThemeCards] ON

/*
 *
 * ID тематической БД метрических книг
 *
 */
DECLARE @CatId INT
SET @CatId = 2

zv0r

SET IDENTITY_INSERT [AISArchive].[dbo].[tblThemeCards] ON

/*
 *
 * ID тематической БД исповедных росписей
 *
 */
DECLARE @CatId INT
SET @CatId = 3

zv0r

IF EXISTS (
 SELECT * FROM sysobjects WHERE id = object_id(N'dbo.getUnitRubric') 
  AND xtype IN (N'FN', N'IF', N'TF')
)
 DROP FUNCTION dbo.getUnitRubric
GO

IF EXISTS (
 SELECT * FROM sysobjects WHERE id = object_id(N'dbo.convertDocType') 
  AND xtype IN (N'FN', N'IF', N'TF')

zv0r

-- ID архива, в котором создается тематическая БД
DECLARE @archID INT
SET @archID = 1

-- Имя тематической базы анных
DECLARE @dbName NVARCHAR(2000)
SET @dbName = 'Ревизские сказки'

DECLARE @dbID TABLE(Id INT)

zv0r

SELECT
  (SELECT COUNT(*) FROM inquiries2015 inq INNER JOIN v_status st ON st.id = inq.status_id WHERE st.legal = 0 AND inq.reg_date >= '2015-02-01' AND inq.reg_date <= '2015-02-28') AS 'С4', -- всего физлиц
  (SELECT COUNT(*) FROM inquiries2015 inq INNER JOIN v_status st ON st.id = inq.status_id WHERE st.legal = 1 AND inq.reg_date >= '2015-02-01' AND inq.reg_date <= '2015-02-28') AS 'D4', -- всего юрлиц
  (SELECT COUNT(*) FROM inquiries2015 inq WHERE inq.reg_date >= '2015-02-01' AND inq.reg_date <= '2015-02-28') AS 'E4', -- всего
  (SELECT COUNT(*) FROM inquiries2015 inq INNER JOIN v_status st ON st.id = inq.status_id WHERE st.legal = 0 AND (inq.source_id = 1 OR inq.source_id = 6) AND inq.reg_date >= '2015-02-01' AND inq.reg_date <= '2015-02-28') AS 'С5', -- физлиц очно
  (SELECT COUNT(*) FROM inquiries2015 inq INNER JOIN v_status st ON st.id = inq.status_id WHERE st.legal = 1 AND (inq.source_id = 1 OR inq.source_id = 6) AND inq.reg_date >= '2015-02-01' AND inq.reg_date <= '2015-02-28') AS 'D5', -- юрлиц очн

zv0r

SET IDENTITY_INSERT [AISArchive].[dbo].[tblThemeCards] ON

/*
 *
 * ID тематической БД клировых ведомостей
 *
 */
DECLARE @CatId INT
SET @CatId = 8

zv0r

-- ID архива, в котором создается тематическая БД
DECLARE @archID INT
SET @archID = 2

-- Имя тематической базы анных
DECLARE @dbName NVARCHAR(2000)
SET @dbName = 'Клировые ведомости'

DECLARE @dbID TABLE(Id INT)