Index trunk oms_sk src _reports 4gl --- trunk oms_sk src _reports 4gl

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99
100
101
102
103
104
105
106
107
108
Index: /trunk/oms_sk/src/_reports.4gl
===================================================================
--- /trunk/oms_sk/src/_reports.4gl (revision 375)
+++ /trunk/oms_sk/src/_reports.4gl (revision 410)
@@ -144,39 +144,41 @@
WHEN r_num = 17
CALL ReestrQueries(FALSE, TRUE) # без группировки по поликлинике
+ WHEN r_num = 18
+ CALL ReestrQueries(TRUE, TRUE) # с проф.осмотрами, без группировки по поликлинике
# WHEN r_num = 17
# CALL ReestrQueriesP()
- WHEN r_num = 18
+ WHEN r_num = 19
CALL ReestrDouble()
- WHEN r_num = 19
+ WHEN r_num = 20
CALL ReeReport011()
- WHEN r_num = 21
+ WHEN r_num = 22
CALL ReeReport008()
- WHEN r_num = 22
+ WHEN r_num = 23
## пока пенсионеры не нужны -- уберем их
## CALL ReeReport010()
CALL ReportReestrTFItogo(0)
- WHEN r_num = 23
+ WHEN r_num = 24
CALL ReportReestrTFItogo(1)
- WHEN r_num = 24
+ WHEN r_num = 25
CALL ReportReestrMZO()
- WHEN r_num = 25
+ WHEN r_num = 26
CALL ReportReestrGUZOItogo()
- when r_num = 27
+ when r_num = 28
CALL PreparePensioners()
- WHEN r_num = 28
+ WHEN r_num = 29
CALL ReestrResultCalc()
- WHEN r_num = 29
+ WHEN r_num = 30
CALL ReportReestr2PFROMS()
- WHEN r_num = 30
+ WHEN r_num = 31
CALL ReportReestrNewPFR(1)
- WHEN r_num = 31
+ WHEN r_num = 32
CALL ReportReestrNewPFR(0)
- WHEN r_num = 32
+ WHEN r_num = 33
CALL ReportReestrPensForLPUSpec()
- WHEN r_num = 33
+ WHEN r_num = 34
CALL ReportReestrRabForLPU()
- WHEN r_num = 34
+ WHEN r_num = 35
CALL ReportReestrRabForLPUSpec()
- WHEN r_num = 35
+ WHEN r_num = 36
CALL ReportReestrGUZOLPUItogo()
OTHERWISE
@@ -327,26 +329,26 @@
LET rpt_names[16].rpt_descr = "Выборка и сводн.акт по выборке с профосмотрами | == "
LET rpt_names[17].rpt_descr = "Выборка и сводн.акт без группировки по поликлин| == "
+ LET rpt_names[18].rpt_descr = "Выборка и сводн.акт без групп. с профосмотрами | == "
# LET rpt_names[17].rpt_descr = "Выборка и сводн. акт по выборке пенсионеров [*]| == "
- LET rpt_names[18].rpt_descr = "Повторные госпитализации | вертикал"
- LET rpt_names[19].rpt_descr = "Выборка регрессных исков | горизонт"
- LET rpt_names[20].rpt_descr = "-----------------------------------------------|---------"
- LET rpt_names[21].rpt_descr = "Полисы других страховых компаний | горизонт"
+ LET rpt_names[19].rpt_descr = "Повторные госпитализации | вертикал"
+ LET rpt_names[20].rpt_descr = "Выборка регрессных исков | горизонт"
+ LET rpt_names[21].rpt_descr = "-----------------------------------------------|---------"
+ LET rpt_names[22].rpt_descr = "Полисы других страховых компаний | горизонт"
## пока пенсионеры не нужны -- уберем их
## LET rpt_names[22].rpt_descr = "Пенсионеры по реестру | горизонт"
- LET rpt_names[22].rpt_descr = "Сведения по результатам ЭЭ реестров | вертикал"
- LET rpt_names[23].rpt_descr = "Сведения по результатам ЭЭ реестров (по ЛПУ) | горизонт"
- LET rpt_names[24].rpt_descr = "Сведения по результ.ЭЭ реестров (для Мин.Здрав)| горизонт"
- LET rpt_names[25].rpt_descr = "Отчет по ЭЭ для ТФ, Мин.Здрава и Гор.Здрава | горизонт"
- LET rpt_names[26].rpt_descr = "-----------------------------------------------|---------"
- LET rpt_names[27].rpt_descr = "Подготовка пенсионеров к обработке [перед *]| --------"
- LET rpt_names[28].rpt_descr = "Окончательный расчет (пенсионеры отдельно) [*]| вертикал"
- LET rpt_names[29].rpt_descr = "Отчетные формы 2ПФР-ОМС и 2ПФР-ОМС-а [*]| горизонт"
- LET rpt_names[30].rpt_descr = "Новый отчет ПФР (заполнение комм. к актам) [*]| вертикал"
- LET rpt_names[31].rpt_descr = "Новый отчет ПФР (в разрезе ЛПУ) [*]| вертикал"
- LET rpt_names[32].rpt_descr = "Отчет по пенсионерам (в разрезе ЛПУ/спец) [*]| вертикал"
- LET rpt_names[33].rpt_descr = "Отчет по РАБОТАЮЩИМ (в разрезе ЛПУ) | вертикал"
- LET rpt_names[34].rpt_descr = "Отчет по РАБОТАЮЩИМ (в разрезе ЛПУ/специалист) | вертикал"
- LET rpt_names[35].rpt_descr = "Сведения по ЭЭ для ЛПУ (УБ/специалист) | горизонт"
- LET rpt_names[36].rpt_descr = " | "
+ LET rpt_names[23].rpt_descr = "Сведения по результатам ЭЭ реестров | вертикал"
+ LET rpt_names[24].rpt_descr = "Сведения по результатам ЭЭ реестров (по ЛПУ) | горизонт"
+ LET rpt_names[25].rpt_descr = "Сведения по результ.ЭЭ реестров (для Мин.Здрав)| горизонт"
+ LET rpt_names[26].rpt_descr = "Отчет по ЭЭ для ТФ, Мин.Здрава и Гор.Здрава | горизонт"
+ LET rpt_names[27].rpt_descr = "-----------------------------------------------|---------"
+ LET rpt_names[28].rpt_descr = "Подготовка пенсионеров к обработке [перед *]| --------"
+ LET rpt_names[29].rpt_descr = "Окончательный расчет (пенсионеры отдельно) [*]| вертикал"
+ LET rpt_names[30].rpt_descr = "Отчетные формы 2ПФР-ОМС и 2ПФР-ОМС-а [*]| горизонт"
+ LET rpt_names[31].rpt_descr = "Новый отчет ПФР (заполнение комм. к актам) [*]| вертикал"
+ LET rpt_names[32].rpt_descr = "Новый отчет ПФР (в разрезе ЛПУ) [*]| вертикал"
+ LET rpt_names[33].rpt_descr = "Отчет по пенсионерам (в разрезе ЛПУ/спец) [*]| вертикал"
+ LET rpt_names[34].rpt_descr = "Отчет по РАБОТАЮЩИМ (в разрезе ЛПУ) | вертикал"
+ LET rpt_names[35].rpt_descr = "Отчет по РАБОТАЮЩИМ (в разрезе ЛПУ/специалист) | вертикал"
+ LET rpt_names[36].rpt_descr = "Сведения по ЭЭ для ЛПУ (УБ/специалист) | горизонт"
LET rpt_names[37].rpt_descr = " | "
LET rpt_names[38].rpt_descr = " | "