Skip to content
Projects
Groups
Snippets
Help
This project
Loading...
Sign in / Register
Toggle navigation
P
performance
Overview
Overview
Details
Activity
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
0
Issues
0
List
Board
Labels
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
zry
performance
Commits
4d39a83c
Commit
4d39a83c
authored
Sep 22, 2020
by
lcx
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
计算是否带入cmi、药占比系数
parent
037f3bb9
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
20 additions
and
9 deletions
+20
-9
performance/Performance.Services/AllotCompute/ProcessComputService.cs
+14
-3
performance/Performance.Services/PerExcelService/SheetDataCompute/PerSheetDataComputeWorkload.cs
+6
-6
No files found.
performance/Performance.Services/AllotCompute/ProcessComputService.cs
View file @
4d39a83c
...
...
@@ -30,6 +30,8 @@ public class ProcessComputService : IAutoInjection
private
readonly
PerforRescomputeRepository
perforRescomputeRepository
;
private
readonly
LogManageService
logManageService
;
private
readonly
GuaranteeService
guaranteeService
;
private
readonly
PerforHospitalRepository
hospitalRepository
;
private
readonly
PerforPerallotRepository
perallotRepository
;
public
ProcessComputService
(
PerforCofincomeRepository
perforCofincomeRepository
,
PerforCofdrugpropRepository
perforCofdrugpropRepository
,
...
...
@@ -44,7 +46,9 @@ public class ProcessComputService : IAutoInjection
PerforCofcmiRepository
perforCofcmiRepository
,
PerforRescomputeRepository
perforRescomputeRepository
,
LogManageService
logManageService
,
GuaranteeService
guaranteeService
)
GuaranteeService
guaranteeService
,
PerforHospitalRepository
hospitalRepository
,
PerforPerallotRepository
perallotRepository
)
{
this
.
perforCofincomeRepository
=
perforCofincomeRepository
;
this
.
perforCofdrugpropRepository
=
perforCofdrugpropRepository
;
...
...
@@ -60,6 +64,8 @@ public class ProcessComputService : IAutoInjection
this
.
perforRescomputeRepository
=
perforRescomputeRepository
;
this
.
logManageService
=
logManageService
;
this
.
guaranteeService
=
guaranteeService
;
this
.
hospitalRepository
=
hospitalRepository
;
this
.
perallotRepository
=
perallotRepository
;
}
///// <summary>
...
...
@@ -177,6 +183,11 @@ public void Save(List<PerSheet> perSheets, int allotId)
/// </summary>
public
(
List
<
PerSheet
>
Sheets
,
List
<
PerSheet
>
MergeSheets
)
MergeCompute
(
PerExcel
excel
,
int
allotid
)
{
var
allot
=
perallotRepository
.
GetEntity
(
t
=>
t
.
ID
==
allotid
);
if
(
allot
==
null
)
throw
new
ArgumentNullException
(
nameof
(
per_allot
));
var
hospital
=
hospitalRepository
.
GetEntity
(
t
=>
t
.
ID
==
allot
.
HospitalId
);
if
(
hospital
==
null
)
throw
new
ArgumentNullException
(
nameof
(
sys_hospital
));
List
<
PerSheet
>
perSheet
=
new
List
<
PerSheet
>();
//合并科室收入、支出
...
...
@@ -209,7 +220,7 @@ public void Save(List<PerSheet> perSheets, int allotId)
//var onceWorkload1 = workloadCompute.OnceCompute(workload1, confs);
//医生组 二次计算
logManageService
.
WriteMsg
(
"正在生成绩效"
,
"医生组工作量计算"
,
1
,
allotid
,
"ReceiveMessage"
);
var
twiceWorkloadResult1
=
workloadCompute
.
TwiceCompute
(
workload1
,
confs
,
cmis
,
conitem
,
true
);
var
twiceWorkloadResult1
=
workloadCompute
.
TwiceCompute
(
workload1
,
hospital
,
confs
,
cmis
,
conitem
,
true
);
twiceWorkloadResult1
.
Sheet
.
SheetType
=
SheetType
.
ComputeDoctorWorkload
;
perSheet
.
Add
(
twiceWorkloadResult1
.
Sheet
);
...
...
@@ -220,7 +231,7 @@ public void Save(List<PerSheet> perSheets, int allotId)
//var onceWorkload2 = workloadCompute.OnceCompute(workload2);
//护理组 二次计算
logManageService
.
WriteMsg
(
"正在生成绩效"
,
"护理组工作量计算"
,
1
,
allotid
,
"ReceiveMessage"
);
var
twiceWorkloadResult2
=
workloadCompute
.
TwiceCompute
(
workload2
,
confs
,
cmis
,
conitem
);
var
twiceWorkloadResult2
=
workloadCompute
.
TwiceCompute
(
workload2
,
hospital
,
confs
,
cmis
,
conitem
);
twiceWorkloadResult2
.
Sheet
.
SheetType
=
SheetType
.
ComputeNurseWorkload
;
perSheet
.
Add
(
twiceWorkloadResult2
.
Sheet
);
...
...
performance/Performance.Services/PerExcelService/SheetDataCompute/PerSheetDataComputeWorkload.cs
View file @
4d39a83c
...
...
@@ -99,7 +99,7 @@ public PerSheet OnceCompute(PerSheet sheet, List<CofDrugProp> confs = null)
/// </summary>
/// <param name="sheet"></param>
/// <returns></returns>
public
(
PerSheet
Sheet
,
List
<
PerData
>
PerData
)
TwiceCompute
(
PerSheet
sheet
,
List
<
CofDrugProp
>
confs
=
null
,
List
<
cof_cmi
>
cmis
=
null
,
List
<
cof_workitem
>
workitems
=
null
,
bool
isDoctor
=
false
)
public
(
PerSheet
Sheet
,
List
<
PerData
>
PerData
)
TwiceCompute
(
PerSheet
sheet
,
sys_hospital
hospital
,
List
<
CofDrugProp
>
confs
=
null
,
List
<
cof_cmi
>
cmis
=
null
,
List
<
cof_workitem
>
workitems
=
null
,
bool
isDoctor
=
false
)
{
//获取最大列坐标位置
int
thiscell
=
sheet
.
PerHeader
.
OrderByDescending
(
t
=>
t
.
PointCell
).
FirstOrDefault
().
PointCell
+
1
;
...
...
@@ -115,7 +115,7 @@ public PerSheet OnceCompute(PerSheet sheet, List<CofDrugProp> confs = null)
{
var
ds
=
group
.
Select
(
t
=>
{
var
(
cellvalue
,
factor
)
=
ComputValue
(
group
,
confs
,
cmis
,
workitems
,
isDoctor
);
var
(
cellvalue
,
factor
)
=
ComputValue
(
group
,
hospital
,
confs
,
cmis
,
workitems
,
isDoctor
);
var
dto
=
new
PerData
{
...
...
@@ -140,7 +140,7 @@ public PerSheet OnceCompute(PerSheet sheet, List<CofDrugProp> confs = null)
return
(
sheet
,
perDataList
);
}
private
(
decimal
?,
decimal
?)
ComputValue
(
IGrouping
<
object
,
PerData
>
group
,
List
<
CofDrugProp
>
confs
=
null
,
List
<
cof_cmi
>
cmis
=
null
,
List
<
cof_workitem
>
workitems
=
null
,
bool
isDoctor
=
false
)
private
(
decimal
?,
decimal
?)
ComputValue
(
IGrouping
<
object
,
PerData
>
group
,
sys_hospital
hospital
,
List
<
CofDrugProp
>
confs
=
null
,
List
<
cof_cmi
>
cmis
=
null
,
List
<
cof_workitem
>
workitems
=
null
,
bool
isDoctor
=
false
)
{
var
unittype
=
isDoctor
?
new
List
<
int
>
{
(
int
)
UnitType
.
医生组
,
(
int
)
UnitType
.
医技组
,
(
int
)
UnitType
.
专家组
,
(
int
)
UnitType
.
其他医生组
,
(
int
)
UnitType
.
其他医技组
,
(
int
)
UnitType
.
特殊核算组
}
:
new
List
<
int
>
{
(
int
)
UnitType
.
护理组
,
(
int
)
UnitType
.
其他护理组
};
...
...
@@ -149,8 +149,8 @@ public PerSheet OnceCompute(PerSheet sheet, List<CofDrugProp> confs = null)
return
(
group
.
Sum
(
s
=>
s
.
IsFactor
?
s
.
CellValue
*
s
.
FactorValue
:
s
.
CellValue
),
null
);
else
{
var
factor
=
confs
?.
FirstOrDefault
(
t
=>
t
.
AccoutingUnit
==
group
.
First
().
AccountingUnit
)?.
Factor
??
1
;
var
cmifactor
=
cmis
?.
FirstOrDefault
(
t
=>
t
.
AccountingUnit
==
group
.
First
().
AccountingUnit
&&
unittype
.
Contains
(
t
.
UnitType
))?.
Value
??
1
;
var
factor
=
hospital
.
IsOpenDrugprop
==
2
?
1
:
(
confs
?.
FirstOrDefault
(
t
=>
t
.
AccoutingUnit
==
group
.
First
().
AccountingUnit
)?.
Factor
??
1
)
;
var
cmifactor
=
hospital
.
IsOpenCMIPercent
==
2
?
1
:
(
cmis
?.
FirstOrDefault
(
t
=>
t
.
AccountingUnit
==
group
.
First
().
AccountingUnit
&&
unittype
.
Contains
(
t
.
UnitType
))?.
Value
??
1
)
;
//需要乘系数的项
var
fgroup
=
group
.
Where
(
t
=>
workitems
.
Select
(
s
=>
s
.
Item
).
Contains
(
t
.
TypeName
));
//需要乘系数的项
...
...
@@ -171,7 +171,7 @@ public PerSheet OnceCompute(PerSheet sheet, List<CofDrugProp> confs = null)
value
+=
ngroup
.
Sum
(
s
=>
{
var
cellvalue
=
s
.
IsFactor
?
s
.
CellValue
*
s
.
FactorValue
:
s
.
CellValue
;
if
(
workitems
.
Any
(
w
=>
w
.
Type
==
2
)
&&
workitems
.
Where
(
w
=>
w
.
Type
==
2
).
Select
(
q
=>
q
.
Item
).
Contains
(
s
.
TypeName
))
if
(
workitems
.
Any
(
w
=>
w
.
Type
==
1
)
&&
workitems
.
Where
(
w
=>
w
.
Type
==
1
).
Select
(
q
=>
q
.
Item
).
Contains
(
s
.
TypeName
))
{
cellvalue
=
cmifactor
*
cellvalue
;
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment