1:С "Бухгалтерия"

Автоматизированная обработка информации по управлению трудовыми ресурсами, функциональные преимущества. Штриховое кодирование информации. Структура штрихового кода ЕАМ. Свойства информации 1:С "Бухгалтерия". Расчет контрольной цифры для кода ЕAN13.

Рубрика Программирование, компьютеры и кибернетика
Вид контрольная работа
Язык русский
Дата добавления 30.09.2010
Размер файла 632,5 K

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

1. Теоретическая часть

«Автоматизированная обработка информации по управлению трудовыми ресурсами»

В последние годы актуальность кадровой политики заметно возросла, перейдя из разряда очень важных вопросов в категорию ключевых аспектов успешной деятельности предприятий.

Если ранее служба персонала была представлена отделом кадров, основными функциями которого являлись учет персонала, контроль за соблюдением трудового законодательства и документооборот, то в настоящее время кадровая работа, превратившаяся в управление человеческими ресурсами, направлена на формирование работоспособного и эффективно функционирующего персонала.

В сознании многих людей прочно закрепился образ типичного отдела кадров старого образца: горы бумаг и папок, несколько работников, у которых вечно не хватает времени на подачу отчетов, оформление трудовых книжек или регистрацию личной информации сотрудников. Однако функции службы персонала сегодня значительно расширились, все четче стали проявляться такие потребности, как необходимость в управлении количеством и качеством персонала, организационной структурой, а также развитием сотрудников и их мотивацией, что в современной реальности невозможно представить себе без использования информационных технологий, без автоматизации процесса управления.

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

Многие руководители уже ощутили явную потребность не только в квалифицированных специалистах в сфере HR-управления, но и в автоматизированных информационных системах, которые смогли бы им предоставлять сведения о предприятии, эффективности работы его персонала в удобное время и в структурированном виде. Профессионалы кадровой сферы нуждаются в мощном решении для управления человеческим капиталом - решении, которое объединяет в рамках единого информационного пространства технологии управления персоналом и возможности реализации стратегических целей компании.

Современное время диктует компаниям свои условия и требования в осуществлении бизнес-процессов. Коренные изменения роли персонала в бизнес-деятельности, глобальная трансформация на рынке труда, возрастание социальной ответственности компаний перед обществом и государством, распространение стандартов менеджмента качества, предопределило поворот собственников и менеджеров предприятий к вопросам организации управления имеющимся трудовым потенциалом и особому выделению человеческих ресурсов из присутствующих в компании материальных, финансовых, информационных, временных и интеллектуальных ресурсов как источников и предпосылок достижения поставленных бизнес-целей, которые можно реализовать при существующих технологиях и социально-экономических отношениях. Поэтому сегодня процесс управления человеческими ресурсами следует понимать как совокупность взаимосвязей и взаимодействия информации и мероприятий.

Большинство руководителей крупных компаний видят следующее решение в области управления человеческими ресурсами, которое позволяло бы выполнять такие первоочередные задачи:

· Учет и администрирование персонала, расчеты с персоналом;

· Индикация отклонений в кадровых процессах;

· Управление квалификационным уровнем кадрового потенциала;

· Управление затратами на персонал и социальную политику в компании;

· Управление пенсионным страхованием;

· Управление компенсациями и бонусами, мотивацией, карьерным ростом;

· Управление подбором и оценкой персонала, кадровым резервом;

· Анализ и моделирование кадровых процессов предприятия, холдинга.

А средством реализации такого решения выступают именно новейшие информационные технологии, программные приложения, реализующие требуемые функции управления. Сегодня существует большое количество программных средств в управлении трудовыми ресурсами:

· Системы электронного документооборота;

· Системы тестирования при поборе кандидатов на вакантные позиции;

· Компьютерные деловые игры;

· Электронный рекрутинг (посредством Internet - ресурсов);

· Системы управления знаниями (электронное обучение);

· Экспертные системы (профессиографические портреты, профориентация, групповой анализ состояния персонала, выявление тенденций развития отдельных подразделений и организации в целом и пр.);

· Комплексные системы автоматизации управления персоналом.

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

Современный российский руководитель понимает, что автоматизированная система управления персоналом должна обеспечивать:

Полное соответствие российскому трудовому законодательству;

Использование адаптированных современных методик управления человеческими ресурсами предприятия;

Соответствие требованиям международных стандартов серии ISO 9000:2000 в части поддержки ресурсного и процессного подходов к решению задач управления человеческими ресурсами;

Повышение эффективности деятельности сотрудников служб управления персоналом в центре и на местах, унификацию процедур управления человеческими ресурсами, анализ и обработку информации, централизацию управления и делегирование полномочий;

Гарантированный прозрачный доступ и оперативное управление корпоративной организационной структурой, процессами кадрового менеджмента;

Достижение максимального эффекта автоматизации системы управления человеческими ресурсами при оптимальных затратах на ее создание;

Возможность развития системы управления человеческими ресурсами в соответствии с изменениями задач и масштабов бизнеса.

Специалисты, в свою очередь, отмечают, что в последнее время функциональные возможности автоматизированных HR-систем весьма расширились в поиске совершенствования своих функциональных возможностей, и их внедрение может приносить компаниям большую выгоду.

Так, например, исследователи просчитали следующие статистические данные, подтверждающие необходимость автоматизации управления персоналом. Статистика гласит, что на одного работающего в компании человека специалистами HR-службы ежемесячно выполняется в среднем 25 функциональных задач, а при количестве персонала 1000 человек можно посчитать, сколько времени им понадобится на одну операцию: 1000 чел.=25000 задач/мес.=300000 задач/год. В среднем служба управления персоналом состоит из 5 сотрудников (на 1000 работающих в организации).

Таким образом,1 специалист HR = 60000 задач/год = 164 задачи/день = 20 задач/час = 1 задача/3 мин, т.е. за 3 минуты специалисту нужно, например, выбрать кандидата на работу, назначить ему собеседование, провести это собеседование или тестирование и принять человека на работу, а потом составить отчет о проведенном мероприятии. А при отсутствии единой автоматизированной системы управления сотрудник просто не в состоянии выполнить подобный объем работы, что приводит к необоснованному увеличению штата специалистов. Необходимость внедрения современных информационных технологий вытекает, прежде всего, из экономической выгоды и эффективности для самой компании.

Функциональные преимущества систем управления персоналом можно разделить на три большие категории. Первая и самая распространенная функция - регламентационная направленность. Это, прежде всего, кадровый учет сотрудников: в информационную систему заносятся все данные о каждом служащем (номер паспорта, прописка, ИНН и т.д.), и кадровик может нажатием одной кнопки на компьютере получить исчерпывающую информацию о каждом работнике. Сюда же относится и автоматизированный расчет зарплаты сотрудников, а также всех налоговых и прочих отчислений. Второй по значимости и наиболее динамично развивающейся функцией кадровых IT-систем является их способность фактически управлять людскими ресурсами.

Так, например, автоматизированные системы позволяют анализировать все данные о сотруднике и помогают постоянно контролировать, насколько его квалификация соответствует занимаемой должности: если работник в совершенстве владеет иностранным языком, то система, анализируя этот факт, порекомендует переместить этого человека на новую должность в расширяющийся отдел зарубежных связей, а на его место поставить того, у кого более подходящая для этой должности квалификация. В качестве еще одного примера реализации рассматриваемой функции автоматизированной HR-системы можно привести мероприятия по оценке и аттестации сотрудников. Так разработкой программы аттестации предприятия малого бизнеса вполне справится сегодня и его HR-подразделение, однако, для оценки, например, трех тысяч сотрудников необходимо максимально эффективно спланировать использование временных и человеческих ресурсов, что просто невозможно сделать без эффективного средства автоматизации данного процесса.

Третья функция кадровых IT-систем заключается в оценке степени реализации поставленных перед предприятием, холдингом целей. Для этого необходим специальный аналитический инструмент, с одной стороны, опирающийся на учетные данные по персоналу и результаты проведения мероприятий по управлению кадровыми процессами, с другой - предоставляющий специальные механизмы анализа всего массива данных. Другими словами этот инструмент должен позволять формировать показатели эффективности деятельности компании (KPI), в режиме реального времени отражать протекание кадровых процессов, индицировать отклонения от нормального состояния и предлагать варианты решений той или иной негативной ситуации.

В последние годы многие компании занимаются внедрением передовых информационных технологий. Но какими бы ни были осваиваемые технологии, их основная задача остается неизменной - повышение эффективности и производительности труда. При этом всегда подразумевалось, что грамотное, соответствующее специфике организации техническое решение гарантирует достижение желаемых результатов. Однако с недавнего времени на различных российских ИТ-конференциях и семинарах все чаще стали звучать "непривычные" слова - "человеческий фактор", "сопротивление персонала", "работа с персоналом клиента"…

Изначально многие менеджеры были уверены, что между установкой новых систем и ростом продуктивности персонала компании существует однозначная жесткая связь. Однако на практике все оказалось не так просто, поскольку не только рост производительности, но и даже сама возможность успешного внедрения во многом зависит от реакции работников компании, являющихся одновременно и объектом, и субъектом преобразований.

Одним из самых сложных моментов проведения любых реорганизаций, в том числе и внедрения автоматизированных систем управления персоналом, является то, что кроме работ по реализации проекта, требуется целый комплекс действий вокруг них, обеспечивающих эффективное внедрение и эксплуатацию нововведений. Без мероприятий по управлению изменениями большинство проектов обречены на провал. Среди основных проблем внедрения и развития автоматизированных систем управления персоналом выделяют противодействие со стороны руководителей, а также сопротивление изменениям сотрудников компании.

Руководители не приветствуют внедрение и использование подобных систем в следующих моментах:

· Нет связи результатов кадровой работы и результатов производства;

· Они не понимают роли персонала, как одного из основных ресурсов;

· Кадровые процессы плохо описаны и не идентифицированы;

· Руководство не понимает, почему надо делать именно так;

· У руководства не хватает ресурсов на "второстепенные" вопросы;

· Есть "более важные" задачи;

· Руководство устраивает существующий порядок вещей;

· Автоматизация приводит к снижению "значимости" руководителя, как личности.

Сопротивление сотрудников компаний автоматизации кадрового менеджмента основывается на личных причинах, квалификационно-образовательных и организационных:

· Работники не понимают сути современных управленческих процессов;

· Работники не интересуются новыми технологиями;

· Современные кадровые процессы слишком сложны;

· Линейные сотрудники не хотят переучиваться, обучаться сложным моментам в использовании компьютерных технологий;

· Занижены требования к качеству и результатам работы;

· Работников устраивает то, что они делают и без автоматизации;

· У работников не хватает времени на переобучение;

· Четкая регламентация кадровых процессов приведет к снижению "важности" и "нужности" работника.

При внедрении автоматизированных систем порой возникают квалификационные проблемы, которые достаточно быстро преодолеваются - сотрудник просто проходит обучение. Гораздо сложнее, когда кадровые службы оказывают противодействие внедрению, причем случается это гораздо чаще, чем при автоматизации других сфер деятельности. Реализация проекта затрагивает не только кадры, но и все предприятие в целом, обнажает огрехи в структуре, и как следствие, ее приходится перестраивать. Кроме того, сами сотрудники кадровых служб, как правило, более консервативны.

1. Практическая часть

1) ШТРИХОВОЕ КОДИРОВАНИЕ ИНФОРМАЦИИ

1.1 Задание

а) Изучите структуру штрихового кода ЕАМ

б) Изучите алгоритм определения контрольной цифры штрих кода ЕАN 13(8)

в) Составьте блок-схему алгоритма определения контрольной цифры.

г) Составьте подпрограмму-функцию под названием CheckDigit для определения контрольной цифры в среде VВА МS Ехе1. В качестве входного параметра для функции CheckDigit используйте переменную строкового типа ВагСоdе. Таким образом, функция должна иметь вид:

Public Function CheckDigit (BarCode As String) As String

'Функция для определения контрольной цифры штрих-кода

'последняя цифра штрихкода должна совпадать с рассчитанной

«Текст програмш:»

End Function

При разработке программы используйте операторы и встроенные функции обработки строк языка Visual Basic.

д) Откройте MS Excel и активизируйте панель инструментов Visual Basic с помощью команды Вид>Панели инструментов >Visual Basic (рис. 3).

е) Откройте окно редактора Visual Basic и создайте лист нового модуля Insert > Module (Вставка > Модуль). Сохраните модуль.

ж) На листе созданного модуля выберите в строке меню редактора Visual Basic команду Insert > Procedure (Вставка > Процедура). В результате откроется диалоговое окно Add Procedure (Вставка процедуры) (рис. 4).

з) Установите переключатель Туре (Тип) в положение Function.

к) Установите переключатель Scope (Область определения) в положение Public (Обшая).

л) Введите в поле Name (Имя) имя функции (в данном случае это должна быть строка «CheckDigit»).

м) Закройте диалоговое окно щелчком на кнопке ОК. В результате, в окно кода будет вставлена процедура-функция с заданными параметрами.

н) Полученную «заготовку» процедуры-функции необходимо отредактировать в соответствии с возлагаемыми на нее задачами. В автоматически созданной заготовке, конечно, не указан тип возвращаемого значения и параметр.

о) Проведите отладку и тестирование процедуры-функции CheckDigit в ячейках рабочей книги Excel, используя механизм функции пользователя Excel.

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

р) Оформите отчет о выполнении задания. Отчет должен содержать Контрольный пример расчета контрольной цифры для любого штрихкода EAN-13: блок-схему алгоритма процедуры-функции: текст разработанной процедуры-функции CheckDigit: распечатку рабочего листа с примерами использования процедуры-функции CheckDigit (не менее 10 строк с различными штрихкодами товаров).

1.2 Решение

1.2.1 Расчет контрольной цифры для кода ЕAN13(8) производится по следующей схеме:

1) Складываем цифры, стоящие на четных позициях, затем на нечетных позициях (Табл. 1.2.1).

Таблица 1.2.1 - Порядок сложения цифр для кода ЕAN13(8)

Номер позиции

13

12

11

10

9

8

7

6

5

4

3

2

1

Значение

4

0

1

8

9

9

3

4

0

4

7

8

7

Четные

0

+

8

+

9

+

4

+

4

+

8

=33

Нечетные

4

+

1

+

9

+

3

+

0

+

7

=24

2) Затем складываем результат сложения цифр на четных позициях, помноженный на три и результат сложения цифр на нечетных позициях:

(33 * 3) + 24 = 123

3) Контрольное число представляет собой разницу между окончательной суммой (123) и ближайшим к ней наибольшим числом, кратным десяти (в данном случае - 130):

130 - 123 = 7

4) Полученная в результате последняя семерка и соответствует контрольной цифре.

1.2.2 Блок-схема алгоритма процедуры-функции представлена на рисунках 1.2.1, 1.2.2.

Рисунок 1.2.1 - Блок-схема алгоритма процедуры-функции

Рисунок 1.2.2 - Блок-схема алгоритма функции Schet для процедуры CheckDigit

1.2.3 Текст разработанной процедуры-функции CheckDigit представлен на Листингах 1.2.1, 1.2.2

Листинг 1.2.1 - Текст разработанной функции Schet для процедуры CheckDigit

Function Schet(BarCode As String) As String

Dim N1, N2 As Integer

N1 = 0

N2 = 0

For i = 2 To Len(BarCode) Step 2

N1 = N1 + Format(Mid(BarCode, i, 1), "000.")

Next i

For i = 1 To Len(BarCode) - 1 Step 2

N2 = N2 + Format(Mid(BarCode, i, 1), "000.")

Next i

Schet = (((Int((N1 * 3 + N2) / 10) + 1) * 10) - (N1 * 3 + N2))

If Format(Schet, "000.") <> Format(Right(BarCode, 1), "000.") Then Schet = "Неверная контрольная цифра - " + Schet

End Function

Листинг 1.2.1 - Текст разработанной процедуры-функции CheckDigit

Public Function CheckDigit(BarCode As String) As String

Dim PrNaLat As Integer

PrNaLat = 0

For i = 1 To Len(BarCode)

Select Case Mid(BarCode, i, 1)

Case "0":

Case "1":

Case "2":

Case "3":

Case "4":

Case "5":

Case "6":

Case "7":

Case "8":

Case "9":

Case Else: PrNaLat = 1

End Select

Next i

If PrNaLat <> 1 Then CheckDigit = Schet(BarCode) Else CheckDigit = "Присутствует неверный знак"

If Len(BarCode) <> 13 Then CheckDigit = "Неверное количество (" + Str(Len(BarCode)) + " ) цифр"

End Function

Таблица 1.2.2 - Вид работы функции CheckDigit

Штрих код

Проверка

4018993404787

7

4534534534

Неверное количество ( 10 ) цифр

5434534535435

Неверная контрольная цифра - 4

5453453478684

4

4532437874887

7

4534538978453

Неверная контрольная цифра - 7

454567868688р

Присутствует неверный знак

123

Неверное количество ( 3 ) цифр

апраправр

Неверное количество ( 9 ) цифр

5555655555566

6

1111111111116

6

5651232333333

3

67879999977777

Неверное количество ( 14 ) цифр

1231234567895

5

1126564648775

5

5874125884228

8

6565699999997

7

86524563853

Неверное количество ( 11 ) цифр

58741258g4225

Присутствует неверный знак

2) СВОЙСТВА ИНФОРМАЦИИ

2.1 Задание 1

Рассмотрите следующие предметные области: словесность, математика, биология, география, история, а также перечень терминов и понятий.

Матрица. Широта. Долгота. Популяция. Склонение. Спряжение. Хребет. Тундра. Кровообращение. Баскак. Морское течение. Устье. Исток. Экватор. Тропики. Земная ось. Словарь. Перевод. Существительное. Прилагательное. Остров. Полуостров. Материк. Часть света. Румб. Возвышенность. Предложение. Растительность. Период. Низменность. Мыс. Архипелаг. Залив. Пролив. Море. Суша. Территория. Пустыня. Лесостепь. Млекопитающее. Пресмыкающееся. Обмен веществ. Нервная система. Прерия. Пунические войны. Аорта. Вена. Мышца. Скелет. Костная ткань. Империя. Алгоритм. Куликовская битва. Ритм. Алфавит. Феодализм. Принятие христианства. Арифметические действия. Квадрат. Юлий Цезарь. Квадратный корень. Полином. Логарифм. Алгоритм. Сложение. Числитель. Знаменатель. Интеграл. Бесконечный ряд. Прогрессия. Грамматика. Конъюнкция. Дизъюнкция. Синоним. Антоним. Гипербола. Ярлык. Эпитет. Распределите понятия и термины по предметным областям.

2.1.1 Решение

Для выполнения задания выполним следующие действия:

- наберем самостоятельно в текстовом редакторе Word вышеприведенный перечень терминов и предметных областей;

- преобразовать текст в таблицу «Термины» с помощью средства Таблица Преобразовать Панели инструментов текстового редактора Word;

- создадим в полученной таблице столбцы «Порядковый номер», «Термин», «Код термина», «Предметная область», «Код предметной области»;

- заполнить столбец «Порядковый номер» с помощью средства «Список» из меню формат или соответствующей кнопки панели инструментов. Столбцы «Предметная область» и «Код предметной области» пока не заполняются;

- присвоим терминам коды терминов таким образом, что каждой из предметных областей присваивается код из двух десятичных цифр, первая из которых не должна быть нулем. После этого Код термина строится из шести десятичных цифр, первые две из которых представляют собой Код предметной области, а четыре оставшихся - порядковый номер данного термина в данной предметной области (Табл.2.1.1);

Таблица 2.1.1 - Преобразование данных в MSWord

Порядковыйномер

Термин

Кодтермина

Предметнаяобласть

Кодпредметнойобласти

1

2

3

4

5

Матрица

словесность

11

Широта

математика

12

Долгота

биология

13

Популяция

география

14

Склонение

история

15

Спряжение

Хребет

Тундра

Кровообращение

Баскак

Морскоетечение

Устье

Исток

Экватор

Тропики

Земнаяось

Словарь

Перевод

Существительное

Прилагательное

Остров

Полуостров

Материк

Частьсвета

Румб

Возвышенность

Предложение

Растительность

Период

Низменность

Мыс

Архипелаг

Залив

Пролив

Море

Суша

Территория

Пустыня

Млекопитающее

Пресмыкающееся

Обменвеществ

Нервнаясистема

Прерия

Пунические

войны

Лесостепь

Прерия

Пунические

войны

Аорта

Вена

Мышца

Скелет

Костнаяткань

Империя

Алгоритм

Куликовскаябитва

Ритм

Алфавит

Феодализм

Принятиехристианства

Арифметическиедействия

Квадрат

ЮлийЦезарь

Квадратныйкорень

Полином

Логарифм

Алгоритм

Сложение

Числитель

Знаменатель

Интеграл

Бесконечныйряд

Прогрессия

Грамматика

Конъюнкция

Дизъюнкция

Синоним

Антоним

Гипербола

Ярлык

Эпитет

- скопируем таблицу «Термины» в соответствующий диапазон рабочего листа табличного процессора Excel с тем же названием;

- на рабочем листе Excel пронумеруем строки таблицы с использованием средства Правка Заполнить Прогрессия и укажем названия столбцов в первой строке таблицы (Табл.2.1.2).

Таблица 2.1.2 - Преобразование данных в MSExel

Порядковый номер

Термин

Кодтермина

Предметная область

Код предметной области

1

2

3

4

5

1

Матрица

1001

словесность

11

2

Широта

1002

математика

12

3

Долгота

1003

биология

13

4

Популяция

1004

география

14

5

Склонение

1005

история

15

6

Спряжение

1006

7

Хребет

1007

8

Тундра

1008

9

Кровообращение

1009

10

Баскак

1010

11

Морскоетечение

1011

12

Устье

1012

13

Исток

1013

14

Экватор

1014

15

Тропики

1015

16

Земнаяось

1016

17

Словарь

1017

18

Перевод

1018

19

Существительное

1019

20

Прилагательное

1020

21

Остров

1021

22

Полуостров

1022

23

Материк

1023

24

Частьсвета

1024

25

Румб

1025

26

Возвышенность

1026

27

Предложение

1027

28

Растительность

1028

29

Период

1029

30

Низменность

1030

31

Мыс

1031

32

Архипелаг

1032

33

Залив

1033

34

Пролив

1034

35

Море

1035

36

Суша

1036

37

Территория

1037

38

Пустыня

1038

39

Лесостепь

1039

40

Млекопитающее

1040

41

Пресмыкающееся

1041

42

Обменвеществ

1042

43

Нервнаясистема

1043

44

Прерия

1044

45

Пунические

1045

46

войны

1046

47

Аорта

1047

48

Вена

1048

49

Мышца

1049

50

Скелет

1050

51

Костнаяткань

1051

52

Империя

1052

53

Алгоритм

1053

54

Куликовскаябитва

1054

55

Ритм

1055

56

Алфавит

1056

57

Феодализм

1057

58

Принятиехристианства

1058

59

Арифметическиедействия

1059

60

Квадрат

1060

61

ЮлийЦезарь

1061

62

Квадратныйкорень

1062

63

Полином

1063

64

Логарифм

1064

65

Алгоритм

1065

66

Сложение

1066

67

Числитель

1067

68

Знаменатель

1068

69

Интеграл

1069

70

Бесконечныйряд

1070

71

Прогрессия

1071

72

Грамматика

1072

73

Конъюнкция

1073

74

Дизъюнкция

1074

75

Синоним

1075

76

Антоним

1076

77

Гипербола

1077

78

Ярлык

1078

79

Эпитет

1079

2.2 Задание 2

Импортируйте диапазон данных таблицы «Термины» табличного процессора Excel в таблицу СУБД Access, для чего необходимо вызвать на исполнение СУБД Access. Создайте в СУБД Access новую базу данных под названием Try.mdb и используйте средство Файл Внешние данные Импорт, которое вызовет соответствующий мастер, выполняющий необходимые действия. Создайте для последующей работы в базе данных Try.mdb, кроме таблицы «Термины», также таблицу «Предметные Области», содержащую столбцы «Назв_Пр Обл» и «Код Пр Обл», которые заполняются вручную.

Далее можно действовать двумя способами:

- в таблице «Термины» помещается «Код Предметной Области» без соответствующего наименования, которое будет извлекаться по связи между таблицами через поле «Код Предметной Области» (эту связь необходимо установить);

- в таблице «Термины» помещаются как «Код Предметной Области», так и «Наименование Предметной Области».

2.2.1 Решение

Импортируем диапазон данных таблицы «Термины» табличного процессора Excel в таблицу СУБД Access, для чего необходимо вызовем на исполнение СУБД Access. Создадим в СУБД Access новую базу данных под названием Try.mdb и используйте средство Файл/Внешние данные Импорт, которое вызовет соответствующий мастер, выполняющий необходимые действия. Создадим для последующей работы в базе данных Try.mdb, кроме таблицы «Термины», также таблицу «Предметные Области», содержащую столбцы «Назв Пр Обл» и «Код Пр Обл», которые заполняются вручную. Вид таблиц «Предметные Области» и «Термины"»показан соответственно на рис.2.2.1 и 2.2.2.

Рисунок 2.2.1 - Таблица "Предметная область" в MSAccess

Рисунок 2.2.1 - Таблица "Термины" в MSAccess

Так как у нас один термин может принадлежать многим предметным областям и аналогично к одной предметной области может принадлежать несколько терминов, то для построения реляционной базы добавим еще одну таблицу «Терм Пред Обл» соединяющую таблицы "Предметные Области" и «Термины» (Рис.2.2.3)

Рисунок 2.2.3 - Схема данных реляционной СУБД

Для правильного и быстрого заполнения таблицы «Терм Пред Обл» построим независимый модуль (Рис.2.2.4).

Рисунок 2.2.4 - Модуль для заполнения таблицы «Терм ПредОбл»

В нем выбираем термин и предметную область и нажимаем на кнопку "Добавить". При этом добавляется запись в таблицу «Терм Пред Обл». Модуль работает на стороне пользователя поэтому все изменения можно отменить нажатием кнопки "Rollback" либо подтвердить - "Ok". Модуль построен при помощи языка Delfi и скомпилирован под технологию .net имеющим мащинный код C#. Таким образом этот модуль можно подключить к любой программе и подключиться к базе Access в не зависимости использует ее еще кто то. Код представлен в листинге 2.2.1.

Листинг 2.2.1 - Программный код модуля

unit Unit2;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Grids, DBGrids, DB, ADODB, StdCtrls, ExtCtrls, DBCtrls, FMTBcd;

type

TForm2 = class(TForm)

DataSource1: TDataSource;

DataSource2: TDataSource;

DataSource3: TDataSource;

ADODataSet1: TADODataSet;

ADODataSet2: TADODataSet;

ADODataSet3: TADODataSet;

DBGrid1: TDBGrid;

DBGrid2: TDBGrid;

DBGrid3: TDBGrid;

Button1: TButton;

ADODataSet4: TADODataSet;

DBText1: TDBText;

DBText2: TDBText;

Button2: TButton;

Button3: TButton;

procedure FormActivate(Sender: TObject);

procedure FormClose(Sender: TObject; var Action: TCloseAction);

procedure Button1Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form2: TForm2;

implementation

uses Unit1;

{$R *.dfm}

procedure TForm2.Button1Click(Sender: TObject);

begin

Form2.ADODataSet4.InsertRecord([Form2.DBText1.Caption, Form2.DBText2.Caption]);

Form2.ADODataSet1.Active:=False;

Form2.ADODataSet1.Active:=True;

end;

procedure TForm2.Button2Click(Sender: TObject);

begin

if Form1.ADOConnection1.InTransaction=False

then Form1.ADOConnection1.BeginTrans;

Form1.ADOConnection1.CommitTrans;

Form1.ADOConnection1.BeginTrans;

end;

procedure TForm2.Button3Click(Sender: TObject);

begi

Form1.ADOConnection1.RollbackTrans;

end;

procedure TForm2.FormActivate(Sender: TObject);

begin

if Form1.ADOConnection1.InTransaction=False

then Form1.ADOConnection1.BeginTrans;

Form2.ADODataSet1.Active:=false;

Form2.ADODataSet2.Active:=false;

Form2.ADODataSet3.Active:=false;

Form2.ADODataSet4.Active:=false;

Form2.ADODataSet1.CommandText:='SELECT Термины.Термин, Предметная_область.[Предметная область] '+

'FROM Термины INNER JOIN (Предметная_область INNER JOIN Терм_ПредОбл ON '+

'Предметная_область.[Код предметной области] = Терм_ПредОбл.[Код предметной области]) '+

'ON Термины.Кодтермина = Терм_ПредОбл.[Код термина];';

Form2.ADODataSet2.CommandText:='select * from Термины;';

Form2.ADODataSet3.CommandText:='select * from Предметная_область;';

Form2.ADODataSet4.CommandText:='select [Код термина], [Код предметной области] from Терм_ПредОбл;';

Form2.ADODataSet1.Active:=true;

Form2.ADODataSet2.Active:=true;

Form2.ADODataSet3.Active:=true;

Form2.ADODataSet4.Active:=true;

Form2.DBGrid1.Columns.Items[0].Width:=250;

Form2.DBGrid1.Columns.Items[1].Width:=250;

Form2.DBGrid2.Columns.Items[0].Width:=80;

Form2.DBGrid2.Columns.Items[1].Width:=200;

Form2.DBGrid3.Columns.Items[0].Width:=80;

Form2.DBGrid3.Columns.Items[1].Width:=200;

end;

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);

begin

Form2.ADODataSet1.Active:=false;

Form2.ADODataSet2.Active:=false;

Form2.ADODataSet3.Active:=false;

Form2.ADODataSet4.Active:=false;

Form1.ADODataSet1.Active:=false;

Form1.ADODataSet1.Active:=true;

end;

end.

2.3 Задание 3

После построения в базе данных Try.mdb двух указанных таблиц дополните таблицу «Термины» таким образом, чтобы по каждой из предметных областей имелось не менее 10-12 терминов. Затем необходимо построить два запроса:

- по заданному термину найти соответствующую предметную область;

- по заданной предметной области найти все принадлежащие ей термины.

Обратите внимание, что первый из запросов может определять предметную область неоднозначно: например, термин «Гипербола» принадлежит как словесности, так и математике.

2.3.1 Решение

Так как в нашей базе данных каждой предметной области уже принадлежит 12 и более терминов то добавлять ничего не надо. Если же надо будет добавить то необходимо будет построить средствами Access форму, в которой главной будет таблица "Предметная область", а таблица "Термины" подчиненной". При работе с этой формой необходимо быть очень осторожным, так как работа производится на стороне сервера и возможна потеря информации.

Вид такой формы показан на рис.2.3.1.

Рисунок 2.3.1 - Форма для добавления данных в базу

Для построения запросов воспользуемся средствами MSAccess и редактором SQL:

1. По заданному термину найти соответствующую предметную область.

а) SQL запрос:

SELECT Предметная область, Термины. Термин

FROM Термины INNER JOIN (Предметная область INNER JOIN Терм Пред Обл ON Предметная область. = Терм Пред Обл.[Код предметной области]) ON Термины. Кодтермина = Терм Пред Обл.[Код термина];

б) вид запроса:

в) вариант формы выбора:

2. По заданной предметной области найти все принадлежащие ей термины.

а) SQL запрос:

SELECT Термины. Термин, Предметная область.[Предметная область]

FROM Термины INNER JOIN (Предметная область INNER JOIN Терм Пред Обл ON Предметная область.[Код предметной области] = Терм Пред Обл.[Код предметной области]) ON Термины. Кодтермина = Терм Пред Обл.[Код термина]

ORDER by Термины.Термин

б) вид запроса:

в) вариант формы выбора:

3) 1:С «Бухгалтерия»

Константа

Вариант 1

Дата регистрации

Первый рабочий день текущего квартала

Наименование организации

«Кибернетика»

Официальное название организации

ЗАО «Кибернетика»

Юридический адрес

г. Алчевск,

пр. Ленина, дом 16,

офф. 2412

Налоговая инспекция

АЛЧЕВСЬКА ОБ'ЄДНАНА ДПI

(ПЕРЕВАЛЬСЬКЕ ВIД-НЯ )

ПЕРЕВАЛЬСЬКИЙ Р-Н

ИНН

7777777777

Почтовый адрес

94216, Украина, г. Алчевск, пр. Ленина, дом 16, офф. 2412

Телефоны организации

8(06442)25061

Директор

Петров И. А.

Гл. бухгалтер

Скворцова Е. Г.

Использованная литература

1. Семенова В. Ю. Компьютерная бухгалтерия для Украины. Задачи и Решения в программе «1С:Бухгалтерия 7.7 для Украины». Учеб. пособие. -- К.: Охрана труда, 2005. -- 280 с.

2. Митичкин С. А. Практика программирования в среде 1С: Предприятие 7.7.-- М.: Издательский Дом «КомБук», 2004.-- 272 с.

3. Михайлов С. Е. Программирование как дважды два. Самоучитель.-- СПб.: Тритон, 2005.-- 173 с.

4. Усиков Т. Н. 1С: Предприятие. Эффективное программирование.-- М.: Новое знание, 2004. -- 446 с.


Подобные документы

  • Сущность линейного и двухмерного кодирования. Схема проверки подлинности штрих-кода. Анализ способов кодирования информации. Расчет контрольной цифры. Штриховое кодирование как эффективное направление автоматизации процесса ввода и обработки информации.

    презентация [1,1 M], добавлен 05.10.2014

  • Быстрый и надёжный ввод информации о товаре в ЭВМ. Внедрение системы штрихового кодирования в торговле, банковском деле, на транспорте, в медицине и других сферах народного хозяйства. Способы кодирования информации. Регулирование и стандартизация.

    реферат [36,0 K], добавлен 07.05.2009

  • Понятие и назначение штрихового кода, его разновидности и сферы применения. Параметры символики и структура символа в кодах. Алгоритм преобразования числовых данных в знаки Interleaved 2 of 5. Распознавание штрих-кода и вычисление контрольной цифры.

    контрольная работа [424,1 K], добавлен 23.08.2009

  • Непрерывная и дискретная информация. Кодирование как процесс представления информации в виде кода. Особенности процедуры дискретизации непрерывного сообщения. Позиционные и непозиционные системы счисления. Представление информации в двоичном коде.

    реферат [117,3 K], добавлен 11.06.2010

  • Кодирование и декодирование, преобразование дискретного сообщения в дискретный сигнал. Построение математической модели корректирующего кода. Образующая матрица информационного кода. Модульная структура программы. Спецификация на программные модули.

    курсовая работа [98,9 K], добавлен 28.11.2014

  • Аналоговое и цифровое представление информации. Понятие, классификация и характеристика методов сжатия данных: алгоритмы одно- и двухпараметрической адаптации, линейной экстра- и интерполяции. Кодирование информации и вычисление циклического кода.

    курсовая работа [157,4 K], добавлен 07.12.2012

  • Информация и информационные процессы в природе, обществе, технике. Информационная деятельность человека. Кодирование информации. Способы кодирования. Кодирование изображений. Информация в кибернетике. Свойства информации. Измерение количества информации.

    реферат [21,4 K], добавлен 18.11.2008

  • Кодирование как процесс представления информации в виде кода. Кодирование звуковой и видеоинформации, характеристика процесса формирования определенного представления информации. Особенности универсального дружественного интерфейса для пользователей.

    контрольная работа [20,3 K], добавлен 22.04.2011

  • Автоматизированная обработка информации: понятия и технология. Организация размещения, обработки, поиска, хранения и передачи информации. Защита информации от несанкционированного доступа. Антивирусные средства защиты информации. Сетевые технологии.

    методичка [28,8 K], добавлен 14.01.2009

  • Автоматизированная обработка экономической информации. Методы и средства технологического контроля обработки экономической информации. АИС в области бухгалтерского учета с использованием 1: С Бухгалтерия. Программное обеспечение бухгалтерского учета.

    контрольная работа [39,4 K], добавлен 07.12.2010

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.