АИС ЛПУ « БЛОГ ЛИСА

Архив для категории ‘АИС ЛПУ’

Валидация на заполненность СНИЛС в АИС ЛПУ (Витакарта)

Posted: 14th Октябрь 2018 by lis in АИС ЛПУ, Витакарта

Для того, чтобы запретить создавать сотрудников с пустым полем СНИЛС, нужно создать валидацию на сущности WORKER:

<lx:Case xmlns:lx="lexem">
	<When>
		<lx:Criteria type="And">
			<lx:Criteria type="Or">
				<lx:Criterion type="=">
					<lx:Path OwnerQueryLevel="0">
						<lx:StepString name="Snils" />
						<lx:StepString name="Snils" />
					</lx:Path>
					<lx:ConstOperand type="String"><![CDATA[              ]]></lx:ConstOperand>
				</lx:Criterion>
				<lx:Criterion type="=">
					<lx:Path OwnerQueryLevel="0">
						<lx:StepString name="Snils" />
						<lx:StepString name="Snils" />
					</lx:Path>
					<lx:ConstOperand isNull="1" />
				</lx:Criterion>
				<lx:Criterion type="=">
					<lx:Path OwnerQueryLevel="0">
						<lx:StepString name="Snils" />
						<lx:StepString name="Snils" />
					</lx:Path>
					<lx:ConstOperand type="String"><![CDATA[]]></lx:ConstOperand>
				</lx:Criterion>
			</lx:Criteria>
		</lx:Criteria>
	</When>
	<Then>
		<lx:ConstOperand type="String"><![CDATA[Не заполнен СНИЛС!]]></lx:ConstOperand>
	</Then>
	<Else>
		<lx:ConstOperand isNull="1" />
	</Else>
</lx:Case>

<lx:Case xmlns:lx="lexem">

<When>

<lx:Criteria type="And">

<lx:Criteria type="Or">

<lx:Criterion type="=">

<lx:Path OwnerQueryLevel="0">

<lx:StepString name="Snils" />

</lx:Path>

<lx:ConstOperand type="String"><![CDATA[ ]]></lx:ConstOperand>

</lx:Criterion>

<lx:Criterion type="=">

<lx:Path OwnerQueryLevel="0">

<lx:StepString name="Snils" />

</lx:Path>

<lx:ConstOperand isNull="1" />

</lx:Criterion>

<lx:Criterion type="=">

<lx:Path OwnerQueryLevel="0">

<lx:StepString name="Snils" />

</lx:Path>

<lx:ConstOperand type="String"><![CDATA[]]></lx:ConstOperand>

</lx:Criterion>

</lx:Criteria>

</When>

<Then>

<lx:ConstOperand type="String"><![CDATA[Не заполнен СНИЛС!]]></lx:ConstOperand>

</Then>

<Else>

<lx:ConstOperand isNull="1" />

</Else>

</lx:Case>

Изменение отображения строки выбора филиала при входе пользователя в АИС ЛПУ (Витакарта)

Posted: 26th Сентябрь 2018 by lis in АИС ЛПУ, Витакарта

За отображение данной строки отвечает лексема, которая содержится в конфигурационном файле AKUZ.Service.exe в секции: /configuration/VCLib.Server/UserInfoLexem

Сервисы AIS LPU

Posted: 13th Август 2018 by lis in АИС ЛПУ, Витакарта

Сервис для приема вызовов со скорой помощи – VitacardService

Настройка Windows-авторизации в Витакарте

Posted: 10th Июнь 2018 by lis in АИС ЛПУ, Витакарта

На сервере для прозрачной авторизации (с помощью учетной записи Windows) используется отдельный порт для подключения клиента. Если в серверном конфиге блок для подключения уже прописан, то можете переходить к настройке клиентов, если же блок для подключения клиентов с Windows-авторизацией отсутствует, то его необходимо добавить и перезапустить службу для применения изменений.

<configuration>
  <system.runtime.remoting>
      <channels>
        <-- блок для подключения клиентов с Windows-авторизацией -->
        <channel ref="tcp" name="tcp0" port="32750" secure="true">
          <serverProviders>
            <provider type="GEst.Remoting.SspiServerSinkProvider, VCLib.Server" compression="false" notCompressedRequestLength="1024" />
            <formatter ref="binary" typeFilterLevel="Full" />
          </serverProviders>
        </channel>
        <-- конец блок для подключения клиентов с Windows-авторизацией -->

        <-- блок для подключения клиентов с обычной авторизацией по логину и паролю -->
        <channel ref="tcp" name="tcp1" port="32751">
          <serverProviders>
            <provider type="GEst.Remoting.BasicServerSinkProvider, VCLib.Server" encryption="false" compression="false" notCompressedRequestLength="1024" />
            <formatter ref="binary" typeFilterLevel="Full" />
          </serverProviders>
        </channel>
        <-- конец блок для подключения клиентов с обычной авторизацией по логину и паролю -->
      </channels>
    </application>
  </system.runtime.remoting>

<system.runtime.remoting>

<-- блок для подключения клиентов с Windows-авторизацией -->

</serverProviders>

</channel>

<-- конец блок для подключения клиентов с Windows-авторизацией -->

<-- блок для подключения клиентов с обычной авторизацией по логину и паролю -->

</serverProviders>

</channel>

<-- конец блок для подключения клиентов с обычной авторизацией по логину и паролю -->

</channels>

</application>

</system.runtime.remoting>

Включение политики паролей в АИС ЛПУ (Витакарта)

Posted: 30th Май 2018 by lis in АИС ЛПУ, Витакарта

Чтобы в АИС ЛПУ (Витакарта) запретить создавать новых пользователей с простыми паролями можно создать валидацию с проверкой по регулярному выражению: Создаем валидацию на сущности USERS текст валидации:

Ошибка: Поставщик “VFPOLEDB” не зарегистрирован на локальном компьютере.

Posted: 29th Май 2018 by lis in АИС ЛПУ, Витакарта

Ошибка при выгрузке заявочного списка из АИС ЛПУ (Витакарта):

Проверка на изменение какого-либо поля у существующего объекта в АИС ЛПУ (Витакарта)

Posted: 13th Май 2018 by lis in АИС ЛПУ, Витакарта

Для того, чтобы не допустить изменения какого-либо поля у существующего объекта можно построить валидацию по примеру со следующей: Данная валидация запрещает изменение кода врача у уже существующих врачей. Построена на сущности POST. Текстовый вид валидации:

(if ({ObjectProperties / Fields / Code} & 8 > 0 And {ObjectProperties / IsNew} = False) "Код врача недоступен для редактирования!" else Null())

1	(if ({ObjectProperties / Fields / Code} & 8 > 0 And {ObjectProperties / IsNew} = False) "Код врача недоступен для редактирования!" else Null())

Скрипт для переиндексации базы данных АИС ЛПУ (Витакарта)

Posted: 10th Апрель 2018 by lis in АИС ЛПУ, Витакарта

Скрипт для переиндексации базы данных АИС ЛПУ (Витакарта)

DECLARE @Database VARCHAR(255)   
DECLARE @Table VARCHAR(255)  
DECLARE @cmd NVARCHAR(500)  
DECLARE @fillfactor INT 

SET @fillfactor = 90 

DECLARE DatabaseCursor CURSOR FOR  
SELECT name FROM master.dbo.sysdatabases   
WHERE name IN ('AKUZDB')
ORDER BY 1  

OPEN DatabaseCursor  

FETCH NEXT FROM DatabaseCursor INTO @Database  
WHILE @@FETCH_STATUS = 0  
BEGIN  

   SET @cmd = 'DECLARE TableCursor CURSOR FOR SELECT table_catalog + ''.'' + table_schema + ''.'' + table_name as tableName   
                    FROM ' + @Database + '.INFORMATION_SCHEMA.TABLES WHERE table_type = ''BASE TABLE'''   

   -- create table cursor  
   EXEC (@cmd)  
   OPEN TableCursor   

   FETCH NEXT FROM TableCursor INTO @Table   
   WHILE @@FETCH_STATUS = 0   
   BEGIN   

       -- SQL 2000 command  
       --DBCC DBREINDEX(@Table,' ',@fillfactor)   
         
       -- SQL 2005 command  
       SET @cmd = 'ALTER INDEX ALL ON ' + @Table + ' REBUILD WITH (FILLFACTOR = ' + CONVERT(VARCHAR(3),@fillfactor) + ')'  
       EXEC (@cmd)  

       FETCH NEXT FROM TableCursor INTO @Table   
   END   

   CLOSE TableCursor   
   DEALLOCATE TableCursor  

   FETCH NEXT FROM DatabaseCursor INTO @Database  
END  
CLOSE DatabaseCursor   
DEALLOCATE DatabaseCursor

DECLARE @Database VARCHAR(255)

DECLARE @Table VARCHAR(255)

DECLARE @cmd NVARCHAR(500)

DECLARE @fillfactor INT

SET @fillfactor = 90

DECLARE DatabaseCursor CURSOR FOR

SELECT name FROM master.dbo.sysdatabases

WHERE name IN ('AKUZDB')

ORDER BY 1

OPEN DatabaseCursor

FETCH NEXT FROM DatabaseCursor INTO @Database

WHILE @@FETCH_STATUS = 0

BEGIN

SET @cmd = 'DECLARE TableCursor CURSOR FOR SELECT table_catalog + ''.'' + table_schema + ''.'' + table_name as tableName

FROM ' + @Database + '.INFORMATION_SCHEMA.TABLES WHERE table_type = ''BASE TABLE'''

-- create table cursor

EXEC (@cmd)

OPEN TableCursor

FETCH NEXT FROM TableCursor INTO @Table

WHILE @@FETCH_STATUS = 0

BEGIN

-- SQL 2000 command

--DBCC DBREINDEX(@Table,' ',@fillfactor)

-- SQL 2005 command

SET @cmd = 'ALTER INDEX ALL ON ' + @Table + ' REBUILD WITH (FILLFACTOR = ' + CONVERT(VARCHAR(3),@fillfactor) + ')'

EXEC (@cmd)

FETCH NEXT FROM TableCursor INTO @Table

END

CLOSE TableCursor

DEALLOCATE TableCursor

FETCH NEXT FROM DatabaseCursor INTO @Database

END

CLOSE DatabaseCursor

DEALLOCATE DatabaseCursor

Скачать в виде .sql файла

Удаленная запись из одного ЛПУ в другое ЛПУ, при условии, что в обоих ЛПУ установлена Витакарта

Posted: 28th Март 2018 by lis in АИС ЛПУ, Витакарта

Возникла необходимость настроить запись в одно ЛПУ (Республиканская клиническая больница) из других ЛПУ, в которых, также, используется АИС ЛПУ (Витакарта), так как из Витакарты в Витакарту запись производить проще и удобнее, чем производить запись со специально предназначенного для этого дела сайта (статья о записи с сайта).

Настройка планировщика для автоматической отправки отчётов по электронной почте из АИС ЛПУ (Витакарта)

Posted: 24th Март 2018 by lis in АИС ЛПУ, Витакарта

В данной статье я хочу рассказать о настройке планировщика автоматической отправки отчётов по электронной почте из АИС ЛПУ.

БЛОГ ЛИСА

Свежие записи

Свежие комментарии

Архивы

Рубрики

Мета

Сайты друзей

Баннеры

Архив для категории ‘АИС ЛПУ’

Валидация на заполненность СНИЛС в АИС ЛПУ (Витакарта)

Изменение отображения строки выбора филиала при входе пользователя в АИС ЛПУ (Витакарта)

Сервисы AIS LPU

Настройка Windows-авторизации в Витакарте

Включение политики паролей в АИС ЛПУ (Витакарта)

Ошибка: Поставщик “VFPOLEDB” не зарегистрирован на локальном компьютере.

Проверка на изменение какого-либо поля у существующего объекта в АИС ЛПУ (Витакарта)

Скрипт для переиндексации базы данных АИС ЛПУ (Витакарта)

Удаленная запись из одного ЛПУ в другое ЛПУ, при условии, что в обоих ЛПУ установлена Витакарта

Настройка планировщика для автоматической отправки отчётов по электронной почте из АИС ЛПУ (Витакарта)