CC BY
5
УДК 004.4
Вардиашвили Н.Н. профессор
кафедра «Информационные системы»
Батыров А.К. студент 4 курса специальность Информационные системы КГУ имени А. Байтурсынова Казахстан, г. Костанай АВТОМАТИЗАЦИЯ МОНИТОРИНГА БЮДЖЕТА МЕСТНОГО САМОУПРАВЛЕНИЯ НА УРОВНЕ СЕЛЬСКОГО ОКРУГА Аннотация: Статья посвящена описанию процесса разработки и использования автоматизированной информационной системы, предназначенной для мониторинга бюджета местного самоуправления. Программа реализована в среде Delphi 7 и представляет собой базу данных. В программе имеются функции добавления, удаления данных, произведение расчетов налога на землю, имущество, транспорт.
Ключевые слова: база данных, Paradox, справочники, таблица.
Vardiashvili N.N.
Professor of the department "Information Systems"
KSU after A. Baytursynov Kazakhstan, Kostanay city Batyrov A.K.
Student
4 year, specialty Information Systems KSU after A. Baytursynov Kazakhstan, Kostanay city AUTOMATIZAON OF LOCAL SELF-GOVERNMENT BUDGET MONITORING AT THE LEVEL OF RURAL DISTRICT Annotation: The article is devoted to the description of the process of development and use of an automated information system intended for monitoring the budget of local self-government. The program is implemented in the Delphi 7 environment and is a database. The program has the functions of adding, deleting data, the product of calculations of the tax on land, property, transport. Key words: database, Paradox, directories, table.
Программа автоматизации мониторинга бюджета местного самоуправления ведет учет налогоплательщиков и объектов налогообложения, автоматизированный расчет налогов по категориям и т.д. Программный продукт реализован в среде визуального программирования Borland Delphi 7 c подключением базы данных Paradox.
В программе используется 2 основные таблицы налогоплательщиков и вспомогательные таблицы, содержащие информацию о ставках
налогообложения. Все таблицы реализованы в базе данных Paradox, и называются «Справочники». Описание процедур
Для формирования отчетов реализована следующая процедура: procedure Rep_Passport(PlaceID: Integer); var xls: Variant;
WorkbookName, OS: string; PosInc, i: Integer; OSPresent: Boolean; begin
Для формирования отчета данные экспортируются из таблиц, при помощи следующей процедуры:
//Экспорт данных из таблицы БД: with DM do begin dstPlaces2.Open;
if dstPlaces2.Locate('ID', PlaceID, []) then begin
xls.Cells[5,1] := dstPlaces2.FieldByName(':H™').AsStrmg + ', ' +
dstPlaces2.FieldByName('Базовая ставка').AsString; xls.Cells[7,1] := dstPlaces2.FieldByName('Площадь').AsString; xls.Cells[7,2] := dstPlaces2.FieldByName('Сумма').AsString; xls.Cells[7,4] := dstPlaces2.FieldByName('ФИО').AsString; i:=0;
PosInc := 9;
OSPresent := False;
//Экспорт данных из таблиц БД:
dstDevicesAtPlace.First;
while not dstDevicesAtPlace.Eof do
begin
if dstDevicesAtPlace.FieldByName('Тип').AsString = Земельный
налог' then
begin OSPresent := True;
OS := dstDevicesAtPlace.FieldByName('Модель').AsString; end else begin
//Добавление новой строки:
if i <> 0 then
begin
xls.Rows.Item[PosInc+i].Select; xls.Selection.Insert;
xls.Rows.Item[PosInc].Select; xls.Selection.Copy; xls.Rows.Item[PosInc+i].Select; xls.ActiveSheet.Paste; xls.Application.CutCopyMode := False; end;
xls.Cells[i+PosInc,1]:=dstDevicesAtPlace.FieldByName('Тип').AsString; xls.Cells[i+PosInc,2]:=dstDevicesAtPlace.FieldByName('Модель').AsStrin
g;
Inc(i); end;
dstDevicesAtPlace.Next; end; //while if i=0 then Inc(i,1); if OSPresent then xls.Cells[i+PosInc+1,2] := OS; xls.Cell s[i+Po sInc+3,1]:= stPlaces2.FieldByName('ИИН').AsString; xls.Cell s[i+PosInc+5,2]:= stPlaces2.FieldByName('ФИО').AsString; xls.Cells[i+PosInc+7,1] := Date; end; //if Locate dstPlaces2.Close; end; //with xls.Visible := True; except xls.Quit; end; end; end.
После запуска программы и перехода в основной учетный раздел откроется основная расчетная форма на которой присутствуют 4 модуля расчета на каждый вид налога.
На данной форме расположены модули для расчета налога, открыв которые можно произвести расчет налога по объекту налогообложения, указав соответствующие параметры.
Рисунок 4. Основная форма расчета/ Модуль расчета налога на имущество физических лиц Разработанный программный продукт позволяет более точно определить суммы налоговых поступлений определенной территориальной единицы, что в свою очередь позволит запланировать бюджет административной единицы, с минимальными затратами временных ресурсов.
Использованные источники:
1. База данных в Paradox. - режим доступа к ресурсу.: http://citforum.ru/programming/32less/les3 3. shtml
2. Delphi - среда визуального программирования.- режим доступа к ресурсу.: http : //www.delphi-manual .ru
