![]() |
|
сделать стартовой | добавить в избранное |
![]() |
Законодательство и право
Страховое право
База данных страховой компании |
(a b) MEMBER('A ') ! НАЧАЛЬНАЯ СОРТИРОВКА S PROCEDURE M GROUP M1 REAL,DIM(79,14) ! 17 MK REAL,DIM(8,14) MG REAL,DIM(350,14). CODE CLEAR(M) BUFFER(LIC,0.9) SE (LIC) LOOP U IL EOF(LIC) EX (LIC) CLEAR( 17:RECORD) 17:P OMBER=LIC:P OMBER GE ( 17, 17:C) IF ~ERRORCODE() M1 = 17:F001/1000 M1 = 17:F004/1000 M1 = 17:F010/1000 IF 17:F018>0 HE M1 = 17:F018/1000 ELSE IF 17:F020>0 M1-= 17:F020/1000. CLEAR( 67:RECORD) 67:P OMBER=LIC:P OMBER GE ( 67, 67:C) IF ~ERRORCODE() M1 = 67:A400 /1000 M1 = 67:A400K/1000 M1 = 67:A495 /1000 M1 = 67:A495K/1000. CLEAR(F92:RECORD) F92:P OMBER=LIC:P OMBER GE (F92,F92:FC) IF ~ERRORCODE() M1 =F92:F1/1000 M1 =F92:F7/1000 M1 =F92:F10/1000 IF F92:F19>0 HE M1 =F92:F19/1000 ELSE IF F92:F21>0 M1-=F92:F21/1000. CLEAR(SVV:RECORD) SVV:P OM=LIC:P OMBER SVV:KZ=2 GE (SVV,SVV:K) IF ~ERRORCODE() M1 =SVV:CR2. CLEAR(DF:RECORD) DF:P OMBER=LIC:P OMBER GE (DF,DF:C) IF ~ERRORCODE() M1 =DF:S750 . . LOOP #=24 O 31 ER:KOD = # SE ( ER:K, ER:K) LOOP U IL EOF( ERR) EX ( ERR) IF ER:KOD # HE BREAK. LOOP M#=1 O 14 MK. LOOP I#=1 O 8 F: KUS =I# 23 F:F1=MK F:F5=MK F:F11=MK F:F15=MK ADD(F). LOOP I#=1 O 79 F: KUS =0 F: REGIO =I# F:F1=M1 F:F5=M1 F:F11=M1 F:F15=M1 ADD(F). LOOP I#=1 O 350 F: KUS =0 F: REGIO =0 F: GOR=I# F:F1=MG F:F5=MG F:F11=MG F:F15=MG ADD(F). ! PU (F). ! ----- АНАЛИЗ ПОКАЗАТЕЛЕЙ РАЗВИТИЯ ------ A 2 PROCEDURE YU DOS,ASCII, AME('YU.YU') RECORD S S RI G(140). GROUP,OVER(S ) S RI G(1) S 2 S RI G(32) S RI G(4) S 3 S RI G(@ - 8.2) S RI G(1) S 4 S RI G(@ 10.2) S RI G(1) S 5 S RI G(@ 8.2) S RI G(1) S 6 S RI G(@ 9.2) S RI G(1) S 7 S RI G(@ 8.2) S RI G(1) S 8 S RI G(@ 10.2) S RI G(1) S 9 S RI G(@ - 10.2) S RI G(1) S 10 S RI G(@ 10.2) S RI G(1) S 11 S RI G(@ - 9.2) S RI G(1) S 12 S RI G(@ 8.2) . YU1 DOS,ASCII, AME('YU1.YU') RECORD S S RI G(130). GROUP,OVER(S ) S RI G(1) S 02 S RI G(32) S RI G(5) S 13 S RI G(@ 8.2) S RI G(3) S 14 S RI G(@ 9.2) S RI G(3) S 15 S RI G(@ 7.2) S RI G(3) S 16 S RI G(@ 9.2) S RI G(3) S 17 S RI G(@ 9.2) S RI G(3) S 18 S RI G(@ 8.2) S RI G(3) S 19 S RI G(@ - 8.2) S RI G(3) S 20 S RI G(@ 9.2) . M GROUP M1 REAL,DIM(79,14) ! 17 MK REAL,DIM(8,14) MG REAL,DIM(350,14). CODE P #=0 CREA E(YU) S ='АНАЛИЗ ПОКАЗАТЕЛЕЙ РАЗВИТИЯ СТРАХОВЫХ ОРГАНИЗАЦИЙ' S =CE ER(S ) ADD(YU) CLEAR(S ) S =' млн.руб. ' ADD(YU) CLEAR(S ) S =' ' ADD(YU) CLEAR(S ) S ='¦ ¦ Доход (балансовая ¦ Уставный ¦ Страховые ¦ Доход (балансовая прибыль) в % к ¦' ADD(YU) CLEAR(S ) S ='¦ Наименование ¦ прибыль (убыток) ¦ капитал ¦ взносы¦' ADD(YU) CLEAR(S ) S ='¦ ¦ ¦ ¦ ¦ уставному капиталу ¦ страховым взносам¦' ADD(YU) CLEAR(S ) S ='¦ страховой организации ¦' ADD(YU) CLEAR(S ) S ='¦ ¦ 1994 ¦ 1995 ¦ 1994 ¦ 1995 ¦ 1994 ¦ 1995 ¦ 1994 ¦ 1995 ¦ 1992 ¦ 1993 ¦' ADD(YU) CLEAR(S ) S =' ' ADD(YU) CLEAR(S ) S ='¦ 1 ¦ 2 ¦ 3 ¦ 4 ¦ 5 ¦ 6 ¦ 7 ¦ 8 ¦ 9 ¦ 10 ¦ 11 ¦' ADD(YU) CLEAR(S ) S =' ' ADD(YU) CLEAR(S ) CREA E(YU1) S ='АНАЛИЗ ПОКАЗАТЕЛЕЙ РАЗВИТИЯ СТРАХОВЫХ ОРГАНИЗАЦИЙ ' S =CE ER(S ) ADD(YU1) CLEAR(S ) S =' (продолжение)' ADD(YU1) CLEAR(S ) S =' ' ADD(YU1) CLEAR(S ) S ='¦ ¦ С т р а х о в ы е ¦ Доход от инвес- ¦ Доход от инвест-я страх-х рез-в в % к ¦' ADD(YU1) CLEAR(S ) S ='¦ Наименование ¦ р е з е р в ы ¦ тирования стра- ¦' ADD(YU1) CLEAR(S ) S ='¦ ¦ ¦ ховых резервов ¦ уставному капиталу ¦ страховым взносам ¦' ADD(YU1) CLEAR(S ) S ='¦ страховой организации ¦' ADD(YU1) CLEAR(S ) S ='¦ ¦ 1994 ¦ 1995 ¦ 1994 ¦ 1995 ¦ 1994 ¦ 1995 ¦ 1994 ¦ 1995 ¦' ADD(YU1) CLEAR(S ) S =' ‘ ADD(YU1) CLEAR(S ) S ='¦ 1 ¦ 12 ¦ 13 ¦ 14 ¦ 15 ¦ 16 ¦ 17 ¦ 18 ¦ 19 ¦' ADD(YU1) CLEAR(S )S =' ADD(YU1) CLEAR(S ) I S: ER=0 SE (I S:K1,I S:K1) LOOP U IL EOF(I SP) ! 1 EX (I SP) P #=0 if i s: er>23 ! 2 HE S 2=CLIP(I S: AME)&' инспекция' S 02=CLIP(I S: AME)&' инспекция' ELSE S 2='Инспекция ' ADD(yu) S 2=I S: AME S 02='Инспекция ' ADD(YU1) S 02=I S: AME.
! 2 ER:KOD =I S: ER SE ( ER:K1, ER:K1) LOOP U IL EOF( ERR) ! 3 EX ( ERR) IF ER:KOD I S: ER HE BREAK. IF I S: ER>23 A D P #=0 ! 4 F: KUS =I S: ER GE (F,F:K1) IF F:F5>0 S 3=F:F5. IF F:F6>0 S 4=F:F6. IF F:F1>0 S 5=F:F1. IF F:F2>0 S 6=F:F2. IF F:F11>0 S 7=F:F11. IF F:F12>0 S 8=F:F12. IF S 3>0 A D S 5>0 S 9=S 3/S 5 100. IF S 4>0 A D S 6>0 S 10=S 4/S 6 100. IF S 3>0 A D S 7>0 S 11=S 3/S 7 100. IF S 4>0 A D S 8>0 S 12=S 4/S 8 100. IF F:F3>0 S 13=F:F3. IF F:F4>0 S 14=F:F4. IF F:F9>0 S 15=F:F9. IF F:F10>0 S 16=F:F10. IF S 15>0 A D S 13>0 S 17=S 15/S 13 100. IF S 16>0 A D S 14>0 S 18=S 16/S 14 100. IF S 15>0 A D S 3>0 S 19=S 15/S 3 100. IF S 16>0 A D S 4>0 S 20=S 16/S 4 100. P #=1 ADD(YU) CLEAR(S ) ADD(YU1) CLEAR(S ) ADD(YU1) ADD(YU). ! 4 XRE: REGIO = ER: REGIO SE (XRE:K1,XRE:K1) LOOP U IL EOF(XREG) ! 5 EX (XREG) IF XRE: REGIO ER: REGIO HE BREAK. IF I S: ER>23 S 2=XRE:IREG. S 02=S 2 F: REGIO =XRE: REGIO GE (F,F:K2) IF F:F5>0 S 3=F:F5. IF F:F6>0 S 4=F:F6. IF F:F1>0 S 5=F:F1. IF F:F2>0 S 6=F:F2. IF F:F11>0 S 7=F:F11. IF F:F12>0 S 8=F:F12. IF S 3>0 A D S 5>0 S 9=S 3/S 5 100. IF S 4>0 A D S 6>0 S 10=S 4/S 6 100. IF S 3>0 A D S 7>0 S 11=S 3/S 7 100. IF S 4>0 A D S 8>0 S 12=S 4/S 8 100. IF F:F3>0 S 13=F:F3. IF F:F4>0 S 14=F:F4. IF F:F9>0 S 15=F:F9. IF F:F10>0 S 16=F:F10. IF S 15>0 A D S 13>0 S 17=S 15/S 13 100. IF S 16>0 A D S 14>0 S 18=S 16/S 14 100. IF S 15>0 A D S 3>0 S 19=S 15/S 3 100. IF S 16>0 A D S 4>0 S 20=S 16/S 4 100. ADD(YU) CLEAR(S ) ADD(YU1) CLEAR(S ) ADD(YU) ADD(YU1) GOR:GOROD=' ' SE (GOR:CGOR,GOR:CGOR) LOOP U IL EOF(GOR) ! 6 EX (GOR) IF GOR: REGIO XRE: REGIO HE CYCLE. F: GOR=GOR:KG GE (F,F:K3) IF F:F5>0 S 3=F:F5. IF F:F6>0 S 4=F:F6. IF F:F1>0 S 5=F:F1. IF F:F2>0 S 6=F:F2. IF F:F11>0 S 7=F:F11. IF F:F12>0 S 8=F:F12. IF S 3>0 A D S 5>0 S 9=S 3/S 5 100. IF S 4>0 A D S 6>0 S 10=S 4/S 6 100. IF S 3>0 A D S 7>0 S 11=S 3/S 7 100. IF S 4>0 A D S 8>0 S 12=S 4/S 8 100. IF F:F3>0 S 13=F:F3. IF F:F4>0 S 14=F:F4. IF F:F9>0 S 15=F:F9. IF F:F10>0 S 16=F:F10. IF S 15>0 A D S 13>0 S 17=S 15/S 13 100. IF S 16>0 A D S 14>0 S 18=S 16/S 14 100. IF S 15>0 A D S 3>0 S 19=S 15/S 3 100. IF S 16>0 A D S 14>0 S 20=S 16/S 4 100. IF ~S A D ~S HE CYCLE. S 2=GOR:GOROD S 02=GOR:GOROD ADD(YU) CLEAR(S ) ADD(YU1) CLEAR(S ) ADD(YU) ADD(YU1) LIC: REGIO =XRE: REGIO LIC:K AM=' ' SE (LIC:C REG,LIC:C REG) LOOP U IL EOF(LIC) ! 7 EX (LIC) IF LIC: REGIO XRE: REGIO HE BREAK. IF LIC: CI YGOR:KG HE CYCLE. ( 67:RECORD) 67:P OMBER=LIC:P OMBER GE ( 67, 67:C) IF ~ERRORCODE() IF 67:A400 >0 S 5= 67:A400 /1000. IF 67:A400K>0 S 6= 67:A400K/1000. IF 67:A495 >0 S 13= 67:A495 /1000. IF 67:A495K>0 S 14= 67:A495K/1000. CLEAR( 17:RECORD) 17:P OMBER=LIC:P OMBER GE ( 17, 17:C) IF ~ERRORCODE() ! 8 IF 17:F018>0 ! 9 HE S 4= 17:F018/1000 ELSE IF 17:F020>0 ! 10 S 4=- 17:F020/1000. ! 9, 10 IF 17:F001>0 S 8= 17:F001/1000. IF 17:F004>0 S 16= 17:F004/1000. ! 8 CLEAR(F92:RECORD) F92:P OMBER=LIC:P OMBER GE (F92,F92:FC) IF ~ERRORCODE() ! 11 IF F92:F19>0 HE S 3=F92:F19/1000 ELSE IF F92:F21>0 S 3=-F92:F21/1000. IF F92:F1>0 S 7=F92:F1/1000. IF F92:F7>0 S 15=F92:F7/1000. ! 11 IF S 30 A D S 5>0 S 9=S 3/S 5 100.
IF S 4>0 A D S 6>0 S 10=S 4/S 6 100. IF S 30 A D S 7>0 S 11=S 3/S 7 100. IF S 4>0 A D S 8>0 S 12=S 4/S 8 100. IF S 13>0 A D S 15>0 S 17=S 15/S 13 100. IF S 14>0 A D S 16>0 S 18=S 16/S 14 100. IF S 15>0 A D S 30 S 19=S 15/S 3 100. IF S 16>0 A D S 4>0 S 20=S 16/S 4 100. IF S OR S ! 12 P # =1 S 2=' '&LIC:K AM S 02=' '&LIC:K AM ADD(YU) CLEAR(S ) ADD(YU1) CLEAR(S ). ! 12 CLEAR(S ) CLEAR(S ). ! 7 ADD(YU) ADD(YU1). ! 6, 5, 3 . ! 1 ! -------- СВЕДЕНИЯ ОБ ИЗМЕНЕНИИ ПОКАЗАТЕЛЕЙ ДЕЯТЕЛЬНОСТИ -------- A 1 PROCEDURE YU DOS,ASCII, AME('YU.YU') RECORD S S RI G(210). GROUP,OVER(S ) S RI G(1) S 2 S RI G(32) S RI G(2) S 3 S RI G(@ 8.1) S RI G(1) S 4 S RI G(@ 9.1) S RI G(1) S 5 S RI G(@ - 9.1) S RI G(1) S 6 S RI G(@ 9.1) S RI G(1) S 7 S RI G(@ 8.1) S RI G(1) S 8 S RI G(@ 9.1) S RI G(1) S 9 S RI G(@ - 9.1) S RI G(1) S 10 S RI G(@ 9.1) S RI G(1) S 11 S RI G(@ 7.1) S RI G(1) S 12 S RI G(@ 9.1) S RI G(1) S 13 S RI G(@ - 10.1) S RI G(1) S 14 S RI G(@ 9.1) S RI G(1) S 15 S RI G(@ 8.1) S RI G(1) S 16 S RI G(@ 10.1) S RI G(1) S 17 S RI G(@ - 11.1) S RI G(1) S 18 S RI G(@ 10.1) . REAL CODE P #=0 CREA E(YU) S ='СВЕДЕНИЯ ОБ ИЗМЕНЕНИИ ОТДЕЛЬНЫХ ПОКАЗАТЕЛЕЙ ДЕЯТЕЛЬНОСТИ СТРАХОВЫХ ОРГАНИЗАЦИЙ' S =CE ER(S ) ADD(YU) CLEAR(S ) S =' ' ADD(YU) CLEAR(S ) S ='¦ ¦Уставный капитал¦ Изменение размера ¦Страховые резервы ¦ Изменение размера¦ Страховые ¦Прирост (уменьшение)¦ Страховые выплаты ¦ Прирост( уменьшение)¦' ADD(YU) CLEAR(S ) S ='¦ Наименование ¦(на конец года) ¦уставного капитала ¦ (на конец года) ¦ страховых резервов¦ взносы ¦ поступивших стра- ¦ (на конец года) ¦суммы страховых выплат¦' ADD(YU) CLEAR(S ) S ='¦ ¦ ¦ ( /- ) ¦ ¦ ( /-) ¦ ¦ ховых взносов ¦ ¦ ¦' ADD(YU) CLEAR(S ) S ='¦ страховой oрганизации ‘ ADD(YU) CLEAR(S ) S ='¦ ¦ 1994 ¦ 1995 ¦ в сумме ¦ в % ¦ 1994 ¦ 1995 ¦ в сумме ¦ в % ¦ 1994 ¦ 1995 ¦ в сумме ¦ в % ¦ 1994 ¦ 1995 ¦ в сумме ¦ в % ¦' ADD(YU) CLEAR(S ) S =' ¦' ADD(YU) CLEAR(S ) S ='¦ 1 ¦ 2 ¦ 3 ¦ 4 ¦ 5 ¦ 6 ¦ 7 ¦ 8 ¦ 9 ¦ 10 ¦ 11 ¦ 12 ¦ 13 ¦ 14 ¦ 15 ¦ 16 ¦ 17 ¦' ADD(YU) CLEAR(S ) S =' ¦' ADD(YU) CLEAR(S ) I S: ER=0 SE (I S:K1,I S:K1) LOOP U IL EOF(I SP) EX (I SP) P #=0 if i s: er>23 HE S 2=CLIP(I S: AME)&' инспекция' ELSE S 2='Инспекция ' ADD(yu)=I S: AME. ER:KOD =I S: ER SE ( ER:K1, ER:K1) LOOP U IL EOF( ERR) EX ( ERR) IF ER:KOD I S: ER HE BREAK. IF I S: ER>23 A D P #=0 F: KUS =I S: ER GE (F,F:K1) IF F:F1>0 S 3=F:F1. IF F:F2>0 S 4=F:F2. IF F:F3>0 S 7=F:F3. IF F:F4>0 S 8=F:F4. IF F:F11>0 S 11=F:F11. IF F:F12>0 S 12=F:F12. IF S 3 OR S 4 S 5=S 4-S 3. IF S 3>0 A D S 4>0 S 6=S 4/S 3 100. IF S 7 OR S 8 S 9=S 8-S 7. IF S 7>0 A D S 8>0 S 10=S 8/S 7 100. IF S 12 OR S 11 S 13=S 12-S 11. IF S 12>0 A D S 11>0 S 14=S 12/S 11 100. IF F:F13>0 S 15=F:F13. IF F:F14>0 S 16=F:F14. IF S 15 OR S 16 S 17=S 16-S 15. IF S 15>0 A D S 16>0 S 18=S 16/S 15 100. P #=1 ADD(YU) CLEAR(S ) ADD(YU). XRE: REGIO = ER: REGIO SE (XRE:K1,XRE:K1) LOOP U IL EOF(XREG) EX (XREG) IF XRE: REGIO ER: REGIO HE BREAK. IF I S: ER>23 S 2=XRE:IREG. F: REGIO =XRE: REGIO GE (F,F:K2) IF F:F1>0 S 3=F:F1. IF F:F2>0 S 4=F:F2. IF F:F3>0 S 7=F:F3. IF F:F4>0 S 8=F:F4. IF F:F11>0 S 11=F:F11. IF F:F12>0 S 12=F:F12.
В случае отсутствия указанных условий расходы на оказание медицинской помощи за пределами территории РФ несет сам гражданин. На медицинское страхование граждан, выезжающих за рубеж, распространяются все те же правила, что и на добровольное медицинское страхование. Медицинское страхование является разновидностью личного страхования, страхователями при этом могут выступать как физические, так и юридические лица (например, турфирмы), а застрахованными только граждане. Лицо, выезжающее за рубеж, определяет самостоятельно, к какому страховщику обратиться за страховкой, и конечно же это должен быть страховщик, имеющий лицензию на осуществление ДМС. Обычно турфирмы сотрудничают со страховщиками и могут подсказать клиенту адреса страховых фирм. Если турфирма направляет своего клиента к конкретному страховщику, это не означает, что страхователь обязан обращаться именно в данную страховую компанию. Страхователь имеет право на свободный выбор страховщика. В настоящее время отечественные страховые компании, продающие полисы ДМС, сотрудничают с международными системами assistance, заключая напрямую или через посредника договор с фирмой, специализирующейся на организации предоставления медицинской помощи и прочих услуг в той или иной стране
1. Организация страхового дела в Казахстане. Направления деятельности страховых компаний
2. Разработка базы данных и клиентского приложения
4. Форматы баз данных в автоматизированных библиографических системах
5. Различные классы баз данных по предметным областям использования
9. Работа с Базами данных в Delphi
10. Разработка базы данных, отражающей учет успеваемости студентов
11. Базы данных Microsoft Access
12. Разработка базы данных "Культурный досуг"
13. Системы управления базами данных
14. Алгоритм создания базы данных складского учета
15. Разработка базы данных для объекта автоматизации: гомеопатическая аптека
16. Отчёт по созданию курсовой работы «База данных ACCESS»
17. Инструкция по эксплуатации базы данных магазина «Телевизоры» средствами Access 2000
18. Системы обработки информации - язык баз данных SQL со средствами поддержания целостности
21. База данных периодического издания
25. Организация удаленного доступа к распределенным базам данных
26. Опыт использования ADO для доступа к базам данных форматов MS Access, xBase и Paradox
27. Ответы на теоретические вопросы по предмету База данных
28. Инфологическая модель баз данных "Сущность-связь"
29. Пример проектирования базы данных "Библиотека"
30. Основы использования WWW - технологий для доступа к существующим базам данных
31. Основы работы с базами данных Delphi
32. Параллельные машины баз данных
33. Инфологическое моделирование базы данных
35. Web-серверы, базы данных в Интернет, Поиск информации в Интернет, Основные системы и средства
36. База данных для информационной системы - Таксопарк
37. Защита баз данных. Access 2000
41. Проектирование базы данных Библиотека
42. Разработка баз данных в Delphi
43. Реляционные базы данных-правила формирования отношений
44. Создание базы данных в интегральном пакете Works
45. Создание учебной базы данных Телефонный справочник в Access 97
46. Учет очереди на получение квартир по организациям (база данных)
47. Анализ клиентской базы приносит пользу CRM
48. Некоторые аспекты обеспечения эффективности работы системы управления базами данных
49. Манифест систем объектно-ориентированных баз данных
51. Менеджер подключений к базам данных
52. Информационно-справочная система, обеспечивающая работу с базой данных Bit
53. Реляционные Базы Данных. SQL - стандартный язык реляционных баз данных
60. Лінгвістична база даних українських художніх порівнянь
61. База даних "Кафедра" в Access з меню MDI
62. База даних клієнтів і замовлень
63. База даних по обліку вогнепальної зброї
64. База даних по приватних підприємствах регіону
65. База даних фільмотеки: розробка проекту
66. База данных
67. База данных "Автосервис" в среде Borland Delphi 6.0.
69. База данных "Пассажирские железнодорожные перевозки"
73. База данных аптеки готовых лекарственных форм
74. База данных велосипедного магазина
75. База данных для организации по продаже канцелярских товаров
76. База данных заместителя директора по воспитательной работе приюта г. Аксу
77. База данных компьютерного магазина
78. База данных по учету металлопродукции на платформе SQL Server
80. База данных станции технического обслуживания автомобилей
81. База данных: "Деканат: дистанционное обучение"
82. Базы данных
83. Базы данных
84. Базы данных в юриспруденции
85. Базы данных и их функции. Структурные элементы базы данных
89. Инфологическая модель базы данных дистанционного образования
90. Инфологическое моделирование базы данных "Абитуриент"
91. Информационные технологии создания и обработки баз данных с помощью MS Access XP
92. Історія розвитку баз даних
93. ЛИСП-реализация основных операций над базами данных
94. Методология проектирования баз данных
95. Настольные системы управления базами данных